Spreadsheet

[deetee]

Hi all!

This is my first attempt to provide some kind of spreadsheet application for the DM42:

spreadsheet.bmp (12.31 KiB) Viewed 10107 times

But don't expect to much. It's not that full featured and comfortable spreadsheet as it seems - it's more a "wrap'" around some features of the DM42.
Actually it manages 18 (3x6) variables (named "A1" to "C3") and 18 programs (labelled "A1" to "C3").

Any suggestions, improvements or ideas are highly welcome.

First you have to generate a font (variable FNT) with mkFNT (to be executed one time only). This is from the brilliant idea and work of Ben Smithville. Maybe the font could be less "pixelized" for a better readability.

Code: Select all

00 { 1376-Byte Prgm }
01▸LBL "mkFNT" @ Provides FNT (128x1-matrix)
02 128
03 1
04 NEWMAT
05 STO "FNT"
06 INDEX "FNT"

07 "¿¿*¿¿"
08 XEQ 99
09 ""Å¿Å""
10 XEQ 99
11 "← "
12 127
13 XTOA
14 ├"××"
15 XEQ 99
16 " @>×√"
17 XEQ 99
18 "U*U*U"
19 XEQ 99
20 "AcUIc"
21 XEQ 99
22 127
23 XTOA
24 XTOA
25 ├">Ö¿"
26 XEQ 99
27 "▒|▒|▒"
28 XEQ 99
29 "0HE@ "
30 XEQ 99
31 "PXTRQ"
32 XEQ 99
33 "→¿÷x("
34 XEQ 99
35 "QRTXP"
36 XEQ 99
37 "Å4ÖÄÅ"
38 XEQ 99
39 " p"
40 168
41 XTOA
42 ├" ?"
43 XEQ 99
44 "← ├ ←"
45 XEQ 99
46 "¿¿*Ö¿"
47 XEQ 99
48 "¿Ö*¿¿"
49 XEQ 99
50 "~  "
51 30
52 XTOA
53 ├" "
54 XEQ 99
55 "H~IA√"
56 XEQ 99
57 "÷↓[LF]↓÷"
58 XEQ 99
59 "xÄÑÄx"
60 XEQ 99
61 "|[LF]μ"}"
62 XEQ 99
63 "|°£°|"
64 XEQ 99
65 "`PXdB"
66 XEQ 99
67 ">**"÷"
68 XEQ 99
69 "~≤├IA"
70 XEQ 99
71 "`÷`÷`"
72 XEQ 99
73 "•ÑqPP"
74 XEQ 99
75 "<CBC<"
76 XEQ 99
77 "<A@A<"
78 XEQ 99
79 "U*U*U"
80 XEQ 99
81 "<<<<<"
82 XEQ 99
83 "÷÷÷÷÷"
84 XEQ 99
85 "÷÷_÷÷"
86 XEQ 99
87 "÷π÷π÷"
88 XEQ 99
89 "Å├Å├Å"
90 XEQ 99
91 "$*├*£"
92 XEQ 99
93 "#°¿db"
94 XEQ 99
95 "6IV P"
96 XEQ 99
97 "÷÷π÷÷"
98 XEQ 99
99 "÷Ö"A÷"
100 XEQ 99
101 "÷A"Ö÷"
102 XEQ 99
103 "¿*Ö*¿"
104 XEQ 99
105 "¿¿>¿¿"
106 XEQ 99
107 "÷"
108 176
109 XTOA
110 ├"p÷÷"
111 XEQ 99
112 "¿¿¿¿÷"
113 XEQ 99
114 "÷``÷÷"
115 XEQ 99
116 " ←¿▒√"
117 XEQ 99
118 ">QIE>"
119 XEQ 99
120 "÷B├@÷"
121 XEQ 99
122 "bQIIF"
123 XEQ 99
124 ""III6"
125 XEQ 99
126 "ᴇÅ£├←"
127 XEQ 99
128 "'EEE9"
129 XEQ 99
130 "<JII0"
131 XEQ 99
132 "×q≤Σ∫"
133 XEQ 99
134 "6III6"
135 XEQ 99
136 6
137 XTOA
138 ├"II)"
139 30
140 XTOA
141 XEQ 99
142 "÷66÷÷"
143 XEQ 99
144 "÷"
145 182
146 XTOA
147 ├"v÷÷"
148 XEQ 99
149 "¿Å"A÷"
150 XEQ 99
151 "ÅÅÅÅÅ"
152 XEQ 99
153 "A"Å¿÷"
154 XEQ 99
155 "√×Q≤▸"
156 XEQ 99
157 ">A]U↑"
158 XEQ 99
159 "~≤≤≤~"
160 XEQ 99
161 127
162 XTOA
163 ├"III6"
164 XEQ 99
165 ">AAA""
166 XEQ 99
167 127
168 XTOA
169 ├"AA"Ö"
170 XEQ 99
171 127
172 XTOA
173 ├"IIIA"
174 XEQ 99
175 127
176 XTOA
177 ├"≤≤≤×"
178 XEQ 99
179 ">AAQr"
180 XEQ 99
181 127
182 XTOA
183 ├"¿¿¿"
184 127
185 XTOA
186 XEQ 99
187 "÷A├A÷"
188 XEQ 99
189 "0@@@?"
190 XEQ 99
191 127
192 XTOA
193 ├"¿Å"A"
194 XEQ 99
195 127
196 XTOA
197 ├"@@@@"
198 XEQ 99
199 127
200 XTOA
201 ├"√≠√├"
202 XEQ 99
203 127
204 XTOA
205 ├"▒¿←├"
206 XEQ 99
207 ">AAA>"
208 XEQ 99
209 127
210 XTOA
211 ├"≤≤≤▸"
212 XEQ 99
213 ">AQ!↑"
214 XEQ 99
215 127
216 XTOA
217 ├"≤Æ)F"
218 XEQ 99
219 "&III2"
220 XEQ 99
221 "××├××"
222 XEQ 99
223 "?@@@?"
224 XEQ 99
225 "πᴇ`ᴇπ"
226 XEQ 99
227 127
228 XTOA
229 ├" ᴇ ├"
230 XEQ 99
231 "cÅ¿Åc"
232 XEQ 99
233 "∫▒x▒∫"
234 XEQ 99
235 "aQIEC"
236 XEQ 99
237 "÷├AA÷"
238 XEQ 99
239 "√▒¿← "
240 XEQ 99
241 "÷AA├÷"
242 XEQ 99
243 "▒√├√▒"
244 XEQ 99
245 128
246 XTOA
247 XTOA
248 XTOA
249 XTOA
250 XTOA
251 XEQ 99
252 "÷∫▒÷÷"
253 XEQ 99
254 " TTTx"
255 XEQ 99
256 127
257 XTOA
258 ├"DDD8"
259 XEQ 99
260 "8DDDD"
261 XEQ 99
262 "8DDD├"
263 XEQ 99
264 "8TTTX"
265 XEQ 99
266 "÷¿~≤√"
267 XEQ 99
268 "ᴇ"
269 164
270 XTOA
271 XTOA
272 XTOA
273 ├"x"
274 XEQ 99
275 127
276 XTOA
277 ├"▒▒▒x"
278 XEQ 99
279 "÷D}@÷"
280 XEQ 99
281 "÷@"
282 128
283 XTOA
284 132
285 XTOA
286 ├"}"
287 XEQ 99
288 127
289 XTOA
290 ├"←(D÷"
291 XEQ 99
292 "÷A├@÷"
293 XEQ 99
294 "|▒8▒|"
295 XEQ 99
296 "|▒▒▒x"
297 XEQ 99
298 "8DDD8"
299 XEQ 99
300 252
301 XTOA
302 ├"$$$ᴇ"
303 XEQ 99
304 "ᴇ$$$"
305 252
306 XTOA
307 XEQ 99
308 "|¿▒▒▒"
309 XEQ 99
310 "HTTT$"
311 XEQ 99
312 "÷▒?D "
313 XEQ 99
314 "<@@@|"
315 XEQ 99
316 "Ö @ Ö"
317 XEQ 99
318 "<@0@<"
319 XEQ 99
320 "D(←(D"
321 XEQ 99
322 "Ö   |"
323 XEQ 99
324 "DdTLD"
325 XEQ 99
326 "¿6AA÷"
327 XEQ 99
328 "÷÷├÷÷"
329 XEQ 99
330 "÷AA6¿"
331 XEQ 99
332 "¿▒¿←¿"
333 XEQ 99
334 127
335 XTOA
336 ├"¿¿¿¿"

