996
|
1
|
|
2 DO ,1 <- #1
|
|
3 DO .4 <- #0
|
|
4 DO .5 <- #0
|
|
5 DO COME FROM (30)
|
|
6 DO WRITE IN ,1
|
|
7 DO .1 <- ,1SUB#1
|
|
8 DO (10) NEXT
|
|
9 PLEASE GIVE UP
|
|
10 (20) PLEASE RESUME '?.1$#256'~'#256$#256'
|
|
11 (10) DO (20) NEXT
|
|
12 DO FORGET #1
|
|
13 DO .2 <- .4
|
|
14 DO (1000) NEXT
|
|
15 DO .4 <- .3~#255
|
|
16 DO (50) NEXT
|
|
17 DO .3 <- !3~#15'$!3~#240'
|
|
18 DO .3 <- !3~#15'$!3~#240'
|
|
19 DO .2 <- !3~#15'$!3~#240'
|
|
20 DO .1 <- .5
|
|
21 DO (1010) NEXT
|
|
22 DO .5 <- .2
|
|
23 PLEASE DO ,1SUB#1 <- .3
|
|
24 (30) PLEASE READ OUT ,1
|
|
25
|
|
26 (50) PLEASE STASH .1 + .2 + .4 + .5 + .11+.12+.13+.14+.15+.16+.17+.18
|
|
27 PLEASE DO .5 <- .4
|
|
28 PLEASE DO .1 <- .5
|
|
29 DO .2 <- #65
|
|
30 DO (500) NEXT
|
|
31 DO .11 <- .3~#2
|
|
32 DO .2 <- #78
|
|
33 DO (500) NEXT
|
|
34 DO .12 <- .3~#2
|
|
35 DO .2 <- #97
|
|
36 DO (500) NEXT
|
|
37 DO .13 <- .3~#2
|
|
38 DO .2 <- #110
|
|
39 DO (500) NEXT
|
|
40 DO .14 <- .3~#2
|
|
41 PLEASE DO .2 <- .5
|
|
42 DO .1 <- #77
|
|
43 DO (500) NEXT
|
|
44 DO .15 <- .3~#2
|
|
45 DO .1 <- #90
|
|
46 DO (500) NEXT
|
|
47 DO .16 <- .3~#2
|
|
48 DO .1 <- #109
|
|
49 DO (500) NEXT
|
|
50 DO .17 <- .3~#2
|
|
51 DO .1 <- #122
|
|
52 DO (500) NEXT
|
|
53 DO .18 <- .3~#2
|
|
54 PLEASE DO .1 <- ' "'"!12$.11'~#3"$"!14$.13'~#3"'~#15"
|
|
55 $"'"!16$.15'~#3"$"!18$.17'~#3"'~#15" '~#255
|
|
56 PLEASE DO .1 <- 'V"!&1'~#85"'~#5
|
|
57 DO .2 <- "!1~#2'$!1~#2'"~#3
|
|
58 DO .1 <- !2$.1'~#15
|
|
59 DO .2 <- !2$.2'~#15
|
|
60 DO .2 <- "!1$.2'$!1$"'"V!2$.1'"~#15'"'"~#65535
|
|
61 DO .1 <- .5
|
|
62 PLEASE DO (1009) NEXT
|
|
63 PLEASE RETRIEVE .1 + .2 + .4 + .5 + .11+.12+.13+.14+.15+.16+.17+.18
|
|
64 PLEASE RESUME #1
|
|
65
|
|
66 (500) PLEASE STASH .4
|
|
67 DO .3 <- "?!1$.2'"~"#0$#65535"
|
|
68 DO .4 <- .3~.3
|
|
69 DO .4 <- '&"!?4'$.4"'~'#0$#65535'
|
|
70 DO .3 <- '"'&"!1~.3'$.4"'~'#0$#65535'"~.4'
|
|
71 $'"'&"!2~.3'$.4"'~'#0$#65535'"~.4'
|
|
72 DO .3 <- "?'"!3~#1'$!3~#2'"$"#1$!3~#1'"'"~#5
|
|
73 PLEASE RETRIEVE .4
|
|
74 DO RESUME #1
|