view user/screen.c3 @ 333:dcae6574c974

Increment to qt5
author Windel Bouwman
date Sun, 09 Feb 2014 15:27:57 +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);
    }
}