337▸LBL 99 @ Store Alpha and increment index
338 ASTO ST X
339 STOEL
340 I+
341 CLA
342 RTN

343 END

Then call MENU which provides some kind of user soft key menu to manage further programs (CLR, CALC, PRINT).

Code: Select all

00 { 64-Byte Prgm }
01▸LBL "MENU"
02 "PRINT"
03 KEY 1 XEQ "PRINT"
04 " "
05 KEY 2 XEQ 02
06 " "
07 KEY 3 XEQ 03
08 " "
09 KEY 4 XEQ 04
10 "CLR"
11 KEY 5 XEQ "CLR"
12 "CALC"
13 KEY 6 XEQ "CALC"

14 MENU

15 END

The program CLR clears all cells (variables "A1" to "C6") with blanks (" "). In case of printing cells with blanks are not printed/visible.

Code: Select all

00 { 81-Byte Prgm }
01▸LBL "CLR"
02 " "
03 ASTO "A1"
04 ASTO "B1"
05 ASTO "C1"
06 ASTO "A2"
07 ASTO "B2"
08 ASTO "C2"
09 ASTO "A3"
10 ASTO "B3"
11 ASTO "C3"
12 ASTO "A4"
13 ASTO "B4"
14 ASTO "C4"
15 ASTO "A5"
16 ASTO "B5"
17 ASTO "C5"
18 ASTO "A6"
19 ASTO "B6"
20 ASTO "C6"
21 END

