5 REM Lasse Olofsson
10 REM FR]N RAD 20-40 LIGGER PROGRAMMET SOM TAR BORT FUNKTIONEN CTRL/C
20 POKE 63796%,56%,249%,148%,5%,245%,219%,56%,254%,131%,40%,4%,241%,195%,30%,3%,241%
30 POKE 63812%,251%,237%,77%,245%,62%,0%,237%,71%,62%,128%,50%,7%,254%,241%,201%,245%
40 POKE 63828%,62%,249%,237%,71%,241%,201%
50 REM START [NDRA I-REG
60 Z%=CALL(63827)
70 REM 
80 REM NU FUNGERAR EJ CTRL/C MER
90 REM 
100 REM H[R LIGGER TESTPROGRAMMET
110 GET I$ : ; I$
120 IF I$<>'^' THEN 110 : REM TRYCK '^' S] STOPPAR PROGRAMMET GENOM ANROP TILL 63815
130 REM 
140 REM STOPP AV PROGRAMMET
150 Z%=CALL(63815)
160 GOTO 110 : REM HAR EGENTLIGEN INGEN FUNKTION
170 REM 
180 REM LASSE OLOFSSON
190 REM