00 { 2250-Byte Prgm }
01▸LBL "OKIE"
02 CLLCD
03 XEQ A
04 1
05 1
06 AGRAPH
07 XEQ C
08 9
09 1
10 AGRAPH
11 XEQ B
12 1
13 43
14 AGRAPH
15 XEQ D
16 9
17 43
18 AGRAPH
19 "££££"
20 255
21 XTOA
22 XTOA
23 ├"∫∫"
24 243
25 XTOA
26 ├"∫∫∫π"
27 6
28 XTOA
29 ├"↓>"
30 250
31 XTOA
32 242
33 XTOA
34 ├"£"
35 1
36 57
37 AGRAPH
38 "!!!!"
39 255
40 XTOA
41 XTOA
42 192
43 XTOA
44 XTOA
45 199
46 XTOA
47 R↓
48 XTOA
49 XTOA
50 XTOA
51 224
52 XTOA
53 ├"`p<?'!"
54 9
55 57
56 AGRAPH
57 XEQ A
58 1
59 76
60 AGRAPH
61 XEQ C
62 9
63 76
64 AGRAPH
65 XEQ B
66 1
67 118
68 AGRAPH
69 XEQ D
70 9
71 118
72 AGRAPH
73 GETKEY
74 GTO 08
75▸LBL A
76 CLA
77 242
78 XTOA
79 250
80 XTOA
81 ├">↓"
82 6
83 XTOA
84 ├"π∫"
85 227
86 XTOA
87 ├"∫∫π"
88 6
89 XTOA
90 ├"↓>"
91 250
92 XTOA
93 242
94 XTOA
95 ├"£"
96 255
97 XTOA
98 XTOA
99 ├"∫∫∫"
100 127
101 XTOA
102 ├"∫∫"
103 195
104 XTOA
105 227
106 XTOA
107 127
108 XTOA
109 ├"•∡°£"
110 255
111 XTOA
112 XTOA
113 ├"###"
114 XTOA
115 XTOA
116 ├"£"
117 XTOA
118 XTOA
119 RTN
120▸LBL B
121 "∫∫∫∫########"
122 255
123 XTOA
124 XTOA
125 RTN
126▸LBL C
127 "'?<p`"
128 224
129 XTOA
130 192
131 XTOA
132 195
133 XTOA
134 R↓
135 XTOA
136 XTOA
137 224
138 XTOA
139 ├"`p<?'!"
140 255
141 XTOA
142 XTOA
143 192
144 XTOA
145 XTOA
146 XTOA
147 252
148 XTOA
149 R↓
150 XTOA
151 XTOA
152 193
153 XTOA
154 199
155 XTOA
156 207
157 XTOA
158 253
159 XTOA
160 241
161 XTOA
162 225
163 XTOA
164 ├"!"
165 255
166 XTOA
167 XTOA
168 192
169 XTOA
170 XTOA
171 XTOA
172 R↓
173 XTOA
174 XTOA
175 ├"!"
176 XTOA
177 XTOA
178 RTN
179▸LBL D
180 CLA
181 192
182 XTOA
183 XTOA
184 XTOA
185 XTOA
186 XTOA
187 198
188 XTOA
189 XTOA
190 XTOA
191 XTOA
192 XTOA
193 XTOA
194 XTOA
195 255
196 XTOA
197 XTOA
198 RTN
199▸LBL 08
200 "1-6"
201 KEY 1 GTO 11
202 "7-12"
203 KEY 2 GTO 12
204 "13-18"
205 KEY 3 GTO 13
206 "19-24"
207 KEY 4 GTO 14
208 "25-30"
209 KEY 5 GTO 15
210 "RAND"
211 KEY 6 GTO 63
212 KEY 9 GTO 24
213 MENU
214▸LBL 09
215 "Select level"
216 AVIEW
217 STOP
218 GTO 09
219▸LBL 11
220 AVIEW
221 1
222 GTO 16
223▸LBL 12
224 AVIEW
225 7
226 GTO 16
227▸LBL 13
228 AVIEW
229 13
230 GTO 16
231▸LBL 14
232 AVIEW
233 19
234 GTO 16
235▸LBL 15
236 AVIEW
237 25
238▸LBL 16
239 STO 10
240 30
241 X<>Y
242 +
243 STO 11
244 LASTX
245 CLA
246 AIP
247 KEY 1 GTO 17
248 1
249 +
250 CLA
251 AIP
252 KEY 2 GTO 18
253 1
254 +
255 CLA
256 AIP
257 KEY 3 GTO 19
258 1
259 +
260 CLA
261 AIP
262 KEY 4 GTO 20
263 1
264 +
265 CLA
266 AIP
267 KEY 5 GTO 21
268 1
269 +
270 CLA
271 AIP
272 KEY 6 GTO 22
273 KEY 9 GTO 08
274 MENU
275▸LBL 23
276 "Select level"
277 AVIEW
278 STOP
279 GTO 23
280▸LBL 24
281 CLV "_oki"
282 EXITALL
283 STOP
284▸LBL 22
285 1
286 STO+ 11
287▸LBL 21
288 1
289 STO+ 11
290▸LBL 20
291 1
292 STO+ 11
293▸LBL 19
294 1
295 STO+ 11
296▸LBL 18
297 1
298 STO+ 11
299▸LBL 17
300 GTO IND 11
301▸LBL 63
302 RAN
303 29
304 ×
305 1
306 +
307 STO 10
308 30
309 +
310 STO 11
311 XEQ IND ST X
312▸LBL 31
313 ">>>>>>"
314 GTO 10
315▸LBL 32
316 "÷Å""Å÷"
317 GTO 10
318▸LBL 33
319 "Å÷÷÷÷Å"
320 GTO 10
321▸LBL 34
322 ""Å÷÷Å""
323 GTO 10
324▸LBL 35
325 "÷""""÷"
326 GTO 10
327▸LBL 36
328 "÷÷66÷÷"
329 GTO 10
330▸LBL 37
331 "Å6""6Å"
332 GTO 10
333▸LBL 38
334 ""Å""Å""
335 GTO 10
336▸LBL 39
337 ">"¿¿">"
338 GTO 10
339▸LBL 40
340 ""÷÷÷÷""
341 GTO 10
342▸LBL 41
343 "Å6666Å"
344 GTO 10
345▸LBL 42
346 "÷¿""¿÷"
347 GTO 10
348▸LBL 43
349 "">ÖÖ>""
350 GTO 10
351▸LBL 44
352 "÷÷←←÷÷"
353 GTO 10
354▸LBL 45
355 "÷÷÷÷←÷"
356 GTO 10
357▸LBL 46
358 "↓[LF][LF][LF]*8"
359 GTO 10
360▸LBL 47
361 "÷ ←¿÷÷"
362 GTO 10
363▸LBL 48
364 "ᴇ$[LF]$√ "
365 GTO 10
366▸LBL 49
367 "←÷√÷"
368 4
369 XTOA
370 ├"←"
371 GTO 10
372▸LBL 50
373 "√>£÷££"
374 GTO 10
375▸LBL 51
376 CLA
377 6
378 XTOA
379 ├"8"
380 XTOA
381 ├"(Å("
382 GTO 10
383▸LBL 52
384 "8,…$ᴇ"
385 4
386 XTOA
387 GTO 10
388▸LBL 53
389 ">"
390 30
391 XTOA
392 ├">"
393 XTOA
394 ├">"
395 XTOA
396 GTO 10
397▸LBL 54
398 "*←[LF] ÷ "
399 GTO 10
400▸LBL 55
401 "6>.2<>"
402 GTO 10
403▸LBL 56
404 "÷÷$←÷Å"
405 GTO 10
406▸LBL 57
407 "&Å"
408 4
409 XTOA
410 ├"[LF]←√"
411 GTO 10
412▸LBL 58
413 "↓÷&ᴇ"
414 6
415 XTOA
416 ├"ᴇ"
417 GTO 10
418▸LBL 59
419 "Å÷ᴇ√÷√"
420 GTO 10
421▸LBL 60
422 "←…√0√<"
423▸LBL 10
424 CLLCD
425 ASTO 09
426 "∡ÑÜ÷•Ñμ÷ו×÷•←•"
427 ├"÷•Σπ÷←÷←÷←"
428 6
429 55
430 AGRAPH
431 CLA
432 ARCL 09
433 GROW
434 RECT
435 1
436 ENTER
437 NEWMAT
438 ENTER
439 COMPLEX
440 STO "_oki"
441 INDEX "_oki"
442 7.04207
443 STO 03
444▸LBL 00
445 ATOX
446 STO 07
447 2
448 STO 08
449 2.01403
450 STO 04
451▸LBL 01
452 RCL 07
453 RCL 08
454 AND
455 X=0?
456 GTO 06
457 RCL 03
458 IP
459 RCL 04
460 IP
461 COMPLEX
462 STOEL
463 J+
464▸LBL 06
465 2
466 STO× 08
467 ISG 04
468 GTO 01
469 ISG 03
470 GTO 00
471 RCL "_oki"
472 CLLCD
473 "∫∫∫"
474 AGRAPH
475 1
476 -1
477 PIXEL
478 1
479 2
480 PIXEL
481 16
482 2
483 PIXEL
484 1
485 49
486 PIXEL
487 16
488 49
489 PIXEL
490 1
491 -50
492 PIXEL
493 WRAP
494 1
495 6
496 NEWMAT
497 STO "_oki"
498 1.006
499 STO 03
500 CLA
501 ARCL 09
502▸LBL 07
503 ATOX
504 STOEL
505 J+
506 ISG 03
507 GTO 07
508 CLA
509 30
510 XTOA
511 ├"aaa"
512 XTOA
513 ├"÷÷"
514 XEQ 61
515 1
516 86
517 AGRAPH
518 CLA
519 127
520 XTOA
521 ├"aaa"
522 30
523 XTOA
524 ├"÷ÖbbbÖ÷"
525 XEQ 61
526 1
527 109
528 AGRAPH
529 GTO 62
530▸LBL 61
531 ├"~ᴇ$B÷}÷8tLD"
532 RTN
533▸LBL 62
534 "•←←÷•Ñμ÷πᴇπ÷•Ñμ"
535 ├"÷•←←÷[LF]"
536 3
537 56
538 AGRAPH
539 9
540 63
541 RCL 11
542 30
543 -
544 STO 10
545 10
546 ÷
547 XEQ "UFL"
548 4
549 +
550 RCL 10
551 10
552 MOD
553 XEQ "UFL"
554 CLA
555 127
556 XTOA
557 ├"[Um"
558 XTOA
559 ├"AU]"
560 XTOA
561 ├"A__"
562 XTOA
563 ├"c]]"
564 XTOA
565 ├"}A}"
566 XTOA
567 ├"÷"
568 XTOA
569 ├"AuI"
570 XTOA
571 ├"AU]"
572 XTOA
573 ├"[Um"
574 XTOA
575 ├"AU]"
576 XTOA
577 ├"}A}"
578 XTOA
579 10
580 88
581 AGRAPH
582 SF 34
583 SF 35
584 2
585 STO 00
586 STO 02
587 7
588 STO 01
589 1
590 STO 07
591 0
592 STO 06
593 STO 05
594 "÷÷÷÷→≤÷÷÷÷÷≤→"
595 AGRAPH
596▸LBL 02
597 GETKEY
598 63
599 +
600 SF 25
601 XEQ IND ST X
602 GTO 02
603▸LBL 76
604▸LBL 88
605▸LBL 97
606 RCLIJ
607 1
608 X=Y?
609 GTO 03
610 "ᴇᴇᴇ÷÷÷÷"
611 219
612 XTOA
613 XTOA
614 XTOA
615 R↓
616 X<>Y
617 6
618 X≠Y?
619 GTO 04
620 RCL 07
621 2
622 -
623 RCL 06
624 AGRAPH
625 J-
626 RCLEL
627 RCL 00
628 XOR
629 62
630 AND
631 STOEL
632 J+
633 RCLEL
634 RCL 01
635 XOR
636 62
637 AND
638 STOEL
639 1
640 STO+ 05
641 "÷÷÷÷→≤÷÷÷÷÷≤→"
642 RCL "_oki"
643 FNRM
644 X≠0?
645 RTN
646 GTO 25
647▸LBL 04
648 ├"÷÷÷÷ᴇᴇᴇ"
649 RCL 07
650 2
651 -
652 RCL 06
653 AGRAPH
654 J-
655 RCLEL
656 RCL 00
657 XOR
658 62
659 AND
660 STOEL
661 J+
662 GTO 05
663▸LBL 03
664 CLA
665 219
666 XTOA
667 XTOA
668 XTOA
669 ├"÷÷÷÷ᴇᴇᴇ"
670 RCL 07
671 2
672 -
673 RCL 06
674 7
675 +
676 AGRAPH
677▸LBL 05
678 RCLEL
679 RCL 01
680 XOR
681 62
682 AND
683 STOEL
684 J+
685 RCLEL
686 RCL 02
687 XOR
688 62
689 AND
690 STOEL
691 J-
692 1
693 STO+ 05
694 "÷÷÷÷→≤÷÷÷÷÷≤→"
695 RCL "_oki"
696 FNRM
697 X≠0?
698 RTN
699 GTO 25
700▸LBL 93
701 RCL 01
702 64
703 AND
704 X≠0?
705 RTN
706 RCL 07
707 RCL 06
708 AGRAPH
709 X<>Y
710 3
711 +
712 STO 07
713 X<>Y
714 AGRAPH
715 2
716 STO× 00
717 STO× 01
718 STO× 02
719 RTN
720▸LBL 83
721 RCL 01
722 1
723 AND
724 X≠0?
725 RTN
726 RCL 07
727 RCL 06
728 AGRAPH
729 X<>Y
730 3
731 -
732 STO 07
733 X<>Y
734 AGRAPH
735 2
736 STO÷ 00
737 STO÷ 01
738 STO÷ 02
739 RTN
740▸LBL 87
741 RCLIJ
742 1
743 X=Y?
744 RTN
745 RCL 07
746 RCL 06
747 AGRAPH
748 7
749 -
750 STO 06
751 AGRAPH
752 J-
753 RTN
754▸LBL 89
755 RCLIJ
756 6
757 X=Y?
758 RTN
759 RCL 07
760 RCL 06
761 AGRAPH
762 7
763 +
764 STO 06
765 AGRAPH
766 J+
767 RTN
768▸LBL 68
769 GTO 08
770▸LBL 69
771 GTO IND 11
772▸LBL 25
773 RCL 07
774 RCL 06
775 AGRAPH
776 "π→xx→π÷>"
777 127
778 XTOA
779 ├"AA"
780 XTOA
781 ├">÷?"
782 XTOA
783 ├"@@"
784 XTOA
785 ├"?÷÷÷÷÷"
786 XTOA
787 XTOA
788 ├"0ᴇ0"
789 XTOA
790 XTOA
791 ├"÷A"
792 XTOA
793 XTOA
794 ├"A÷"
795 XTOA
796 XTOA
797 ├"↓Ö"
798 XTOA
799 XTOA
800 2
801 4
802 AGRAPH
803 ">√≠√>÷>">÷↓0↓÷>"
804 ├"*"÷.*:÷Å"
805 10
806 6
807 AGRAPH
808 RCL 05
809 9999
810 X<Y?
811 STO 05
812 10
813 30
814 RCL 05
815 1ᴇ3
816 ÷
817 XEQ "UFL"
818 4
819 +
820 RCL 05
821 100
822 ÷
823 10
824 MOD
825 XEQ "UFL"
826 4
827 +
828 RCL 05
829 10
830 ÷
831 LASTX
832 MOD
833 XEQ "UFL"
834 4
835 +
836 RCL 05
837 10
838 MOD
839 XEQ "UFL"
840▸LBL E
841 GETKEY
842 5
843 X=Y?
844 GTO 08
845 R↓
846 6
847 X=Y?
848 GTO IND 11
849 GTO E
850▸LBL 99
851 GTO 08
852 END

00 { 73-Byte Prgm }
01▸LBL "UFL"
02 XEQ IND ST X
03 R↓
04 AGRAPH
05 RTN
06▸LBL 00
07 ">">"
08 RTN
09▸LBL 01
10 "$> "
11 RTN
12▸LBL 02
13 ":*."
14 RTN
15▸LBL 03
16 ""*>"
17 RTN
18▸LBL 04
19 "↓¿>"
20 RTN
21▸LBL 05
22 ".*:"
23 RTN
24▸LBL 06
25 ">*:"
26 RTN
27▸LBL 07
28 "√√>"
29 RTN
30▸LBL 08
31 ">*>"
32 RTN
33▸LBL 09
34 ".*>"
35 RTN
36 END