With CALC all cells are calculated one time. Good spreadsheets are examining some kind of "dependency tree" and use algorithms to calculate due to this dependencies till the calculation is stable. CALC is very simple - it calculates the cells in row direction only one time. But CALC provides some kind of value (X register) which shows the calculation difference (actually the difference of the least square values before and after the calculation). That means you have to press CALC some times till the provided value is zero (or low).

Code: Select all

00 { 252-Byte Prgm }
01▸LBL "CALC"
02 CLX
03 STO "e" @ Sum of least squares
04 XEQ 01
05 RCL "e"
06 STO "e1"

07 XEQ "A1" @ Call all programs
08 XEQ "B1"
09 XEQ "C1"
10 XEQ "A2"
11 XEQ "B2"
12 XEQ "C2"
13 XEQ "A3"
14 XEQ "B3"
15 XEQ "C3"
16 XEQ "A4"
17 XEQ "B4"
18 XEQ "C4"
19 XEQ "A5"
20 XEQ "B5"
21 XEQ "C5"
22 XEQ "A6"
23 XEQ "B6"
24 XEQ "C6"

25 CLX
26 STO "e"
27 XEQ 01

28 RCL "e1" @ Difference of least squares
29 RCL "e"
30 -

31 RTN

32▸LBL 01 @ Calculate least squares
33 RCL "A1"
34 XEQ 02
35 RCL "B1"
36 XEQ 02
37 RCL "C1"
38 XEQ 02
39 RCL "A2"
40 XEQ 02
41 RCL "B2"
42 XEQ 02
43 RCL "C2"
44 XEQ 02
45 RCL "A3"
46 XEQ 02
47 RCL "B3"
48 XEQ 02
49 RCL "C3"
50 XEQ 02
51 RCL "A4"
52 XEQ 02
53 RCL "B4"
54 XEQ 02
55 RCL "C4"
56 XEQ 02
57 RCL "A5"
58 XEQ 02
59 RCL "B5"
60 XEQ 02
61 RCL "C5"
62 XEQ 02
63 RCL "A6"
64 XEQ 02
65 RCL "B6"
66 XEQ 02
67 RCL "C6"
68 XEQ 02
69 RTN

