996
|
1
|
|
2 DO (10) NEXT
|
|
3
|
|
4 (10) PLEASE FORGET #1
|
|
5 DO WRITE IN .1
|
|
6 DO (2000) NEXT
|
|
7 DO READ OUT .1
|
|
8 DO GIVE UP
|
|
9
|
|
10 (20) PLEASE FORGET #1
|
|
11 DO WRITE IN .1
|
|
12 DO (22) NEXT
|
|
13 (21) DO (2010) NEXT
|
|
14 DO READ OUT .1
|
|
15 (22) PLEASE FORGET #1
|
|
16 DO (21) NEXT
|
|
17 DO READ OUT .1
|
|
18 DO GIVE UP
|
|
19
|
|
20 (30) PLEASE FORGET #1
|
|
21 DO WRITE IN .1
|
|
22 DO WRITE IN .2
|
|
23 DO (2020) NEXT
|
|
24 DO READ OUT .1
|
|
25 DO GIVE UP
|
|
26
|
|
27
|
|
28
|
|
29 (2010) PLEASE ABSTAIN FROM (2004)
|
|
30 (2000) DO STASH .2
|
|
31 DO .2 <- #1
|
|
32 DO (2001) NEXT
|
|
33 (2001) PLEASE FORGET #1
|
|
34 DO .1 <- '?.1$.2'~'#0$#65535'
|
|
35 DO (2002) NEXT
|
|
36 DO .2 <- !2$#0'~'#32767$#1'
|
|
37 DO (2001) NEXT
|
|
38 (2003) PLEASE RESUME "?!1~.2'$#1"~#3
|
|
39 (2002) DO (2003) NEXT
|
|
40 PLEASE RETRIEVE .2
|
|
41 (2004) PLEASE RESUME #2
|
|
42 PLEASE DO REINSTATE (2004)
|
|
43 PLEASE RESUME '?"!1~.1'~#1"$#2'~#6
|
|
44
|
|
45 (2020) PLEASE STASH .2 + .3
|
|
46 DO (1021) NEXT
|
|
47
|
|
48
|
|
49
|
|
50 (1020) DO STASH .2 + .3
|
|
51 DO .2 <- #1
|
|
52 PLEASE DO (1021) NEXT
|
|
53 (1021) DO FORGET #1
|
|
54 DO .3 <- "?!1~.2'$#1"~#3
|
|
55 PLEASE DO .1 <- '?.1$.2'~'#0$#65535'
|
|
56 DO (1022) NEXT
|
|
57 DO .2 <- !2$#0'~'#32767$#1'
|
|
58 DO (1021) NEXT
|
|
59 (1023) PLEASE RESUME .3
|
|
60 (1022) DO (1023) NEXT
|
|
61 PLEASE RETRIEVE .2 + .3
|
|
62 PLEASE RESUME #2
|