00 { 302-Byte Prgm }
01▸LBL "MAST"
02 4
03 STO 00
04▸LBL 02
05 RAN
06 6
07 ×
08 1
09 +
10 IP
11 STO IND 00
12 DSE 00
13 GTO 02
14 0
15 STO 09
16 STO 10
17▸LBL 15
18 CLA
19 2
20 RCL 09
21 X<Y?
22 "Guess=?"
23 1
24 RCL 10
25 X=0?
26 ├"[LF]"
27 X=0?
28 GTO 04
29 X>Y?
30 DSE ST X
31 RCL 10
32 1ᴇ3
33 ÷
34 +
35 STO 11
36▸LBL 03
37 ALENG
38 X≠0?
39 ├"[LF]"
40 RCL 11
41 AIP
42 ├": "
43 15
44 +
45 RCL IND ST X
46 AIP
47 ├" "
48 FP
49 8
50 ×
51 AIP
52 ├"."
53 FP
54 8
55 ×
56 AIP
57 ISG 11
58 GTO 03
59▸LBL 04
60 CLMENU
61 KEY 7 GTO 07
62 KEY 8 GTO 08
63 MENU
64 CF 22
65 PROMPT
66 FC?C 22
67 GTO "MAST"
68 GTO 05
69▸LBL 07
70 2
71 RCL 10
72 X≤Y?
73 TONE 9
74 X≤Y?
75 GTO 04
76 1
77 STO- 10
78 GTO 15
79▸LBL 08
80 RCL 10
81 RCL 09
82 X=Y?
83 TONE 9
84 X=Y?
85 GTO 04
86 1
87 STO+ 10
88 GTO 15
89▸LBL 05
90 STO 12
91 5.008
92 STO 11
93 R↓
94▸LBL 06
95 RCL ST X
96 10
97 MOD
98 STO IND 11
99 R↓
100 10
101 ÷
102 IP
103 ISG 11
104 GTO 06
105 5.1
106 STO 11
107 4
108 STO 00
109▸LBL 09
110 RCL IND 11
111 RCL IND 00
112 ABS
113 STO IND 00
114 X≠Y?
115 GTO 00
116 STO- IND 11
117 +/-
118 STO IND 00
119 0.125
120 STO+ 12
121▸LBL 00
122 ISG 11
123 DSE 00
124 GTO 09
125 5.008
126 STO 11
127▸LBL 10
128 4
129 STO 00
130▸LBL 11
131 RCL IND 11
132 RCL IND 00
133 X≤0?
134 GTO 00
135 X≠Y?
136 GTO 00
137 +/-
138 STO IND 00
139 0.015625
140 STO+ 12
141 GTO 01
142▸LBL 00
143 DSE 00
144 GTO 11
145▸LBL 01
146 ISG 11
147 GTO 10
148 RCL 09
149 1
150 +
151 STO 09
152 STO 10
153 15
154 +
155 RCL 12
156 STO IND ST Y
157 GTO 15
158 END