70▸LBL 02
71 REAL?
72 GTO 03
73 GTO 04
74▸LBL 03
75 X↑2
76 STO+ "e"
77▸LBL 04
78 RTN

79 END

PRINT prints all cells/variables ("A1" to "C1") to the screen. This is slow and can take some seconds (due to sheet structure, FIX-format and calculator speed(battery/grid)).

Code: Select all

00 { 244-Byte Prgm }
01▸LBL "PRINT"
02 CLLCD

03 RCL "A1"
04 3
05 0
06 XEQ 98

07 RCL "B1"
08 3
09 66
10 XEQ 98

11 RCL "C1"
12 3
13 132
14 XEQ 98

15 RTN


16▸LBL 98 @ Print Z at (X,Y)
17 CLA
18 STO "cx" @ Cell coordinates
19 R↓
20 STO "cy"
21 R↓
22 STO "n" @ Number
23 STO 14

24 RCL "cx"
25 STO 10 @ 10:x
26 CLX
27 STO 11 @ 11: index to ATOX
28 STO 12 @ 12:exit program if 1
29 STO 13 @ 13:counter for printed characters

30▸LBL 14
31 1
32 STO+ 11
33 RCL 14
34 CLA
35 ARCL ST X @ X to alpha

36 RCL 11
37 STO 12 @ 12 index
38▸LBL 12
39 ATOX @ shift to appropriate character
40 DSE 12
41 GTO 12

42 ALENG @ end of string?
43 X≠0?
44 GTO 11
45 1 @ set exit flag
46 STO 12
47 R↓
48▸LBL 11
49 R↓ @ ASCII code of character
50 1
51 + @ Index of character (ASCII +1)



52 3 @ y @ print char Y (index) at pos Y,X
53 RCL 10
54 6 @ x-feed
55 +
56 STO 10
57 XEQ 99 @ print char
58 1 @ counter++
59 STO+ 13
60▸LBL 10
61 RCL 13 @ exit? (no space)
62 11 @ max digits
63 X≤Y?
64 GTO 09
65 RCL 12 @ exit? (no char left)
66 X≠0?
67 GTO 09
68 GTO 14 @ goto next char

69▸LBL 09 @ restore stack and exit
70 RTN



71▸LBL 99 @ Print character (FNT index in Z) at Y,X
72 STO "x" @ x
73 R↓
74 STO "y" @ 02:y
75 R↓
76 INDEX "FNT"
77 1
78 STOIJ
79 RCLEL
80 STO 05 @ 05:char
81 3
82 STO- "x"
83 0
84 STO 06 @ 06:steps for AROT
85 4ᴇ-3
86 STO 07 @ 07:loop index

87▸LBL 03
88 CLA
89 ARCL 05
90 RCL 06
91 AROT
92 1
93 STO+ 06
94 ATOX @ left byte of char
95 STO 00 @ 00:byte
96 1 @ x-feed
97 STO+ "x"


@ print byte (Z) at X,Y
98 7ᴇ-3
99 STO 04 @ 04:counter
100 2
101 1/X
102 STO 03 @ 03:power of 2

103▸LBL 01
104 2
105 STO× 03
106 RCL 03
107 RCL 00
108 AND
109 X=0?
110 GTO 02 @ no print if pixel=0
111 RCL "y"
112 RCL "x"
113 "∫" @ 1x2 pixel
114 AGRAPH
115▸LBL 02
116 2 @ y-feed
117 STO+ "y"
118 ISG 04
119 GTO 01

120 16 @ reset y (8x2 pixel)
121 STO- "y"

122 ISG 07
123 GTO 03
124 RTN

125 END

Finally PRG contains the whole "intelligence and logic" of the spreadsheet. 18 programs in one file dealing with 18 variables. In case of text variables only 6 digits are printed. The following example calculates the table shown in the picture above. Due to this structure the table is stable after one calculation (CALC).

Code: Select all

00 { 314-Byte Prgm }

01▸LBL "A1"
02 "n"
03 ASTO "A1"
04 RTN

