Subversion Repositories svnkaklik

Rev

Go to most recent revision | Details | Last modification | View Log

Rev Author Line No. Line
1 kaklik 1
#pragma reserve 0 3
2
#define n  @3    // VAR 3
3
task main()
4
{
5
     PlaySound(SOUND_DOUBLE_BEEP);
6
//     asm{0x14, 3, 2, 10, 0};   // setv 3, constant, 10
7
     CreateDatalog(100);
8
     while (true)
9
     {
10
        AddToDatalog(n);
11
        n=n+1;
12
        SetUserDisplay(n, 0);
13
        Wait(100);
14
     }
15
}