10 REM ++++++++++++++++++++++++++++++++
11 REM ! Program ....   NOCTRLC
12 REM ! Utg}va
13 REM ! av (c) Lasse Olofsson
14 REM ! Minne 16 Kbytes
15 REM ++++++++++++++++++++++++++++++++
16 REM 
17 REM Screened by )TCP(
18 REM 
19 POKE 63796%,56%,249%,148%,5%,245%,219%,56%,254%,131%,40%,4%,241%,195%,30%,3%,241%
20 POKE 63812%,251%,237%,77%,245%,62%,0%,237%,71%,62%,128%,50%,7%,254%,241%,201%,245%
21 POKE 63828%,62%,249%,237%,71%,241%,201%
22 REM START [NDRA I-REG
23 Z%=CALL(63827)
24 REM 
25 REM NU FUNGERAR EJ CTRL/C MER
26 REM 
27 REM H[R LIGGER TESTPROGRAMMET
28 GET I$ : ; I$
29 IF I$<>'^' THEN 28 : REM TRYCK '^' S] STOPPAR PROGRAMMET GENOM ANROP TILL 63815
30 REM 
31 REM STOPP AV PROGRAMMET
32 Z%=CALL(63815)
33 GOTO 28 : REM HAR EGENTLIGEN INGEN FUNKTION
34 REM 
35 REM LASSE OLOFSSON
36 REM