05▸LBL "B1"
06 "n↑2"
07 ASTO "B1"
08 RTN

09▸LBL "C1"
10 "√n"
11 ASTO "C1"
12 RTN

13▸LBL "A2"
14 1
15 STO "A2"
16 RTN

17▸LBL "B2"
18 RCL "A2"
19 X↑2
20 STO "B2"
21 RTN

22▸LBL "C2"
23 RCL "A2"
24 SQRT
25 STO "C2"
26 RTN

27▸LBL "A3"
28 RCL "A2"
29 1
30 +
31 STO "A3"
32 RTN

33▸LBL "B3"
34 RCL "A3"
35 X↑2
36 STO "B3"
37 RTN

38▸LBL "C3"
39 RCL "A3"
40 SQRT
41 STO "C3"
42 RTN

43▸LBL "A4"
44 RCL "A3"
45 1
46 +
47 STO "A4"
48 RTN

49▸LBL "B4"
50 RCL "A4"
51 X↑2
52 STO "B4"
53 RTN

54▸LBL "C4"
55 RCL "A4"
56 SQRT
57 STO "C4"
58 RTN

59▸LBL "A5"
60 RCL "A4"
61 1
62 +
63 STO "A5"
64 RTN

65▸LBL "B5"
66 RCL "A5"
67 X↑2
68 STO "B5"
69 RTN

70▸LBL "C5"
71 RCL "A5"
72 SQRT
73 STO "C5"
74 RTN

75▸LBL "A6"
76 "Total"
77 ASTO "A6"
78 RTN

79▸LBL "B6"
80 RCL "B2"
81 RCL "B3"
82 +
83 RCL "B4"
84 +
85 RCL "B5"
86 +
87 STO "B6"
88 RTN

89▸LBL "C6"
90 RCL "C2"
91 RCL "C3"
92 +
93 RCL "C4"
94 +
95 RCL "C5"
96 +
97 STO "C6"
98 RTN

Last the all in one file:

ss.raw

(2.49 KiB) Downloaded 274 times

Regards
deetee

[deetee]

In the previous post I posted an old version of PRINT (prints all variables "A1" to "C6") in the text file (the raw-file was the newest) - this is the latest version:

Code: Select all

00 { 441-Byte Prgm }
01▸LBL "PRINT" @ Print all variables to screen
02 CLLCD

03 RCL "A1" @ All variables
04 3
05 0
06 XEQ 98
07 RCL "B1"
08 3
09 66
10 XEQ 98
11 RCL "C1"
12 3
13 132
14 XEQ 98
15 RCL "A2"
16 20
17 0
18 XEQ 98
19 RCL "B2"
20 20
21 66
22 XEQ 98
23 RCL "C2"
24 20
25 132
26 XEQ 98
27 RCL "A3"
28 37
29 0
30 XEQ 98
31 RCL "B3"
32 37
33 66
34 XEQ 98
35 RCL "C3"
36 37
37 132
38 XEQ 98
39 RCL "A4"
40 54
41 0
42 XEQ 98
43 RCL "B4"
44 54
45 66
46 XEQ 98
47 RCL "C4"
48 54
49 132
50 XEQ 98
51 RCL "A5"
52 71
53 0
54 XEQ 98
55 RCL "B5"
56 71
57 66
58 XEQ 98
59 RCL "C5"
60 71
61 132
62 XEQ 98
63 RCL "A6"
64 88
65 0
66 XEQ 98
67 RCL "B6"
68 88
69 66
70 XEQ 98
71 RCL "C6"
72 88
73 132
74 XEQ 98
75 RTN

76▸LBL 98 @ Print Z at (X,Y)
77 CLA
78 STO "cx"
79 R↓
80 STO "cy"
81 R↓
82 STO "n" @ Number
83 STO 14

84 RCL "cx"
85 STO 10 @ 10:x
86 CLX
87 STO 11 @ 11: index to ATOX
88 STO 12 @ 12:exit program if 1
89 STO 13 @ 13:counter for printed characters

