Subversion Repositories svnkaklik

Rev

Rev 1 | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log

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