7 lines
157 B
Text
7 lines
157 B
Text
PROCrecurse(1)
|
|
END
|
|
|
|
DEF PROCrecurse(depth%)
|
|
IF depth% MOD 100 = 0 PRINT TAB(0,0) depth%;
|
|
PROCrecurse(depth% + 1)
|
|
ENDPROC
|