90▸LBL 14
91 1
92 STO+ 11
93 RCL 14
94 CLA
95 ARCL ST X @ X to alpha

96 RCL 11
97 STO 12 @ 12 index
98▸LBL 12
99 ATOX @ shift to appropriate character
100 DSE 12
101 GTO 12

102 ALENG @ end of string?
103 X≠0?
104 GTO 11
105 1 @ set exit flag
106 STO 12
107 R↓
108▸LBL 11
109 R↓ @ ASCII code of character
110 1
111 + @ Index of character (ASCII +1)


112 RCL "cy" @ print char Y (index) at pos Y,X
113 RCL 10
114 6 @ x-feed
115 +
116 STO 10
117 XEQ 99 @ print char
118 1 @ counter++
119 STO+ 13
120▸LBL 10
121 RCL 13 @ exit? (no space)
122 11 @ max digits
123 X≤Y?
124 GTO 09
125 RCL 12 @ exit? (no char left)
126 X≠0?
127 GTO 09
128 GTO 14 @ goto next char

129▸LBL 09 @ restore stack and exit
130 RTN


131▸LBL 99 @ Print character (FNT index in Z) at Y,X
132 STO "x" @ x
133 R↓
134 STO "y" @ y
135 R↓
136 INDEX "FNT"
137 1
138 STOIJ
139 RCLEL
140 STO 05 @ 05:char
141 3
142 STO- "x"
143 0
144 STO 06 @ 06:steps for AROT
145 4ᴇ-3
146 STO 07 @ 07:loop index

147▸LBL 03
148 CLA
149 ARCL 05
150 RCL 06
151 AROT
152 1
153 STO+ 06
154 ATOX @ left byte of char
155 STO 00 @ 00:byte
156 1
157 STO+ "x"


158 7ᴇ-3@ print byte (Z) at X,Y
159 STO 04 @ 04:counter
160 2
161 1/X
162 STO 03 @ 03:power of 2

163▸LBL 01
164 2
165 STO× 03
166 RCL 03
167 RCL 00
168 AND
169 X=0?
170 GTO 02 @ no print if pixel=0
171 RCL "y"
172 RCL "x"
173 "∫"
174 AGRAPH
175▸LBL 02
176 2
177 STO+ "y"
178 ISG 04
179 GTO 01

180 16 @ reset y (8x2 pixel)
181 STO- "y"

182 ISG 07
183 GTO 03
184 RTN
185 END

Then I would like to present a new font. It is more "edgy" (I use it for my arduino projects) but in my opinion it's bigger and better to read - and it doesn't look more pixelized when expanding to another size.

Code: Select all

00 { 1411-Byte Prgm }
01▸LBL "mkFNT" @ Provides FNT (128x1-matrix)
02 128
03 1
04 NEWMAT
05 STO "FNT"
06 INDEX "FNT"

07 "¿¿*¿¿" @ divide
08 XEQ 99

09 ""Å¿Å"" @ multiply
10 XEQ 99

11 "←├×××" @ squareroot
12 XEQ 99

13 "`@├×∫" @ integral
14 XEQ 99

15 "U*U*U" @ gray block
16 XEQ 99

17 "w]IAc" @ sum
18 XEQ 99

19 ├"∫>Ö¿" @ triangle right
20 XEQ 99

21 6 @ pi
22 XTOA
23 ├"~√~B"
24 XEQ 99

25 "xHM@`" @ reversed question mark
26 XEQ 99

27 "PXTRQ" @ less or equal
28 XEQ 99

29 "→¿÷x(" @ line feed
30 XEQ 99

31 "QRTXP" @ greater or equal
32 XEQ 99

33 "Å4ÖÄÅ" @ not equal
34 XEQ 99

35 "¿Ö>¿→" @ enter
36 XEQ 99

37 "←0~0←" @ arrow down
38 XEQ 99

39 "¿¿>Ö¿" @ arrow right
40 XEQ 99

41 "¿Ö>¿¿" @ arrow left
42 XEQ 99

43 "~←←↓←" @ mu
44 XEQ 99

45 "H├IAC" @ pound
46 XEQ 99

