Home » Archimedes archive » Acorn User » AU 1996-12 B.adf » Regulars_2 » StarInfo/Clifford/!Macros/MacroCode/s/FKeySrc
StarInfo/Clifford/!Macros/MacroCode/s/FKeySrc
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 1996-12 B.adf » Regulars_2 |
| Filename: | StarInfo/Clifford/!Macros/MacroCode/s/FKeySrc |
| Read OK: | ✔ |
| File size: | 0A2F bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
File contents
10DIM code% &1000
20
30Find_Key_Name = 0
40Find_Key_Code = 4
50Call_MacroCode = 8
60
70FOR pass%=%1000 TO %1010 STEP 2
80P%=code%:L%=code%+&1000
90[ opt pass%
100 equs "MCDE"
110 equd name - code%
120 equd description - code%
130 equd initialise - code%
140 equd 0
150 equd key_code - code%
160
170.name
180 equs "FKey"
190 equb 0
200
210.description
220 equs "Function keys"
230 equb 9
240 equs "0.02 (01 Aug 1996)"
250 equb 0
260 align
270
280.initialise
290 stmfd r13!, {r14}
390 adr r0, left_shift
400 mov r14, pc
410 ldr pc, [r11, #Find_Key_Name]
420 strb r1, shift
430 adr r0, right_shift
440 mov r14, pc
450 ldr pc, [r11, #Find_Key_Name]
460 strb r1, shift + 1
470
480 adr r0, left_ctrl
490 mov r14, pc
500 ldr pc, [r11, #Find_Key_Name]
510 strb r1, ctrl
520 adr r0, right_ctrl
530 mov r14, pc
540 ldr pc, [r11, #Find_Key_Name]
550 strb r1, ctrl + 1
560 ldmfd r13!, {pc}^
570
680.shift
690 equb 0
700 equb 0
710.left_shift
720 equs "LeftShift"
730 equb 0
740.right_shift
750 equs "RightShift"
760 equb 0
770
780.ctrl
790 equb 0
800 equb 0
810.left_ctrl
820 equs "LeftCtrl"
830 equb 0
840.right_ctrl
850 equs "RightCtrl"
860 equb 0
870 align
880
890.key_code
900 stmfd r13!, {r14}
910 ldr r1, [r10, #0]
990 adr r5, key_variable_changeable
1000
1010 ldrb r2, shift
1020 ldrb r3, shift + 1
1030 ldrb r4, [r1, r2]
1040 cmp r4, #1
1050 ldrneb r4, [r1, r3]
1060 cmpne r4, #1
1070 moveq r4, #ASC("S")
1080 streqb r4, [r5], #1
1090
1100 ldrb r2, ctrl
1110 ldrb r3, ctrl + 1
1120 ldrb r4, [r1, r2]
1130 cmp r4, #1
1140 ldrneb r4, [r1, r3]
1150 cmpne r4, #1
1160 moveq r4, #ASC("C")
1170 streqb r4, [r5], #1
1180
1190 ldrb r1, [r0], #1
1200 strb r1, [r5], #1
1210 ldrb r1, [r0], #1
1220 cmp r1, #32
1230 strgtb r1, [r5], #1
1231 mov r1, #ASC(">")
1232 strb r1, [r5], #1
1240 mov r1, #0
1250 strb r1, [r5], #1
1260
1270 adr r0, insert_text
1271 adr r1, key_variable
1272 mov r14, pc
1273 ldr pc, [r11, #Call_MacroCode]
1280 ldmfd r13!, {pc}^
1290
1291.insert_text
1292 equs "InsertText"
1293 equb 0
1300.key_variable
1310 equs "<Key$"
1320.key_variable_changeable
1330 equs "xxyy>"
1340 equb 0
1350]
1360NEXT
1370
1380SYS "OS_File", 10, "FKey", &ffd, , code%, P%
1390END
� code% &1000
Find_Key_Name = 0
(Find_Key_Code = 4
2Call_MacroCode = 8
<
F � pass%=%1000 � %1010 � 2
PP%=code%:L%=code%+&1000
Z[ opt pass%
d equs "MCDE"
n equd name - code%
x# equd description - code%
�" equd initialise - code%
� equd 0
� equd key_code - code%
�
� .name
� equs "FKey"
� equb 0
�
�.description
� equs "Function keys"
� equb 9
�$ equs "0.02 (01 Aug 1996)"
� equb 0
align
.initialise
" stmfd r13!, {r14}
� adr r0, left_shift
� mov r14, pc
�) ldr pc, [r11, #Find_Key_Name]
� strb r1, shift
� adr r0, right_shift
� mov r14, pc
�) ldr pc, [r11, #Find_Key_Name]
� strb r1, shift + 1
�
� adr r0, left_ctrl
� mov r14, pc
�) ldr pc, [r11, #Find_Key_Name]
� strb r1, ctrl
adr r0, right_ctrl
mov r14, pc
) ldr pc, [r11, #Find_Key_Name]
& strb r1, ctrl + 1
0 ldmfd r13!, {pc}^
:
�
.shift
� equb 0
� equb 0
�.left_shift
� equs "LeftShift"
� equb 0
�.right_shift
� equs "RightShift"
� equb 0
.ctrl
equb 0
equb 0
*.left_ctrl
4 equs "LeftCtrl"
> equb 0
H.right_ctrl
R equs "RightCtrl"
\ equb 0
f
align
p
z
.key_code
� stmfd r13!, {r14}
� ldr r1, [r10, #0]
�+ adr r5, key_variable_changeable
�
� ldrb r2, shift
� ldrb r3, shift + 1
ldrb r4, [r1, r2]
cmp r4, #1
ldrneb r4, [r1, r3]
$ cmpne r4, #1
. moveq r4, #�("S")
8 streqb r4, [r5], #1
B
L ldrb r2, ctrl
V ldrb r3, ctrl + 1
` ldrb r4, [r1, r2]
j cmp r4, #1
t ldrneb r4, [r1, r3]
~ cmpne r4, #1
� moveq r4, #�("C")
� streqb r4, [r5], #1
�
� ldrb r1, [r0], #1
� strb r1, [r5], #1
� ldrb r1, [r0], #1
� cmp r1, #32
� strgtb r1, [r5], #1
� mov r1, #�(">")
� strb r1, [r5], #1
� mov r1, #0
� strb r1, [r5], #1
�
� adr r0, insert_text
� adr r1, key_variable
� mov r14, pc
�* ldr pc, [r11, #Call_MacroCode]
ldmfd r13!, {pc}^
.insert_text
equs "InsertText"
equb 0
.key_variable
equs "<Key$"
( .key_variable_changeable
2 equs "xxyy>"
< equb 0
F]
P�
Z
d/ș "OS_File", 10, "FKey", &ffd, , code%, P%
n�
� 00000000 0d 00 0a 11 de 20 63 6f 64 65 25 20 26 31 30 30 |..... code% &100|
00000010 30 0d 00 14 04 0d 00 1e 15 46 69 6e 64 5f 4b 65 |0........Find_Ke|
00000020 79 5f 4e 61 6d 65 20 3d 20 30 0d 00 28 15 46 69 |y_Name = 0..(.Fi|
00000030 6e 64 5f 4b 65 79 5f 43 6f 64 65 20 3d 20 34 0d |nd_Key_Code = 4.|
00000040 00 32 16 43 61 6c 6c 5f 4d 61 63 72 6f 43 6f 64 |.2.Call_MacroCod|
00000050 65 20 3d 20 38 0d 00 3c 04 0d 00 46 1d e3 20 70 |e = 8..<...F.. p|
00000060 61 73 73 25 3d 25 31 30 30 30 20 b8 20 25 31 30 |ass%=%1000 . %10|
00000070 31 30 20 88 20 32 0d 00 50 1b 50 25 3d 63 6f 64 |10 . 2..P.P%=cod|
00000080 65 25 3a 4c 25 3d 63 6f 64 65 25 2b 26 31 30 30 |e%:L%=code%+&100|
00000090 30 0d 00 5a 15 5b 20 20 20 6f 70 74 20 20 20 20 |0..Z.[ opt |
000000a0 20 70 61 73 73 25 0d 00 64 16 20 20 20 20 65 71 | pass%..d. eq|
000000b0 75 73 20 20 20 20 22 4d 43 44 45 22 0d 00 6e 1c |us "MCDE"..n.|
000000c0 20 20 20 20 65 71 75 64 20 20 20 20 6e 61 6d 65 | equd name|
000000d0 20 2d 20 63 6f 64 65 25 0d 00 78 23 20 20 20 20 | - code%..x# |
000000e0 65 71 75 64 20 20 20 20 64 65 73 63 72 69 70 74 |equd descript|
000000f0 69 6f 6e 20 2d 20 63 6f 64 65 25 0d 00 82 22 20 |ion - code%..." |
00000100 20 20 20 65 71 75 64 20 20 20 20 69 6e 69 74 69 | equd initi|
00000110 61 6c 69 73 65 20 2d 20 63 6f 64 65 25 0d 00 8c |alise - code%...|
00000120 11 20 20 20 20 65 71 75 64 20 20 20 20 30 0d 00 |. equd 0..|
00000130 96 20 20 20 20 20 65 71 75 64 20 20 20 20 6b 65 |. equd ke|
00000140 79 5f 63 6f 64 65 20 2d 20 63 6f 64 65 25 0d 00 |y_code - code%..|
00000150 a0 04 0d 00 aa 09 2e 6e 61 6d 65 0d 00 b4 16 20 |.......name.... |
00000160 20 20 20 65 71 75 73 20 20 20 20 22 46 4b 65 79 | equs "FKey|
00000170 22 0d 00 be 11 20 20 20 20 65 71 75 62 20 20 20 |".... equb |
00000180 20 30 0d 00 c8 04 0d 00 d2 10 2e 64 65 73 63 72 | 0.........descr|
00000190 69 70 74 69 6f 6e 0d 00 dc 1f 20 20 20 20 65 71 |iption.... eq|
000001a0 75 73 20 20 20 20 22 46 75 6e 63 74 69 6f 6e 20 |us "Function |
000001b0 6b 65 79 73 22 0d 00 e6 11 20 20 20 20 65 71 75 |keys".... equ|
000001c0 62 20 20 20 20 39 0d 00 f0 24 20 20 20 20 65 71 |b 9...$ eq|
000001d0 75 73 20 20 20 20 22 30 2e 30 32 20 28 30 31 20 |us "0.02 (01 |
000001e0 41 75 67 20 31 39 39 36 29 22 0d 00 fa 11 20 20 |Aug 1996)".... |
000001f0 20 20 65 71 75 62 20 20 20 20 30 0d 01 04 0d 20 | equb 0.... |
00000200 20 20 20 61 6c 69 67 6e 0d 01 0e 04 0d 01 18 0f | align........|
00000210 2e 69 6e 69 74 69 61 6c 69 73 65 0d 01 22 1b 20 |.initialise..". |
00000220 20 20 20 73 74 6d 66 64 20 20 20 72 31 33 21 2c | stmfd r13!,|
00000230 20 7b 72 31 34 7d 0d 01 86 1e 20 20 20 20 61 64 | {r14}.... ad|
00000240 72 20 20 20 20 20 72 30 2c 20 6c 65 66 74 5f 73 |r r0, left_s|
00000250 68 69 66 74 0d 01 90 17 20 20 20 20 6d 6f 76 20 |hift.... mov |
00000260 20 20 20 20 72 31 34 2c 20 70 63 0d 01 9a 29 20 | r14, pc...) |
00000270 20 20 20 6c 64 72 20 20 20 20 20 70 63 2c 20 5b | ldr pc, [|
00000280 72 31 31 2c 20 23 46 69 6e 64 5f 4b 65 79 5f 4e |r11, #Find_Key_N|
00000290 61 6d 65 5d 0d 01 a4 19 20 20 20 20 73 74 72 62 |ame].... strb|
000002a0 20 20 20 20 72 31 2c 20 73 68 69 66 74 0d 01 ae | r1, shift...|
000002b0 1f 20 20 20 20 61 64 72 20 20 20 20 20 72 30 2c |. adr r0,|
000002c0 20 72 69 67 68 74 5f 73 68 69 66 74 0d 01 b8 17 | right_shift....|
000002d0 20 20 20 20 6d 6f 76 20 20 20 20 20 72 31 34 2c | mov r14,|
000002e0 20 70 63 0d 01 c2 29 20 20 20 20 6c 64 72 20 20 | pc...) ldr |
000002f0 20 20 20 70 63 2c 20 5b 72 31 31 2c 20 23 46 69 | pc, [r11, #Fi|
00000300 6e 64 5f 4b 65 79 5f 4e 61 6d 65 5d 0d 01 cc 1d |nd_Key_Name]....|
00000310 20 20 20 20 73 74 72 62 20 20 20 20 72 31 2c 20 | strb r1, |
00000320 73 68 69 66 74 20 2b 20 31 0d 01 d6 04 0d 01 e0 |shift + 1.......|
00000330 1d 20 20 20 20 61 64 72 20 20 20 20 20 72 30 2c |. adr r0,|
00000340 20 6c 65 66 74 5f 63 74 72 6c 0d 01 ea 17 20 20 | left_ctrl.... |
00000350 20 20 6d 6f 76 20 20 20 20 20 72 31 34 2c 20 70 | mov r14, p|
00000360 63 0d 01 f4 29 20 20 20 20 6c 64 72 20 20 20 20 |c...) ldr |
00000370 20 70 63 2c 20 5b 72 31 31 2c 20 23 46 69 6e 64 | pc, [r11, #Find|
00000380 5f 4b 65 79 5f 4e 61 6d 65 5d 0d 01 fe 18 20 20 |_Key_Name].... |
00000390 20 20 73 74 72 62 20 20 20 20 72 31 2c 20 63 74 | strb r1, ct|
000003a0 72 6c 0d 02 08 1e 20 20 20 20 61 64 72 20 20 20 |rl.... adr |
000003b0 20 20 72 30 2c 20 72 69 67 68 74 5f 63 74 72 6c | r0, right_ctrl|
000003c0 0d 02 12 17 20 20 20 20 6d 6f 76 20 20 20 20 20 |.... mov |
000003d0 72 31 34 2c 20 70 63 0d 02 1c 29 20 20 20 20 6c |r14, pc...) l|
000003e0 64 72 20 20 20 20 20 70 63 2c 20 5b 72 31 31 2c |dr pc, [r11,|
000003f0 20 23 46 69 6e 64 5f 4b 65 79 5f 4e 61 6d 65 5d | #Find_Key_Name]|
00000400 0d 02 26 1c 20 20 20 20 73 74 72 62 20 20 20 20 |..&. strb |
00000410 72 31 2c 20 63 74 72 6c 20 2b 20 31 0d 02 30 1b |r1, ctrl + 1..0.|
00000420 20 20 20 20 6c 64 6d 66 64 20 20 20 72 31 33 21 | ldmfd r13!|
00000430 2c 20 7b 70 63 7d 5e 0d 02 3a 04 0d 02 a8 0a 2e |, {pc}^..:......|
00000440 73 68 69 66 74 0d 02 b2 11 20 20 20 20 65 71 75 |shift.... equ|
00000450 62 20 20 20 20 30 0d 02 bc 11 20 20 20 20 65 71 |b 0.... eq|
00000460 75 62 20 20 20 20 30 0d 02 c6 0f 2e 6c 65 66 74 |ub 0.....left|
00000470 5f 73 68 69 66 74 0d 02 d0 1b 20 20 20 20 65 71 |_shift.... eq|
00000480 75 73 20 20 20 20 22 4c 65 66 74 53 68 69 66 74 |us "LeftShift|
00000490 22 0d 02 da 11 20 20 20 20 65 71 75 62 20 20 20 |".... equb |
000004a0 20 30 0d 02 e4 10 2e 72 69 67 68 74 5f 73 68 69 | 0.....right_shi|
000004b0 66 74 0d 02 ee 1c 20 20 20 20 65 71 75 73 20 20 |ft.... equs |
000004c0 20 20 22 52 69 67 68 74 53 68 69 66 74 22 0d 02 | "RightShift"..|
000004d0 f8 11 20 20 20 20 65 71 75 62 20 20 20 20 30 0d |.. equb 0.|
000004e0 03 02 04 0d 03 0c 09 2e 63 74 72 6c 0d 03 16 11 |........ctrl....|
000004f0 20 20 20 20 65 71 75 62 20 20 20 20 30 0d 03 20 | equb 0.. |
00000500 11 20 20 20 20 65 71 75 62 20 20 20 20 30 0d 03 |. equb 0..|
00000510 2a 0e 2e 6c 65 66 74 5f 63 74 72 6c 0d 03 34 1a |*..left_ctrl..4.|
00000520 20 20 20 20 65 71 75 73 20 20 20 20 22 4c 65 66 | equs "Lef|
00000530 74 43 74 72 6c 22 0d 03 3e 11 20 20 20 20 65 71 |tCtrl"..>. eq|
00000540 75 62 20 20 20 20 30 0d 03 48 0f 2e 72 69 67 68 |ub 0..H..righ|
00000550 74 5f 63 74 72 6c 0d 03 52 1b 20 20 20 20 65 71 |t_ctrl..R. eq|
00000560 75 73 20 20 20 20 22 52 69 67 68 74 43 74 72 6c |us "RightCtrl|
00000570 22 0d 03 5c 11 20 20 20 20 65 71 75 62 20 20 20 |"..\. equb |
00000580 20 30 0d 03 66 0d 20 20 20 20 61 6c 69 67 6e 0d | 0..f. align.|
00000590 03 70 04 0d 03 7a 0d 2e 6b 65 79 5f 63 6f 64 65 |.p...z..key_code|
000005a0 0d 03 84 1b 20 20 20 20 73 74 6d 66 64 20 20 20 |.... stmfd |
000005b0 72 31 33 21 2c 20 7b 72 31 34 7d 0d 03 8e 1d 20 |r13!, {r14}.... |
000005c0 20 20 20 6c 64 72 20 20 20 20 20 72 31 2c 20 5b | ldr r1, [|
000005d0 72 31 30 2c 20 23 30 5d 0d 03 de 2b 20 20 20 20 |r10, #0]...+ |
000005e0 61 64 72 20 20 20 20 20 72 35 2c 20 6b 65 79 5f |adr r5, key_|
000005f0 76 61 72 69 61 62 6c 65 5f 63 68 61 6e 67 65 61 |variable_changea|
00000600 62 6c 65 0d 03 e8 04 0d 03 f2 19 20 20 20 20 6c |ble........ l|
00000610 64 72 62 20 20 20 20 72 32 2c 20 73 68 69 66 74 |drb r2, shift|
00000620 0d 03 fc 1d 20 20 20 20 6c 64 72 62 20 20 20 20 |.... ldrb |
00000630 72 33 2c 20 73 68 69 66 74 20 2b 20 31 0d 04 06 |r3, shift + 1...|
00000640 1c 20 20 20 20 6c 64 72 62 20 20 20 20 72 34 2c |. ldrb r4,|
00000650 20 5b 72 31 2c 20 72 32 5d 0d 04 10 16 20 20 20 | [r1, r2].... |
00000660 20 63 6d 70 20 20 20 20 20 72 34 2c 20 23 31 0d | cmp r4, #1.|
00000670 04 1a 1c 20 20 20 20 6c 64 72 6e 65 62 20 20 72 |... ldrneb r|
00000680 34 2c 20 5b 72 31 2c 20 72 33 5d 0d 04 24 16 20 |4, [r1, r3]..$. |
00000690 20 20 20 63 6d 70 6e 65 20 20 20 72 34 2c 20 23 | cmpne r4, #|
000006a0 31 0d 04 2e 1b 20 20 20 20 6d 6f 76 65 71 20 20 |1.... moveq |
000006b0 20 72 34 2c 20 23 97 28 22 53 22 29 0d 04 38 1c | r4, #.("S")..8.|
000006c0 20 20 20 20 73 74 72 65 71 62 20 20 72 34 2c 20 | streqb r4, |
000006d0 5b 72 35 5d 2c 20 23 31 0d 04 42 04 0d 04 4c 18 |[r5], #1..B...L.|
000006e0 20 20 20 20 6c 64 72 62 20 20 20 20 72 32 2c 20 | ldrb r2, |
000006f0 63 74 72 6c 0d 04 56 1c 20 20 20 20 6c 64 72 62 |ctrl..V. ldrb|
00000700 20 20 20 20 72 33 2c 20 63 74 72 6c 20 2b 20 31 | r3, ctrl + 1|
00000710 0d 04 60 1c 20 20 20 20 6c 64 72 62 20 20 20 20 |..`. ldrb |
00000720 72 34 2c 20 5b 72 31 2c 20 72 32 5d 0d 04 6a 16 |r4, [r1, r2]..j.|
00000730 20 20 20 20 63 6d 70 20 20 20 20 20 72 34 2c 20 | cmp r4, |
00000740 23 31 0d 04 74 1c 20 20 20 20 6c 64 72 6e 65 62 |#1..t. ldrneb|
00000750 20 20 72 34 2c 20 5b 72 31 2c 20 72 33 5d 0d 04 | r4, [r1, r3]..|
00000760 7e 16 20 20 20 20 63 6d 70 6e 65 20 20 20 72 34 |~. cmpne r4|
00000770 2c 20 23 31 0d 04 88 1b 20 20 20 20 6d 6f 76 65 |, #1.... move|
00000780 71 20 20 20 72 34 2c 20 23 97 28 22 43 22 29 0d |q r4, #.("C").|
00000790 04 92 1c 20 20 20 20 73 74 72 65 71 62 20 20 72 |... streqb r|
000007a0 34 2c 20 5b 72 35 5d 2c 20 23 31 0d 04 9c 04 0d |4, [r5], #1.....|
000007b0 04 a6 1c 20 20 20 20 6c 64 72 62 20 20 20 20 72 |... ldrb r|
000007c0 31 2c 20 5b 72 30 5d 2c 20 23 31 0d 04 b0 1c 20 |1, [r0], #1.... |
000007d0 20 20 20 73 74 72 62 20 20 20 20 72 31 2c 20 5b | strb r1, [|
000007e0 72 35 5d 2c 20 23 31 0d 04 ba 1c 20 20 20 20 6c |r5], #1.... l|
000007f0 64 72 62 20 20 20 20 72 31 2c 20 5b 72 30 5d 2c |drb r1, [r0],|
00000800 20 23 31 0d 04 c4 17 20 20 20 20 63 6d 70 20 20 | #1.... cmp |
00000810 20 20 20 72 31 2c 20 23 33 32 0d 04 ce 1c 20 20 | r1, #32.... |
00000820 20 20 73 74 72 67 74 62 20 20 72 31 2c 20 5b 72 | strgtb r1, [r|
00000830 35 5d 2c 20 23 31 0d 04 cf 1b 20 20 20 20 6d 6f |5], #1.... mo|
00000840 76 20 20 20 20 20 72 31 2c 20 23 97 28 22 3e 22 |v r1, #.(">"|
00000850 29 0d 04 d0 1c 20 20 20 20 73 74 72 62 20 20 20 |).... strb |
00000860 20 72 31 2c 20 5b 72 35 5d 2c 20 23 31 0d 04 d8 | r1, [r5], #1...|
00000870 16 20 20 20 20 6d 6f 76 20 20 20 20 20 72 31 2c |. mov r1,|
00000880 20 23 30 0d 04 e2 1c 20 20 20 20 73 74 72 62 20 | #0.... strb |
00000890 20 20 20 72 31 2c 20 5b 72 35 5d 2c 20 23 31 0d | r1, [r5], #1.|
000008a0 04 ec 04 0d 04 f6 1f 20 20 20 20 61 64 72 20 20 |....... adr |
000008b0 20 20 20 72 30 2c 20 69 6e 73 65 72 74 5f 74 65 | r0, insert_te|
000008c0 78 74 0d 04 f7 20 20 20 20 20 61 64 72 20 20 20 |xt... adr |
000008d0 20 20 72 31 2c 20 6b 65 79 5f 76 61 72 69 61 62 | r1, key_variab|
000008e0 6c 65 0d 04 f8 17 20 20 20 20 6d 6f 76 20 20 20 |le.... mov |
000008f0 20 20 72 31 34 2c 20 70 63 0d 04 f9 2a 20 20 20 | r14, pc...* |
00000900 20 6c 64 72 20 20 20 20 20 70 63 2c 20 5b 72 31 | ldr pc, [r1|
00000910 31 2c 20 23 43 61 6c 6c 5f 4d 61 63 72 6f 43 6f |1, #Call_MacroCo|
00000920 64 65 5d 0d 05 00 1b 20 20 20 20 6c 64 6d 66 64 |de].... ldmfd|
00000930 20 20 20 72 31 33 21 2c 20 7b 70 63 7d 5e 0d 05 | r13!, {pc}^..|
00000940 0a 04 0d 05 0b 10 2e 69 6e 73 65 72 74 5f 74 65 |.......insert_te|
00000950 78 74 0d 05 0c 1c 20 20 20 20 65 71 75 73 20 20 |xt.... equs |
00000960 20 20 22 49 6e 73 65 72 74 54 65 78 74 22 0d 05 | "InsertText"..|
00000970 0d 11 20 20 20 20 65 71 75 62 20 20 20 20 30 0d |.. equb 0.|
00000980 05 14 11 2e 6b 65 79 5f 76 61 72 69 61 62 6c 65 |....key_variable|
00000990 0d 05 1e 17 20 20 20 20 65 71 75 73 20 20 20 20 |.... equs |
000009a0 22 3c 4b 65 79 24 22 0d 05 28 1c 2e 6b 65 79 5f |"<Key$"..(..key_|
000009b0 76 61 72 69 61 62 6c 65 5f 63 68 61 6e 67 65 61 |variable_changea|
000009c0 62 6c 65 0d 05 32 17 20 20 20 20 65 71 75 73 20 |ble..2. equs |
000009d0 20 20 20 22 78 78 79 79 3e 22 0d 05 3c 11 20 20 | "xxyy>"..<. |
000009e0 20 20 65 71 75 62 20 20 20 20 30 0d 05 46 05 5d | equb 0..F.]|
000009f0 0d 05 50 05 ed 0d 05 5a 04 0d 05 64 2f c8 99 20 |..P....Z...d/.. |
00000a00 22 4f 53 5f 46 69 6c 65 22 2c 20 31 30 2c 20 22 |"OS_File", 10, "|
00000a10 46 4b 65 79 22 2c 20 26 66 66 64 2c 20 2c 20 63 |FKey", &ffd, , c|
00000a20 6f 64 65 25 2c 20 50 25 0d 05 6e 05 e0 0d ff |ode%, P%..n....|
00000a2f 
.