Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
|
|
@ -0,0 +1,24 @@
|
|||
INSTALL @lib$+"TIMERLIB"
|
||||
|
||||
DIM test%(9)
|
||||
test%() = 4, 65, 2, 31, 0, 99, 2, 83, 782, 1
|
||||
|
||||
FOR i% = 0 TO DIM(test%(),1)
|
||||
p% = EVAL("!^PROCtask" + STR$(i%))
|
||||
tid% = FN_ontimer(100 + test%(i%), p%, 0)
|
||||
NEXT
|
||||
|
||||
REPEAT
|
||||
WAIT 0
|
||||
UNTIL FALSE
|
||||
|
||||
DEF PROCtask0 : PRINT test%(0) : ENDPROC
|
||||
DEF PROCtask1 : PRINT test%(1) : ENDPROC
|
||||
DEF PROCtask2 : PRINT test%(2) : ENDPROC
|
||||
DEF PROCtask3 : PRINT test%(3) : ENDPROC
|
||||
DEF PROCtask4 : PRINT test%(4) : ENDPROC
|
||||
DEF PROCtask5 : PRINT test%(5) : ENDPROC
|
||||
DEF PROCtask6 : PRINT test%(6) : ENDPROC
|
||||
DEF PROCtask7 : PRINT test%(7) : ENDPROC
|
||||
DEF PROCtask8 : PRINT test%(8) : ENDPROC
|
||||
DEF PROCtask9 : PRINT test%(9) : ENDPROC
|
||||
Loading…
Add table
Add a link
Reference in a new issue