47 "÷↓[LF]↓÷" @ degree
48 XEQ 99

49 "|∡Ñ∡|" @ Ao
50 XEQ 99

51 "|[LF]μ"}" @ N tilde
52 XEQ 99

53 "|∡Å∡|" @ A umlaut
54 XEQ 99

55 "`PXdB" @ angle
56 XEQ 99

57 ">**"÷" @ exponent e
58 XEQ 99

59 "~≤├IA" @ AE
60 XEQ 99

61 "`÷`÷`" @ ...
62 XEQ 99

63 "•ÑqPP" @ ESC
64 XEQ 99

65 "<CBC<" @ O umlaut
66 XEQ 99

67 "<A@A<" @ U umlaut
68 XEQ 99

69 "U*U*U" @ grey block
70 XEQ 99

71 "<<<<<" @ square
72 XEQ 99

73 "÷÷÷÷÷" @ space
74 XEQ 99

75 "÷÷_÷÷" @ !
76 XEQ 99

77 "÷π÷π÷" @ "
78 XEQ 99

79 "Å├Å├Å" @ #
80 XEQ 99

81 ".*├*:" @ $
82 XEQ 99

83 "#°¿db" @ %
84 XEQ 99

85 "6IV P" @ &
86 XEQ 99

87 "÷÷π÷÷" @ '
88 XEQ 99

89 "÷Ö"A÷" @ (
90 XEQ 99

91 "÷A"Ö÷" @ )
92 XEQ 99

93 "¿*Ö*¿" @ *
94 XEQ 99

95 "¿¿>¿¿" @ +
96 XEQ 99

97 "÷" @ ,
98 176
99 XTOA
100 ├"p÷÷"
101 XEQ 99

102 "¿¿¿¿÷" @ -
103 XEQ 99

104 "÷``÷÷" @ .
105 XEQ 99

106 " ←¿▒√" @ /
107 XEQ 99

108 127 @ 0
109 XTOA
110 ├"AAA├"
111 XEQ 99

112 "÷÷√├÷" @ 1
113 XEQ 99

114 "yIIIO" @ 2
115 XTOA
116 XEQ 99

117 "AIII├" @ 3
118 XEQ 99

119 "→¿¿¿├" @ 4
120 XEQ 99

121 "OIIIy" @ 5
122 XEQ 99

123 127 @ 6
124 XTOA
125 ├"IIIy"
126 XEQ 99

127 "∫×××├" @ 7
128 XEQ 99

129 127 @ 8
130 XTOA
131 ├"III├"
132 XEQ 99

133 "OIII├" @ 9
134 XEQ 99

135 "÷66÷÷" @ :
136 XEQ 99

137 "÷" @ ;
138 182
139 XTOA
140 ├"v÷÷"
141 XEQ 99

142 "¿Å"A÷" @ <
143 XEQ 99

144 "ÅÅÅÅÅ" @ =
145 XEQ 99

146 "A"Å¿÷" @ >
147 XEQ 99

148 "√×Q≤▸" @ ?
149 XEQ 99

150 ">A]U↑" @ @
151 XEQ 99

152 127 @ A
153 XTOA
154 ├"≤≤≤├"
155 XEQ 99

156 127 @ B
157 XTOA
158 ├"IIOx"
159 XEQ 99

160 127 @ C
161 XTOA
162 ├"AAA@"
163 XEQ 99

164 "A├AA├" @ D
165 XEQ 99

166 127 @ E
167 XTOA
168 ├"IIIA"
169 XEQ 99

170 127 @ F
171 XTOA
172 ├"≤≤≤×"
173 XEQ 99

174 127 @ G
175 XTOA
176 ├"AIIy"
177 XEQ 99

178 127 @ H
179 XTOA
180 ├"¿¿¿├"
181 XEQ 99

182 "÷A├A÷" @ I
183 XEQ 99

184 "@@@@├" @ J
185 XEQ 99

186 127 @ K
187 XTOA
188 ├"¿¿→x"
189 XEQ 99

190 127 @ L
191 XTOA
192 ├"@@@@"
193 XEQ 99

