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 7,1
- .CEN(*Well done (.INF 1).*)
- .SPE(*WELLDONE*)
- .LOC 9,1
- .CEN(*You have passed this test.*)
- .LOC 11,1
- .CEN(*Consult your tutor.*)
- @GOT:THEEND
- @LAB:FAILED
- .LOC 5,1
- .CEN(*Sorry (.INF 1).*)
- .SPE(*IAMSORRY*)
- .LOC 7,1
- .CEN(*You had problems with more than*)
- .LOC 9,1
- .CEN(*one of the questions. You should*)
- .LOC 11,1
- .CEN(*consult your tutor before going on.*)
- @LAB:THEEND
- .SPE(*CONSULT*)
- .LOC 13,1
- .COL 5,0
- .CEN(*At this stage in the full version*)
- .LOC 15,1
- .CEN(*of the program you would be able*)
- .LOC 17,1
- .CEN(*to see your results, which are stored*)
- .LOC 19,1
- .CEN(*for future reference, displayed as*)
- .LOC 21,1
- .CEN(*an on-screen or printed certificate.*)
- .PUT 250,187 PART=3 PSET
- .PAU(**)
- @SYS STOP
-
-