�     >SCL.SWI09 (scanf)

� By  DCA
� For 32-bit machines
(� (c) BAU October 1993
2:
<� �swi09_name
F="scanf"
P:
Z� �swi09_init
d=0
n:
x� �swi09_vars
�scanf=94*4
�=0
�:
�� �swi09_code
�[OPT pass%
�.scl_scanf
�$        STMDB   (sp)!,{r4-r9,lr}
�        MOV     r9,r1
�        LDMIA   r9,{r0-r7}
�!        STMDB   (sp)!,{r4-r7}
�&        BL      clib_vectors+scanf
�        ADD     sp,sp,#16
�        STR     r0,[r9]

        MOV     r0,#0

%        LDMIA   (sp)!,{r4-r9,pc}^

]

"=0
�

00000000  0d 00 0a 1c f4 20 20 20  20 20 3e 53 43 4c 2e 53  |.....     >SCL.S|
00000010  57 49 30 39 20 28 73 63  61 6e 66 29 0d 00 14 0d  |WI09 (scanf)....|
00000020  f4 20 42 79 20 20 44 43  41 0d 00 1e 19 f4 20 46  |. By  DCA..... F|
00000030  6f 72 20 33 32 2d 62 69  74 20 6d 61 63 68 69 6e  |or 32-bit machin|
00000040  65 73 0d 00 28 1a f4 20  28 63 29 20 42 41 55 20  |es..(.. (c) BAU |
00000050  4f 63 74 6f 62 65 72 20  31 39 39 33 0d 00 32 05  |October 1993..2.|
00000060  3a 0d 00 3c 11 dd 20 a4  73 77 69 30 39 5f 6e 61  |:..<.. .swi09_na|
00000070  6d 65 0d 00 46 0c 3d 22  73 63 61 6e 66 22 0d 00  |me..F.="scanf"..|
00000080  50 05 3a 0d 00 5a 11 dd  20 a4 73 77 69 30 39 5f  |P.:..Z.. .swi09_|
00000090  69 6e 69 74 0d 00 64 06  3d 30 0d 00 6e 05 3a 0d  |init..d.=0..n.:.|
000000a0  00 78 11 dd 20 a4 73 77  69 30 39 5f 76 61 72 73  |.x.. .swi09_vars|
000000b0  0d 00 82 0e 73 63 61 6e  66 3d 39 34 2a 34 0d 00  |....scanf=94*4..|
000000c0  8c 06 3d 30 0d 00 96 05  3a 0d 00 a0 11 dd 20 a4  |..=0....:..... .|
000000d0  73 77 69 30 39 5f 63 6f  64 65 0d 00 aa 0e 5b 4f  |swi09_code....[O|
000000e0  50 54 20 70 61 73 73 25  0d 00 b4 0e 2e 73 63 6c  |PT pass%.....scl|
000000f0  5f 73 63 61 6e 66 0d 00  be 24 20 20 20 20 20 20  |_scanf...$      |
00000100  20 20 53 54 4d 44 42 20  20 20 28 73 70 29 21 2c  |  STMDB   (sp)!,|
00000110  7b 72 34 2d 72 39 2c 6c  72 7d 0d 00 c8 19 20 20  |{r4-r9,lr}....  |
00000120  20 20 20 20 20 20 4d 4f  56 20 20 20 20 20 72 39  |      MOV     r9|
00000130  2c 72 31 0d 00 d2 1e 20  20 20 20 20 20 20 20 4c  |,r1....        L|
00000140  44 4d 49 41 20 20 20 72  39 2c 7b 72 30 2d 72 37  |DMIA   r9,{r0-r7|
00000150  7d 0d 00 dc 21 20 20 20  20 20 20 20 20 53 54 4d  |}...!        STM|
00000160  44 42 20 20 20 28 73 70  29 21 2c 7b 72 34 2d 72  |DB   (sp)!,{r4-r|
00000170  37 7d 0d 00 e6 26 20 20  20 20 20 20 20 20 42 4c  |7}...&        BL|
00000180  20 20 20 20 20 20 63 6c  69 62 5f 76 65 63 74 6f  |      clib_vecto|
00000190  72 73 2b 73 63 61 6e 66  0d 00 f0 1d 20 20 20 20  |rs+scanf....    |
000001a0  20 20 20 20 41 44 44 20  20 20 20 20 73 70 2c 73  |    ADD     sp,s|
000001b0  70 2c 23 31 36 0d 00 fa  1b 20 20 20 20 20 20 20  |p,#16....       |
000001c0  20 53 54 52 20 20 20 20  20 72 30 2c 5b 72 39 5d  | STR     r0,[r9]|
000001d0  0d 01 04 19 20 20 20 20  20 20 20 20 4d 4f 56 20  |....        MOV |
000001e0  20 20 20 20 72 30 2c 23  30 0d 01 0e 25 20 20 20  |    r0,#0...%   |
000001f0  20 20 20 20 20 4c 44 4d  49 41 20 20 20 28 73 70  |     LDMIA   (sp|
00000200  29 21 2c 7b 72 34 2d 72  39 2c 70 63 7d 5e 0d 01  |)!,{r4-r9,pc}^..|
00000210  18 05 5d 0d 01 22 06 3d  30 0d ff                 |..]..".=0..|
0000021b