194 127 @ M
195 XTOA
196 ├"×π×├"
197 XEQ 99

198 127 @ N
199 XTOA
200 ├"×├@├"
201 XEQ 99

202 127 @ O
203 XTOA
204 ├"AAA├"
205 XEQ 99

206 127 @ P
207 XTOA
208 ├"≤≤≤→"
209 XEQ 99

210 127 @ Q
211 XTOA
212 ├"AqA├"
213 XEQ 99

214 127 @ R
215 XTOA
216 ├"≤≤yO"
217 XEQ 99

218 "OIIIx" @ S
219 XEQ 99

220 "××├××" @ T
221 XEQ 99

222 127 @ U
223 XTOA
224 ├"@@@├"
225 XEQ 99

226 "•p@p•" @ V
227 XEQ 99

228 127 @ W
229 XTOA
230 ├"@p@├"
231 XEQ 99

232 "x→¿→x" @ X
233 XEQ 99

234 "→¿x¿→" @ Y
235 XEQ 99

236 "qQ]EG" @ Z
237 XEQ 99

238 "÷├AA÷" @ [
239 XEQ 99

240 "√▒¿← " @ backslash
241 XEQ 99

242 "÷AA├÷" @ ]
243 XEQ 99

@ "▒√├√▒" @ arrow up
244 "¿≠~≠¿"
245 XEQ 99

246 128 @ _
247 XTOA
248 XTOA
249 XTOA
250 XTOA
251 XTOA
252 XEQ 99

253 "÷∫▒÷÷" @ `
254 XEQ 99

255 "pTTT|" @ a
256 XEQ 99

257 127 @ b
258 XTOA
259 ├"DDD|"
260 XEQ 99

261 "|DDD@" @ c
262 XEQ 99

263 "|DDD├" @ d
264 XEQ 99

265 "|TTTÖ" @ e
266 XEQ 99

267 "¿├≤×÷" @ f
268 XEQ 99

269 "<" @ g
270 164
271 XTOA
272 XTOA
273 XTOA
274 252
275 XTOA
276 XEQ 99

277 127 @ h
278 XTOA
279 ├"▒▒▒|"
280 XEQ 99

281 "÷÷}÷÷" @ i
282 XEQ 99

283 "÷" @ j
284 128
285 XTOA
286 XTOA
287 250
288 XTOA
289 ├"÷"
290 XEQ 99

291 127 @ k
292 XTOA
293 ├"←Öp÷"
294 XEQ 99

295 "÷├@@÷" @ l
296 XEQ 99

297 "|▒Ö▒|" @ m
298 XEQ 99

299 "|▒▒▒|" @ n
300 XEQ 99

301 "|DDD|" @ o
302 XEQ 99

303 252 @ p
304 XTOA
305 ├"DDD|"
306 XEQ 99

307 "|DDD" @ q
308 252
309 XTOA
310 XEQ 99

311 "|▒▒▒÷" @ r
312 XEQ 99

313 "\TTTp" @ s
314 XEQ 99

315 "▒├D@÷" @ t
316 XEQ 99

317 "|@@@|" @ u
318 XEQ 99

319 "Öp@pÖ" @ v
320 XEQ 99

321 "|@p@|" @ w
322 XEQ 99

323 "pÖ←Öp" @ x
324 XEQ 99

325 "<" @ y
326 160
327 XTOA
328 XTOA
329 XTOA
330 252
331 XTOA
332 XEQ 99

333 "tTTT\\" @ z
334 XEQ 99

335 "¿6AA÷" @ {
336 XEQ 99

337 "÷÷├÷÷" @ |
338 XEQ 99

339 "÷AA6¿" @ }
340 XEQ 99

341 "¿▒¿←¿" @ ~
342 XEQ 99

343 127 @ alpha marker
344 XTOA
345 ├"¿¿¿¿"

346▸LBL 99 @ Store Alpha and increment index
347 ASTO ST X
348 STOEL
349 I+
350 CLA
351 RTN

352 END

Finally my example looks like this:

spreadsheet.bmp (12.31 KiB) Viewed 10025 times

Regards
deetee