�> Roto
�> (C) Jan Vlietinck
� vlietin@intec.rug.ac.be
(�13+128:� 13:�
)	� �:�
2SC=7:DM=2^SC
<� IMAGE DM*DM
F�ASS
P�BUILDIMAGE
Z	�MAIN
d�
n
x� �MAIN
�M%=2
��
�R%=2^(36-SC)
�
ST=0.5
�H=0
��
�	H+=ST
�ș "OS_Byte",&70,M%
�!DXD=�(�(H))*R%
�!DYD=�(�(H))*R%
�R%=R%/1.02
�	� set
�� scale_rotate

 ș "OS_Byte",&71,M%:M%=M% �3

� H>120

�

"H-=4*ST

,ș "OS_Byte",&70,M%

6!DXD=�(�(H))*R%

@!DYD=�(�(H))*R%

JR%=R%*(1.02)^4

T	� set

^� scale_rotate

h ș "OS_Byte",&71,M%:M%=M% �3

r	� H<0

|� 0

��

�

�� �BUILDIMAGE

�*SLOAD <Roto$Dir>.screen

�*SCHOOSE screen

�� &ED,0,-8

�	� set

�	� get

��

�

�
� �ASS

�
� Q% 4000

�BX=0:Y=1:DX=2:DY=3:C=4:D=5:S=6:T=7:SCR=8:BMP=9:XM=10:YM=11:U=12
� PASS=0 � 2 � 2
	P%=Q%

