Mercurial > lcfOS
view user/screen.c3 @ 320:84d67cce67b7
Working burg
author | Windel Bouwman |
---|---|
date | Sun, 19 Jan 2014 16:09:44 +0100 |
parents | 084cccaa5deb |
children |
line wrap: on
line source
module screen; import ipc; const int num_cols = 80; const int num_rows = 25; var int* vidmem; function void clear() { var int row, col; for (row = 0; row < num_rows; rows++) { for (col = 0; col < num_cols; cols=cols+1) { *vidmem = 0x20; } } } function void main() { // Initialize display clear(); while (true) { var ipc.Msg msg; ipc.receive_message(&msg); } }