1 REM Ins{nt av 664
1 REM Ins{nt av 664
1 REM +++++++++++++++++++++++++++++++++
2 REM ! Program ....   DELREN.UTL
3 REM ! Utg}va  1.0    830312
4 REM ! av (c) Stig Johansson, BRASTAD.
5 REM ! Tel. 0523/40209 -40976.
7 REM ! Minne 16 Kbytes
8 REM ! Check-sa. 11273
9 REM +++++++++++++++++++++++++++++++++
10 REM F|r DELNUMRERING av program.
11 REM Anropas med CTRL R
20 POKE -6656%,62%,230%,237%,71%,201%,245%,58%,36%,254%,61%,250%,31%,3%,219%,56%
30 POKE -6641%,254%,146%,40%,3%,195%,31%,3%,229%,213%,197%,42%,39%,254%,43%,43%
40 POKE -6626%,43%,126%,254%,0%,32%,9%,43%,126%,254%,240%,32%,3%,195%,58%,230%
50 POKE -6611%,193%,209%,225%,195%,31%,3%,0%,5%,230%,148%,5%,24%,203%,33%,64%
60 POKE -6596%,230%,229%,237%,77%,33%,33%,231%,1%,20%,0%,205%,11%,0%,1%,13%
70 POKE -6581%,0%,33%,53%,231%,205%,5%,0%,33%,53%,231%,205%,30%,24%,33%,69%
80 POKE -6566%,231%,115%,35%,114%,33%,53%,231%,205%,57%,15%,34%,71%,231%,33%,53%
90 POKE -6551%,231%,126%,35%,254%,45%,32%,250%,205%,30%,24%,229%,33%,73%,231%,115%
100 POKE -6536%,35%,114%,225%,126%,35%,254%,44%,32%,250%,126%,254%,13%,40%,9%,205%
110 POKE -6521%,30%,24%,122%,179%,40%,16%,126%,35%,254%,13%,40%,13%,254%,44%,194%
120 POKE -6506%,33%,7%,205%,30%,24%,122%,179%,202%,33%,7%,213%,205%,1%,13%,193%
130 POKE -6491%,33%,69%,231%,94%,35%,86%,42%,71%,231%,126%,61%,40%,32%,35%,245%
140 POKE -6476%,197%,205%,7%,231%,193%,254%,0%,40%,21%,241%,115%,35%,114%,61%,133%
150 POKE -6461%,111%,48%,1%,36%,235%,9%,235%,48%,226%,1%,10%,0%,197%,24%,211%
160 POKE -6446%,42%,28%,254%,241%,126%,61%,202%,204%,0%,35%,35%,35%,205%,251%,14%
170 POKE -6431%,56%,243%,126%,6%,1%,254%,191%,40%,6%,254%,190%,32%,240%,35%,70%
180 POKE -6416%,35%,229%,35%,205%,28%,16%,123%,178%,40%,8%,227%,19%,26%,119%,35%
190 POKE -6401%,19%,26%,119%,225%,16%,236%,24%,215%,229%,35%,126%,60%,33%,74%,231%
200 POKE -6386%,78%,12%,225%,185%,216%,229%,126%,60%,33%,73%,231%,78%,12%,225%,185%
210 POKE -6371%,216%,62%,0%,201%,65%,110%,103%,101%,58%,32%,82%,97%,100%,45%,82%
220 POKE -6356%,97%,100%,44%,83%,116%,101%,103%,46%,58%,0%,0%,0%,0%,0%,0%
230 POKE -6341%,0%,0%,0%,0%,0%,0%,0%,0%,0%,0%,0%,0%,0%,0%,0%,0%
240 Z%=CALL(58880%) : CHAIN ''