[OPT PASS
&.SCREEND EQUD 148:EQUD -1
0.SCREEN EQUD 0
:.DXD EQUD 0
D.DYD EQUD 0
N.XD EQUD  DM << (32-SC-1)
X.YD EQUD  DM << (32-SC-1)
b.BMPD EQUD IMAGE
l
v.set
�ADR R0,SCREEND
�ADR R1,SCREEN
�SWI "OS_ReadVduVariables"
�MOV PC,R14
�
�.get
�LDR SCR,SCREEN
�ADD SCR,SCR,#320*256
�SUB SCR,SCR,#320
�LDR BMP,BMPD
�
MOV D,#DM
�.GLOOPY
�
MOV C,#DM
.GLOOPX
LDR T,[SCR],#4
STR T,[BMP],#4
 SUBS C,C,#4
*BNE GLOOPX
4SUB SCR,SCR,#DM
>SUB SCR,SCR,#320
HSUBS D,D,#1
RBNE GLOOPY
\MOV PC,R14
f
p.scale_rotate
z
LDR XM,XD
�
LDR YM,YD
�LDR SCR,SCREEN
�LDR DX,DXD
�LDR DY,DYD
�LDR BMP,BMPD
�MOV S,#128
�MOV T,#160
�MOV X,DX,ASR #8
�MOV Y,DY,ASR #8
�
MUL C,Y,S
�SUB XM,XM,C,LSL #8
�
MUL C,X,T
�SUB XM,XM,C,LSL #8

MUL C,X,S
ADD YM,YM,C,LSL #8

MUL C,Y,T
$SUB YM,YM,C,LSL #8
.MOV D,#256
8
.LOOPY
BMOV X,XM
LMOV Y,YM
VADD XM,XM,DY,LSL #1
`SUB YM,YM,DX,LSL #1
jMOV C,#320
t
.LOOPX
~� T,Y,#(DM-1)<<(32-SC)
�ADD T,T,X,LSR #SC
�LDRB S,[BMP,T,LSR #32-2*SC]
�ADD X,X,DX
�ADD Y,Y,DY
�� T,Y,#(DM-1)<<(32-SC)
�ADD T,T,X,LSR #SC
�LDRB T,[BMP,T,LSR #32-2*SC]
�ADD S,S,T,LSL #8
�ADD X,X,DX
�ADD Y,Y,DY
�� T,Y,#(DM-1)<<(32-SC)
�ADD T,T,X,LSR #SC
LDRB T,[BMP,T,LSR #32-2*SC]

ADD S,S,T,LSL #16
ADD X,X,DX
ADD Y,Y,DY
(� T,Y,#(DM-1)<<(32-SC)
2ADD T,T,X,LSR #SC
<LDRB T,[BMP,T,LSR #32-2*SC]
FADD S,S,T,LSL #24
PADD X,X,DX
ZADD Y,Y,DY
d� T,Y,#(DM-1)<<(32-SC)
nADD T,T,X,LSR #SC
xLDRB U,[BMP,T,LSR #32-2*SC]
�ADD X,X,DX
�ADD Y,Y,DY
�� T,Y,#(DM-1)<<(32-SC)
�ADD T,T,X,LSR #SC
�LDRB T,[BMP,T,LSR #32-2*SC]
�ADD U,U,T,LSL #8
�ADD X,X,DX
�ADD Y,Y,DY
�� T,Y,#(DM-1)<<(32-SC)
�ADD T,T,X,LSR #SC
�LDRB T,[BMP,T,LSR #32-2*SC]
�ADD U,U,T,LSL #16
�ADD X,X,DX
ADD Y,Y,DY
� T,Y,#(DM-1)<<(32-SC)
ADD T,T,X,LSR #SC
"LDRB T,[BMP,T,LSR #32-2*SC]
,ADD U,U,T,LSL #24
6ADD X,X,DX
@ADD Y,Y,DY
JSTMIA (SCR),{S,U}
TADD SCR,SCR,#320
^STMIA (SCR)!,{S,U}
hSUB SCR,SCR,#320
rSUBS C,C,#8
|
BNE LOOPX
�SUBS D,D,#2
�ADD SCR,SCR,#320
�
BNE LOOPY
�MOV PC,R14
�]
��
��
�

00000000  0d 00 0a 0b f4 3e 20 52  6f 74 6f 0d 00 14 18 f4  |.....> Roto.....|
00000010  3e 20 28 43 29 20 4a 61  6e 20 56 6c 69 65 74 69  |> (C) Jan Vlieti|
00000020  6e 63 6b 0d 00 15 1d f4  20 76 6c 69 65 74 69 6e  |nck..... vlietin|
00000030  40 69 6e 74 65 63 2e 72  75 67 2e 61 63 2e 62 65  |@intec.rug.ac.be|
00000040  0d 00 28 12 eb 31 33 2b  31 32 38 3a eb 20 31 33  |..(..13+128:. 13|
00000050  3a 87 0d 00 29 09 ee 20  85 3a e0 0d 00 32 10 53  |:...).. .:...2.S|
00000060  43 3d 37 3a 44 4d 3d 32  5e 53 43 0d 00 3c 11 de  |C=7:DM=2^SC..<..|
00000070  20 49 4d 41 47 45 20 44  4d 2a 44 4d 0d 00 46 08  | IMAGE DM*DM..F.|
00000080  f2 41 53 53 0d 00 50 0f  f2 42 55 49 4c 44 49 4d  |.ASS..P..BUILDIM|
00000090  41 47 45 0d 00 5a 09 f2  4d 41 49 4e 0d 00 64 05  |AGE..Z..MAIN..d.|
000000a0  e0 0d 00 6e 04 0d 00 78  0b dd 20 f2 4d 41 49 4e  |...n...x.. .MAIN|
000000b0  0d 00 82 08 4d 25 3d 32  0d 00 8c 05 f5 0d 00 96  |....M%=2........|
000000c0  10 52 25 3d 32 5e 28 33  36 2d 53 43 29 0d 00 a0  |.R%=2^(36-SC)...|
000000d0  0a 53 54 3d 30 2e 35 0d  00 aa 07 48 3d 30 0d 00  |.ST=0.5....H=0..|
000000e0  b4 05 f5 0d 00 be 09 48  2b 3d 53 54 0d 00 c8 17  |.......H+=ST....|
000000f0  c8 99 20 22 4f 53 5f 42  79 74 65 22 2c 26 37 30  |.. "OS_Byte",&70|
00000100  2c 4d 25 0d 00 d2 13 21  44 58 44 3d 9b 28 b2 28  |,M%....!DXD=.(.(|
00000110  48 29 29 2a 52 25 0d 00  dc 13 21 44 59 44 3d b5  |H))*R%....!DYD=.|
00000120  28 b2 28 48 29 29 2a 52  25 0d 00 e6 0e 52 25 3d  |(.(H))*R%....R%=|
00000130  52 25 2f 31 2e 30 32 0d  00 f0 09 d6 20 73 65 74  |R%/1.02..... set|
00000140  0d 00 fa 12 d6 20 73 63  61 6c 65 5f 72 6f 74 61  |..... scale_rota|
00000150  74 65 0d 01 04 20 c8 99  20 22 4f 53 5f 42 79 74  |te... .. "OS_Byt|
00000160  65 22 2c 26 37 31 2c 4d  25 3a 4d 25 3d 4d 25 20  |e",&71,M%:M%=M% |
00000170  82 33 0d 01 0e 0b fd 20  48 3e 31 32 30 0d 01 18  |.3..... H>120...|
00000180  05 f5 0d 01 22 0b 48 2d  3d 34 2a 53 54 0d 01 2c  |....".H-=4*ST..,|
00000190  17 c8 99 20 22 4f 53 5f  42 79 74 65 22 2c 26 37  |... "OS_Byte",&7|
000001a0  30 2c 4d 25 0d 01 36 13  21 44 58 44 3d 9b 28 b2  |0,M%..6.!DXD=.(.|
000001b0  28 48 29 29 2a 52 25 0d  01 40 13 21 44 59 44 3d  |(H))*R%..@.!DYD=|
000001c0  b5 28 b2 28 48 29 29 2a  52 25 0d 01 4a 12 52 25  |.(.(H))*R%..J.R%|
000001d0  3d 52 25 2a 28 31 2e 30  32 29 5e 34 0d 01 54 09  |=R%*(1.02)^4..T.|
000001e0  d6 20 73 65 74 0d 01 5e  12 d6 20 73 63 61 6c 65  |. set..^.. scale|
000001f0  5f 72 6f 74 61 74 65 0d  01 68 20 c8 99 20 22 4f  |_rotate..h .. "O|
00000200  53 5f 42 79 74 65 22 2c  26 37 31 2c 4d 25 3a 4d  |S_Byte",&71,M%:M|
00000210  25 3d 4d 25 20 82 33 0d  01 72 09 fd 20 48 3c 30  |%=M% .3..r.. H<0|
00000220  0d 01 7c 07 fd 20 30 0d  01 86 05 e1 0d 01 90 04  |..|.. 0.........|
00000230  0d 01 9a 11 dd 20 f2 42  55 49 4c 44 49 4d 41 47  |..... .BUILDIMAG|
00000240  45 0d 01 a4 1c 2a 53 4c  4f 41 44 20 3c 52 6f 74  |E....*SLOAD <Rot|
00000250  6f 24 44 69 72 3e 2e 73  63 72 65 65 6e 0d 01 ae  |o$Dir>.screen...|
00000260  13 2a 53 43 48 4f 4f 53  45 20 73 63 72 65 65 6e  |.*SCHOOSE screen|
00000270  0d 01 b8 0e f0 20 26 45  44 2c 30 2c 2d 38 0d 01  |..... &ED,0,-8..|
00000280  c2 09 d6 20 73 65 74 0d  01 cc 09 d6 20 67 65 74  |... set..... get|
00000290  0d 01 d6 05 e1 0d 01 e0  04 0d 01 ea 0a dd 20 f2  |.............. .|
000002a0  41 53 53 0d 01 f4 0d de  20 51 25 20 34 30 30 30  |ASS..... Q% 4000|
000002b0  0d 01 fe 42 58 3d 30 3a  59 3d 31 3a 44 58 3d 32  |...BX=0:Y=1:DX=2|
000002c0  3a 44 59 3d 33 3a 43 3d  34 3a 44 3d 35 3a 53 3d  |:DY=3:C=4:D=5:S=|
000002d0  36 3a 54 3d 37 3a 53 43  52 3d 38 3a 42 4d 50 3d  |6:T=7:SCR=8:BMP=|
000002e0  39 3a 58 4d 3d 31 30 3a  59 4d 3d 31 31 3a 55 3d  |9:XM=10:YM=11:U=|
000002f0  31 32 0d 02 08 14 e3 20  50 41 53 53 3d 30 20 b8  |12..... PASS=0 .|
00000300  20 32 20 88 20 32 0d 02  12 09 50 25 3d 51 25 0d  | 2 . 2....P%=Q%.|
00000310  02 1c 0d 5b 4f 50 54 20  50 41 53 53 0d 02 26 1d  |...[OPT PASS..&.|
00000320  2e 53 43 52 45 45 4e 44  20 45 51 55 44 20 31 34  |.SCREEND EQUD 14|
00000330  38 3a 45 51 55 44 20 2d  31 0d 02 30 12 2e 53 43  |8:EQUD -1..0..SC|
00000340  52 45 45 4e 20 45 51 55  44 20 30 0d 02 3a 0f 2e  |REEN EQUD 0..:..|
00000350  44 58 44 20 45 51 55 44  20 30 0d 02 44 0f 2e 44  |DXD EQUD 0..D..D|
00000360  59 44 20 45 51 55 44 20  30 0d 02 4e 1d 2e 58 44  |YD EQUD 0..N..XD|
00000370  20 45 51 55 44 20 20 44  4d 20 3c 3c 20 28 33 32  | EQUD  DM << (32|
00000380  2d 53 43 2d 31 29 0d 02  58 1d 2e 59 44 20 45 51  |-SC-1)..X..YD EQ|
00000390  55 44 20 20 44 4d 20 3c  3c 20 28 33 32 2d 53 43  |UD  DM << (32-SC|
000003a0  2d 31 29 0d 02 62 14 2e  42 4d 50 44 20 45 51 55  |-1)..b..BMPD EQU|
000003b0  44 20 49 4d 41 47 45 0d  02 6c 04 0d 02 76 08 2e  |D IMAGE..l...v..|
000003c0  73 65 74 0d 02 80 12 41  44 52 20 52 30 2c 53 43  |set....ADR R0,SC|
000003d0  52 45 45 4e 44 0d 02 8a  11 41 44 52 20 52 31 2c  |REEND....ADR R1,|
000003e0  53 43 52 45 45 4e 0d 02  94 1d 53 57 49 20 22 4f  |SCREEN....SWI "O|
000003f0  53 5f 52 65 61 64 56 64  75 56 61 72 69 61 62 6c  |S_ReadVduVariabl|
00000400  65 73 22 0d 02 9e 0e 4d  4f 56 20 50 43 2c 52 31  |es"....MOV PC,R1|
00000410  34 0d 02 a8 04 0d 02 b2  08 2e 67 65 74 0d 02 bc  |4.........get...|
00000420  12 4c 44 52 20 53 43 52  2c 53 43 52 45 45 4e 0d  |.LDR SCR,SCREEN.|
00000430  02 c6 18 41 44 44 20 53  43 52 2c 53 43 52 2c 23  |...ADD SCR,SCR,#|
00000440  33 32 30 2a 32 35 36 0d  02 d0 14 53 55 42 20 53  |320*256....SUB S|
00000450  43 52 2c 53 43 52 2c 23  33 32 30 0d 02 da 10 4c  |CR,SCR,#320....L|
00000460  44 52 20 42 4d 50 2c 42  4d 50 44 0d 02 e4 0d 4d  |DR BMP,BMPD....M|
00000470  4f 56 20 44 2c 23 44 4d  0d 02 ee 0b 2e 47 4c 4f  |OV D,#DM.....GLO|
00000480  4f 50 59 0d 02 f8 0d 4d  4f 56 20 43 2c 23 44 4d  |OPY....MOV C,#DM|
00000490  0d 03 02 0b 2e 47 4c 4f  4f 50 58 0d 03 0c 12 4c  |.....GLOOPX....L|
000004a0  44 52 20 54 2c 5b 53 43  52 5d 2c 23 34 0d 03 16  |DR T,[SCR],#4...|
000004b0  12 53 54 52 20 54 2c 5b  42 4d 50 5d 2c 23 34 0d  |.STR T,[BMP],#4.|
000004c0  03 20 0f 53 55 42 53 20  43 2c 43 2c 23 34 0d 03  |. .SUBS C,C,#4..|
000004d0  2a 0e 42 4e 45 20 47 4c  4f 4f 50 58 0d 03 34 13  |*.BNE GLOOPX..4.|
000004e0  53 55 42 20 53 43 52 2c  53 43 52 2c 23 44 4d 0d  |SUB SCR,SCR,#DM.|
000004f0  03 3e 14 53 55 42 20 53  43 52 2c 53 43 52 2c 23  |.>.SUB SCR,SCR,#|
00000500  33 32 30 0d 03 48 0f 53  55 42 53 20 44 2c 44 2c  |320..H.SUBS D,D,|
00000510  23 31 0d 03 52 0e 42 4e  45 20 47 4c 4f 4f 50 59  |#1..R.BNE GLOOPY|
00000520  0d 03 5c 0e 4d 4f 56 20  50 43 2c 52 31 34 0d 03  |..\.MOV PC,R14..|
00000530  66 04 0d 03 70 11 2e 73  63 61 6c 65 5f 72 6f 74  |f...p..scale_rot|
00000540  61 74 65 0d 03 7a 0d 4c  44 52 20 58 4d 2c 58 44  |ate..z.LDR XM,XD|
00000550  0d 03 84 0d 4c 44 52 20  59 4d 2c 59 44 0d 03 8e  |....LDR YM,YD...|
00000560  12 4c 44 52 20 53 43 52  2c 53 43 52 45 45 4e 0d  |.LDR SCR,SCREEN.|
00000570  03 98 0e 4c 44 52 20 44  58 2c 44 58 44 0d 03 a2  |...LDR DX,DXD...|
00000580  0e 4c 44 52 20 44 59 2c  44 59 44 0d 03 ac 10 4c  |.LDR DY,DYD....L|
00000590  44 52 20 42 4d 50 2c 42  4d 50 44 0d 03 b6 0e 4d  |DR BMP,BMPD....M|
000005a0  4f 56 20 53 2c 23 31 32  38 0d 03 c0 0e 4d 4f 56  |OV S,#128....MOV|
000005b0  20 54 2c 23 31 36 30 0d  03 ca 13 4d 4f 56 20 58  | T,#160....MOV X|
000005c0  2c 44 58 2c 41 53 52 20  23 38 0d 03 d4 13 4d 4f  |,DX,ASR #8....MO|
000005d0  56 20 59 2c 44 59 2c 41  53 52 20 23 38 0d 03 de  |V Y,DY,ASR #8...|
000005e0  0d 4d 55 4c 20 43 2c 59  2c 53 0d 03 e8 16 53 55  |.MUL C,Y,S....SU|
000005f0  42 20 58 4d 2c 58 4d 2c  43 2c 4c 53 4c 20 23 38  |B XM,XM,C,LSL #8|
00000600  0d 03 f2 0d 4d 55 4c 20  43 2c 58 2c 54 0d 03 fc  |....MUL C,X,T...|
00000610  16 53 55 42 20 58 4d 2c  58 4d 2c 43 2c 4c 53 4c  |.SUB XM,XM,C,LSL|
00000620  20 23 38 0d 04 06 0d 4d  55 4c 20 43 2c 58 2c 53  | #8....MUL C,X,S|
00000630  0d 04 10 16 41 44 44 20  59 4d 2c 59 4d 2c 43 2c  |....ADD YM,YM,C,|
00000640  4c 53 4c 20 23 38 0d 04  1a 0d 4d 55 4c 20 43 2c  |LSL #8....MUL C,|
00000650  59 2c 54 0d 04 24 16 53  55 42 20 59 4d 2c 59 4d  |Y,T..$.SUB YM,YM|
00000660  2c 43 2c 4c 53 4c 20 23  38 0d 04 2e 0e 4d 4f 56  |,C,LSL #8....MOV|
00000670  20 44 2c 23 32 35 36 0d  04 38 0a 2e 4c 4f 4f 50  | D,#256..8..LOOP|
00000680  59 0d 04 42 0c 4d 4f 56  20 58 2c 58 4d 0d 04 4c  |Y..B.MOV X,XM..L|
00000690  0c 4d 4f 56 20 59 2c 59  4d 0d 04 56 17 41 44 44  |.MOV Y,YM..V.ADD|
000006a0  20 58 4d 2c 58 4d 2c 44  59 2c 4c 53 4c 20 23 31  | XM,XM,DY,LSL #1|
000006b0  0d 04 60 17 53 55 42 20  59 4d 2c 59 4d 2c 44 58  |..`.SUB YM,YM,DX|
000006c0  2c 4c 53 4c 20 23 31 0d  04 6a 0e 4d 4f 56 20 43  |,LSL #1..j.MOV C|
000006d0  2c 23 33 32 30 0d 04 74  0a 2e 4c 4f 4f 50 58 0d  |,#320..t..LOOPX.|
000006e0  04 7e 1a 80 20 54 2c 59  2c 23 28 44 4d 2d 31 29  |.~.. T,Y,#(DM-1)|
000006f0  3c 3c 28 33 32 2d 53 43  29 0d 04 88 15 41 44 44  |<<(32-SC)....ADD|
00000700  20 54 2c 54 2c 58 2c 4c  53 52 20 23 53 43 0d 04  | T,T,X,LSR #SC..|
00000710  92 1f 4c 44 52 42 20 53  2c 5b 42 4d 50 2c 54 2c  |..LDRB S,[BMP,T,|
00000720  4c 53 52 20 23 33 32 2d  32 2a 53 43 5d 0d 04 9c  |LSR #32-2*SC]...|
00000730  0e 41 44 44 20 58 2c 58  2c 44 58 0d 04 a6 0e 41  |.ADD X,X,DX....A|
00000740  44 44 20 59 2c 59 2c 44  59 0d 04 b0 1a 80 20 54  |DD Y,Y,DY..... T|
00000750  2c 59 2c 23 28 44 4d 2d  31 29 3c 3c 28 33 32 2d  |,Y,#(DM-1)<<(32-|
00000760  53 43 29 0d 04 ba 15 41  44 44 20 54 2c 54 2c 58  |SC)....ADD T,T,X|
00000770  2c 4c 53 52 20 23 53 43  0d 04 c4 1f 4c 44 52 42  |,LSR #SC....LDRB|
00000780  20 54 2c 5b 42 4d 50 2c  54 2c 4c 53 52 20 23 33  | T,[BMP,T,LSR #3|
00000790  32 2d 32 2a 53 43 5d 0d  04 ce 14 41 44 44 20 53  |2-2*SC]....ADD S|
000007a0  2c 53 2c 54 2c 4c 53 4c  20 23 38 0d 04 d8 0e 41  |,S,T,LSL #8....A|
000007b0  44 44 20 58 2c 58 2c 44  58 0d 04 e2 0e 41 44 44  |DD X,X,DX....ADD|
000007c0  20 59 2c 59 2c 44 59 0d  04 ec 1a 80 20 54 2c 59  | Y,Y,DY..... T,Y|
000007d0  2c 23 28 44 4d 2d 31 29  3c 3c 28 33 32 2d 53 43  |,#(DM-1)<<(32-SC|
000007e0  29 0d 04 f6 15 41 44 44  20 54 2c 54 2c 58 2c 4c  |)....ADD T,T,X,L|
000007f0  53 52 20 23 53 43 0d 05  00 1f 4c 44 52 42 20 54  |SR #SC....LDRB T|
00000800  2c 5b 42 4d 50 2c 54 2c  4c 53 52 20 23 33 32 2d  |,[BMP,T,LSR #32-|
00000810  32 2a 53 43 5d 0d 05 0a  15 41 44 44 20 53 2c 53  |2*SC]....ADD S,S|
00000820  2c 54 2c 4c 53 4c 20 23  31 36 0d 05 14 0e 41 44  |,T,LSL #16....AD|
00000830  44 20 58 2c 58 2c 44 58  0d 05 1e 0e 41 44 44 20  |D X,X,DX....ADD |
00000840  59 2c 59 2c 44 59 0d 05  28 1a 80 20 54 2c 59 2c  |Y,Y,DY..(.. T,Y,|
00000850  23 28 44 4d 2d 31 29 3c  3c 28 33 32 2d 53 43 29  |#(DM-1)<<(32-SC)|
00000860  0d 05 32 15 41 44 44 20  54 2c 54 2c 58 2c 4c 53  |..2.ADD T,T,X,LS|
00000870  52 20 23 53 43 0d 05 3c  1f 4c 44 52 42 20 54 2c  |R #SC..<.LDRB T,|
00000880  5b 42 4d 50 2c 54 2c 4c  53 52 20 23 33 32 2d 32  |[BMP,T,LSR #32-2|
00000890  2a 53 43 5d 0d 05 46 15  41 44 44 20 53 2c 53 2c  |*SC]..F.ADD S,S,|
000008a0  54 2c 4c 53 4c 20 23 32  34 0d 05 50 0e 41 44 44  |T,LSL #24..P.ADD|
000008b0  20 58 2c 58 2c 44 58 0d  05 5a 0e 41 44 44 20 59  | X,X,DX..Z.ADD Y|
000008c0  2c 59 2c 44 59 0d 05 64  1a 80 20 54 2c 59 2c 23  |,Y,DY..d.. T,Y,#|
000008d0  28 44 4d 2d 31 29 3c 3c  28 33 32 2d 53 43 29 0d  |(DM-1)<<(32-SC).|
000008e0  05 6e 15 41 44 44 20 54  2c 54 2c 58 2c 4c 53 52  |.n.ADD T,T,X,LSR|
000008f0  20 23 53 43 0d 05 78 1f  4c 44 52 42 20 55 2c 5b  | #SC..x.LDRB U,[|
00000900  42 4d 50 2c 54 2c 4c 53  52 20 23 33 32 2d 32 2a  |BMP,T,LSR #32-2*|
00000910  53 43 5d 0d 05 82 0e 41  44 44 20 58 2c 58 2c 44  |SC]....ADD X,X,D|
00000920  58 0d 05 8c 0e 41 44 44  20 59 2c 59 2c 44 59 0d  |X....ADD Y,Y,DY.|
00000930  05 96 1a 80 20 54 2c 59  2c 23 28 44 4d 2d 31 29  |.... T,Y,#(DM-1)|
00000940  3c 3c 28 33 32 2d 53 43  29 0d 05 a0 15 41 44 44  |<<(32-SC)....ADD|
00000950  20 54 2c 54 2c 58 2c 4c  53 52 20 23 53 43 0d 05  | T,T,X,LSR #SC..|
00000960  aa 1f 4c 44 52 42 20 54  2c 5b 42 4d 50 2c 54 2c  |..LDRB T,[BMP,T,|
00000970  4c 53 52 20 23 33 32 2d  32 2a 53 43 5d 0d 05 b4  |LSR #32-2*SC]...|
00000980  14 41 44 44 20 55 2c 55  2c 54 2c 4c 53 4c 20 23  |.ADD U,U,T,LSL #|
00000990  38 0d 05 be 0e 41 44 44  20 58 2c 58 2c 44 58 0d  |8....ADD X,X,DX.|
000009a0  05 c8 0e 41 44 44 20 59  2c 59 2c 44 59 0d 05 d2  |...ADD Y,Y,DY...|
000009b0  1a 80 20 54 2c 59 2c 23  28 44 4d 2d 31 29 3c 3c  |.. T,Y,#(DM-1)<<|
000009c0  28 33 32 2d 53 43 29 0d  05 dc 15 41 44 44 20 54  |(32-SC)....ADD T|
000009d0  2c 54 2c 58 2c 4c 53 52  20 23 53 43 0d 05 e6 1f  |,T,X,LSR #SC....|
000009e0  4c 44 52 42 20 54 2c 5b  42 4d 50 2c 54 2c 4c 53  |LDRB T,[BMP,T,LS|
000009f0  52 20 23 33 32 2d 32 2a  53 43 5d 0d 05 f0 15 41  |R #32-2*SC]....A|
00000a00  44 44 20 55 2c 55 2c 54  2c 4c 53 4c 20 23 31 36  |DD U,U,T,LSL #16|
00000a10  0d 05 fa 0e 41 44 44 20  58 2c 58 2c 44 58 0d 06  |....ADD X,X,DX..|
00000a20  04 0e 41 44 44 20 59 2c  59 2c 44 59 0d 06 0e 1a  |..ADD Y,Y,DY....|
00000a30  80 20 54 2c 59 2c 23 28  44 4d 2d 31 29 3c 3c 28  |. T,Y,#(DM-1)<<(|
00000a40  33 32 2d 53 43 29 0d 06  18 15 41 44 44 20 54 2c  |32-SC)....ADD T,|
00000a50  54 2c 58 2c 4c 53 52 20  23 53 43 0d 06 22 1f 4c  |T,X,LSR #SC..".L|
00000a60  44 52 42 20 54 2c 5b 42  4d 50 2c 54 2c 4c 53 52  |DRB T,[BMP,T,LSR|
00000a70  20 23 33 32 2d 32 2a 53  43 5d 0d 06 2c 15 41 44  | #32-2*SC]..,.AD|
00000a80  44 20 55 2c 55 2c 54 2c  4c 53 4c 20 23 32 34 0d  |D U,U,T,LSL #24.|
00000a90  06 36 0e 41 44 44 20 58  2c 58 2c 44 58 0d 06 40  |.6.ADD X,X,DX..@|
00000aa0  0e 41 44 44 20 59 2c 59  2c 44 59 0d 06 4a 15 53  |.ADD Y,Y,DY..J.S|
00000ab0  54 4d 49 41 20 28 53 43  52 29 2c 7b 53 2c 55 7d  |TMIA (SCR),{S,U}|
00000ac0  0d 06 54 14 41 44 44 20  53 43 52 2c 53 43 52 2c  |..T.ADD SCR,SCR,|
00000ad0  23 33 32 30 0d 06 5e 16  53 54 4d 49 41 20 28 53  |#320..^.STMIA (S|
00000ae0  43 52 29 21 2c 7b 53 2c  55 7d 0d 06 68 14 53 55  |CR)!,{S,U}..h.SU|
00000af0  42 20 53 43 52 2c 53 43  52 2c 23 33 32 30 0d 06  |B SCR,SCR,#320..|
00000b00  72 0f 53 55 42 53 20 43  2c 43 2c 23 38 0d 06 7c  |r.SUBS C,C,#8..||
00000b10  0d 42 4e 45 20 4c 4f 4f  50 58 0d 06 86 0f 53 55  |.BNE LOOPX....SU|
00000b20  42 53 20 44 2c 44 2c 23  32 0d 06 90 14 41 44 44  |BS D,D,#2....ADD|
00000b30  20 53 43 52 2c 53 43 52  2c 23 33 32 30 0d 06 9a  | SCR,SCR,#320...|
00000b40  0d 42 4e 45 20 4c 4f 4f  50 59 0d 06 a4 0e 4d 4f  |.BNE LOOPY....MO|
00000b50  56 20 50 43 2c 52 31 34  0d 06 ae 05 5d 0d 06 b8  |V PC,R14....]...|
00000b60  05 ed 0d 06 c2 05 e1 0d  ff                       |.........|
00000b69