Home » Archimedes archive » Acorn User » AU 1994-12.adf » !StarInfo_StarInfo » Marriott/SmallFontS
Marriott/SmallFontS
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
| Tape/disk: | Home » Archimedes archive » Acorn User » AU 1994-12.adf » !StarInfo_StarInfo |
| Filename: | Marriott/SmallFontS |
| Read OK: | ✔ |
| File size: | 2673 bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
File contents
1REM >SmallFontS
2REM LEN NM 1993
3:
4ON ERROR CLOSE #0:PRINTREPORT$;" at line ";ERL:END
5PROCcode
6SYS "OS_File",10,"SmallFont",&FFA,,code%,O%
7SYS "OS_Module",11,code%,O%-code%
8END
9:
10DEF PROCcode
11DIM code% &8000
12swichunk%=&CDE00
13Small_Char=swichunk%
14wp=12
15sp=13
16link=14
17PC=15
18:
19FOR pass=4 TO 6 STEP 2
20P%=0
21O%=code%
22[ OPT pass
23EQUD 0
24EQUD 0
25EQUD 0
26EQUD 0
27EQUD Title_String
28EQUD Help_String
29EQUD 0
30EQUD swichunk%
31EQUD SWI_Handler
32EQUD SWI_Names
33EQUD 0
34:
35.Title_String
36EQUS "SmallFont"
37EQUB 0
38:
39.Help_String
40EQUS "Small Font"+CHR$9+"1.12 ("+MID$(TIME$,5,11)+") � NSoft"
41EQUB 13
42EQUS "This module is designed for use mode 13."
43EQUB 0
44ALIGN
45:
46.SWI_Names
47EQUS "Small"
48EQUB 0
49EQUS "Char"
50EQUB 0
51EQUS "String"
52EQUB 0
53EQUB 0
54ALIGN
55:
56.SWI_Handler
57LDR R12,[R12]
58CMP R11,#(end_SWI-start_SWI)/4
59ADDCC PC,PC,R11,LSL #2
60B unknown_SWI
61.start_SWI
62B SWI_Char
63B SWI_String
64.end_SWI
65:
66.unknown_SWI
67ADR R0,unknown_SWI_error
68ORRS PC,R14,#1<<28
69:
70.unknown_SWI_error
71EQUD &1E6
72EQUS "SWI not known"
73EQUB 0
74ALIGN
75:
76.SWI_Char
77:
78; R0=ASCII Code, R1=X pos, R2=Y pos
79:
80STMFD R13!,{R1-R11,R14}
81:
82MOV R7,R0
83MOV R8,R1
84MOV R9,R2
85:
86; Find letter addr
87:
88SUB R7,R7,#32
89:
90CMP R7,#(end-start)/4
91ADDCC PC,PC,R7,LSL #2
92B unknown
93:
94.start
95B char32
96B char33
97B char34
98B char35
99B char36
100B char37
101B char38
102B char39
103B char40
104B char41
105B char42
106B char43
107B char44
108B char45
109B char46
110B char47
111B char48
112B char49
113B char50
114B char51
115B char52
116B char53
117B char54
118B char55
119B char56
120B char57
121B char58
122B char59
123B char60
124B char61
125B char62
126B char63
127B char64
128B charA
129B charB
130B charC
131B charD
132B charE
133B charF
134B charG
135B charH
136B charI
137B charJ
138B charK
139B charL
140B charM
141B charN
142B charO
143B charP
144B charQ
145B charR
146B charS
147B charT
148B charU
149B charV
150B charW
151B charX
152B charY
153B charZ
154B char91
155B char92
156B char93
157B char94
158B char95
159.end
160:
161.plot_char
162:
163; First row
164:
165; First point
166LDRB R0,[R10,#0]
167CMP R0,#ASC("1")
168ADDEQ R1,R8,#0
169ADDEQ R2,R9,#0
170MOVEQ R0,#69
171SWIEQ "OS_Plot"
172:
173; Second point
174LDRB R0,[R10,#1]
175CMP R0,#ASC("1")
176ADDEQ R1,R8,#4
177ADDEQ R2,R9,#0
178MOVEQ R0,#69
179SWIEQ "OS_Plot"
180:
181; Third point
182LDRB R0,[R10,#2]
183CMP R0,#ASC("1")
184ADDEQ R1,R8,#8
185ADDEQ R2,R9,#0
186MOVEQ R0,#69
187SWIEQ "OS_Plot"
188:
189; Second row
190:
191; First point
192LDRB R0,[R10,#3]
193CMP R0,#ASC("1")
194ADDEQ R1,R8,#0
195ADDEQ R2,R9,#4
196MOVEQ R0,#69
197SWIEQ "OS_Plot"
198:
199; Second point
200LDRB R0,[R10,#4]
201CMP R0,#ASC("1")
202ADDEQ R1,R8,#4
203ADDEQ R2,R9,#4
204MOVEQ R0,#69
205SWIEQ "OS_Plot"
206:
207; Third point
208LDRB R0,[R10,#5]
209CMP R0,#ASC("1")
210ADDEQ R1,R8,#8
211ADDEQ R2,R9,#4
212MOVEQ R0,#69
213SWIEQ "OS_Plot"
214:
215; Third row
216:
217; First point
218LDRB R0,[R10,#6]
219CMP R0,#ASC("1")
220ADDEQ R1,R8,#0
221ADDEQ R2,R9,#8
222MOVEQ R0,#69
223SWIEQ "OS_Plot"
224:
225; Second point
226LDRB R0,[R10,#7]
227CMP R0,#ASC("1")
228ADDEQ R1,R8,#4
229ADDEQ R2,R9,#8
230MOVEQ R0,#69
231SWIEQ "OS_Plot"
232:
233; Third point
234LDRB R0,[R10,#8]
235CMP R0,#ASC("1")
236ADDEQ R1,R8,#8
237ADDEQ R2,R9,#8
238MOVEQ R0,#69
239SWIEQ "OS_Plot"
240:
241; Fourth row
242:
243; First point
244LDRB R0,[R10,#9]
245CMP R0,#ASC("1")
246ADDEQ R1,R8,#0
247ADDEQ R2,R9,#12
248MOVEQ R0,#69
249SWIEQ "OS_Plot"
250:
251; Second point
252LDRB R0,[R10,#10]
253CMP R0,#ASC("1")
254ADDEQ R1,R8,#4
255ADDEQ R2,R9,#12
256MOVEQ R0,#69
257SWIEQ "OS_Plot"
258:
259; Third point
260LDRB R0,[R10,#11]
261CMP R0,#ASC("1")
262ADDEQ R1,R8,#8
263ADDEQ R2,R9,#12
264MOVEQ R0,#69
265SWIEQ "OS_Plot"
266:
267; Fifth row
268:
269; First point
270LDRB R0,[R10,#12]
271CMP R0,#ASC("1")
272ADDEQ R1,R8,#0
273ADDEQ R2,R9,#16
274MOVEQ R0,#69
275SWIEQ "OS_Plot"
276:
277; Second point
278LDRB R0,[R10,#13]
279CMP R0,#ASC("1")
280ADDEQ R1,R8,#4
281ADDEQ R2,R9,#16
282MOVEQ R0,#69
283SWIEQ "OS_Plot"
284:
285; Third point
286LDRB R0,[R10,#14]
287CMP R0,#ASC("1")
288ADDEQ R1,R8,#8
289ADDEQ R2,R9,#16
290MOVEQ R0,#69
291SWIEQ "OS_Plot"
292:
293LDMFD R13!,{R1-R11,PC}
294MOV PC,R14
295:
296.data32 EQUS "000000000000000" ; <spc>
297.char32 ADR R10,data32: B plot_char
298.data33 EQUS "010000010010010" ; !
299.char33 ADR R10,data33: B plot_char
300.data34 EQUS "000000000000010" ; "
301.char34 ADR R10,data34: B plot_char
302.data35 EQUS "000000000000000" ; #
303.char35 ADR R10,data35: B plot_char
304.data36 EQUS "000000000000000" ; $
305.char36 ADR R10,data36: B plot_char
306.data37 EQUS "000000000000000" ; %
307.char37 ADR R10,data37: B plot_char
308.data38 EQUS "000000000000000" ; &
309.char38 ADR R10,data38: B plot_char
310.data39 EQUS "000000000000010" ; '
311.char39 ADR R10,data39: B plot_char
312.data40 EQUS "001010010010001" ; (
313.char40 ADR R10,data40: B plot_char
314.data41 EQUS "100010010010100" ; )
315.char41 ADR R10,data41: B plot_char
316.data42 EQUS "010111010111010" ; *
317.char42 ADR R10,data42: B plot_char
318.data43 EQUS "000010111010000" ; +
319.char43 ADR R10,data43: B plot_char
320.data44 EQUS "100010000000000" ; ,
321.char44 ADR R10,data44: B plot_char
322.data45 EQUS "000000111000000" ; -
323.char45 ADR R10,data45: B plot_char
324.data46 EQUS "010000000000000" ; .
325.char46 ADR R10,data46: B plot_char
326.data47 EQUS "100010010010001" ; /
327.char47 ADR R10,data47: B plot_char
328.data48 EQUS "111101101101111" ; 0
329.char48 ADR R10,data48: B plot_char
330.data49 EQUS "010010010110010" ; 1
331.char49 ADR R10,data49: B plot_char
332.data50 EQUS "111100111001111" ; 2
333.char50 ADR R10,data50: B plot_char
334.data51 EQUS "111001011001111" ; 3
335.char51 ADR R10,data51: B plot_char
336.data52 EQUS "001111101100100" ; 4
337.char52 ADR R10,data52: B plot_char
338.data53 EQUS "111001111100111" ; 5
339.char53 ADR R10,data53: B plot_char
340.data54 EQUS "111101111100100" ; 6
341.char54 ADR R10,data54: B plot_char
342.data55 EQUS "010010010001111" ; 7
343.char55 ADR R10,data55: B plot_char
344.data56 EQUS "111101111101111" ; 8
345.char56 ADR R10,data56: B plot_char
346.data57 EQUS "001001111101111" ; 9
347.char57 ADR R10,data57: B plot_char
348.data58 EQUS "000010000010000" ; :
349.char58 ADR R10,data58: B plot_char
350.data59 EQUS "100010010000010" ; ;
351.char59 ADR R10,data59: B plot_char
352.data60 EQUS "001010100010100" ; <
353.char60 ADR R10,data60: B plot_char
354.data61 EQUS "000111000111000" ; =
355.char61 ADR R10,data61: B plot_char
356.data62 EQUS "100010001010100" ; >
357.char62 ADR R10,data62: B plot_char
358.data63 EQUS "010000010001011" ; ?
359.char63 ADR R10,data63: B plot_char
360.data64 EQUS "000000000000000" ; @
361.char64 ADR R10,data64: B plot_char
362.dataA EQUS "101101111101111"
363.charA ADR R10,dataA: B plot_char
364.dataB EQUS "110101110101110"
365.charB ADR R10,dataB: B plot_char
366.dataC EQUS "111100100100111"
367.charC ADR R10,dataC: B plot_char
368.dataD EQUS "110101101101110"
369.charD ADR R10,dataD: B plot_char
370.dataE EQUS "111100110100111"
371.charE ADR R10,dataE: B plot_char
372.dataF EQUS "100100110100111"
373.charF ADR R10,dataF: B plot_char
374.dataG EQUS "111101101100111"
375.charG ADR R10,dataG: B plot_char
376.dataH EQUS "101101111101101"
377.charH ADR R10,dataH: B plot_char
378.dataI EQUS "111010010010111"
379.charI ADR R10,dataI: B plot_char
380.dataJ EQUS "110010010010111"
381.charJ ADR R10,dataJ: B plot_char
382.dataK EQUS "101101110101101"
383.charK ADR R10,dataK: B plot_char
384.dataL EQUS "111100100100100"
385.charL ADR R10,dataL: B plot_char
386.dataM EQUS "101101101111101"
387.charM ADR R10,dataM: B plot_char
388.dataN EQUS "101111111111101"
389.charN ADR R10,dataN: B plot_char
390.dataO EQUS "111101101101111"
391.charO ADR R10,dataO: B plot_char
392.dataP EQUS "100100111101111"
393.charP ADR R10,dataP: B plot_char
394.dataQ EQUS "001111101101111"
395.charQ ADR R10,dataQ: B plot_char
396.dataR EQUS "101101110101111"
397.charR ADR R10,dataR: B plot_char
398.dataS EQUS "111001111100111"
399.charS ADR R10,dataS: B plot_char
400.dataT EQUS "010010010010111"
401.charT ADR R10,dataT: B plot_char
402.dataU EQUS "111101101101101"
403.charU ADR R10,dataU: B plot_char
404.dataV EQUS "010101101101101"
405.charV ADR R10,dataV: B plot_char
406.dataW EQUS "101111101101101"
407.charW ADR R10,dataW: B plot_char
408.dataX EQUS "101101010101101"
409.charX ADR R10,dataX: B plot_char
410.dataY EQUS "010010010101101"
411.charY ADR R10,dataY: B plot_char
412.dataZ EQUS "111100010001111"
413.charZ ADR R10,dataZ: B plot_char
414.data91 EQUS "111100100100111" ; [
415.char91 ADR R10,data91: B plot_char
416.data92 EQUS "001010010010100" ; \
417.char92 ADR R10,data92: B plot_char
418.data93 EQUS "111001001001111" ; ]
419.char93 ADR R10,data93: B plot_char
420.data94 EQUS "010000010010010" ; !
421.char94 ADR R10,data94: B plot_char
422.data95 EQUS "111000000000000" ; !
423.char95 ADR R10,data95: B plot_char
424ALIGN
425:
426.unknown_error
427EQUD 0
428EQUS "ASCII code not supported."
429EQUB 0
430ALIGN
431:
432.unknown
433ADR R0,unknown_error
434LDMFD R13!,{R1-R11,R14}
435ORRS PC,R14,#1<<28
436MOV PC,R14
437:
438.SWI_String
439:
440; R0=String, R1=X pos, R2=Y pos
441:
442STMFD R13!,{R1-R11,R14}
443:
444MOV R7,R0
445MOV R6,#0
446:
447.loop
448LDRB R0,[R7,R6]
449CMP R0,#0
450BEQ exit
451SWI Small_Char
452ADD R1,R1,#16
453ADD R6,R6,#1
454B loop
455:
456.exit
457LDMFD R13!,{R1-R11,PC}
458MOV PC,R14
459:
460]NEXT
461ENDPROC
462:
� >SmallFontS
� � NM 1993
:
� � � #0:�$;" at line ";�:�
�code
.ș "OS_File",10,"SmallFont",&FFA,,code%,O%
$ș "OS_Module",11,code%,O%-code%
�
:
� �code
� code% &8000
swichunk%=&CDE00
Small_Char=swichunk%
wp=12
sp=13
link=14
PC=15
:
� pass=4 � 6 � 2
P%=0
O%=code%
[ OPT pass
EQUD 0
EQUD 0
EQUD 0
EQUD 0
EQUD Title_String
EQUD Help_String
EQUD 0
EQUD swichunk%
EQUD SWI_Handler
EQUD SWI_Names
!
EQUD 0
":
#.Title_String
$EQUS "SmallFont"
%
EQUB 0
&:
'.Help_String
(7EQUS "Small Font"+�9+"1.12 ("+��$,5,11)+") � NSoft"
) EQUB 13
*3EQUS "This module is designed for use mode 13."
+
EQUB 0
, ALIGN
-:
..SWI_Names
/EQUS "Small"
0
EQUB 0
1EQUS "Char"
2
EQUB 0
3EQUS "String"
4
EQUB 0
5
EQUB 0
6 ALIGN
7:
8.SWI_Handler
9LDR R12,[R12]
:"CMP R11,#(end_SWI-start_SWI)/4
;ADDCC PC,PC,R11,LSL #2
<B unknown_SWI
=.start_SWI
>B SWI_Char
?B SWI_String
@ .end_SWI
A:
B.unknown_SWI
C ADR R0,unknown_SWI_error
D�RS PC,R14,#1<<28
E:
F.unknown_SWI_error
G
EQUD &1E6
HEQUS "SWI not known"
I
EQUB 0
J ALIGN
K:
L
.SWI_Char
M:
N%; R0=�II Code, R1=X pos, R2=Y pos
O:
PSTMFD R13!,{R1-R11,R14}
Q:
R
MOV R7,R0
S
MOV R8,R1
T
MOV R9,R2
U:
V; Find letter addr
W:
XSUB R7,R7,#32
Y:
ZCMP R7,#(end-start)/4
[ADDCC PC,PC,R7,LSL #2
\
B unknown
]:
^
.start
_ B char32
` B char33
a B char34
b B char35
c B char36
d B char37
e B char38
f B char39
g B char40
h B char41
i B char42
j B char43
k B char44
l B char45
m B char46
n B char47
o B char48
p B char49
q B char50
r B char51
s B char52
t B char53
u B char54
v B char55
w B char56
x B char57
y B char58
z B char59
{ B char60
| B char61
} B char62
~ B char63
B char64
� B charA
� B charB
� B charC
� B charD
� B charE
� B charF
� B charG
� B charH
� B charI
� B charJ
� B charK
� B charL
� B charM
� B charN
� B charO
� B charP
� B charQ
� B charR
� B charS
� B charT
� B charU
� B charV
� B charW
� B charX
� B charY
� B charZ
� B char91
� B char92
� B char93
� B char94
� B char95
�.end
�:
�.plot_char
�:
�; First row
�:
�; First point
�LDRB R0,[R10,#0]
�CMP R0,#�("1")
�ADDEQ R1,R8,#0
�ADDEQ R2,R9,#0
�
�Q R0,#69
�SWIEQ "OS_Plot"
�:
�; Second point
�LDRB R0,[R10,#1]
�CMP R0,#�("1")
�ADDEQ R1,R8,#4
�ADDEQ R2,R9,#0
�
�Q R0,#69
�SWIEQ "OS_Plot"
�:
�; Third point
�LDRB R0,[R10,#2]
�CMP R0,#�("1")
�ADDEQ R1,R8,#8
�ADDEQ R2,R9,#0
�
�Q R0,#69
�SWIEQ "OS_Plot"
�:
�; Second row
�:
�; First point
�LDRB R0,[R10,#3]
�CMP R0,#�("1")
�ADDEQ R1,R8,#0
�ADDEQ R2,R9,#4
�
�Q R0,#69
�SWIEQ "OS_Plot"
�:
�; Second point
�LDRB R0,[R10,#4]
�CMP R0,#�("1")
�ADDEQ R1,R8,#4
�ADDEQ R2,R9,#4
�
�Q R0,#69
�SWIEQ "OS_Plot"
�:
�; Third point
�LDRB R0,[R10,#5]
�CMP R0,#�("1")
�ADDEQ R1,R8,#8
�ADDEQ R2,R9,#4
�
�Q R0,#69
�SWIEQ "OS_Plot"
�:
�; Third row
�:
�; First point
�LDRB R0,[R10,#6]
�CMP R0,#�("1")
�ADDEQ R1,R8,#0
�ADDEQ R2,R9,#8
�
�Q R0,#69
�SWIEQ "OS_Plot"
�:
�; Second point
�LDRB R0,[R10,#7]
�CMP R0,#�("1")
�ADDEQ R1,R8,#4
�ADDEQ R2,R9,#8
�
�Q R0,#69
�SWIEQ "OS_Plot"
�:
�; Third point
�LDRB R0,[R10,#8]
�CMP R0,#�("1")
�ADDEQ R1,R8,#8
�ADDEQ R2,R9,#8
�
�Q R0,#69
�SWIEQ "OS_Plot"
�:
�; Fourth row
�:
�; First point
�LDRB R0,[R10,#9]
�CMP R0,#�("1")
�ADDEQ R1,R8,#0
�ADDEQ R2,R9,#12
�
�Q R0,#69
�SWIEQ "OS_Plot"
�:
�; Second point
�LDRB R0,[R10,#10]
�CMP R0,#�("1")
�ADDEQ R1,R8,#4
�ADDEQ R2,R9,#12
�Q R0,#69
SWIEQ "OS_Plot"
:
; Third point
LDRB R0,[R10,#11]
CMP R0,#�("1")
ADDEQ R1,R8,#8
ADDEQ R2,R9,#12
�Q R0,#69
SWIEQ "OS_Plot"
:
; Fifth row
:
; First point
LDRB R0,[R10,#12]
CMP R0,#�("1")
ADDEQ R1,R8,#0
ADDEQ R2,R9,#16
�Q R0,#69
SWIEQ "OS_Plot"
:
; Second point
LDRB R0,[R10,#13]
CMP R0,#�("1")
ADDEQ R1,R8,#4
ADDEQ R2,R9,#16
�Q R0,#69
SWIEQ "OS_Plot"
:
; Third point
LDRB R0,[R10,#14]
CMP R0,#�("1")
ADDEQ R1,R8,#8
!ADDEQ R2,R9,#16
"
�Q R0,#69
#SWIEQ "OS_Plot"
$:
%LDMFD R13!,{R1-R11,PC}
&MOV PC,R14
':
(2.data32 EQUS "000000000000000" ; <spc>
)'.char32 ADR R10,data32: B plot_char
*..data33 EQUS "010000010010010" ; !
+'.char33 ADR R10,data33: B plot_char
,..data34 EQUS "000000000000010" ; "
-'.char34 ADR R10,data34: B plot_char
...data35 EQUS "000000000000000" ; #
/'.char35 ADR R10,data35: B plot_char
0..data36 EQUS "000000000000000" ; $
1'.char36 ADR R10,data36: B plot_char
2..data37 EQUS "000000000000000" ; %
3'.char37 ADR R10,data37: B plot_char
4..data38 EQUS "000000000000000" ; &
5'.char38 ADR R10,data38: B plot_char
6..data39 EQUS "000000000000010" ; '
7'.char39 ADR R10,data39: B plot_char
8..data40 EQUS "001010010010001" ; (
9'.char40 ADR R10,data40: B plot_char
:..data41 EQUS "100010010010100" ; )
;'.char41 ADR R10,data41: B plot_char
<..data42 EQUS "010111010111010" ; *
='.char42 ADR R10,data42: B plot_char
>..data43 EQUS "000010111010000" ; +
?'.char43 ADR R10,data43: B plot_char
@..data44 EQUS "100010000000000" ; ,
A'.char44 ADR R10,data44: B plot_char
B..data45 EQUS "000000111000000" ; -
C'.char45 ADR R10,data45: B plot_char
D..data46 EQUS "010000000000000" ; .
E'.char46 ADR R10,data46: B plot_char
F..data47 EQUS "100010010010001" ; /
G'.char47 ADR R10,data47: B plot_char
H..data48 EQUS "111101101101111" ; 0
I'.char48 ADR R10,data48: B plot_char
J..data49 EQUS "010010010110010" ; 1
K'.char49 ADR R10,data49: B plot_char
L..data50 EQUS "111100111001111" ; 2
M'.char50 ADR R10,data50: B plot_char
N..data51 EQUS "111001011001111" ; 3
O'.char51 ADR R10,data51: B plot_char
P..data52 EQUS "001111101100100" ; 4
Q'.char52 ADR R10,data52: B plot_char
R..data53 EQUS "111001111100111" ; 5
S'.char53 ADR R10,data53: B plot_char
T..data54 EQUS "111101111100100" ; 6
U'.char54 ADR R10,data54: B plot_char
V..data55 EQUS "010010010001111" ; 7
W'.char55 ADR R10,data55: B plot_char
X..data56 EQUS "111101111101111" ; 8
Y'.char56 ADR R10,data56: B plot_char
Z..data57 EQUS "001001111101111" ; 9
['.char57 ADR R10,data57: B plot_char
\..data58 EQUS "000010000010000" ; :
]'.char58 ADR R10,data58: B plot_char
^..data59 EQUS "100010010000010" ; ;
_'.char59 ADR R10,data59: B plot_char
`..data60 EQUS "001010100010100" ; <
a'.char60 ADR R10,data60: B plot_char
b..data61 EQUS "000111000111000" ; =
c'.char61 ADR R10,data61: B plot_char
d..data62 EQUS "100010001010100" ; >
e'.char62 ADR R10,data62: B plot_char
f..data63 EQUS "010000010001011" ; ?
g'.char63 ADR R10,data63: B plot_char
h..data64 EQUS "000000000000000" ; @
i'.char64 ADR R10,data64: B plot_char
j!.dataA EQUS "101101111101111"
k%.charA ADR R10,dataA: B plot_char
l!.dataB EQUS "110101110101110"
m%.charB ADR R10,dataB: B plot_char
n!.dataC EQUS "111100100100111"
o%.charC ADR R10,dataC: B plot_char
p!.dataD EQUS "110101101101110"
q%.charD ADR R10,dataD: B plot_char
r!.dataE EQUS "111100110100111"
s%.charE ADR R10,dataE: B plot_char
t!.dataF EQUS "100100110100111"
u%.charF ADR R10,dataF: B plot_char
v!.dataG EQUS "111101101100111"
w%.charG ADR R10,dataG: B plot_char
x!.dataH EQUS "101101111101101"
y%.charH ADR R10,dataH: B plot_char
z!.dataI EQUS "111010010010111"
{%.charI ADR R10,dataI: B plot_char
|!.dataJ EQUS "110010010010111"
}%.charJ ADR R10,dataJ: B plot_char
~!.dataK EQUS "101101110101101"
%.charK ADR R10,dataK: B plot_char
�!.dataL EQUS "111100100100100"
�%.charL ADR R10,dataL: B plot_char
�!.dataM EQUS "101101101111101"
�%.charM ADR R10,dataM: B plot_char
�!.dataN EQUS "101111111111101"
�%.charN ADR R10,dataN: B plot_char
�!.dataO EQUS "111101101101111"
�%.charO ADR R10,dataO: B plot_char
�!.dataP EQUS "100100111101111"
�%.charP ADR R10,dataP: B plot_char
�!.dataQ EQUS "001111101101111"
�%.charQ ADR R10,dataQ: B plot_char
�!.dataR EQUS "101101110101111"
�%.charR ADR R10,dataR: B plot_char
�!.dataS EQUS "111001111100111"
�%.charS ADR R10,dataS: B plot_char
�!.dataT EQUS "010010010010111"
�%.charT ADR R10,dataT: B plot_char
�!.dataU EQUS "111101101101101"
�%.charU ADR R10,dataU: B plot_char
�!.dataV EQUS "010101101101101"
�%.charV ADR R10,dataV: B plot_char
�!.dataW EQUS "101111101101101"
�%.charW ADR R10,dataW: B plot_char
�!.dataX EQUS "101101010101101"
�%.charX ADR R10,dataX: B plot_char
�!.dataY EQUS "010010010101101"
�%.charY ADR R10,dataY: B plot_char
�!.dataZ EQUS "111100010001111"
�%.charZ ADR R10,dataZ: B plot_char
�..data91 EQUS "111100100100111" ; [
�'.char91 ADR R10,data91: B plot_char
�..data92 EQUS "001010010010100" ; \
�'.char92 ADR R10,data92: B plot_char
�..data93 EQUS "111001001001111" ; ]
�'.char93 ADR R10,data93: B plot_char
�..data94 EQUS "010000010010010" ; !
�'.char94 ADR R10,data94: B plot_char
�..data95 EQUS "111000000000000" ; !
�'.char95 ADR R10,data95: B plot_char
� ALIGN
�:
�.unknown_error
�
EQUD 0
�$EQUS "ASCII code not supported."
�
EQUB 0
� ALIGN
�:
� .unknown
�ADR R0,unknown_error
�LDMFD R13!,{R1-R11,R14}
��RS PC,R14,#1<<28
�MOV PC,R14
�:
�.SWI_String
�:
�#; R0=String, R1=X pos, R2=Y pos
�:
�STMFD R13!,{R1-R11,R14}
�:
�
MOV R7,R0
�
MOV R6,#0
�:
� .loop
�LDRB R0,[R7,R6]
�
CMP R0,#0
� BEQ exit
�SWI Small_Char
�ADD R1,R1,#16
�ADD R6,R6,#1
�
B loop
�:
� .exit
�LDMFD R13!,{R1-R11,PC}
�MOV PC,R14
�:
�]�
��
�:
� 00000000 0d 00 01 11 f4 20 3e 53 6d 61 6c 6c 46 6f 6e 74 |..... >SmallFont|
00000010 53 0d 00 02 0f f4 20 a9 20 4e 4d 20 31 39 39 33 |S..... . NM 1993|
00000020 0d 00 03 05 3a 0d 00 04 20 ee 20 85 20 d9 20 23 |....:... . . . #|
00000030 30 3a f1 f6 24 3b 22 20 61 74 20 6c 69 6e 65 20 |0:..$;" at line |
00000040 22 3b 9e 3a e0 0d 00 05 09 f2 63 6f 64 65 0d 00 |";.:......code..|
00000050 06 2e c8 99 20 22 4f 53 5f 46 69 6c 65 22 2c 31 |.... "OS_File",1|
00000060 30 2c 22 53 6d 61 6c 6c 46 6f 6e 74 22 2c 26 46 |0,"SmallFont",&F|
00000070 46 41 2c 2c 63 6f 64 65 25 2c 4f 25 0d 00 07 24 |FA,,code%,O%...$|
00000080 c8 99 20 22 4f 53 5f 4d 6f 64 75 6c 65 22 2c 31 |.. "OS_Module",1|
00000090 31 2c 63 6f 64 65 25 2c 4f 25 2d 63 6f 64 65 25 |1,code%,O%-code%|
000000a0 0d 00 08 05 e0 0d 00 09 05 3a 0d 00 0a 0b dd 20 |.........:..... |
000000b0 f2 63 6f 64 65 0d 00 0b 11 de 20 63 6f 64 65 25 |.code..... code%|
000000c0 20 26 38 30 30 30 0d 00 0c 14 73 77 69 63 68 75 | &8000....swichu|
000000d0 6e 6b 25 3d 26 43 44 45 30 30 0d 00 0d 18 53 6d |nk%=&CDE00....Sm|
000000e0 61 6c 6c 5f 43 68 61 72 3d 73 77 69 63 68 75 6e |all_Char=swichun|
000000f0 6b 25 0d 00 0e 09 77 70 3d 31 32 0d 00 0f 09 73 |k%....wp=12....s|
00000100 70 3d 31 33 0d 00 10 0b 6c 69 6e 6b 3d 31 34 0d |p=13....link=14.|
00000110 00 11 09 50 43 3d 31 35 0d 00 12 05 3a 0d 00 13 |...PC=15....:...|
00000120 14 e3 20 70 61 73 73 3d 34 20 b8 20 36 20 88 20 |.. pass=4 . 6 . |
00000130 32 0d 00 14 08 50 25 3d 30 0d 00 15 0c 4f 25 3d |2....P%=0....O%=|
00000140 63 6f 64 65 25 0d 00 16 0e 5b 20 4f 50 54 20 70 |code%....[ OPT p|
00000150 61 73 73 0d 00 17 0a 45 51 55 44 20 30 0d 00 18 |ass....EQUD 0...|
00000160 0a 45 51 55 44 20 30 0d 00 19 0a 45 51 55 44 20 |.EQUD 0....EQUD |
00000170 30 0d 00 1a 0a 45 51 55 44 20 30 0d 00 1b 15 45 |0....EQUD 0....E|
00000180 51 55 44 20 54 69 74 6c 65 5f 53 74 72 69 6e 67 |QUD Title_String|
00000190 0d 00 1c 14 45 51 55 44 20 48 65 6c 70 5f 53 74 |....EQUD Help_St|
000001a0 72 69 6e 67 0d 00 1d 0a 45 51 55 44 20 30 0d 00 |ring....EQUD 0..|
000001b0 1e 12 45 51 55 44 20 73 77 69 63 68 75 6e 6b 25 |..EQUD swichunk%|
000001c0 0d 00 1f 14 45 51 55 44 20 53 57 49 5f 48 61 6e |....EQUD SWI_Han|
000001d0 64 6c 65 72 0d 00 20 12 45 51 55 44 20 53 57 49 |dler.. .EQUD SWI|
000001e0 5f 4e 61 6d 65 73 0d 00 21 0a 45 51 55 44 20 30 |_Names..!.EQUD 0|
000001f0 0d 00 22 05 3a 0d 00 23 11 2e 54 69 74 6c 65 5f |..".:..#..Title_|
00000200 53 74 72 69 6e 67 0d 00 24 14 45 51 55 53 20 22 |String..$.EQUS "|
00000210 53 6d 61 6c 6c 46 6f 6e 74 22 0d 00 25 0a 45 51 |SmallFont"..%.EQ|
00000220 55 42 20 30 0d 00 26 05 3a 0d 00 27 10 2e 48 65 |UB 0..&.:..'..He|
00000230 6c 70 5f 53 74 72 69 6e 67 0d 00 28 37 45 51 55 |lp_String..(7EQU|
00000240 53 20 22 53 6d 61 6c 6c 20 46 6f 6e 74 22 2b bd |S "Small Font"+.|
00000250 39 2b 22 31 2e 31 32 20 28 22 2b c1 91 24 2c 35 |9+"1.12 ("+..$,5|
00000260 2c 31 31 29 2b 22 29 20 a9 20 4e 53 6f 66 74 22 |,11)+") . NSoft"|
00000270 0d 00 29 0b 45 51 55 42 20 31 33 0d 00 2a 33 45 |..).EQUB 13..*3E|
00000280 51 55 53 20 22 54 68 69 73 20 6d 6f 64 75 6c 65 |QUS "This module|
00000290 20 69 73 20 64 65 73 69 67 6e 65 64 20 66 6f 72 | is designed for|
000002a0 20 75 73 65 20 6d 6f 64 65 20 31 33 2e 22 0d 00 | use mode 13."..|
000002b0 2b 0a 45 51 55 42 20 30 0d 00 2c 09 41 4c 49 47 |+.EQUB 0..,.ALIG|
000002c0 4e 0d 00 2d 05 3a 0d 00 2e 0e 2e 53 57 49 5f 4e |N..-.:.....SWI_N|
000002d0 61 6d 65 73 0d 00 2f 10 45 51 55 53 20 22 53 6d |ames../.EQUS "Sm|
000002e0 61 6c 6c 22 0d 00 30 0a 45 51 55 42 20 30 0d 00 |all"..0.EQUB 0..|
000002f0 31 0f 45 51 55 53 20 22 43 68 61 72 22 0d 00 32 |1.EQUS "Char"..2|
00000300 0a 45 51 55 42 20 30 0d 00 33 11 45 51 55 53 20 |.EQUB 0..3.EQUS |
00000310 22 53 74 72 69 6e 67 22 0d 00 34 0a 45 51 55 42 |"String"..4.EQUB|
00000320 20 30 0d 00 35 0a 45 51 55 42 20 30 0d 00 36 09 | 0..5.EQUB 0..6.|
00000330 41 4c 49 47 4e 0d 00 37 05 3a 0d 00 38 10 2e 53 |ALIGN..7.:..8..S|
00000340 57 49 5f 48 61 6e 64 6c 65 72 0d 00 39 11 4c 44 |WI_Handler..9.LD|
00000350 52 20 52 31 32 2c 5b 52 31 32 5d 0d 00 3a 22 43 |R R12,[R12]..:"C|
00000360 4d 50 20 52 31 31 2c 23 28 65 6e 64 5f 53 57 49 |MP R11,#(end_SWI|
00000370 2d 73 74 61 72 74 5f 53 57 49 29 2f 34 0d 00 3b |-start_SWI)/4..;|
00000380 1a 41 44 44 43 43 20 50 43 2c 50 43 2c 52 31 31 |.ADDCC PC,PC,R11|
00000390 2c 4c 53 4c 20 23 32 0d 00 3c 11 42 20 75 6e 6b |,LSL #2..<.B unk|
000003a0 6e 6f 77 6e 5f 53 57 49 0d 00 3d 0e 2e 73 74 61 |nown_SWI..=..sta|
000003b0 72 74 5f 53 57 49 0d 00 3e 0e 42 20 53 57 49 5f |rt_SWI..>.B SWI_|
000003c0 43 68 61 72 0d 00 3f 10 42 20 53 57 49 5f 53 74 |Char..?.B SWI_St|
000003d0 72 69 6e 67 0d 00 40 0c 2e 65 6e 64 5f 53 57 49 |ring..@..end_SWI|
000003e0 0d 00 41 05 3a 0d 00 42 10 2e 75 6e 6b 6e 6f 77 |..A.:..B..unknow|
000003f0 6e 5f 53 57 49 0d 00 43 1c 41 44 52 20 52 30 2c |n_SWI..C.ADR R0,|
00000400 75 6e 6b 6e 6f 77 6e 5f 53 57 49 5f 65 72 72 6f |unknown_SWI_erro|
00000410 72 0d 00 44 15 84 52 53 20 50 43 2c 52 31 34 2c |r..D..RS PC,R14,|
00000420 23 31 3c 3c 32 38 0d 00 45 05 3a 0d 00 46 16 2e |#1<<28..E.:..F..|
00000430 75 6e 6b 6e 6f 77 6e 5f 53 57 49 5f 65 72 72 6f |unknown_SWI_erro|
00000440 72 0d 00 47 0d 45 51 55 44 20 26 31 45 36 0d 00 |r..G.EQUD &1E6..|
00000450 48 18 45 51 55 53 20 22 53 57 49 20 6e 6f 74 20 |H.EQUS "SWI not |
00000460 6b 6e 6f 77 6e 22 0d 00 49 0a 45 51 55 42 20 30 |known"..I.EQUB 0|
00000470 0d 00 4a 09 41 4c 49 47 4e 0d 00 4b 05 3a 0d 00 |..J.ALIGN..K.:..|
00000480 4c 0d 2e 53 57 49 5f 43 68 61 72 0d 00 4d 05 3a |L..SWI_Char..M.:|
00000490 0d 00 4e 25 3b 20 52 30 3d 97 49 49 20 43 6f 64 |..N%; R0=.II Cod|
000004a0 65 2c 20 52 31 3d 58 20 70 6f 73 2c 20 52 32 3d |e, R1=X pos, R2=|
000004b0 59 20 70 6f 73 0d 00 4f 05 3a 0d 00 50 1b 53 54 |Y pos..O.:..P.ST|
000004c0 4d 46 44 20 52 31 33 21 2c 7b 52 31 2d 52 31 31 |MFD R13!,{R1-R11|
000004d0 2c 52 31 34 7d 0d 00 51 05 3a 0d 00 52 0d 4d 4f |,R14}..Q.:..R.MO|
000004e0 56 20 52 37 2c 52 30 0d 00 53 0d 4d 4f 56 20 52 |V R7,R0..S.MOV R|
000004f0 38 2c 52 31 0d 00 54 0d 4d 4f 56 20 52 39 2c 52 |8,R1..T.MOV R9,R|
00000500 32 0d 00 55 05 3a 0d 00 56 16 3b 20 46 69 6e 64 |2..U.:..V.; Find|
00000510 20 6c 65 74 74 65 72 20 61 64 64 72 0d 00 57 05 | letter addr..W.|
00000520 3a 0d 00 58 11 53 55 42 20 52 37 2c 52 37 2c 23 |:..X.SUB R7,R7,#|
00000530 33 32 0d 00 59 05 3a 0d 00 5a 19 43 4d 50 20 52 |32..Y.:..Z.CMP R|
00000540 37 2c 23 28 65 6e 64 2d 73 74 61 72 74 29 2f 34 |7,#(end-start)/4|
00000550 0d 00 5b 19 41 44 44 43 43 20 50 43 2c 50 43 2c |..[.ADDCC PC,PC,|
00000560 52 37 2c 4c 53 4c 20 23 32 0d 00 5c 0d 42 20 75 |R7,LSL #2..\.B u|
00000570 6e 6b 6e 6f 77 6e 0d 00 5d 05 3a 0d 00 5e 0a 2e |nknown..].:..^..|
00000580 73 74 61 72 74 0d 00 5f 0c 42 20 63 68 61 72 33 |start.._.B char3|
00000590 32 0d 00 60 0c 42 20 63 68 61 72 33 33 0d 00 61 |2..`.B char33..a|
000005a0 0c 42 20 63 68 61 72 33 34 0d 00 62 0c 42 20 63 |.B char34..b.B c|
000005b0 68 61 72 33 35 0d 00 63 0c 42 20 63 68 61 72 33 |har35..c.B char3|
000005c0 36 0d 00 64 0c 42 20 63 68 61 72 33 37 0d 00 65 |6..d.B char37..e|
000005d0 0c 42 20 63 68 61 72 33 38 0d 00 66 0c 42 20 63 |.B char38..f.B c|
000005e0 68 61 72 33 39 0d 00 67 0c 42 20 63 68 61 72 34 |har39..g.B char4|
000005f0 30 0d 00 68 0c 42 20 63 68 61 72 34 31 0d 00 69 |0..h.B char41..i|
00000600 0c 42 20 63 68 61 72 34 32 0d 00 6a 0c 42 20 63 |.B char42..j.B c|
00000610 68 61 72 34 33 0d 00 6b 0c 42 20 63 68 61 72 34 |har43..k.B char4|
00000620 34 0d 00 6c 0c 42 20 63 68 61 72 34 35 0d 00 6d |4..l.B char45..m|
00000630 0c 42 20 63 68 61 72 34 36 0d 00 6e 0c 42 20 63 |.B char46..n.B c|
00000640 68 61 72 34 37 0d 00 6f 0c 42 20 63 68 61 72 34 |har47..o.B char4|
00000650 38 0d 00 70 0c 42 20 63 68 61 72 34 39 0d 00 71 |8..p.B char49..q|
00000660 0c 42 20 63 68 61 72 35 30 0d 00 72 0c 42 20 63 |.B char50..r.B c|
00000670 68 61 72 35 31 0d 00 73 0c 42 20 63 68 61 72 35 |har51..s.B char5|
00000680 32 0d 00 74 0c 42 20 63 68 61 72 35 33 0d 00 75 |2..t.B char53..u|
00000690 0c 42 20 63 68 61 72 35 34 0d 00 76 0c 42 20 63 |.B char54..v.B c|
000006a0 68 61 72 35 35 0d 00 77 0c 42 20 63 68 61 72 35 |har55..w.B char5|
000006b0 36 0d 00 78 0c 42 20 63 68 61 72 35 37 0d 00 79 |6..x.B char57..y|
000006c0 0c 42 20 63 68 61 72 35 38 0d 00 7a 0c 42 20 63 |.B char58..z.B c|
000006d0 68 61 72 35 39 0d 00 7b 0c 42 20 63 68 61 72 36 |har59..{.B char6|
000006e0 30 0d 00 7c 0c 42 20 63 68 61 72 36 31 0d 00 7d |0..|.B char61..}|
000006f0 0c 42 20 63 68 61 72 36 32 0d 00 7e 0c 42 20 63 |.B char62..~.B c|
00000700 68 61 72 36 33 0d 00 7f 0c 42 20 63 68 61 72 36 |har63....B char6|
00000710 34 0d 00 80 0b 42 20 63 68 61 72 41 0d 00 81 0b |4....B charA....|
00000720 42 20 63 68 61 72 42 0d 00 82 0b 42 20 63 68 61 |B charB....B cha|
00000730 72 43 0d 00 83 0b 42 20 63 68 61 72 44 0d 00 84 |rC....B charD...|
00000740 0b 42 20 63 68 61 72 45 0d 00 85 0b 42 20 63 68 |.B charE....B ch|
00000750 61 72 46 0d 00 86 0b 42 20 63 68 61 72 47 0d 00 |arF....B charG..|
00000760 87 0b 42 20 63 68 61 72 48 0d 00 88 0b 42 20 63 |..B charH....B c|
00000770 68 61 72 49 0d 00 89 0b 42 20 63 68 61 72 4a 0d |harI....B charJ.|
00000780 00 8a 0b 42 20 63 68 61 72 4b 0d 00 8b 0b 42 20 |...B charK....B |
00000790 63 68 61 72 4c 0d 00 8c 0b 42 20 63 68 61 72 4d |charL....B charM|
000007a0 0d 00 8d 0b 42 20 63 68 61 72 4e 0d 00 8e 0b 42 |....B charN....B|
000007b0 20 63 68 61 72 4f 0d 00 8f 0b 42 20 63 68 61 72 | charO....B char|
000007c0 50 0d 00 90 0b 42 20 63 68 61 72 51 0d 00 91 0b |P....B charQ....|
000007d0 42 20 63 68 61 72 52 0d 00 92 0b 42 20 63 68 61 |B charR....B cha|
000007e0 72 53 0d 00 93 0b 42 20 63 68 61 72 54 0d 00 94 |rS....B charT...|
000007f0 0b 42 20 63 68 61 72 55 0d 00 95 0b 42 20 63 68 |.B charU....B ch|
00000800 61 72 56 0d 00 96 0b 42 20 63 68 61 72 57 0d 00 |arV....B charW..|
00000810 97 0b 42 20 63 68 61 72 58 0d 00 98 0b 42 20 63 |..B charX....B c|
00000820 68 61 72 59 0d 00 99 0b 42 20 63 68 61 72 5a 0d |harY....B charZ.|
00000830 00 9a 0c 42 20 63 68 61 72 39 31 0d 00 9b 0c 42 |...B char91....B|
00000840 20 63 68 61 72 39 32 0d 00 9c 0c 42 20 63 68 61 | char92....B cha|
00000850 72 39 33 0d 00 9d 0c 42 20 63 68 61 72 39 34 0d |r93....B char94.|
00000860 00 9e 0c 42 20 63 68 61 72 39 35 0d 00 9f 08 2e |...B char95.....|
00000870 65 6e 64 0d 00 a0 05 3a 0d 00 a1 0e 2e 70 6c 6f |end....:.....plo|
00000880 74 5f 63 68 61 72 0d 00 a2 05 3a 0d 00 a3 0f 3b |t_char....:....;|
00000890 20 46 69 72 73 74 20 72 6f 77 0d 00 a4 05 3a 0d | First row....:.|
000008a0 00 a5 11 3b 20 46 69 72 73 74 20 70 6f 69 6e 74 |...; First point|
000008b0 0d 00 a6 14 4c 44 52 42 20 52 30 2c 5b 52 31 30 |....LDRB R0,[R10|
000008c0 2c 23 30 5d 0d 00 a7 12 43 4d 50 20 52 30 2c 23 |,#0]....CMP R0,#|
000008d0 97 28 22 31 22 29 0d 00 a8 12 41 44 44 45 51 20 |.("1")....ADDEQ |
000008e0 52 31 2c 52 38 2c 23 30 0d 00 a9 12 41 44 44 45 |R1,R8,#0....ADDE|
000008f0 51 20 52 32 2c 52 39 2c 23 30 0d 00 aa 0d ec 51 |Q R2,R9,#0.....Q|
00000900 20 52 30 2c 23 36 39 0d 00 ab 13 53 57 49 45 51 | R0,#69....SWIEQ|
00000910 20 22 4f 53 5f 50 6c 6f 74 22 0d 00 ac 05 3a 0d | "OS_Plot"....:.|
00000920 00 ad 12 3b 20 53 65 63 6f 6e 64 20 70 6f 69 6e |...; Second poin|
00000930 74 0d 00 ae 14 4c 44 52 42 20 52 30 2c 5b 52 31 |t....LDRB R0,[R1|
00000940 30 2c 23 31 5d 0d 00 af 12 43 4d 50 20 52 30 2c |0,#1]....CMP R0,|
00000950 23 97 28 22 31 22 29 0d 00 b0 12 41 44 44 45 51 |#.("1")....ADDEQ|
00000960 20 52 31 2c 52 38 2c 23 34 0d 00 b1 12 41 44 44 | R1,R8,#4....ADD|
00000970 45 51 20 52 32 2c 52 39 2c 23 30 0d 00 b2 0d ec |EQ R2,R9,#0.....|
00000980 51 20 52 30 2c 23 36 39 0d 00 b3 13 53 57 49 45 |Q R0,#69....SWIE|
00000990 51 20 22 4f 53 5f 50 6c 6f 74 22 0d 00 b4 05 3a |Q "OS_Plot"....:|
000009a0 0d 00 b5 11 3b 20 54 68 69 72 64 20 70 6f 69 6e |....; Third poin|
000009b0 74 0d 00 b6 14 4c 44 52 42 20 52 30 2c 5b 52 31 |t....LDRB R0,[R1|
000009c0 30 2c 23 32 5d 0d 00 b7 12 43 4d 50 20 52 30 2c |0,#2]....CMP R0,|
000009d0 23 97 28 22 31 22 29 0d 00 b8 12 41 44 44 45 51 |#.("1")....ADDEQ|
000009e0 20 52 31 2c 52 38 2c 23 38 0d 00 b9 12 41 44 44 | R1,R8,#8....ADD|
000009f0 45 51 20 52 32 2c 52 39 2c 23 30 0d 00 ba 0d ec |EQ R2,R9,#0.....|
00000a00 51 20 52 30 2c 23 36 39 0d 00 bb 13 53 57 49 45 |Q R0,#69....SWIE|
00000a10 51 20 22 4f 53 5f 50 6c 6f 74 22 0d 00 bc 05 3a |Q "OS_Plot"....:|
00000a20 0d 00 bd 10 3b 20 53 65 63 6f 6e 64 20 72 6f 77 |....; Second row|
00000a30 0d 00 be 05 3a 0d 00 bf 11 3b 20 46 69 72 73 74 |....:....; First|
00000a40 20 70 6f 69 6e 74 0d 00 c0 14 4c 44 52 42 20 52 | point....LDRB R|
00000a50 30 2c 5b 52 31 30 2c 23 33 5d 0d 00 c1 12 43 4d |0,[R10,#3]....CM|
00000a60 50 20 52 30 2c 23 97 28 22 31 22 29 0d 00 c2 12 |P R0,#.("1")....|
00000a70 41 44 44 45 51 20 52 31 2c 52 38 2c 23 30 0d 00 |ADDEQ R1,R8,#0..|
00000a80 c3 12 41 44 44 45 51 20 52 32 2c 52 39 2c 23 34 |..ADDEQ R2,R9,#4|
00000a90 0d 00 c4 0d ec 51 20 52 30 2c 23 36 39 0d 00 c5 |.....Q R0,#69...|
00000aa0 13 53 57 49 45 51 20 22 4f 53 5f 50 6c 6f 74 22 |.SWIEQ "OS_Plot"|
00000ab0 0d 00 c6 05 3a 0d 00 c7 12 3b 20 53 65 63 6f 6e |....:....; Secon|
00000ac0 64 20 70 6f 69 6e 74 0d 00 c8 14 4c 44 52 42 20 |d point....LDRB |
00000ad0 52 30 2c 5b 52 31 30 2c 23 34 5d 0d 00 c9 12 43 |R0,[R10,#4]....C|
00000ae0 4d 50 20 52 30 2c 23 97 28 22 31 22 29 0d 00 ca |MP R0,#.("1")...|
00000af0 12 41 44 44 45 51 20 52 31 2c 52 38 2c 23 34 0d |.ADDEQ R1,R8,#4.|
00000b00 00 cb 12 41 44 44 45 51 20 52 32 2c 52 39 2c 23 |...ADDEQ R2,R9,#|
00000b10 34 0d 00 cc 0d ec 51 20 52 30 2c 23 36 39 0d 00 |4.....Q R0,#69..|
00000b20 cd 13 53 57 49 45 51 20 22 4f 53 5f 50 6c 6f 74 |..SWIEQ "OS_Plot|
00000b30 22 0d 00 ce 05 3a 0d 00 cf 11 3b 20 54 68 69 72 |"....:....; Thir|
00000b40 64 20 70 6f 69 6e 74 0d 00 d0 14 4c 44 52 42 20 |d point....LDRB |
00000b50 52 30 2c 5b 52 31 30 2c 23 35 5d 0d 00 d1 12 43 |R0,[R10,#5]....C|
00000b60 4d 50 20 52 30 2c 23 97 28 22 31 22 29 0d 00 d2 |MP R0,#.("1")...|
00000b70 12 41 44 44 45 51 20 52 31 2c 52 38 2c 23 38 0d |.ADDEQ R1,R8,#8.|
00000b80 00 d3 12 41 44 44 45 51 20 52 32 2c 52 39 2c 23 |...ADDEQ R2,R9,#|
00000b90 34 0d 00 d4 0d ec 51 20 52 30 2c 23 36 39 0d 00 |4.....Q R0,#69..|
00000ba0 d5 13 53 57 49 45 51 20 22 4f 53 5f 50 6c 6f 74 |..SWIEQ "OS_Plot|
00000bb0 22 0d 00 d6 05 3a 0d 00 d7 0f 3b 20 54 68 69 72 |"....:....; Thir|
00000bc0 64 20 72 6f 77 0d 00 d8 05 3a 0d 00 d9 11 3b 20 |d row....:....; |
00000bd0 46 69 72 73 74 20 70 6f 69 6e 74 0d 00 da 14 4c |First point....L|
00000be0 44 52 42 20 52 30 2c 5b 52 31 30 2c 23 36 5d 0d |DRB R0,[R10,#6].|
00000bf0 00 db 12 43 4d 50 20 52 30 2c 23 97 28 22 31 22 |...CMP R0,#.("1"|
00000c00 29 0d 00 dc 12 41 44 44 45 51 20 52 31 2c 52 38 |)....ADDEQ R1,R8|
00000c10 2c 23 30 0d 00 dd 12 41 44 44 45 51 20 52 32 2c |,#0....ADDEQ R2,|
00000c20 52 39 2c 23 38 0d 00 de 0d ec 51 20 52 30 2c 23 |R9,#8.....Q R0,#|
00000c30 36 39 0d 00 df 13 53 57 49 45 51 20 22 4f 53 5f |69....SWIEQ "OS_|
00000c40 50 6c 6f 74 22 0d 00 e0 05 3a 0d 00 e1 12 3b 20 |Plot"....:....; |
00000c50 53 65 63 6f 6e 64 20 70 6f 69 6e 74 0d 00 e2 14 |Second point....|
00000c60 4c 44 52 42 20 52 30 2c 5b 52 31 30 2c 23 37 5d |LDRB R0,[R10,#7]|
00000c70 0d 00 e3 12 43 4d 50 20 52 30 2c 23 97 28 22 31 |....CMP R0,#.("1|
00000c80 22 29 0d 00 e4 12 41 44 44 45 51 20 52 31 2c 52 |")....ADDEQ R1,R|
00000c90 38 2c 23 34 0d 00 e5 12 41 44 44 45 51 20 52 32 |8,#4....ADDEQ R2|
00000ca0 2c 52 39 2c 23 38 0d 00 e6 0d ec 51 20 52 30 2c |,R9,#8.....Q R0,|
00000cb0 23 36 39 0d 00 e7 13 53 57 49 45 51 20 22 4f 53 |#69....SWIEQ "OS|
00000cc0 5f 50 6c 6f 74 22 0d 00 e8 05 3a 0d 00 e9 11 3b |_Plot"....:....;|
00000cd0 20 54 68 69 72 64 20 70 6f 69 6e 74 0d 00 ea 14 | Third point....|
00000ce0 4c 44 52 42 20 52 30 2c 5b 52 31 30 2c 23 38 5d |LDRB R0,[R10,#8]|
00000cf0 0d 00 eb 12 43 4d 50 20 52 30 2c 23 97 28 22 31 |....CMP R0,#.("1|
00000d00 22 29 0d 00 ec 12 41 44 44 45 51 20 52 31 2c 52 |")....ADDEQ R1,R|
00000d10 38 2c 23 38 0d 00 ed 12 41 44 44 45 51 20 52 32 |8,#8....ADDEQ R2|
00000d20 2c 52 39 2c 23 38 0d 00 ee 0d ec 51 20 52 30 2c |,R9,#8.....Q R0,|
00000d30 23 36 39 0d 00 ef 13 53 57 49 45 51 20 22 4f 53 |#69....SWIEQ "OS|
00000d40 5f 50 6c 6f 74 22 0d 00 f0 05 3a 0d 00 f1 10 3b |_Plot"....:....;|
00000d50 20 46 6f 75 72 74 68 20 72 6f 77 0d 00 f2 05 3a | Fourth row....:|
00000d60 0d 00 f3 11 3b 20 46 69 72 73 74 20 70 6f 69 6e |....; First poin|
00000d70 74 0d 00 f4 14 4c 44 52 42 20 52 30 2c 5b 52 31 |t....LDRB R0,[R1|
00000d80 30 2c 23 39 5d 0d 00 f5 12 43 4d 50 20 52 30 2c |0,#9]....CMP R0,|
00000d90 23 97 28 22 31 22 29 0d 00 f6 12 41 44 44 45 51 |#.("1")....ADDEQ|
00000da0 20 52 31 2c 52 38 2c 23 30 0d 00 f7 13 41 44 44 | R1,R8,#0....ADD|
00000db0 45 51 20 52 32 2c 52 39 2c 23 31 32 0d 00 f8 0d |EQ R2,R9,#12....|
00000dc0 ec 51 20 52 30 2c 23 36 39 0d 00 f9 13 53 57 49 |.Q R0,#69....SWI|
00000dd0 45 51 20 22 4f 53 5f 50 6c 6f 74 22 0d 00 fa 05 |EQ "OS_Plot"....|
00000de0 3a 0d 00 fb 12 3b 20 53 65 63 6f 6e 64 20 70 6f |:....; Second po|
00000df0 69 6e 74 0d 00 fc 15 4c 44 52 42 20 52 30 2c 5b |int....LDRB R0,[|
00000e00 52 31 30 2c 23 31 30 5d 0d 00 fd 12 43 4d 50 20 |R10,#10]....CMP |
00000e10 52 30 2c 23 97 28 22 31 22 29 0d 00 fe 12 41 44 |R0,#.("1")....AD|
00000e20 44 45 51 20 52 31 2c 52 38 2c 23 34 0d 00 ff 13 |DEQ R1,R8,#4....|
00000e30 41 44 44 45 51 20 52 32 2c 52 39 2c 23 31 32 0d |ADDEQ R2,R9,#12.|
00000e40 01 00 0d ec 51 20 52 30 2c 23 36 39 0d 01 01 13 |....Q R0,#69....|
00000e50 53 57 49 45 51 20 22 4f 53 5f 50 6c 6f 74 22 0d |SWIEQ "OS_Plot".|
00000e60 01 02 05 3a 0d 01 03 11 3b 20 54 68 69 72 64 20 |...:....; Third |
00000e70 70 6f 69 6e 74 0d 01 04 15 4c 44 52 42 20 52 30 |point....LDRB R0|
00000e80 2c 5b 52 31 30 2c 23 31 31 5d 0d 01 05 12 43 4d |,[R10,#11]....CM|
00000e90 50 20 52 30 2c 23 97 28 22 31 22 29 0d 01 06 12 |P R0,#.("1")....|
00000ea0 41 44 44 45 51 20 52 31 2c 52 38 2c 23 38 0d 01 |ADDEQ R1,R8,#8..|
00000eb0 07 13 41 44 44 45 51 20 52 32 2c 52 39 2c 23 31 |..ADDEQ R2,R9,#1|
00000ec0 32 0d 01 08 0d ec 51 20 52 30 2c 23 36 39 0d 01 |2.....Q R0,#69..|
00000ed0 09 13 53 57 49 45 51 20 22 4f 53 5f 50 6c 6f 74 |..SWIEQ "OS_Plot|
00000ee0 22 0d 01 0a 05 3a 0d 01 0b 0f 3b 20 46 69 66 74 |"....:....; Fift|
00000ef0 68 20 72 6f 77 0d 01 0c 05 3a 0d 01 0d 11 3b 20 |h row....:....; |
00000f00 46 69 72 73 74 20 70 6f 69 6e 74 0d 01 0e 15 4c |First point....L|
00000f10 44 52 42 20 52 30 2c 5b 52 31 30 2c 23 31 32 5d |DRB R0,[R10,#12]|
00000f20 0d 01 0f 12 43 4d 50 20 52 30 2c 23 97 28 22 31 |....CMP R0,#.("1|
00000f30 22 29 0d 01 10 12 41 44 44 45 51 20 52 31 2c 52 |")....ADDEQ R1,R|
00000f40 38 2c 23 30 0d 01 11 13 41 44 44 45 51 20 52 32 |8,#0....ADDEQ R2|
00000f50 2c 52 39 2c 23 31 36 0d 01 12 0d ec 51 20 52 30 |,R9,#16.....Q R0|
00000f60 2c 23 36 39 0d 01 13 13 53 57 49 45 51 20 22 4f |,#69....SWIEQ "O|
00000f70 53 5f 50 6c 6f 74 22 0d 01 14 05 3a 0d 01 15 12 |S_Plot"....:....|
00000f80 3b 20 53 65 63 6f 6e 64 20 70 6f 69 6e 74 0d 01 |; Second point..|
00000f90 16 15 4c 44 52 42 20 52 30 2c 5b 52 31 30 2c 23 |..LDRB R0,[R10,#|
00000fa0 31 33 5d 0d 01 17 12 43 4d 50 20 52 30 2c 23 97 |13]....CMP R0,#.|
00000fb0 28 22 31 22 29 0d 01 18 12 41 44 44 45 51 20 52 |("1")....ADDEQ R|
00000fc0 31 2c 52 38 2c 23 34 0d 01 19 13 41 44 44 45 51 |1,R8,#4....ADDEQ|
00000fd0 20 52 32 2c 52 39 2c 23 31 36 0d 01 1a 0d ec 51 | R2,R9,#16.....Q|
00000fe0 20 52 30 2c 23 36 39 0d 01 1b 13 53 57 49 45 51 | R0,#69....SWIEQ|
00000ff0 20 22 4f 53 5f 50 6c 6f 74 22 0d 01 1c 05 3a 0d | "OS_Plot"....:.|
00001000 01 1d 11 3b 20 54 68 69 72 64 20 70 6f 69 6e 74 |...; Third point|
00001010 0d 01 1e 15 4c 44 52 42 20 52 30 2c 5b 52 31 30 |....LDRB R0,[R10|
00001020 2c 23 31 34 5d 0d 01 1f 12 43 4d 50 20 52 30 2c |,#14]....CMP R0,|
00001030 23 97 28 22 31 22 29 0d 01 20 12 41 44 44 45 51 |#.("1").. .ADDEQ|
00001040 20 52 31 2c 52 38 2c 23 38 0d 01 21 13 41 44 44 | R1,R8,#8..!.ADD|
00001050 45 51 20 52 32 2c 52 39 2c 23 31 36 0d 01 22 0d |EQ R2,R9,#16..".|
00001060 ec 51 20 52 30 2c 23 36 39 0d 01 23 13 53 57 49 |.Q R0,#69..#.SWI|
00001070 45 51 20 22 4f 53 5f 50 6c 6f 74 22 0d 01 24 05 |EQ "OS_Plot"..$.|
00001080 3a 0d 01 25 1a 4c 44 4d 46 44 20 52 31 33 21 2c |:..%.LDMFD R13!,|
00001090 7b 52 31 2d 52 31 31 2c 50 43 7d 0d 01 26 0e 4d |{R1-R11,PC}..&.M|
000010a0 4f 56 20 50 43 2c 52 31 34 0d 01 27 05 3a 0d 01 |OV PC,R14..'.:..|
000010b0 28 32 2e 64 61 74 61 33 32 20 45 51 55 53 20 22 |(2.data32 EQUS "|
000010c0 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 22 |000000000000000"|
000010d0 20 20 20 20 20 20 20 20 20 3b 20 3c 73 70 63 3e | ; <spc>|
000010e0 0d 01 29 27 2e 63 68 61 72 33 32 20 41 44 52 20 |..)'.char32 ADR |
000010f0 52 31 30 2c 64 61 74 61 33 32 3a 20 42 20 70 6c |R10,data32: B pl|
00001100 6f 74 5f 63 68 61 72 0d 01 2a 2e 2e 64 61 74 61 |ot_char..*..data|
00001110 33 33 20 45 51 55 53 20 22 30 31 30 30 30 30 30 |33 EQUS "0100000|
00001120 31 30 30 31 30 30 31 30 22 20 20 20 20 20 20 20 |10010010" |
00001130 20 20 3b 20 21 0d 01 2b 27 2e 63 68 61 72 33 33 | ; !..+'.char33|
00001140 20 41 44 52 20 52 31 30 2c 64 61 74 61 33 33 3a | ADR R10,data33:|
00001150 20 42 20 70 6c 6f 74 5f 63 68 61 72 0d 01 2c 2e | B plot_char..,.|
00001160 2e 64 61 74 61 33 34 20 45 51 55 53 20 22 30 30 |.data34 EQUS "00|
00001170 30 30 30 30 30 30 30 30 30 30 30 31 30 22 20 20 |0000000000010" |
00001180 20 20 20 20 20 20 20 3b 20 22 0d 01 2d 27 2e 63 | ; "..-'.c|
00001190 68 61 72 33 34 20 41 44 52 20 52 31 30 2c 64 61 |har34 ADR R10,da|
000011a0 74 61 33 34 3a 20 42 20 70 6c 6f 74 5f 63 68 61 |ta34: B plot_cha|
000011b0 72 0d 01 2e 2e 2e 64 61 74 61 33 35 20 45 51 55 |r.....data35 EQU|
000011c0 53 20 22 30 30 30 30 30 30 30 30 30 30 30 30 30 |S "0000000000000|
000011d0 30 30 22 20 20 20 20 20 20 20 20 20 3b 20 23 0d |00" ; #.|
000011e0 01 2f 27 2e 63 68 61 72 33 35 20 41 44 52 20 52 |./'.char35 ADR R|
000011f0 31 30 2c 64 61 74 61 33 35 3a 20 42 20 70 6c 6f |10,data35: B plo|
00001200 74 5f 63 68 61 72 0d 01 30 2e 2e 64 61 74 61 33 |t_char..0..data3|
00001210 36 20 45 51 55 53 20 22 30 30 30 30 30 30 30 30 |6 EQUS "00000000|
00001220 30 30 30 30 30 30 30 22 20 20 20 20 20 20 20 20 |0000000" |
00001230 20 3b 20 24 0d 01 31 27 2e 63 68 61 72 33 36 20 | ; $..1'.char36 |
00001240 41 44 52 20 52 31 30 2c 64 61 74 61 33 36 3a 20 |ADR R10,data36: |
00001250 42 20 70 6c 6f 74 5f 63 68 61 72 0d 01 32 2e 2e |B plot_char..2..|
00001260 64 61 74 61 33 37 20 45 51 55 53 20 22 30 30 30 |data37 EQUS "000|
00001270 30 30 30 30 30 30 30 30 30 30 30 30 22 20 20 20 |000000000000" |
00001280 20 20 20 20 20 20 3b 20 25 0d 01 33 27 2e 63 68 | ; %..3'.ch|
00001290 61 72 33 37 20 41 44 52 20 52 31 30 2c 64 61 74 |ar37 ADR R10,dat|
000012a0 61 33 37 3a 20 42 20 70 6c 6f 74 5f 63 68 61 72 |a37: B plot_char|
000012b0 0d 01 34 2e 2e 64 61 74 61 33 38 20 45 51 55 53 |..4..data38 EQUS|
000012c0 20 22 30 30 30 30 30 30 30 30 30 30 30 30 30 30 | "00000000000000|
000012d0 30 22 20 20 20 20 20 20 20 20 20 3b 20 26 0d 01 |0" ; &..|
000012e0 35 27 2e 63 68 61 72 33 38 20 41 44 52 20 52 31 |5'.char38 ADR R1|
000012f0 30 2c 64 61 74 61 33 38 3a 20 42 20 70 6c 6f 74 |0,data38: B plot|
00001300 5f 63 68 61 72 0d 01 36 2e 2e 64 61 74 61 33 39 |_char..6..data39|
00001310 20 45 51 55 53 20 22 30 30 30 30 30 30 30 30 30 | EQUS "000000000|
00001320 30 30 30 30 31 30 22 20 20 20 20 20 20 20 20 20 |000010" |
00001330 3b 20 27 0d 01 37 27 2e 63 68 61 72 33 39 20 41 |; '..7'.char39 A|
00001340 44 52 20 52 31 30 2c 64 61 74 61 33 39 3a 20 42 |DR R10,data39: B|
00001350 20 70 6c 6f 74 5f 63 68 61 72 0d 01 38 2e 2e 64 | plot_char..8..d|
00001360 61 74 61 34 30 20 45 51 55 53 20 22 30 30 31 30 |ata40 EQUS "0010|
00001370 31 30 30 31 30 30 31 30 30 30 31 22 20 20 20 20 |10010010001" |
00001380 20 20 20 20 20 3b 20 28 0d 01 39 27 2e 63 68 61 | ; (..9'.cha|
00001390 72 34 30 20 41 44 52 20 52 31 30 2c 64 61 74 61 |r40 ADR R10,data|
000013a0 34 30 3a 20 42 20 70 6c 6f 74 5f 63 68 61 72 0d |40: B plot_char.|
000013b0 01 3a 2e 2e 64 61 74 61 34 31 20 45 51 55 53 20 |.:..data41 EQUS |
000013c0 22 31 30 30 30 31 30 30 31 30 30 31 30 31 30 30 |"100010010010100|
000013d0 22 20 20 20 20 20 20 20 20 20 3b 20 29 0d 01 3b |" ; )..;|
000013e0 27 2e 63 68 61 72 34 31 20 41 44 52 20 52 31 30 |'.char41 ADR R10|
000013f0 2c 64 61 74 61 34 31 3a 20 42 20 70 6c 6f 74 5f |,data41: B plot_|
00001400 63 68 61 72 0d 01 3c 2e 2e 64 61 74 61 34 32 20 |char..<..data42 |
00001410 45 51 55 53 20 22 30 31 30 31 31 31 30 31 30 31 |EQUS "0101110101|
00001420 31 31 30 31 30 22 20 20 20 20 20 20 20 20 20 3b |11010" ;|
00001430 20 2a 0d 01 3d 27 2e 63 68 61 72 34 32 20 41 44 | *..='.char42 AD|
00001440 52 20 52 31 30 2c 64 61 74 61 34 32 3a 20 42 20 |R R10,data42: B |
00001450 70 6c 6f 74 5f 63 68 61 72 0d 01 3e 2e 2e 64 61 |plot_char..>..da|
00001460 74 61 34 33 20 45 51 55 53 20 22 30 30 30 30 31 |ta43 EQUS "00001|
00001470 30 31 31 31 30 31 30 30 30 30 22 20 20 20 20 20 |0111010000" |
00001480 20 20 20 20 3b 20 2b 0d 01 3f 27 2e 63 68 61 72 | ; +..?'.char|
00001490 34 33 20 41 44 52 20 52 31 30 2c 64 61 74 61 34 |43 ADR R10,data4|
000014a0 33 3a 20 42 20 70 6c 6f 74 5f 63 68 61 72 0d 01 |3: B plot_char..|
000014b0 40 2e 2e 64 61 74 61 34 34 20 45 51 55 53 20 22 |@..data44 EQUS "|
000014c0 31 30 30 30 31 30 30 30 30 30 30 30 30 30 30 22 |100010000000000"|
000014d0 20 20 20 20 20 20 20 20 20 3b 20 2c 0d 01 41 27 | ; ,..A'|
000014e0 2e 63 68 61 72 34 34 20 41 44 52 20 52 31 30 2c |.char44 ADR R10,|
000014f0 64 61 74 61 34 34 3a 20 42 20 70 6c 6f 74 5f 63 |data44: B plot_c|
00001500 68 61 72 0d 01 42 2e 2e 64 61 74 61 34 35 20 45 |har..B..data45 E|
00001510 51 55 53 20 22 30 30 30 30 30 30 31 31 31 30 30 |QUS "00000011100|
00001520 30 30 30 30 22 20 20 20 20 20 20 20 20 20 3b 20 |0000" ; |
00001530 2d 0d 01 43 27 2e 63 68 61 72 34 35 20 41 44 52 |-..C'.char45 ADR|
00001540 20 52 31 30 2c 64 61 74 61 34 35 3a 20 42 20 70 | R10,data45: B p|
00001550 6c 6f 74 5f 63 68 61 72 0d 01 44 2e 2e 64 61 74 |lot_char..D..dat|
00001560 61 34 36 20 45 51 55 53 20 22 30 31 30 30 30 30 |a46 EQUS "010000|
00001570 30 30 30 30 30 30 30 30 30 22 20 20 20 20 20 20 |000000000" |
00001580 20 20 20 3b 20 2e 0d 01 45 27 2e 63 68 61 72 34 | ; ...E'.char4|
00001590 36 20 41 44 52 20 52 31 30 2c 64 61 74 61 34 36 |6 ADR R10,data46|
000015a0 3a 20 42 20 70 6c 6f 74 5f 63 68 61 72 0d 01 46 |: B plot_char..F|
000015b0 2e 2e 64 61 74 61 34 37 20 45 51 55 53 20 22 31 |..data47 EQUS "1|
000015c0 30 30 30 31 30 30 31 30 30 31 30 30 30 31 22 20 |00010010010001" |
000015d0 20 20 20 20 20 20 20 20 3b 20 2f 0d 01 47 27 2e | ; /..G'.|
000015e0 63 68 61 72 34 37 20 41 44 52 20 52 31 30 2c 64 |char47 ADR R10,d|
000015f0 61 74 61 34 37 3a 20 42 20 70 6c 6f 74 5f 63 68 |ata47: B plot_ch|
00001600 61 72 0d 01 48 2e 2e 64 61 74 61 34 38 20 45 51 |ar..H..data48 EQ|
00001610 55 53 20 22 31 31 31 31 30 31 31 30 31 31 30 31 |US "111101101101|
00001620 31 31 31 22 20 20 20 20 20 20 20 20 20 3b 20 30 |111" ; 0|
00001630 0d 01 49 27 2e 63 68 61 72 34 38 20 41 44 52 20 |..I'.char48 ADR |
00001640 52 31 30 2c 64 61 74 61 34 38 3a 20 42 20 70 6c |R10,data48: B pl|
00001650 6f 74 5f 63 68 61 72 0d 01 4a 2e 2e 64 61 74 61 |ot_char..J..data|
00001660 34 39 20 45 51 55 53 20 22 30 31 30 30 31 30 30 |49 EQUS "0100100|
00001670 31 30 31 31 30 30 31 30 22 20 20 20 20 20 20 20 |10110010" |
00001680 20 20 3b 20 31 0d 01 4b 27 2e 63 68 61 72 34 39 | ; 1..K'.char49|
00001690 20 41 44 52 20 52 31 30 2c 64 61 74 61 34 39 3a | ADR R10,data49:|
000016a0 20 42 20 70 6c 6f 74 5f 63 68 61 72 0d 01 4c 2e | B plot_char..L.|
000016b0 2e 64 61 74 61 35 30 20 45 51 55 53 20 22 31 31 |.data50 EQUS "11|
000016c0 31 31 30 30 31 31 31 30 30 31 31 31 31 22 20 20 |1100111001111" |
000016d0 20 20 20 20 20 20 20 3b 20 32 0d 01 4d 27 2e 63 | ; 2..M'.c|
000016e0 68 61 72 35 30 20 41 44 52 20 52 31 30 2c 64 61 |har50 ADR R10,da|
000016f0 74 61 35 30 3a 20 42 20 70 6c 6f 74 5f 63 68 61 |ta50: B plot_cha|
00001700 72 0d 01 4e 2e 2e 64 61 74 61 35 31 20 45 51 55 |r..N..data51 EQU|
00001710 53 20 22 31 31 31 30 30 31 30 31 31 30 30 31 31 |S "1110010110011|
00001720 31 31 22 20 20 20 20 20 20 20 20 20 3b 20 33 0d |11" ; 3.|
00001730 01 4f 27 2e 63 68 61 72 35 31 20 41 44 52 20 52 |.O'.char51 ADR R|
00001740 31 30 2c 64 61 74 61 35 31 3a 20 42 20 70 6c 6f |10,data51: B plo|
00001750 74 5f 63 68 61 72 0d 01 50 2e 2e 64 61 74 61 35 |t_char..P..data5|
00001760 32 20 45 51 55 53 20 22 30 30 31 31 31 31 31 30 |2 EQUS "00111110|
00001770 31 31 30 30 31 30 30 22 20 20 20 20 20 20 20 20 |1100100" |
00001780 20 3b 20 34 0d 01 51 27 2e 63 68 61 72 35 32 20 | ; 4..Q'.char52 |
00001790 41 44 52 20 52 31 30 2c 64 61 74 61 35 32 3a 20 |ADR R10,data52: |
000017a0 42 20 70 6c 6f 74 5f 63 68 61 72 0d 01 52 2e 2e |B plot_char..R..|
000017b0 64 61 74 61 35 33 20 45 51 55 53 20 22 31 31 31 |data53 EQUS "111|
000017c0 30 30 31 31 31 31 31 30 30 31 31 31 22 20 20 20 |001111100111" |
000017d0 20 20 20 20 20 20 3b 20 35 0d 01 53 27 2e 63 68 | ; 5..S'.ch|
000017e0 61 72 35 33 20 41 44 52 20 52 31 30 2c 64 61 74 |ar53 ADR R10,dat|
000017f0 61 35 33 3a 20 42 20 70 6c 6f 74 5f 63 68 61 72 |a53: B plot_char|
00001800 0d 01 54 2e 2e 64 61 74 61 35 34 20 45 51 55 53 |..T..data54 EQUS|
00001810 20 22 31 31 31 31 30 31 31 31 31 31 30 30 31 30 | "11110111110010|
00001820 30 22 20 20 20 20 20 20 20 20 20 3b 20 36 0d 01 |0" ; 6..|
00001830 55 27 2e 63 68 61 72 35 34 20 41 44 52 20 52 31 |U'.char54 ADR R1|
00001840 30 2c 64 61 74 61 35 34 3a 20 42 20 70 6c 6f 74 |0,data54: B plot|
00001850 5f 63 68 61 72 0d 01 56 2e 2e 64 61 74 61 35 35 |_char..V..data55|
00001860 20 45 51 55 53 20 22 30 31 30 30 31 30 30 31 30 | EQUS "010010010|
00001870 30 30 31 31 31 31 22 20 20 20 20 20 20 20 20 20 |001111" |
00001880 3b 20 37 0d 01 57 27 2e 63 68 61 72 35 35 20 41 |; 7..W'.char55 A|
00001890 44 52 20 52 31 30 2c 64 61 74 61 35 35 3a 20 42 |DR R10,data55: B|
000018a0 20 70 6c 6f 74 5f 63 68 61 72 0d 01 58 2e 2e 64 | plot_char..X..d|
000018b0 61 74 61 35 36 20 45 51 55 53 20 22 31 31 31 31 |ata56 EQUS "1111|
000018c0 30 31 31 31 31 31 30 31 31 31 31 22 20 20 20 20 |01111101111" |
000018d0 20 20 20 20 20 3b 20 38 0d 01 59 27 2e 63 68 61 | ; 8..Y'.cha|
000018e0 72 35 36 20 41 44 52 20 52 31 30 2c 64 61 74 61 |r56 ADR R10,data|
000018f0 35 36 3a 20 42 20 70 6c 6f 74 5f 63 68 61 72 0d |56: B plot_char.|
00001900 01 5a 2e 2e 64 61 74 61 35 37 20 45 51 55 53 20 |.Z..data57 EQUS |
00001910 22 30 30 31 30 30 31 31 31 31 31 30 31 31 31 31 |"001001111101111|
00001920 22 20 20 20 20 20 20 20 20 20 3b 20 39 0d 01 5b |" ; 9..[|
00001930 27 2e 63 68 61 72 35 37 20 41 44 52 20 52 31 30 |'.char57 ADR R10|
00001940 2c 64 61 74 61 35 37 3a 20 42 20 70 6c 6f 74 5f |,data57: B plot_|
00001950 63 68 61 72 0d 01 5c 2e 2e 64 61 74 61 35 38 20 |char..\..data58 |
00001960 45 51 55 53 20 22 30 30 30 30 31 30 30 30 30 30 |EQUS "0000100000|
00001970 31 30 30 30 30 22 20 20 20 20 20 20 20 20 20 3b |10000" ;|
00001980 20 3a 0d 01 5d 27 2e 63 68 61 72 35 38 20 41 44 | :..]'.char58 AD|
00001990 52 20 52 31 30 2c 64 61 74 61 35 38 3a 20 42 20 |R R10,data58: B |
000019a0 70 6c 6f 74 5f 63 68 61 72 0d 01 5e 2e 2e 64 61 |plot_char..^..da|
000019b0 74 61 35 39 20 45 51 55 53 20 22 31 30 30 30 31 |ta59 EQUS "10001|
000019c0 30 30 31 30 30 30 30 30 31 30 22 20 20 20 20 20 |0010000010" |
000019d0 20 20 20 20 3b 20 3b 0d 01 5f 27 2e 63 68 61 72 | ; ;.._'.char|
000019e0 35 39 20 41 44 52 20 52 31 30 2c 64 61 74 61 35 |59 ADR R10,data5|
000019f0 39 3a 20 42 20 70 6c 6f 74 5f 63 68 61 72 0d 01 |9: B plot_char..|
00001a00 60 2e 2e 64 61 74 61 36 30 20 45 51 55 53 20 22 |`..data60 EQUS "|
00001a10 30 30 31 30 31 30 31 30 30 30 31 30 31 30 30 22 |001010100010100"|
00001a20 20 20 20 20 20 20 20 20 20 3b 20 3c 0d 01 61 27 | ; <..a'|
00001a30 2e 63 68 61 72 36 30 20 41 44 52 20 52 31 30 2c |.char60 ADR R10,|
00001a40 64 61 74 61 36 30 3a 20 42 20 70 6c 6f 74 5f 63 |data60: B plot_c|
00001a50 68 61 72 0d 01 62 2e 2e 64 61 74 61 36 31 20 45 |har..b..data61 E|
00001a60 51 55 53 20 22 30 30 30 31 31 31 30 30 30 31 31 |QUS "00011100011|
00001a70 31 30 30 30 22 20 20 20 20 20 20 20 20 20 3b 20 |1000" ; |
00001a80 3d 0d 01 63 27 2e 63 68 61 72 36 31 20 41 44 52 |=..c'.char61 ADR|
00001a90 20 52 31 30 2c 64 61 74 61 36 31 3a 20 42 20 70 | R10,data61: B p|
00001aa0 6c 6f 74 5f 63 68 61 72 0d 01 64 2e 2e 64 61 74 |lot_char..d..dat|
00001ab0 61 36 32 20 45 51 55 53 20 22 31 30 30 30 31 30 |a62 EQUS "100010|
00001ac0 30 30 31 30 31 30 31 30 30 22 20 20 20 20 20 20 |001010100" |
00001ad0 20 20 20 3b 20 3e 0d 01 65 27 2e 63 68 61 72 36 | ; >..e'.char6|
00001ae0 32 20 41 44 52 20 52 31 30 2c 64 61 74 61 36 32 |2 ADR R10,data62|
00001af0 3a 20 42 20 70 6c 6f 74 5f 63 68 61 72 0d 01 66 |: B plot_char..f|
00001b00 2e 2e 64 61 74 61 36 33 20 45 51 55 53 20 22 30 |..data63 EQUS "0|
00001b10 31 30 30 30 30 30 31 30 30 30 31 30 31 31 22 20 |10000010001011" |
00001b20 20 20 20 20 20 20 20 20 3b 20 3f 0d 01 67 27 2e | ; ?..g'.|
00001b30 63 68 61 72 36 33 20 41 44 52 20 52 31 30 2c 64 |char63 ADR R10,d|
00001b40 61 74 61 36 33 3a 20 42 20 70 6c 6f 74 5f 63 68 |ata63: B plot_ch|
00001b50 61 72 0d 01 68 2e 2e 64 61 74 61 36 34 20 45 51 |ar..h..data64 EQ|
00001b60 55 53 20 22 30 30 30 30 30 30 30 30 30 30 30 30 |US "000000000000|
00001b70 30 30 30 22 20 20 20 20 20 20 20 20 20 3b 20 40 |000" ; @|
00001b80 0d 01 69 27 2e 63 68 61 72 36 34 20 41 44 52 20 |..i'.char64 ADR |
00001b90 52 31 30 2c 64 61 74 61 36 34 3a 20 42 20 70 6c |R10,data64: B pl|
00001ba0 6f 74 5f 63 68 61 72 0d 01 6a 21 2e 64 61 74 61 |ot_char..j!.data|
00001bb0 41 20 45 51 55 53 20 22 31 30 31 31 30 31 31 31 |A EQUS "10110111|
00001bc0 31 31 30 31 31 31 31 22 0d 01 6b 25 2e 63 68 61 |1101111"..k%.cha|
00001bd0 72 41 20 41 44 52 20 52 31 30 2c 64 61 74 61 41 |rA ADR R10,dataA|
00001be0 3a 20 42 20 70 6c 6f 74 5f 63 68 61 72 0d 01 6c |: B plot_char..l|
00001bf0 21 2e 64 61 74 61 42 20 45 51 55 53 20 22 31 31 |!.dataB EQUS "11|
00001c00 30 31 30 31 31 31 30 31 30 31 31 31 30 22 0d 01 |0101110101110"..|
00001c10 6d 25 2e 63 68 61 72 42 20 41 44 52 20 52 31 30 |m%.charB ADR R10|
00001c20 2c 64 61 74 61 42 3a 20 42 20 70 6c 6f 74 5f 63 |,dataB: B plot_c|
00001c30 68 61 72 0d 01 6e 21 2e 64 61 74 61 43 20 45 51 |har..n!.dataC EQ|
00001c40 55 53 20 22 31 31 31 31 30 30 31 30 30 31 30 30 |US "111100100100|
00001c50 31 31 31 22 0d 01 6f 25 2e 63 68 61 72 43 20 41 |111"..o%.charC A|
00001c60 44 52 20 52 31 30 2c 64 61 74 61 43 3a 20 42 20 |DR R10,dataC: B |
00001c70 70 6c 6f 74 5f 63 68 61 72 0d 01 70 21 2e 64 61 |plot_char..p!.da|
00001c80 74 61 44 20 45 51 55 53 20 22 31 31 30 31 30 31 |taD EQUS "110101|
00001c90 31 30 31 31 30 31 31 31 30 22 0d 01 71 25 2e 63 |101101110"..q%.c|
00001ca0 68 61 72 44 20 41 44 52 20 52 31 30 2c 64 61 74 |harD ADR R10,dat|
00001cb0 61 44 3a 20 42 20 70 6c 6f 74 5f 63 68 61 72 0d |aD: B plot_char.|
00001cc0 01 72 21 2e 64 61 74 61 45 20 45 51 55 53 20 22 |.r!.dataE EQUS "|
00001cd0 31 31 31 31 30 30 31 31 30 31 30 30 31 31 31 22 |111100110100111"|
00001ce0 0d 01 73 25 2e 63 68 61 72 45 20 41 44 52 20 52 |..s%.charE ADR R|
00001cf0 31 30 2c 64 61 74 61 45 3a 20 42 20 70 6c 6f 74 |10,dataE: B plot|
00001d00 5f 63 68 61 72 0d 01 74 21 2e 64 61 74 61 46 20 |_char..t!.dataF |
00001d10 45 51 55 53 20 22 31 30 30 31 30 30 31 31 30 31 |EQUS "1001001101|
00001d20 30 30 31 31 31 22 0d 01 75 25 2e 63 68 61 72 46 |00111"..u%.charF|
00001d30 20 41 44 52 20 52 31 30 2c 64 61 74 61 46 3a 20 | ADR R10,dataF: |
00001d40 42 20 70 6c 6f 74 5f 63 68 61 72 0d 01 76 21 2e |B plot_char..v!.|
00001d50 64 61 74 61 47 20 45 51 55 53 20 22 31 31 31 31 |dataG EQUS "1111|
00001d60 30 31 31 30 31 31 30 30 31 31 31 22 0d 01 77 25 |01101100111"..w%|
00001d70 2e 63 68 61 72 47 20 41 44 52 20 52 31 30 2c 64 |.charG ADR R10,d|
00001d80 61 74 61 47 3a 20 42 20 70 6c 6f 74 5f 63 68 61 |ataG: B plot_cha|
00001d90 72 0d 01 78 21 2e 64 61 74 61 48 20 45 51 55 53 |r..x!.dataH EQUS|
00001da0 20 22 31 30 31 31 30 31 31 31 31 31 30 31 31 30 | "10110111110110|
00001db0 31 22 0d 01 79 25 2e 63 68 61 72 48 20 41 44 52 |1"..y%.charH ADR|
00001dc0 20 52 31 30 2c 64 61 74 61 48 3a 20 42 20 70 6c | R10,dataH: B pl|
00001dd0 6f 74 5f 63 68 61 72 0d 01 7a 21 2e 64 61 74 61 |ot_char..z!.data|
00001de0 49 20 45 51 55 53 20 22 31 31 31 30 31 30 30 31 |I EQUS "11101001|
00001df0 30 30 31 30 31 31 31 22 0d 01 7b 25 2e 63 68 61 |0010111"..{%.cha|
00001e00 72 49 20 41 44 52 20 52 31 30 2c 64 61 74 61 49 |rI ADR R10,dataI|
00001e10 3a 20 42 20 70 6c 6f 74 5f 63 68 61 72 0d 01 7c |: B plot_char..||
00001e20 21 2e 64 61 74 61 4a 20 45 51 55 53 20 22 31 31 |!.dataJ EQUS "11|
00001e30 30 30 31 30 30 31 30 30 31 30 31 31 31 22 0d 01 |0010010010111"..|
00001e40 7d 25 2e 63 68 61 72 4a 20 41 44 52 20 52 31 30 |}%.charJ ADR R10|
00001e50 2c 64 61 74 61 4a 3a 20 42 20 70 6c 6f 74 5f 63 |,dataJ: B plot_c|
00001e60 68 61 72 0d 01 7e 21 2e 64 61 74 61 4b 20 45 51 |har..~!.dataK EQ|
00001e70 55 53 20 22 31 30 31 31 30 31 31 31 30 31 30 31 |US "101101110101|
00001e80 31 30 31 22 0d 01 7f 25 2e 63 68 61 72 4b 20 41 |101"...%.charK A|
00001e90 44 52 20 52 31 30 2c 64 61 74 61 4b 3a 20 42 20 |DR R10,dataK: B |
00001ea0 70 6c 6f 74 5f 63 68 61 72 0d 01 80 21 2e 64 61 |plot_char...!.da|
00001eb0 74 61 4c 20 45 51 55 53 20 22 31 31 31 31 30 30 |taL EQUS "111100|
00001ec0 31 30 30 31 30 30 31 30 30 22 0d 01 81 25 2e 63 |100100100"...%.c|
00001ed0 68 61 72 4c 20 41 44 52 20 52 31 30 2c 64 61 74 |harL ADR R10,dat|
00001ee0 61 4c 3a 20 42 20 70 6c 6f 74 5f 63 68 61 72 0d |aL: B plot_char.|
00001ef0 01 82 21 2e 64 61 74 61 4d 20 45 51 55 53 20 22 |..!.dataM EQUS "|
00001f00 31 30 31 31 30 31 31 30 31 31 31 31 31 30 31 22 |101101101111101"|
00001f10 0d 01 83 25 2e 63 68 61 72 4d 20 41 44 52 20 52 |...%.charM ADR R|
00001f20 31 30 2c 64 61 74 61 4d 3a 20 42 20 70 6c 6f 74 |10,dataM: B plot|
00001f30 5f 63 68 61 72 0d 01 84 21 2e 64 61 74 61 4e 20 |_char...!.dataN |
00001f40 45 51 55 53 20 22 31 30 31 31 31 31 31 31 31 31 |EQUS "1011111111|
00001f50 31 31 31 30 31 22 0d 01 85 25 2e 63 68 61 72 4e |11101"...%.charN|
00001f60 20 41 44 52 20 52 31 30 2c 64 61 74 61 4e 3a 20 | ADR R10,dataN: |
00001f70 42 20 70 6c 6f 74 5f 63 68 61 72 0d 01 86 21 2e |B plot_char...!.|
00001f80 64 61 74 61 4f 20 45 51 55 53 20 22 31 31 31 31 |dataO EQUS "1111|
00001f90 30 31 31 30 31 31 30 31 31 31 31 22 0d 01 87 25 |01101101111"...%|
00001fa0 2e 63 68 61 72 4f 20 41 44 52 20 52 31 30 2c 64 |.charO ADR R10,d|
00001fb0 61 74 61 4f 3a 20 42 20 70 6c 6f 74 5f 63 68 61 |ataO: B plot_cha|
00001fc0 72 0d 01 88 21 2e 64 61 74 61 50 20 45 51 55 53 |r...!.dataP EQUS|
00001fd0 20 22 31 30 30 31 30 30 31 31 31 31 30 31 31 31 | "10010011110111|
00001fe0 31 22 0d 01 89 25 2e 63 68 61 72 50 20 41 44 52 |1"...%.charP ADR|
00001ff0 20 52 31 30 2c 64 61 74 61 50 3a 20 42 20 70 6c | R10,dataP: B pl|
00002000 6f 74 5f 63 68 61 72 0d 01 8a 21 2e 64 61 74 61 |ot_char...!.data|
00002010 51 20 45 51 55 53 20 22 30 30 31 31 31 31 31 30 |Q EQUS "00111110|
00002020 31 31 30 31 31 31 31 22 0d 01 8b 25 2e 63 68 61 |1101111"...%.cha|
00002030 72 51 20 41 44 52 20 52 31 30 2c 64 61 74 61 51 |rQ ADR R10,dataQ|
00002040 3a 20 42 20 70 6c 6f 74 5f 63 68 61 72 0d 01 8c |: B plot_char...|
00002050 21 2e 64 61 74 61 52 20 45 51 55 53 20 22 31 30 |!.dataR EQUS "10|
00002060 31 31 30 31 31 31 30 31 30 31 31 31 31 22 0d 01 |1101110101111"..|
00002070 8d 25 2e 63 68 61 72 52 20 41 44 52 20 52 31 30 |.%.charR ADR R10|
00002080 2c 64 61 74 61 52 3a 20 42 20 70 6c 6f 74 5f 63 |,dataR: B plot_c|
00002090 68 61 72 0d 01 8e 21 2e 64 61 74 61 53 20 45 51 |har...!.dataS EQ|
000020a0 55 53 20 22 31 31 31 30 30 31 31 31 31 31 30 30 |US "111001111100|
000020b0 31 31 31 22 0d 01 8f 25 2e 63 68 61 72 53 20 41 |111"...%.charS A|
000020c0 44 52 20 52 31 30 2c 64 61 74 61 53 3a 20 42 20 |DR R10,dataS: B |
000020d0 70 6c 6f 74 5f 63 68 61 72 0d 01 90 21 2e 64 61 |plot_char...!.da|
000020e0 74 61 54 20 45 51 55 53 20 22 30 31 30 30 31 30 |taT EQUS "010010|
000020f0 30 31 30 30 31 30 31 31 31 22 0d 01 91 25 2e 63 |010010111"...%.c|
00002100 68 61 72 54 20 41 44 52 20 52 31 30 2c 64 61 74 |harT ADR R10,dat|
00002110 61 54 3a 20 42 20 70 6c 6f 74 5f 63 68 61 72 0d |aT: B plot_char.|
00002120 01 92 21 2e 64 61 74 61 55 20 45 51 55 53 20 22 |..!.dataU EQUS "|
00002130 31 31 31 31 30 31 31 30 31 31 30 31 31 30 31 22 |111101101101101"|
00002140 0d 01 93 25 2e 63 68 61 72 55 20 41 44 52 20 52 |...%.charU ADR R|
00002150 31 30 2c 64 61 74 61 55 3a 20 42 20 70 6c 6f 74 |10,dataU: B plot|
00002160 5f 63 68 61 72 0d 01 94 21 2e 64 61 74 61 56 20 |_char...!.dataV |
00002170 45 51 55 53 20 22 30 31 30 31 30 31 31 30 31 31 |EQUS "0101011011|
00002180 30 31 31 30 31 22 0d 01 95 25 2e 63 68 61 72 56 |01101"...%.charV|
00002190 20 41 44 52 20 52 31 30 2c 64 61 74 61 56 3a 20 | ADR R10,dataV: |
000021a0 42 20 70 6c 6f 74 5f 63 68 61 72 0d 01 96 21 2e |B plot_char...!.|
000021b0 64 61 74 61 57 20 45 51 55 53 20 22 31 30 31 31 |dataW EQUS "1011|
000021c0 31 31 31 30 31 31 30 31 31 30 31 22 0d 01 97 25 |11101101101"...%|
000021d0 2e 63 68 61 72 57 20 41 44 52 20 52 31 30 2c 64 |.charW ADR R10,d|
000021e0 61 74 61 57 3a 20 42 20 70 6c 6f 74 5f 63 68 61 |ataW: B plot_cha|
000021f0 72 0d 01 98 21 2e 64 61 74 61 58 20 45 51 55 53 |r...!.dataX EQUS|
00002200 20 22 31 30 31 31 30 31 30 31 30 31 30 31 31 30 | "10110101010110|
00002210 31 22 0d 01 99 25 2e 63 68 61 72 58 20 41 44 52 |1"...%.charX ADR|
00002220 20 52 31 30 2c 64 61 74 61 58 3a 20 42 20 70 6c | R10,dataX: B pl|
00002230 6f 74 5f 63 68 61 72 0d 01 9a 21 2e 64 61 74 61 |ot_char...!.data|
00002240 59 20 45 51 55 53 20 22 30 31 30 30 31 30 30 31 |Y EQUS "01001001|
00002250 30 31 30 31 31 30 31 22 0d 01 9b 25 2e 63 68 61 |0101101"...%.cha|
00002260 72 59 20 41 44 52 20 52 31 30 2c 64 61 74 61 59 |rY ADR R10,dataY|
00002270 3a 20 42 20 70 6c 6f 74 5f 63 68 61 72 0d 01 9c |: B plot_char...|
00002280 21 2e 64 61 74 61 5a 20 45 51 55 53 20 22 31 31 |!.dataZ EQUS "11|
00002290 31 31 30 30 30 31 30 30 30 31 31 31 31 22 0d 01 |1100010001111"..|
000022a0 9d 25 2e 63 68 61 72 5a 20 41 44 52 20 52 31 30 |.%.charZ ADR R10|
000022b0 2c 64 61 74 61 5a 3a 20 42 20 70 6c 6f 74 5f 63 |,dataZ: B plot_c|
000022c0 68 61 72 0d 01 9e 2e 2e 64 61 74 61 39 31 20 45 |har.....data91 E|
000022d0 51 55 53 20 22 31 31 31 31 30 30 31 30 30 31 30 |QUS "11110010010|
000022e0 30 31 31 31 22 20 20 20 20 20 20 20 20 20 3b 20 |0111" ; |
000022f0 5b 0d 01 9f 27 2e 63 68 61 72 39 31 20 41 44 52 |[...'.char91 ADR|
00002300 20 52 31 30 2c 64 61 74 61 39 31 3a 20 42 20 70 | R10,data91: B p|
00002310 6c 6f 74 5f 63 68 61 72 0d 01 a0 2e 2e 64 61 74 |lot_char.....dat|
00002320 61 39 32 20 45 51 55 53 20 22 30 30 31 30 31 30 |a92 EQUS "001010|
00002330 30 31 30 30 31 30 31 30 30 22 20 20 20 20 20 20 |010010100" |
00002340 20 20 20 3b 20 5c 0d 01 a1 27 2e 63 68 61 72 39 | ; \...'.char9|
00002350 32 20 41 44 52 20 52 31 30 2c 64 61 74 61 39 32 |2 ADR R10,data92|
00002360 3a 20 42 20 70 6c 6f 74 5f 63 68 61 72 0d 01 a2 |: B plot_char...|
00002370 2e 2e 64 61 74 61 39 33 20 45 51 55 53 20 22 31 |..data93 EQUS "1|
00002380 31 31 30 30 31 30 30 31 30 30 31 31 31 31 22 20 |11001001001111" |
00002390 20 20 20 20 20 20 20 20 3b 20 5d 0d 01 a3 27 2e | ; ]...'.|
000023a0 63 68 61 72 39 33 20 41 44 52 20 52 31 30 2c 64 |char93 ADR R10,d|
000023b0 61 74 61 39 33 3a 20 42 20 70 6c 6f 74 5f 63 68 |ata93: B plot_ch|
000023c0 61 72 0d 01 a4 2e 2e 64 61 74 61 39 34 20 45 51 |ar.....data94 EQ|
000023d0 55 53 20 22 30 31 30 30 30 30 30 31 30 30 31 30 |US "010000010010|
000023e0 30 31 30 22 20 20 20 20 20 20 20 20 20 3b 20 21 |010" ; !|
000023f0 0d 01 a5 27 2e 63 68 61 72 39 34 20 41 44 52 20 |...'.char94 ADR |
00002400 52 31 30 2c 64 61 74 61 39 34 3a 20 42 20 70 6c |R10,data94: B pl|
00002410 6f 74 5f 63 68 61 72 0d 01 a6 2e 2e 64 61 74 61 |ot_char.....data|
00002420 39 35 20 45 51 55 53 20 22 31 31 31 30 30 30 30 |95 EQUS "1110000|
00002430 30 30 30 30 30 30 30 30 22 20 20 20 20 20 20 20 |00000000" |
00002440 20 20 3b 20 21 0d 01 a7 27 2e 63 68 61 72 39 35 | ; !...'.char95|
00002450 20 41 44 52 20 52 31 30 2c 64 61 74 61 39 35 3a | ADR R10,data95:|
00002460 20 42 20 70 6c 6f 74 5f 63 68 61 72 0d 01 a8 09 | B plot_char....|
00002470 41 4c 49 47 4e 0d 01 a9 05 3a 0d 01 aa 12 2e 75 |ALIGN....:.....u|
00002480 6e 6b 6e 6f 77 6e 5f 65 72 72 6f 72 0d 01 ab 0a |nknown_error....|
00002490 45 51 55 44 20 30 0d 01 ac 24 45 51 55 53 20 22 |EQUD 0...$EQUS "|
000024a0 41 53 43 49 49 20 63 6f 64 65 20 6e 6f 74 20 73 |ASCII code not s|
000024b0 75 70 70 6f 72 74 65 64 2e 22 0d 01 ad 0a 45 51 |upported."....EQ|
000024c0 55 42 20 30 0d 01 ae 09 41 4c 49 47 4e 0d 01 af |UB 0....ALIGN...|
000024d0 05 3a 0d 01 b0 0c 2e 75 6e 6b 6e 6f 77 6e 0d 01 |.:.....unknown..|
000024e0 b1 18 41 44 52 20 52 30 2c 75 6e 6b 6e 6f 77 6e |..ADR R0,unknown|
000024f0 5f 65 72 72 6f 72 0d 01 b2 1b 4c 44 4d 46 44 20 |_error....LDMFD |
00002500 52 31 33 21 2c 7b 52 31 2d 52 31 31 2c 52 31 34 |R13!,{R1-R11,R14|
00002510 7d 0d 01 b3 15 84 52 53 20 50 43 2c 52 31 34 2c |}.....RS PC,R14,|
00002520 23 31 3c 3c 32 38 0d 01 b4 0e 4d 4f 56 20 50 43 |#1<<28....MOV PC|
00002530 2c 52 31 34 0d 01 b5 05 3a 0d 01 b6 0f 2e 53 57 |,R14....:.....SW|
00002540 49 5f 53 74 72 69 6e 67 0d 01 b7 05 3a 0d 01 b8 |I_String....:...|
00002550 23 3b 20 52 30 3d 53 74 72 69 6e 67 2c 20 52 31 |#; R0=String, R1|
00002560 3d 58 20 70 6f 73 2c 20 52 32 3d 59 20 70 6f 73 |=X pos, R2=Y pos|
00002570 0d 01 b9 05 3a 0d 01 ba 1b 53 54 4d 46 44 20 52 |....:....STMFD R|
00002580 31 33 21 2c 7b 52 31 2d 52 31 31 2c 52 31 34 7d |13!,{R1-R11,R14}|
00002590 0d 01 bb 05 3a 0d 01 bc 0d 4d 4f 56 20 52 37 2c |....:....MOV R7,|
000025a0 52 30 0d 01 bd 0d 4d 4f 56 20 52 36 2c 23 30 0d |R0....MOV R6,#0.|
000025b0 01 be 05 3a 0d 01 bf 09 2e 6c 6f 6f 70 0d 01 c0 |...:.....loop...|
000025c0 13 4c 44 52 42 20 52 30 2c 5b 52 37 2c 52 36 5d |.LDRB R0,[R7,R6]|
000025d0 0d 01 c1 0d 43 4d 50 20 52 30 2c 23 30 0d 01 c2 |....CMP R0,#0...|
000025e0 0c 42 45 51 20 65 78 69 74 0d 01 c3 12 53 57 49 |.BEQ exit....SWI|
000025f0 20 53 6d 61 6c 6c 5f 43 68 61 72 0d 01 c4 11 41 | Small_Char....A|
00002600 44 44 20 52 31 2c 52 31 2c 23 31 36 0d 01 c5 10 |DD R1,R1,#16....|
00002610 41 44 44 20 52 36 2c 52 36 2c 23 31 0d 01 c6 0a |ADD R6,R6,#1....|
00002620 42 20 6c 6f 6f 70 0d 01 c7 05 3a 0d 01 c8 09 2e |B loop....:.....|
00002630 65 78 69 74 0d 01 c9 1a 4c 44 4d 46 44 20 52 31 |exit....LDMFD R1|
00002640 33 21 2c 7b 52 31 2d 52 31 31 2c 50 43 7d 0d 01 |3!,{R1-R11,PC}..|
00002650 ca 0e 4d 4f 56 20 50 43 2c 52 31 34 0d 01 cb 05 |..MOV PC,R14....|
00002660 3a 0d 01 cc 06 5d ed 0d 01 cd 05 e1 0d 01 ce 05 |:....]..........|
00002670 3a 0d ff |:..|
00002673 
.