home *** CD-ROM | disk | FTP | other *** search
- .SCR 1
- .COL 8
- .PAL 1
- .SNA(*(.INF 39)1*)
- .TIM STOP #1 MINUTES
- .LET(*#4=#42*)
- .LOC 2,23(*END*)
- .LET (*#10=#35-#36*)
- @EQU (*#10>#30*):FAILED
- .LOC 12,1
- .CEN(*Well done (.INF 1).*)
- .SPE(*WELLDONE*)
- .LOC 14,1
- .CEN(*You have passed this test.*)
- .LOC 16,1
- .CEN(*Consult your tutor.*)
- @GOT:THEEND
- @LAB:FAILED
- .LOC 10,1
- .CEN(*Sorry (.INF 1).*)
- .SPE(*IAMSORRY*)
- .LOC 12,1
- .CEN(*You had problems with more than*)
- .LOC 14,1
- .CEN(*one of the questions, you should*)
- .LOC 16,1
- .CEN(*consult your tutor, before going on.*)
- @LAB:THEEND
- .SPE(*CONSULT*)
- .LOC 18,1
- .CEN(*Your results are available now.*)
- .PUT 250,187 PART=3 PSET
- .PAU(**)
- @SYS STOP
-
-