Home » Archimedes archive » Acorn User » AU 1993-05 (2).adf » !StarInfo/Files/Top
!StarInfo/Files/Top
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 1993-05 (2).adf |
| Filename: | !StarInfo/Files/Top |
| Read OK: | ✔ |
| File size: | 2D4D bytes |
| Load address: | FFFFFB44 |
| Exec address: | 78BD3170 |
Duplicates
There is 1 duplicate copy of this file in the archive:
- Archimedes archive » Acorn User » AU 1993-05.adf » !StarInfo/Files/Top
- Archimedes archive » Acorn User » AU 1993-05 (2).adf » !StarInfo/Files/Top
File contents
10REM >Top (Info8)
20REM By Jan Vlietinck
30REM For 32-bit machines
40REM (c) BAU May 1993
50:
60PROCinit
70PROCmain
80END
90:
100DEF PROCmain
110REPEAT
120 PROCcalc
130 SYS "OS_Byte",&70,bank
140 CLS
150 CALL begin
160 WAIT
170 SYS "OS_Byte",&71,bank
180 bank=bank EOR 3
190 MOUSE x,y,b
200 hx=(y/512-1)*PI/2
210 hy=(x/640-1)*PI/2
220UNTIL FALSE
230ENDPROC
240:
250DEF PROCinit
260MODE 15
270MODE 13
280PRINT "Please Wait"
290COLOUR 128+100
300MOUSE ON
310*POINTER
320m1=40
330m2=60
340DIM f(m1)
350nrd=m1*m2
360OFF
370DIM rx(2,2),ry(2,2),rz(2,2),t(2,2)
380PROCquadrangle
390PROCass
400PROCvul
410!kl=255
420hx=0
430hy=0
440hz=0
450bank=1
460ENDPROC
470:
480DEF PROCcalc
490rx()=1,0,0,0,COShx,SINhx,0,-SINhx,COShx
500ry()=COShy,0,SINhy,0,1,0,-SINhy,0,COShy
510rz()=COShz,SINhz,0,-SINhz,COShz,0,0,0,1
520t()=rx().ry()
530t()=t().rz()
540v=2^15
550t()=t()*v
560tr!0=t(0,0)
570tr!4=t(0,1)
580tr!8=t(0,2)
590tr!12=t(1,0)
600tr!16=t(1,1)
610tr!20=t(1,2)
620ENDPROC
630:
640DEF PROCvul
650p=lijst
660FOR i=0 TO m1-1
670 h=i*PI/(m1-1)
680 f(i)=SINh*1600
690NEXT
700FOR j=0 TO m1-1
710 k=(j-m1/2)*PI/m1*600
720 FOR i=0 TO m2-1
730 h=i*PI*2/(m2-1)
740 !p=f(j)*COSh
750 p+=4
760 !p=f(j)*SINh
770 p+=4
780 !p=k
790 p+=4
800 NEXT
810NEXT
820!p=-1
830p=lijst+!nr+8
840q=lijst
850FOR j=0 TO m1-1
860 FOR i=0 TO m2-1
870 t=q+12*m2
880 x3=!t
890 y3=t!4
900 z3=t!8
910 t+=12
920 x4=!t
930 y4=t!4
940 z4=t!8
950 x1=!q
960 y1=q!4
970 z1=q!8
980 q+=12
990 x2=!q
1000 y2=q!4
1010 z2=q!8
1020 IF x1=x2 AND y1=y2 THEN
1030 x2=x4
1040 y2=y4
1050 ENDIF
1060 a1=x1-x3
1070 a2=y1-y3
1080 a3=z1-z3
1090 b1=x2-x3
1100 b2=y2-y3
1110 b3=z2-z3
1120 c1=a2*b3-b2*a3
1130 c2=a3*b1-b3*a1
1140 c3=a1*b2-b1*a2
1150 d=SQR(c1*c1+c2*c2+c3*c3)
1160 IF d<>0 !p=2^20/d
1170 p+=12
1180 NEXT
1190NEXT
1200ENDPROC
1210:
1220DEF PROCass
1230DIM q% 120000
1240x=0:y=1:z=2:s11=3
1250s12=4:s13=5:s21=6:s22=7:s23=8
1260c=9:t=10:u=11:v=12
1270a=13:b=14
1280x1=0:y1=1:x2=2:y2=3
1290x3=4:y3=5:x4=6:y4=7
1300col=8:i=9:j=12
1310FOR pass=0 TO 2 STEP 2
1320P%=q%
1330[OPT pass
1340.tr EQUS STRING$(24,CHR$0)
1350.spst EQUD 0
1360.linkst EQUD 0
1370.nr EQUD (nrd+800)*12
1380
1390.begin
1400 STR sp,spst
1410 STR link,linkst
1420 ADR t,tr
1430 LDMIA t,{r3-r8}
1440 ADR a,lijst
1450 LDR b,nr
1460 ADD b,b,a
1470.trans LDMIA (a)!,{x,y,z}
1480 MUL t,x,s11
1490 MLA t,y,s12,t
1500 MLA t,z,s13,t
1510 MOV u,t,ASR #15
1520 MUL t,x,s21
1530 MLA t,y,s22,t
1540 MLA t,z,s23,t
1550 MOV v,t,ASR #15
1560 STMIA (b)!,{u,v}
1570 ADD b,b,#4
1580 CMN x,#1
1590 BNE trans
1600 STR x,[b]
1610 LDR 13,spst
1620 LDR link,linkst
1630 STMFD (sp)!,{link}
1640 BL set
1650.pl ADR u,lijst
1660 LDR t,nr
1670 ADD u,u,t
1680 MOV i,#m1-1
1690 STR i,id
1700.lo2 MOV j,#m2-1
1710.lo1 ADD t,u,#m2<<3
1720 ADD t,t,#m2<<2
1730 LDMIA (t)!,{x3,y3}
1740 ADD t,t,#4
1750 LDMIA (u)!,{x1,y1,col}
1760 CMP col,#0
1770 LDMMIFD (sp)!,{pc}
1780 LDMIA u,{x2,y2}
1790 CMP x1,x2
1800 CMPEQ y1,y2
1810 LDMEQIA t,{x2,y2}
1820 SUB x4,x1,x3
1830 SUB y4,y2,y3
1840 MUL i,y4,x4
1850 SUB x4,x2,x3
1860 SUB y4,y1,y3
1870 MUL x4,y4,x4
1880 RSBS i,x4,i
1890 BMI ov
1900 LDMIA t,{x4,y4}
1910 MUL col,i,col
1920 MOVS i,col,LSR #16
1930 ADR t,kol
1940 LDR col,[t,i,LSL #2]
1950 STMFD (sp)!,{r8-r12}
1960 MOV t,#160
1970 ADD x1,t,x1,ASR #4
1980 ADD x2,t,x2,ASR #4
1990 ADD x3,t,x3,ASR #4
2000 ADD x4,t,x4,ASR #4
2010 MOV t,#128
2020 SUB y1,t,y1,ASR #4
2030 SUB y2,t,y2,ASR #4
2040 SUB y3,t,y3,ASR #4
2050 SUB y4,t,y4,ASR #4
2060 BL quadrangle
2070 LDMFD (sp)!,{r8-r12}
2080.ov SUBS j,j,#1
2090 BNE lo1
2100 ADD u,u,#12
2110 LDR i,id
2120 SUBS i,i,#1
2130 STR i,id
2140 BNE lo2
2150 LDMFD (sp)!,{pc}
2160
2170.id EQUD 0
2180
2190.kol EQUD %00000000
2200 EQUD %00000001
2210 EQUD %00000010
2220 EQUD %00000011
2230 EQUD %00101100
2240 EQUD %00101101
2250 EQUD %00101110
2260 EQUD %00101111
2270 EQUD %11010000
2280 EQUD %11010001
2290 EQUD %11010010
2300 EQUD %11010011
2310 EQUD %11111100
2320 EQUD %11111101
2330 EQUD %11111110
2340 EQUD %11111111
2350 EQUD %11111111
2360 EQUD %11111111
2370 EQUD %11111111
2380 EQUD %11111111
2390 EQUD %11111111
2400.lijst
2410]
2420NEXT
2430ENDPROC
2440:
2450DEF PROCquadrangle
2460DIM ditable 4*320
2470FOR I=1 TO 320
2480 ditable!(4*I)=(1<<16)/I
2490NEXT
2500DIM q% 2000
2510ax=0:ay=1:bx=2:by=3
2520cx=4:cy=5:dx=6:dy=7
2530col=8:t=9
2540a=10:b=11:c=12
2550f=8:g=9:t=9:n=10
2560q=11:s=12
2570xl=0:xr=1:l=2:r=3:ct=4
2580c1=5:c2=6:c3=7:c4=8
2590t=9:o=10:la=11:ra=12
2600sp=13:link=14:pc=15
2610FOR p=0 TO 2 STEP 2
2620P%=q%
2630[OPT p
2640.screen1
2650 EQUD 148
2660 EQUD -1
2670.screen EQUD 0
2680
2690.set ADR r0,screen1
2700 ADR r1,screen
2710 SWI "OS_ReadVduVariables"
2720 MOV pc,link
2730
2740.axd EQUD 0
2750.bxd EQUD 0
2760.cxd EQUD 0
2770.ab EQUD 0
2780.ac EQUD 0
2790.bd EQUD 0
2800.cd EQUD 0
2810.ad EQUD 0
2820.bc EQUD 0
2830.aa EQUD 0
2840.bb EQUD 0
2850.cc EQUD 0
2860.kl EQUD 0
2870.ditabd EQUD ditable
2880
2890.quadrangle
2900 STMFD (sp)!,{link}
2910 STR col,kl
2920 FNmax(ax,ay,bx,by)
2930 FNmax(bx,by,cx,cy)
2940 FNmax(cx,cy,dx,dy)
2950 FNmax(ax,ay,bx,by)
2960 FNmax(bx,by,cx,cy)
2970 FNmax(ax,ay,bx,by)
2980 STR ax,axd
2990 STR bx,bxd
3000 STR cx,cxd
3010 SUB a,dx,ax
3020 SUB b,dy,ay
3030 SUB s,cx,ax
3040 SUB t,cy,ay
3050 MUL t,a,t
3060 MUL s,b,s
3070 SUBS f,s,t
3080 BEQ q1
3090 SUB s,bx,ax
3100 SUB t,by,ay
3110 MUL t,a,t
3120 MUL s,b,s
3130 SUBS g,s,t
3140 BEQ q1
3150 EORS t,f,g
3160 BLT q1
3170 BGE q2
3180.q1 LDR q,ditabd
3190 SUB t,bx,ax
3200 SUB n,by,ay
3210 LDR n,[q,n,LSL #2]
3220 MUL n,t,n
3230 MOV n,n,ASR #10
3240 STR n,ab
3250 SUB t,cx,ax
3260 SUB n,cy,ay
3270 LDR n,[q,n,LSL #2]
3280 MUL n,t,n
3290 MOV n,n,ASR #10
3300 STR n,ac
3310 SUB t,dx,bx
3320 SUB n,dy,by
3330 LDR n,[q,n,LSL #2]
3340 MUL n,t,n
3350 MOV n,n,ASR #10
3360 STR n,bd
3370 SUB t,dx,cx
3380 SUB n,dy,cy
3390 LDR n,[q,n,LSL #2]
3400 MUL n,t,n
3410 MOV n,n,ASR #10
3420 STR n,cd
3430 SUB a,by,ay
3440 SUB b,cy,by
3450 SUB c,dy,cy
3460 STR a,aa
3470 STR b,bb
3480 STR c,cc
3490 LDR o,screen
3500 LDR col,kl
3510 ADD t,ay,ay,LSL #2
3520 ADD o,o,t,LSL #6
3530 ADD c4,c4,c4,LSL #8
3540 ADD c4,c4,c4,LSL #16
3550 MOV c1,c4
3560 MOV c2,c4
3570 MOV c3,c4
3580 LDR ct,aa
3590 CMP ct,#0
3600 LDR t,axd
3610 MOV l,t,LSL #6
3620 MOV r,t,LSL #6
3630 LDR la,ac
3640 ADD l,l,la,ASR #1
3650 ADD l,l,#1<<5
3660 LDR ra,ab
3670 ADD r,r,ra,ASR #1
3680 ADD r,r,#1<<5
3690 BLNE piece
3700 LDR ct,bb
3710 CMP ct,#0
3720 LDR t,bxd
3730 MOV r,t,LSL #6
3740 LDR ra,bd
3750 ADD r,r,ra,ASR #1
3760 ADD r,r,#1<<5
3770 BLNE piece
3780 LDR ct,cc
3790 CMP ct,#0
3800 LDR t,cxd
3810 MOV l,t,LSL #6
3820 LDR la,cd
3830 ADD l,l,la,ASR #1
3840 ADD l,l,#1<<5
3850 BLNE piece
3860 LDMFD (sp)!,{pc}
3870
3880.q2 LDR q,ditabd
3890 SUB t,bx,ax
3900 SUB n,by,ay
3910 LDR n,[q,n,LSL #2]
3920 MUL n,t,n
3930 MOV n,n,ASR #10
3940 STR n,ab
3950 SUB t,cx,bx
3960 SUB n,cy,by
3970 LDR n,[q,n,LSL #2]
3980 MUL n,t,n
3990 MOV n,n,ASR #10
4000 STR n,bc
4010 SUB t,dx,cx
4020 SUB n,dy,cy
4030 LDR n,[q,n,LSL #2]
4040 MUL n,t,n
4050 MOV n,n,ASR #10
4060 STR n,cd
4070 SUB t,dx,ax
4080 SUB n,dy,ay
4090 LDR n,[q,n,LSL #2]
4100 MUL n,t,n
4110 MOV n,n,ASR #10
4120 STR n,ad
4130 SUB a,by,ay
4140 SUB b,cy,by
4150 SUB c,dy,cy
4160 STR a,aa
4170 STR b,bb
4180 STR c,cc
4190 LDR o,screen
4200 LDR col,kl
4210 ADD t,ay,ay,LSL #2
4220 ADD o,o,t,LSL #6
4230 ADD c4,c4,c4,LSL #8
4240 ADD c4,c4,c4,LSL #16
4250 MOV c1,c4
4260 MOV c2,c4
4270 MOV c3,c4
4280 LDR ct,aa
4290 CMP ct,#0
4300 LDR t,axd
4310 MOV l,t,LSL #6
4320 MOV r,t,LSL #6
4330 LDR la,ad
4340 ADD l,l,la,ASR #1
4350 ADD l,l,#1<<5
4360 LDR ra,ab
4370 ADD r,r,ra,ASR #1
4380 ADD r,r,#1<<5
4390 BLNE piece
4400 LDR ct,bb
4410 CMP ct,#0
4420 LDR t,bxd
4430 MOV r,t,LSL #6
4440 LDR ra,bc
4450 ADD r,r,ra,ASR #1
4460 ADD r,r,#1<<5
4470 BLNE piece
4480 LDR ct,cc
4490 CMP ct,#0
4500 LDR t,cxd
4510 MOV r,t,LSL #6
4520 LDR ra,cd
4530 ADD r,r,ra,ASR #1
4540 ADD r,r,#1<<5
4550 BLNE piece
4560 LDMFD (sp)!,{pc}
4570
4580.piece STMFD (sp)!,{link}
4590.lo CMP l,r
4600 ADDLO xl,o,l,LSR #6
4610 ADDLO xr,o,r,LSR #6
4620 ADDHS xl,o,r,LSR #6
4630 ADDHS xr,o,l,LSR #6
4640 SUBS t,xr,xl
4650 BEQ endspan
4660 CMP t,#2
4670 STRLSB c1,[xl]
4680 STRLSB c1,[xr,#-1]
4690 BLS endspan
4700 TST xl,#%01
4710 STRNEB c1,[xl],#1
4720 TST xl,#%10
4730 STRNEB c2,[xl],#1
4740 STRNEB c1,[xl],#1
4750 TST xr,#%01
4760 STRNEB c2,[xr,#-1]!
4770 TST xr,#%10
4780 STRNEB c1,[xr,#-1]!
4790 STRNEB c2,[xr,#-1]!
4800 SUBS t,xr,xl
4810 MOVS t,t,LSR #3
4820 STRCS c1,[xl],#4
4830 MOVS t,t,LSR #1
4840 STMCSIA (xl)!,{c1,c2}
4850 ADR xr,base
4860 SUB pc,xr,t,LSL #2
4870 FNvulc
4880.base
4890.endspan
4900 ADD l,l,la
4910 ADD r,r,ra
4920 ADD o,o,#320
4930 SUBS ct,ct,#1
4940 BNE lo
4950 LDMFD (sp)!,{pc}
4960]
4970NEXT
4980ENDPROC
4990:
5000DEF FNvulc
5010FOR i=1 TO 20
5020[OPT p
5030 STMIA (xl)!,{c1,c2,c3,c4}
5040]
5050NEXT
5060=""
5070:
5080DEF FNmax(ax,ay,bx,by)
5090[OPT p
5100 CMP ay,by
5110 MOVHI t,ax
5120 MOVHI ax,bx
5130 MOVHI bx,t
5140 MOVHI t,ay
5150 MOVHI ay,by
5160 MOVHI by,t
5170]
5180=0
� >Top (Info8)
� By Jan Vlietinck
� For 32-bit machines
(� (c) BAU May 1993
2:
< �init
F �main
P�
Z:
d � �main
n�
x
�calc
� ș "OS_Byte",&70,bank
� �
� � begin
� Ȗ
� ș "OS_Byte",&71,bank
� bank=bank � 3
�
ȗ x,y,b
� hx=(y/512-1)*�/2
� hy=(x/640-1)*�/2
�� �
��
�:
� � �init
� 15
� 13
� "Please Wait"
"
� 128+100
,ȗ �
6 *POINTER
@ m1=40
J m2=60
T � f(m1)
^
nrd=m1*m2
h�
r$� rx(2,2),ry(2,2),rz(2,2),t(2,2)
|�quadrangle
��ass
��vul
� !kl=255
�hx=0
�hy=0
�hz=0
�
bank=1
��
�:
� � �calc
�#rx()=1,0,0,0,�hx,�hx,0,-�hx,�hx
�#ry()=�hy,0,�hy,0,1,0,-�hy,0,�hy
�#rz()=�hz,�hz,0,-�hz,�hz,0,0,0,1
t()=rx().ry()
t()=t().rz()
v=2^15
&
t()=t()*v
0tr!0=t(0,0)
:tr!4=t(0,1)
Dtr!8=t(0,2)
Ntr!12=t(1,0)
Xtr!16=t(1,1)
btr!20=t(1,2)
l�
v:
�
� �vul
� p=lijst
�� i=0 � m1-1
� h=i*�/(m1-1)
� f(i)=�h*1600
��
�� j=0 � m1-1
� k=(j-m1/2)*�/m1*600
� � i=0 � m2-1
� h=i*�*2/(m2-1)
� !p=f(j)*�h
�
p+=4
� !p=f(j)*�h
p+=4
!p=k
p+=4
�
*�
4 !p=-1
>p=lijst+!nr+8
H q=lijst
R� j=0 � m1-1
\ � i=0 � m2-1
f t=q+12*m2
p x3=!t
z y3=t!4
� z3=t!8
� t+=12
� x4=!t
� y4=t!4
� z4=t!8
� x1=!q
� y1=q!4
� z1=q!8
� q+=12
� x2=!q
� y2=q!4
� z2=q!8
� � x1=x2 � y1=y2 �
x2=x4
y2=y4
�
$ a1=x1-x3
. a2=y1-y3
8 a3=z1-z3
B b1=x2-x3
L b2=y2-y3
V b3=z2-z3
` c1=a2*b3-b2*a3
j c2=a3*b1-b3*a1
t c3=a1*b2-b1*a2
~ d=�(c1*c1+c2*c2+c3*c3)
� � d<>0 !p=2^20/d
� p+=12
� �
��
��
�:
�
� �ass
�� q% 120000
�x=0:y=1:z=2:s11=3
�!s12=4:s13=5:s21=6:s22=7:s23=8
�c=9:t=10:u=11:v=12
�
a=13:b=14
x1=0:y1=1:x2=2:y2=3
x3=4:y3=5:x4=6:y4=7
col=8:i=9:j=12
� pass=0 � 2 � 2
( P%=q%
2
[OPT pass
<.tr EQUS �24,�0)
F.spst EQUD 0
P.linkst EQUD 0
Z .nr EQUD (nrd+800)*12
d
n
.begin
x STR sp,spst
� STR link,linkst
� ADR t,tr
� LDMIA t,{r3-r8}
� ADR a,lijst
� LDR b,nr
� ADD b,b,a
� .trans LDMIA (a)!,{x,y,z}
� MUL t,x,s11
� MLA t,y,s12,t
� MLA t,z,s13,t
� MOV u,t,ASR #15
� MUL t,x,s21
� MLA t,y,s22,t
MLA t,z,s23,t
MOV v,t,ASR #15
STMIA (b)!,{u,v}
" ADD b,b,#4
, CMN x,#1
6 BNE trans
@ STR x,[b]
J LDR 13,spst
T LDR link,linkst
^ STMFD (sp)!,{link}
h BL set
r.pl ADR u,lijst
| LDR t,nr
� ADD u,u,t
� MOV i,#m1-1
� STR i,id
�.lo2 MOV j,#m2-1
� .lo1 ADD t,u,#m2<<3
� ADD t,t,#m2<<2
� LDMIA (t)!,{x3,y3}
� ADD t,t,#4
�$ LDMIA (u)!,{x1,y1,col}
� CMP col,#0
� LDMMIFD (sp)!,{pc}
� LDMIA u,{x2,y2}
� CMP x1,x2
CMPEQ y1,y2
LDMEQIA t,{x2,y2}
SUB x4,x1,x3
& SUB y4,y2,y3
0 MUL i,y4,x4
: SUB x4,x2,x3
D SUB y4,y1,y3
N MUL x4,y4,x4
X RSBS i,x4,i
b BMI ov
l LDMIA t,{x4,y4}
v MUL col,i,col
�! MOVS i,col,LSR #16
� ADR t,kol
�$ LDR col,[t,i,LSL #2]
�" STMFD (sp)!,{r8-r12}
� MOV t,#160
�" ADD x1,t,x1,ASR #4
�" ADD x2,t,x2,ASR #4
�" ADD x3,t,x3,ASR #4
�" ADD x4,t,x4,ASR #4
� MOV t,#128
�" SUB y1,t,y1,ASR #4
�" SUB y2,t,y2,ASR #4
�" SUB y3,t,y3,ASR #4
" SUB y4,t,y4,ASR #4
BL quadrangle
" LDMFD (sp)!,{r8-r12}
.ov SUBS j,j,#1
* BNE lo1
4 ADD u,u,#12
> LDR i,id
H SUBS i,i,#1
R STR i,id
\ BNE lo2
f LDMFD (sp)!,{pc}
p
z.id EQUD 0
�
� .kol EQUD %00000000
� EQUD %00000001
� EQUD %00000010
� EQUD %00000011
� EQUD %00101100
� EQUD %00101101
� EQUD %00101110
� EQUD %00101111
� EQUD %11010000
� EQUD %11010001
� EQUD %11010010
� EQUD %11010011
EQUD %11111100
EQUD %11111101
EQUD %11111110
$ EQUD %11111111
. EQUD %11111111
8 EQUD %11111111
B EQUD %11111111
L EQUD %11111111
V EQUD %11111111
`
.lijst
j]
t�
~�
�:
�� �quadrangle
�� ditable 4*320
�� I=1 � 320
� ditable!(4*I)=(1<<16)/I
��
�
� q% 2000
�ax=0:ay=1:bx=2:by=3
�cx=4:cy=5:dx=6:dy=7
�
col=8:t=9
�a=10:b=11:c=12
�f=8:g=9:t=9:n=10
q=11:s=12
xl=0:xr=1:l=2:r=3:ct=4
c1=5:c2=6:c3=7:c4=8
t=9:o=10:la=11:ra=12
(sp=13:link=14:pc=15
2� p=0 � 2 � 2
< P%=q%
F
[OPT p
P .screen1
Z EQUD 148
d EQUD -1
n.screen EQUD 0
x
� .set ADR r0,screen1
� ADR r1,screen
�) SWI "OS_ReadVduVariables"
� MOV pc,link
�
�.axd EQUD 0
�.bxd EQUD 0
�.cxd EQUD 0
�.ab EQUD 0
�.ac EQUD 0
�.bd EQUD 0
�.cd EQUD 0
�.ad EQUD 0
.bc EQUD 0
.aa EQUD 0
.bb EQUD 0
".cc EQUD 0
,.kl EQUD 0
6.ditabd EQUD ditable
@
J.quadrangle
T STMFD (sp)!,{link}
^ STR col,kl
h �max(ax,ay,bx,by)
r �max(bx,by,cx,cy)
| �max(cx,cy,dx,dy)
� �max(ax,ay,bx,by)
� �max(bx,by,cx,cy)
� �max(ax,ay,bx,by)
� STR ax,axd
� STR bx,bxd
� STR cx,cxd
� SUB a,dx,ax
� SUB b,dy,ay
� SUB s,cx,ax
� SUB t,cy,ay
� MUL t,a,t
� MUL s,b,s
� SUBS f,s,t
BEQ q1
SUB s,bx,ax
SUB t,by,ay
& MUL t,a,t
0 MUL s,b,s
: SUBS g,s,t
D BEQ q1
N �S t,f,g
X BLT q1
b BGE q2
l .q1 LDR q,ditabd
v SUB t,bx,ax
� SUB n,by,ay
�" LDR n,[q,n,LSL #2]
� MUL n,t,n
� MOV n,n,ASR #10
� STR n,ab
� SUB t,cx,ax
� SUB n,cy,ay
�" LDR n,[q,n,LSL #2]
� MUL n,t,n
� MOV n,n,ASR #10
� STR n,ac
� SUB t,dx,bx
� SUB n,dy,by
" LDR n,[q,n,LSL #2]
MUL n,t,n
MOV n,n,ASR #10
STR n,bd
* SUB t,dx,cx
4 SUB n,dy,cy
>" LDR n,[q,n,LSL #2]
H MUL n,t,n
R MOV n,n,ASR #10
\ STR n,cd
f SUB a,by,ay
p SUB b,cy,by
z SUB c,dy,cy
� STR a,aa
� STR b,bb
� STR c,cc
� LDR o,screen
� LDR col,kl
�" ADD t,ay,ay,LSL #2
� ADD o,o,t,LSL #6
�# ADD c4,c4,c4,LSL #8
�$ ADD c4,c4,c4,LSL #16
� MOV c1,c4
� MOV c2,c4
� MOV c3,c4
� LDR ct,aa
CMP ct,#0
LDR t,axd
MOV l,t,LSL #6
$ MOV r,t,LSL #6
. LDR la,ac
8! ADD l,l,la,ASR #1
B ADD l,l,#1<<5
L LDR ra,ab
V! ADD r,r,ra,ASR #1
` ADD r,r,#1<<5
j BLNE piece
t LDR ct,bb
~ CMP ct,#0
� LDR t,bxd
� MOV r,t,LSL #6
� LDR ra,bd
�! ADD r,r,ra,ASR #1
� ADD r,r,#1<<5
� BLNE piece
� LDR ct,cc
� CMP ct,#0
� LDR t,cxd
� MOV l,t,LSL #6
� LDR la,cd
�! ADD l,l,la,ASR #1
ADD l,l,#1<<5
BLNE piece
LDMFD (sp)!,{pc}
( .q2 LDR q,ditabd
2 SUB t,bx,ax
< SUB n,by,ay
F" LDR n,[q,n,LSL #2]
P MUL n,t,n
Z MOV n,n,ASR #10
d STR n,ab
n SUB t,cx,bx
x SUB n,cy,by
�" LDR n,[q,n,LSL #2]
� MUL n,t,n
� MOV n,n,ASR #10
� STR n,bc
� SUB t,dx,cx
� SUB n,dy,cy
�" LDR n,[q,n,LSL #2]
� MUL n,t,n
� MOV n,n,ASR #10
� STR n,cd
� SUB t,dx,ax
� SUB n,dy,ay
�" LDR n,[q,n,LSL #2]
MUL n,t,n
MOV n,n,ASR #10
STR n,ad
" SUB a,by,ay
, SUB b,cy,by
6 SUB c,dy,cy
@ STR a,aa
J STR b,bb
T STR c,cc
^ LDR o,screen
h LDR col,kl
r" ADD t,ay,ay,LSL #2
| ADD o,o,t,LSL #6
�# ADD c4,c4,c4,LSL #8
�$ ADD c4,c4,c4,LSL #16
� MOV c1,c4
� MOV c2,c4
� MOV c3,c4
� LDR ct,aa
� CMP ct,#0
� LDR t,axd
� MOV l,t,LSL #6
� MOV r,t,LSL #6
� LDR la,ad
�! ADD l,l,la,ASR #1
� ADD l,l,#1<<5
LDR ra,ab
! ADD r,r,ra,ASR #1
ADD r,r,#1<<5
& BLNE piece
0 LDR ct,bb
: CMP ct,#0
D LDR t,bxd
N MOV r,t,LSL #6
X LDR ra,bc
b! ADD r,r,ra,ASR #1
l ADD r,r,#1<<5
v BLNE piece
� LDR ct,cc
� CMP ct,#0
� LDR t,cxd
� MOV r,t,LSL #6
� LDR ra,cd
�! ADD r,r,ra,ASR #1
� ADD r,r,#1<<5
� BLNE piece
� LDMFD (sp)!,{pc}
�
� .piece STMFD (sp)!,{link}
�.lo CMP l,r
�! ADDLO xl,o,l,LSR #6
! ADDLO xr,o,r,LSR #6
! ADDHS xl,o,r,LSR #6
! ADDHS xr,o,l,LSR #6
SUBS t,xr,xl
* BEQ endspan
4 CMP t,#2
> STRLSB c1,[xl]
H STRLSB c1,[xr,#-1]
R BLS endspan
\ TST xl,#%01
f STRNEB c1,[xl],#1
p TST xl,#%10
z STRNEB c2,[xl],#1
� STRNEB c1,[xl],#1
� TST xr,#%01
� STRNEB c2,[xr,#-1]!
� TST xr,#%10
� STRNEB c1,[xr,#-1]!
� STRNEB c2,[xr,#-1]!
� SUBS t,xr,xl
� MOVS t,t,LSR #3
� STRCS c1,[xl],#4
� MOVS t,t,LSR #1
�! STMCSIA (xl)!,{c1,c2}
� ADR xr,base
�" SUB pc,xr,t,LSL #2
�vulc
.base
.endspan
$ ADD l,l,la
. ADD r,r,ra
8 ADD o,o,#320
B SUBS ct,ct,#1
L BNE lo
V LDMFD (sp)!,{pc}
`]
j�
t�
~:
� � �vulc
�� i=1 � 20
�
[OPT p
�' STMIA (xl)!,{c1,c2,c3,c4}
�]
��
�=""
�:
�� �max(ax,ay,bx,by)
�
[OPT p
� CMP ay,by
� MOVHI t,ax
MOVHI ax,bx
MOVHI bx,t
MOVHI t,ay
MOVHI ay,by
( MOVHI by,t
2]
<=0
� 00000000 0d 00 0a 16 f4 20 20 20 20 20 3e 54 6f 70 20 28 |..... >Top (|
00000010 49 6e 66 6f 38 29 0d 00 14 17 f4 20 42 79 20 20 |Info8)..... By |
00000020 4a 61 6e 20 56 6c 69 65 74 69 6e 63 6b 0d 00 1e |Jan Vlietinck...|
00000030 19 f4 20 46 6f 72 20 33 32 2d 62 69 74 20 6d 61 |.. For 32-bit ma|
00000040 63 68 69 6e 65 73 0d 00 28 16 f4 20 28 63 29 20 |chines..(.. (c) |
00000050 42 41 55 20 4d 61 79 20 31 39 39 33 0d 00 32 05 |BAU May 1993..2.|
00000060 3a 0d 00 3c 09 f2 69 6e 69 74 0d 00 46 09 f2 6d |:..<..init..F..m|
00000070 61 69 6e 0d 00 50 05 e0 0d 00 5a 05 3a 0d 00 64 |ain..P....Z.:..d|
00000080 0b dd 20 f2 6d 61 69 6e 0d 00 6e 05 f5 0d 00 78 |.. .main..n....x|
00000090 0a 20 f2 63 61 6c 63 0d 00 82 1a 20 c8 99 20 22 |. .calc.... .. "|
000000a0 4f 53 5f 42 79 74 65 22 2c 26 37 30 2c 62 61 6e |OS_Byte",&70,ban|
000000b0 6b 0d 00 8c 06 20 db 0d 00 96 0c 20 d6 20 62 65 |k.... ..... . be|
000000c0 67 69 6e 0d 00 a0 07 20 c8 96 0d 00 aa 1a 20 c8 |gin.... ...... .|
000000d0 99 20 22 4f 53 5f 42 79 74 65 22 2c 26 37 31 2c |. "OS_Byte",&71,|
000000e0 62 61 6e 6b 0d 00 b4 12 20 62 61 6e 6b 3d 62 61 |bank.... bank=ba|
000000f0 6e 6b 20 82 20 33 0d 00 be 0d 20 c8 97 20 78 2c |nk . 3.... .. x,|
00000100 79 2c 62 0d 00 c8 15 20 68 78 3d 28 79 2f 35 31 |y,b.... hx=(y/51|
00000110 32 2d 31 29 2a af 2f 32 0d 00 d2 15 20 68 79 3d |2-1)*./2.... hy=|
00000120 28 78 2f 36 34 30 2d 31 29 2a af 2f 32 0d 00 dc |(x/640-1)*./2...|
00000130 07 fd 20 a3 0d 00 e6 05 e1 0d 00 f0 05 3a 0d 00 |.. ..........:..|
00000140 fa 0b dd 20 f2 69 6e 69 74 0d 01 04 08 eb 20 31 |... .init..... 1|
00000150 35 0d 01 0e 08 eb 20 31 33 0d 01 18 13 f1 20 22 |5..... 13..... "|
00000160 50 6c 65 61 73 65 20 57 61 69 74 22 0d 01 22 0d |Please Wait"..".|
00000170 fb 20 31 32 38 2b 31 30 30 0d 01 2c 08 c8 97 20 |. 128+100..,... |
00000180 ee 0d 01 36 0c 2a 50 4f 49 4e 54 45 52 0d 01 40 |...6.*POINTER..@|
00000190 09 6d 31 3d 34 30 0d 01 4a 09 6d 32 3d 36 30 0d |.m1=40..J.m2=60.|
000001a0 01 54 0b de 20 66 28 6d 31 29 0d 01 5e 0d 6e 72 |.T.. f(m1)..^.nr|
000001b0 64 3d 6d 31 2a 6d 32 0d 01 68 05 87 0d 01 72 24 |d=m1*m2..h....r$|
000001c0 de 20 72 78 28 32 2c 32 29 2c 72 79 28 32 2c 32 |. rx(2,2),ry(2,2|
000001d0 29 2c 72 7a 28 32 2c 32 29 2c 74 28 32 2c 32 29 |),rz(2,2),t(2,2)|
000001e0 0d 01 7c 0f f2 71 75 61 64 72 61 6e 67 6c 65 0d |..|..quadrangle.|
000001f0 01 86 08 f2 61 73 73 0d 01 90 08 f2 76 75 6c 0d |....ass.....vul.|
00000200 01 9a 0b 21 6b 6c 3d 32 35 35 0d 01 a4 08 68 78 |...!kl=255....hx|
00000210 3d 30 0d 01 ae 08 68 79 3d 30 0d 01 b8 08 68 7a |=0....hy=0....hz|
00000220 3d 30 0d 01 c2 0a 62 61 6e 6b 3d 31 0d 01 cc 05 |=0....bank=1....|
00000230 e1 0d 01 d6 05 3a 0d 01 e0 0b dd 20 f2 63 61 6c |.....:..... .cal|
00000240 63 0d 01 ea 23 72 78 28 29 3d 31 2c 30 2c 30 2c |c...#rx()=1,0,0,|
00000250 30 2c 9b 68 78 2c b5 68 78 2c 30 2c 2d b5 68 78 |0,.hx,.hx,0,-.hx|
00000260 2c 9b 68 78 0d 01 f4 23 72 79 28 29 3d 9b 68 79 |,.hx...#ry()=.hy|
00000270 2c 30 2c b5 68 79 2c 30 2c 31 2c 30 2c 2d b5 68 |,0,.hy,0,1,0,-.h|
00000280 79 2c 30 2c 9b 68 79 0d 01 fe 23 72 7a 28 29 3d |y,0,.hy...#rz()=|
00000290 9b 68 7a 2c b5 68 7a 2c 30 2c 2d b5 68 7a 2c 9b |.hz,.hz,0,-.hz,.|
000002a0 68 7a 2c 30 2c 30 2c 30 2c 31 0d 02 08 11 74 28 |hz,0,0,0,1....t(|
000002b0 29 3d 72 78 28 29 2e 72 79 28 29 0d 02 12 10 74 |)=rx().ry()....t|
000002c0 28 29 3d 74 28 29 2e 72 7a 28 29 0d 02 1c 0a 76 |()=t().rz()....v|
000002d0 3d 32 5e 31 35 0d 02 26 0d 74 28 29 3d 74 28 29 |=2^15..&.t()=t()|
000002e0 2a 76 0d 02 30 0f 74 72 21 30 3d 74 28 30 2c 30 |*v..0.tr!0=t(0,0|
000002f0 29 0d 02 3a 0f 74 72 21 34 3d 74 28 30 2c 31 29 |)..:.tr!4=t(0,1)|
00000300 0d 02 44 0f 74 72 21 38 3d 74 28 30 2c 32 29 0d |..D.tr!8=t(0,2).|
00000310 02 4e 10 74 72 21 31 32 3d 74 28 31 2c 30 29 0d |.N.tr!12=t(1,0).|
00000320 02 58 10 74 72 21 31 36 3d 74 28 31 2c 31 29 0d |.X.tr!16=t(1,1).|
00000330 02 62 10 74 72 21 32 30 3d 74 28 31 2c 32 29 0d |.b.tr!20=t(1,2).|
00000340 02 6c 05 e1 0d 02 76 05 3a 0d 02 80 0a dd 20 f2 |.l....v.:..... .|
00000350 76 75 6c 0d 02 8a 0b 70 3d 6c 69 6a 73 74 0d 02 |vul....p=lijst..|
00000360 94 10 e3 20 69 3d 30 20 b8 20 6d 31 2d 31 0d 02 |... i=0 . m1-1..|
00000370 9e 11 20 68 3d 69 2a af 2f 28 6d 31 2d 31 29 0d |.. h=i*./(m1-1).|
00000380 02 a8 11 20 66 28 69 29 3d b5 68 2a 31 36 30 30 |... f(i)=.h*1600|
00000390 0d 02 b2 05 ed 0d 02 bc 10 e3 20 6a 3d 30 20 b8 |.......... j=0 .|
000003a0 20 6d 31 2d 31 0d 02 c6 18 20 6b 3d 28 6a 2d 6d | m1-1.... k=(j-m|
000003b0 31 2f 32 29 2a af 2f 6d 31 2a 36 30 30 0d 02 d0 |1/2)*./m1*600...|
000003c0 11 20 e3 20 69 3d 30 20 b8 20 6d 32 2d 31 0d 02 |. . i=0 . m2-1..|
000003d0 da 14 20 20 68 3d 69 2a af 2a 32 2f 28 6d 32 2d |.. h=i*.*2/(m2-|
000003e0 31 29 0d 02 e4 10 20 20 21 70 3d 66 28 6a 29 2a |1).... !p=f(j)*|
000003f0 9b 68 0d 02 ee 0a 20 20 70 2b 3d 34 0d 02 f8 10 |.h.... p+=4....|
00000400 20 20 21 70 3d 66 28 6a 29 2a b5 68 0d 03 02 0a | !p=f(j)*.h....|
00000410 20 20 70 2b 3d 34 0d 03 0c 0a 20 20 21 70 3d 6b | p+=4.... !p=k|
00000420 0d 03 16 0a 20 20 70 2b 3d 34 0d 03 20 06 20 ed |.... p+=4.. . .|
00000430 0d 03 2a 05 ed 0d 03 34 09 21 70 3d 2d 31 0d 03 |..*....4.!p=-1..|
00000440 3e 11 70 3d 6c 69 6a 73 74 2b 21 6e 72 2b 38 0d |>.p=lijst+!nr+8.|
00000450 03 48 0b 71 3d 6c 69 6a 73 74 0d 03 52 10 e3 20 |.H.q=lijst..R.. |
00000460 6a 3d 30 20 b8 20 6d 31 2d 31 0d 03 5c 11 20 e3 |j=0 . m1-1..\. .|
00000470 20 69 3d 30 20 b8 20 6d 32 2d 31 0d 03 66 0f 20 | i=0 . m2-1..f. |
00000480 20 74 3d 71 2b 31 32 2a 6d 32 0d 03 70 0b 20 20 | t=q+12*m2..p. |
00000490 78 33 3d 21 74 0d 03 7a 0c 20 20 79 33 3d 74 21 |x3=!t..z. y3=t!|
000004a0 34 0d 03 84 0c 20 20 7a 33 3d 74 21 38 0d 03 8e |4.... z3=t!8...|
000004b0 0b 20 20 74 2b 3d 31 32 0d 03 98 0b 20 20 78 34 |. t+=12.... x4|
000004c0 3d 21 74 0d 03 a2 0c 20 20 79 34 3d 74 21 34 0d |=!t.... y4=t!4.|
000004d0 03 ac 0c 20 20 7a 34 3d 74 21 38 0d 03 b6 0b 20 |... z4=t!8.... |
000004e0 20 78 31 3d 21 71 0d 03 c0 0c 20 20 79 31 3d 71 | x1=!q.... y1=q|
000004f0 21 34 0d 03 ca 0c 20 20 7a 31 3d 71 21 38 0d 03 |!4.... z1=q!8..|
00000500 d4 0b 20 20 71 2b 3d 31 32 0d 03 de 0b 20 20 78 |.. q+=12.... x|
00000510 32 3d 21 71 0d 03 e8 0c 20 20 79 32 3d 71 21 34 |2=!q.... y2=q!4|
00000520 0d 03 f2 0c 20 20 7a 32 3d 71 21 38 0d 03 fc 17 |.... z2=q!8....|
00000530 20 20 e7 20 78 31 3d 78 32 20 80 20 79 31 3d 79 | . x1=x2 . y1=y|
00000540 32 20 8c 0d 04 06 0c 20 20 20 78 32 3d 78 34 0d |2 ..... x2=x4.|
00000550 04 10 0c 20 20 20 79 32 3d 79 34 0d 04 1a 07 20 |... y2=y4.... |
00000560 20 cd 0d 04 24 0e 20 20 61 31 3d 78 31 2d 78 33 | ...$. a1=x1-x3|
00000570 0d 04 2e 0e 20 20 61 32 3d 79 31 2d 79 33 0d 04 |.... a2=y1-y3..|
00000580 38 0e 20 20 61 33 3d 7a 31 2d 7a 33 0d 04 42 0e |8. a3=z1-z3..B.|
00000590 20 20 62 31 3d 78 32 2d 78 33 0d 04 4c 0e 20 20 | b1=x2-x3..L. |
000005a0 62 32 3d 79 32 2d 79 33 0d 04 56 0e 20 20 62 33 |b2=y2-y3..V. b3|
000005b0 3d 7a 32 2d 7a 33 0d 04 60 14 20 20 63 31 3d 61 |=z2-z3..`. c1=a|
000005c0 32 2a 62 33 2d 62 32 2a 61 33 0d 04 6a 14 20 20 |2*b3-b2*a3..j. |
000005d0 63 32 3d 61 33 2a 62 31 2d 62 33 2a 61 31 0d 04 |c2=a3*b1-b3*a1..|
000005e0 74 14 20 20 63 33 3d 61 31 2a 62 32 2d 62 31 2a |t. c3=a1*b2-b1*|
000005f0 61 32 0d 04 7e 1c 20 20 64 3d b6 28 63 31 2a 63 |a2..~. d=.(c1*c|
00000600 31 2b 63 32 2a 63 32 2b 63 33 2a 63 33 29 0d 04 |1+c2*c2+c3*c3)..|
00000610 88 16 20 20 e7 20 64 3c 3e 30 20 21 70 3d 32 5e |.. . d<>0 !p=2^|
00000620 32 30 2f 64 0d 04 92 0b 20 20 70 2b 3d 31 32 0d |20/d.... p+=12.|
00000630 04 9c 06 20 ed 0d 04 a6 05 ed 0d 04 b0 05 e1 0d |... ............|
00000640 04 ba 05 3a 0d 04 c4 0a dd 20 f2 61 73 73 0d 04 |...:..... .ass..|
00000650 ce 0f de 20 71 25 20 31 32 30 30 30 30 0d 04 d8 |... q% 120000...|
00000660 15 78 3d 30 3a 79 3d 31 3a 7a 3d 32 3a 73 31 31 |.x=0:y=1:z=2:s11|
00000670 3d 33 0d 04 e2 21 73 31 32 3d 34 3a 73 31 33 3d |=3...!s12=4:s13=|
00000680 35 3a 73 32 31 3d 36 3a 73 32 32 3d 37 3a 73 32 |5:s21=6:s22=7:s2|
00000690 33 3d 38 0d 04 ec 16 63 3d 39 3a 74 3d 31 30 3a |3=8....c=9:t=10:|
000006a0 75 3d 31 31 3a 76 3d 31 32 0d 04 f6 0d 61 3d 31 |u=11:v=12....a=1|
000006b0 33 3a 62 3d 31 34 0d 05 00 17 78 31 3d 30 3a 79 |3:b=14....x1=0:y|
000006c0 31 3d 31 3a 78 32 3d 32 3a 79 32 3d 33 0d 05 0a |1=1:x2=2:y2=3...|
000006d0 17 78 33 3d 34 3a 79 33 3d 35 3a 78 34 3d 36 3a |.x3=4:y3=5:x4=6:|
000006e0 79 34 3d 37 0d 05 14 12 63 6f 6c 3d 38 3a 69 3d |y4=7....col=8:i=|
000006f0 39 3a 6a 3d 31 32 0d 05 1e 14 e3 20 70 61 73 73 |9:j=12..... pass|
00000700 3d 30 20 b8 20 32 20 88 20 32 0d 05 28 09 50 25 |=0 . 2 . 2..(.P%|
00000710 3d 71 25 0d 05 32 0d 5b 4f 50 54 20 70 61 73 73 |=q%..2.[OPT pass|
00000720 0d 05 3c 1b 2e 74 72 20 20 20 20 20 45 51 55 53 |..<..tr EQUS|
00000730 20 20 20 20 c4 32 34 2c bd 30 29 0d 05 46 15 2e | .24,.0)..F..|
00000740 73 70 73 74 20 20 20 45 51 55 44 20 20 20 20 30 |spst EQUD 0|
00000750 0d 05 50 15 2e 6c 69 6e 6b 73 74 20 45 51 55 44 |..P..linkst EQUD|
00000760 20 20 20 20 30 0d 05 5a 20 2e 6e 72 20 20 20 20 | 0..Z .nr |
00000770 20 45 51 55 44 20 20 20 20 28 6e 72 64 2b 38 30 | EQUD (nrd+80|
00000780 30 29 2a 31 32 0d 05 64 04 0d 05 6e 0a 2e 62 65 |0)*12..d...n..be|
00000790 67 69 6e 0d 05 78 1b 20 20 20 20 20 20 20 20 53 |gin..x. S|
000007a0 54 52 20 20 20 20 20 73 70 2c 73 70 73 74 0d 05 |TR sp,spst..|
000007b0 82 1f 20 20 20 20 20 20 20 20 53 54 52 20 20 20 |.. STR |
000007c0 20 20 6c 69 6e 6b 2c 6c 69 6e 6b 73 74 0d 05 8c | link,linkst...|
000007d0 18 20 20 20 20 20 20 20 20 41 44 52 20 20 20 20 |. ADR |
000007e0 20 74 2c 74 72 0d 05 96 1d 20 20 20 20 20 20 20 | t,tr.... |
000007f0 20 4c 44 4d 49 41 20 20 20 74 2c 7b 72 33 2d 72 | LDMIA t,{r3-r|
00000800 38 7d 0d 05 a0 1b 20 20 20 20 20 20 20 20 41 44 |8}.... AD|
00000810 52 20 20 20 20 20 61 2c 6c 69 6a 73 74 0d 05 aa |R a,lijst...|
00000820 18 20 20 20 20 20 20 20 20 4c 44 52 20 20 20 20 |. LDR |
00000830 20 62 2c 6e 72 0d 05 b4 19 20 20 20 20 20 20 20 | b,nr.... |
00000840 20 41 44 44 20 20 20 20 20 62 2c 62 2c 61 0d 05 | ADD b,b,a..|
00000850 be 20 2e 74 72 61 6e 73 20 20 4c 44 4d 49 41 20 |. .trans LDMIA |
00000860 20 20 28 61 29 21 2c 7b 78 2c 79 2c 7a 7d 0d 05 | (a)!,{x,y,z}..|
00000870 c8 1b 20 20 20 20 20 20 20 20 4d 55 4c 20 20 20 |.. MUL |
00000880 20 20 74 2c 78 2c 73 31 31 0d 05 d2 1d 20 20 20 | t,x,s11.... |
00000890 20 20 20 20 20 4d 4c 41 20 20 20 20 20 74 2c 79 | MLA t,y|
000008a0 2c 73 31 32 2c 74 0d 05 dc 1d 20 20 20 20 20 20 |,s12,t.... |
000008b0 20 20 4d 4c 41 20 20 20 20 20 74 2c 7a 2c 73 31 | MLA t,z,s1|
000008c0 33 2c 74 0d 05 e6 1f 20 20 20 20 20 20 20 20 4d |3,t.... M|
000008d0 4f 56 20 20 20 20 20 75 2c 74 2c 41 53 52 20 23 |OV u,t,ASR #|
000008e0 31 35 0d 05 f0 1b 20 20 20 20 20 20 20 20 4d 55 |15.... MU|
000008f0 4c 20 20 20 20 20 74 2c 78 2c 73 32 31 0d 05 fa |L t,x,s21...|
00000900 1d 20 20 20 20 20 20 20 20 4d 4c 41 20 20 20 20 |. MLA |
00000910 20 74 2c 79 2c 73 32 32 2c 74 0d 06 04 1d 20 20 | t,y,s22,t.... |
00000920 20 20 20 20 20 20 4d 4c 41 20 20 20 20 20 74 2c | MLA t,|
00000930 7a 2c 73 32 33 2c 74 0d 06 0e 1f 20 20 20 20 20 |z,s23,t.... |
00000940 20 20 20 4d 4f 56 20 20 20 20 20 76 2c 74 2c 41 | MOV v,t,A|
00000950 53 52 20 23 31 35 0d 06 18 1e 20 20 20 20 20 20 |SR #15.... |
00000960 20 20 53 54 4d 49 41 20 20 20 28 62 29 21 2c 7b | STMIA (b)!,{|
00000970 75 2c 76 7d 0d 06 22 1a 20 20 20 20 20 20 20 20 |u,v}..". |
00000980 41 44 44 20 20 20 20 20 62 2c 62 2c 23 34 0d 06 |ADD b,b,#4..|
00000990 2c 18 20 20 20 20 20 20 20 20 43 4d 4e 20 20 20 |,. CMN |
000009a0 20 20 78 2c 23 31 0d 06 36 19 20 20 20 20 20 20 | x,#1..6. |
000009b0 20 20 42 4e 45 20 20 20 20 20 74 72 61 6e 73 0d | BNE trans.|
000009c0 06 40 19 20 20 20 20 20 20 20 20 53 54 52 20 20 |.@. STR |
000009d0 20 20 20 78 2c 5b 62 5d 0d 06 4a 1b 20 20 20 20 | x,[b]..J. |
000009e0 20 20 20 20 4c 44 52 20 20 20 20 20 31 33 2c 73 | LDR 13,s|
000009f0 70 73 74 0d 06 54 1f 20 20 20 20 20 20 20 20 4c |pst..T. L|
00000a00 44 52 20 20 20 20 20 6c 69 6e 6b 2c 6c 69 6e 6b |DR link,link|
00000a10 73 74 0d 06 5e 20 20 20 20 20 20 20 20 20 53 54 |st..^ ST|
00000a20 4d 46 44 20 20 20 28 73 70 29 21 2c 7b 6c 69 6e |MFD (sp)!,{lin|
00000a30 6b 7d 0d 06 68 17 20 20 20 20 20 20 20 20 42 4c |k}..h. BL|
00000a40 20 20 20 20 20 20 73 65 74 0d 06 72 1b 2e 70 6c | set..r..pl|
00000a50 20 20 20 20 20 41 44 52 20 20 20 20 20 75 2c 6c | ADR u,l|
00000a60 69 6a 73 74 0d 06 7c 18 20 20 20 20 20 20 20 20 |ijst..|. |
00000a70 4c 44 52 20 20 20 20 20 74 2c 6e 72 0d 06 86 19 |LDR t,nr....|
00000a80 20 20 20 20 20 20 20 20 41 44 44 20 20 20 20 20 | ADD |
00000a90 75 2c 75 2c 74 0d 06 90 1b 20 20 20 20 20 20 20 |u,u,t.... |
00000aa0 20 4d 4f 56 20 20 20 20 20 69 2c 23 6d 31 2d 31 | MOV i,#m1-1|
00000ab0 0d 06 9a 18 20 20 20 20 20 20 20 20 53 54 52 20 |.... STR |
00000ac0 20 20 20 20 69 2c 69 64 0d 06 a4 1b 2e 6c 6f 32 | i,id.....lo2|
00000ad0 20 20 20 20 4d 4f 56 20 20 20 20 20 6a 2c 23 6d | MOV j,#m|
00000ae0 32 2d 31 0d 06 ae 1e 2e 6c 6f 31 20 20 20 20 41 |2-1.....lo1 A|
00000af0 44 44 20 20 20 20 20 74 2c 75 2c 23 6d 32 3c 3c |DD t,u,#m2<<|
00000b00 33 0d 06 b8 1e 20 20 20 20 20 20 20 20 41 44 44 |3.... ADD|
00000b10 20 20 20 20 20 74 2c 74 2c 23 6d 32 3c 3c 32 0d | t,t,#m2<<2.|
00000b20 06 c2 20 20 20 20 20 20 20 20 20 4c 44 4d 49 41 |.. LDMIA|
00000b30 20 20 20 28 74 29 21 2c 7b 78 33 2c 79 33 7d 0d | (t)!,{x3,y3}.|
00000b40 06 cc 1a 20 20 20 20 20 20 20 20 41 44 44 20 20 |... ADD |
00000b50 20 20 20 74 2c 74 2c 23 34 0d 06 d6 24 20 20 20 | t,t,#4...$ |
00000b60 20 20 20 20 20 4c 44 4d 49 41 20 20 20 28 75 29 | LDMIA (u)|
00000b70 21 2c 7b 78 31 2c 79 31 2c 63 6f 6c 7d 0d 06 e0 |!,{x1,y1,col}...|
00000b80 1a 20 20 20 20 20 20 20 20 43 4d 50 20 20 20 20 |. CMP |
00000b90 20 63 6f 6c 2c 23 30 0d 06 ea 1e 20 20 20 20 20 | col,#0.... |
00000ba0 20 20 20 4c 44 4d 4d 49 46 44 20 28 73 70 29 21 | LDMMIFD (sp)!|
00000bb0 2c 7b 70 63 7d 0d 06 f4 1d 20 20 20 20 20 20 20 |,{pc}.... |
00000bc0 20 4c 44 4d 49 41 20 20 20 75 2c 7b 78 32 2c 79 | LDMIA u,{x2,y|
00000bd0 32 7d 0d 06 fe 19 20 20 20 20 20 20 20 20 43 4d |2}.... CM|
00000be0 50 20 20 20 20 20 78 31 2c 78 32 0d 07 08 19 20 |P x1,x2.... |
00000bf0 20 20 20 20 20 20 20 43 4d 50 45 51 20 20 20 79 | CMPEQ y|
00000c00 31 2c 79 32 0d 07 12 1d 20 20 20 20 20 20 20 20 |1,y2.... |
00000c10 4c 44 4d 45 51 49 41 20 74 2c 7b 78 32 2c 79 32 |LDMEQIA t,{x2,y2|
00000c20 7d 0d 07 1c 1c 20 20 20 20 20 20 20 20 53 55 42 |}.... SUB|
00000c30 20 20 20 20 20 78 34 2c 78 31 2c 78 33 0d 07 26 | x4,x1,x3..&|
00000c40 1c 20 20 20 20 20 20 20 20 53 55 42 20 20 20 20 |. SUB |
00000c50 20 79 34 2c 79 32 2c 79 33 0d 07 30 1b 20 20 20 | y4,y2,y3..0. |
00000c60 20 20 20 20 20 4d 55 4c 20 20 20 20 20 69 2c 79 | MUL i,y|
00000c70 34 2c 78 34 0d 07 3a 1c 20 20 20 20 20 20 20 20 |4,x4..:. |
00000c80 53 55 42 20 20 20 20 20 78 34 2c 78 32 2c 78 33 |SUB x4,x2,x3|
00000c90 0d 07 44 1c 20 20 20 20 20 20 20 20 53 55 42 20 |..D. SUB |
00000ca0 20 20 20 20 79 34 2c 79 31 2c 79 33 0d 07 4e 1c | y4,y1,y3..N.|
00000cb0 20 20 20 20 20 20 20 20 4d 55 4c 20 20 20 20 20 | MUL |
00000cc0 78 34 2c 79 34 2c 78 34 0d 07 58 1a 20 20 20 20 |x4,y4,x4..X. |
00000cd0 20 20 20 20 52 53 42 53 20 20 20 20 69 2c 78 34 | RSBS i,x4|
00000ce0 2c 69 0d 07 62 16 20 20 20 20 20 20 20 20 42 4d |,i..b. BM|
00000cf0 49 20 20 20 20 20 6f 76 0d 07 6c 1d 20 20 20 20 |I ov..l. |
00000d00 20 20 20 20 4c 44 4d 49 41 20 20 20 74 2c 7b 78 | LDMIA t,{x|
00000d10 34 2c 79 34 7d 0d 07 76 1d 20 20 20 20 20 20 20 |4,y4}..v. |
00000d20 20 4d 55 4c 20 20 20 20 20 63 6f 6c 2c 69 2c 63 | MUL col,i,c|
00000d30 6f 6c 0d 07 80 21 20 20 20 20 20 20 20 20 4d 4f |ol...! MO|
00000d40 56 53 20 20 20 20 69 2c 63 6f 6c 2c 4c 53 52 20 |VS i,col,LSR |
00000d50 23 31 36 0d 07 8a 19 20 20 20 20 20 20 20 20 41 |#16.... A|
00000d60 44 52 20 20 20 20 20 74 2c 6b 6f 6c 0d 07 94 24 |DR t,kol...$|
00000d70 20 20 20 20 20 20 20 20 4c 44 52 20 20 20 20 20 | LDR |
00000d80 63 6f 6c 2c 5b 74 2c 69 2c 4c 53 4c 20 23 32 5d |col,[t,i,LSL #2]|
00000d90 0d 07 9e 22 20 20 20 20 20 20 20 20 53 54 4d 46 |..." STMF|
00000da0 44 20 20 20 28 73 70 29 21 2c 7b 72 38 2d 72 31 |D (sp)!,{r8-r1|
00000db0 32 7d 0d 07 a8 1a 20 20 20 20 20 20 20 20 4d 4f |2}.... MO|
00000dc0 56 20 20 20 20 20 74 2c 23 31 36 30 0d 07 b2 22 |V t,#160..."|
00000dd0 20 20 20 20 20 20 20 20 41 44 44 20 20 20 20 20 | ADD |
00000de0 78 31 2c 74 2c 78 31 2c 41 53 52 20 23 34 0d 07 |x1,t,x1,ASR #4..|
00000df0 bc 22 20 20 20 20 20 20 20 20 41 44 44 20 20 20 |." ADD |
00000e00 20 20 78 32 2c 74 2c 78 32 2c 41 53 52 20 23 34 | x2,t,x2,ASR #4|
00000e10 0d 07 c6 22 20 20 20 20 20 20 20 20 41 44 44 20 |..." ADD |
00000e20 20 20 20 20 78 33 2c 74 2c 78 33 2c 41 53 52 20 | x3,t,x3,ASR |
00000e30 23 34 0d 07 d0 22 20 20 20 20 20 20 20 20 41 44 |#4..." AD|
00000e40 44 20 20 20 20 20 78 34 2c 74 2c 78 34 2c 41 53 |D x4,t,x4,AS|
00000e50 52 20 23 34 0d 07 da 1a 20 20 20 20 20 20 20 20 |R #4.... |
00000e60 4d 4f 56 20 20 20 20 20 74 2c 23 31 32 38 0d 07 |MOV t,#128..|
00000e70 e4 22 20 20 20 20 20 20 20 20 53 55 42 20 20 20 |." SUB |
00000e80 20 20 79 31 2c 74 2c 79 31 2c 41 53 52 20 23 34 | y1,t,y1,ASR #4|
00000e90 0d 07 ee 22 20 20 20 20 20 20 20 20 53 55 42 20 |..." SUB |
00000ea0 20 20 20 20 79 32 2c 74 2c 79 32 2c 41 53 52 20 | y2,t,y2,ASR |
00000eb0 23 34 0d 07 f8 22 20 20 20 20 20 20 20 20 53 55 |#4..." SU|
00000ec0 42 20 20 20 20 20 79 33 2c 74 2c 79 33 2c 41 53 |B y3,t,y3,AS|
00000ed0 52 20 23 34 0d 08 02 22 20 20 20 20 20 20 20 20 |R #4..." |
00000ee0 53 55 42 20 20 20 20 20 79 34 2c 74 2c 79 34 2c |SUB y4,t,y4,|
00000ef0 41 53 52 20 23 34 0d 08 0c 1e 20 20 20 20 20 20 |ASR #4.... |
00000f00 20 20 42 4c 20 20 20 20 20 20 71 75 61 64 72 61 | BL quadra|
00000f10 6e 67 6c 65 0d 08 16 22 20 20 20 20 20 20 20 20 |ngle..." |
00000f20 4c 44 4d 46 44 20 20 20 28 73 70 29 21 2c 7b 72 |LDMFD (sp)!,{r|
00000f30 38 2d 72 31 32 7d 0d 08 20 1a 2e 6f 76 20 20 20 |8-r12}.. ..ov |
00000f40 20 20 53 55 42 53 20 20 20 20 6a 2c 6a 2c 23 31 | SUBS j,j,#1|
00000f50 0d 08 2a 17 20 20 20 20 20 20 20 20 42 4e 45 20 |..*. BNE |
00000f60 20 20 20 20 6c 6f 31 0d 08 34 1b 20 20 20 20 20 | lo1..4. |
00000f70 20 20 20 41 44 44 20 20 20 20 20 75 2c 75 2c 23 | ADD u,u,#|
00000f80 31 32 0d 08 3e 18 20 20 20 20 20 20 20 20 4c 44 |12..>. LD|
00000f90 52 20 20 20 20 20 69 2c 69 64 0d 08 48 1a 20 20 |R i,id..H. |
00000fa0 20 20 20 20 20 20 53 55 42 53 20 20 20 20 69 2c | SUBS i,|
00000fb0 69 2c 23 31 0d 08 52 18 20 20 20 20 20 20 20 20 |i,#1..R. |
00000fc0 53 54 52 20 20 20 20 20 69 2c 69 64 0d 08 5c 17 |STR i,id..\.|
00000fd0 20 20 20 20 20 20 20 20 42 4e 45 20 20 20 20 20 | BNE |
00000fe0 6c 6f 32 0d 08 66 1e 20 20 20 20 20 20 20 20 4c |lo2..f. L|
00000ff0 44 4d 46 44 20 20 20 28 73 70 29 21 2c 7b 70 63 |DMFD (sp)!,{pc|
00001000 7d 0d 08 70 04 0d 08 7a 15 2e 69 64 20 20 20 20 |}..p...z..id |
00001010 20 45 51 55 44 20 20 20 20 30 0d 08 84 04 0d 08 | EQUD 0......|
00001020 8e 1d 2e 6b 6f 6c 20 20 20 20 45 51 55 44 20 20 |...kol EQUD |
00001030 20 20 25 30 30 30 30 30 30 30 30 0d 08 98 1d 20 | %00000000.... |
00001040 20 20 20 20 20 20 20 45 51 55 44 20 20 20 20 25 | EQUD %|
00001050 30 30 30 30 30 30 30 31 0d 08 a2 1d 20 20 20 20 |00000001.... |
00001060 20 20 20 20 45 51 55 44 20 20 20 20 25 30 30 30 | EQUD %000|
00001070 30 30 30 31 30 0d 08 ac 1d 20 20 20 20 20 20 20 |00010.... |
00001080 20 45 51 55 44 20 20 20 20 25 30 30 30 30 30 30 | EQUD %000000|
00001090 31 31 0d 08 b6 1d 20 20 20 20 20 20 20 20 45 51 |11.... EQ|
000010a0 55 44 20 20 20 20 25 30 30 31 30 31 31 30 30 0d |UD %00101100.|
000010b0 08 c0 1d 20 20 20 20 20 20 20 20 45 51 55 44 20 |... EQUD |
000010c0 20 20 20 25 30 30 31 30 31 31 30 31 0d 08 ca 1d | %00101101....|
000010d0 20 20 20 20 20 20 20 20 45 51 55 44 20 20 20 20 | EQUD |
000010e0 25 30 30 31 30 31 31 31 30 0d 08 d4 1d 20 20 20 |%00101110.... |
000010f0 20 20 20 20 20 45 51 55 44 20 20 20 20 25 30 30 | EQUD %00|
00001100 31 30 31 31 31 31 0d 08 de 1d 20 20 20 20 20 20 |101111.... |
00001110 20 20 45 51 55 44 20 20 20 20 25 31 31 30 31 30 | EQUD %11010|
00001120 30 30 30 0d 08 e8 1d 20 20 20 20 20 20 20 20 45 |000.... E|
00001130 51 55 44 20 20 20 20 25 31 31 30 31 30 30 30 31 |QUD %11010001|
00001140 0d 08 f2 1d 20 20 20 20 20 20 20 20 45 51 55 44 |.... EQUD|
00001150 20 20 20 20 25 31 31 30 31 30 30 31 30 0d 08 fc | %11010010...|
00001160 1d 20 20 20 20 20 20 20 20 45 51 55 44 20 20 20 |. EQUD |
00001170 20 25 31 31 30 31 30 30 31 31 0d 09 06 1d 20 20 | %11010011.... |
00001180 20 20 20 20 20 20 45 51 55 44 20 20 20 20 25 31 | EQUD %1|
00001190 31 31 31 31 31 30 30 0d 09 10 1d 20 20 20 20 20 |1111100.... |
000011a0 20 20 20 45 51 55 44 20 20 20 20 25 31 31 31 31 | EQUD %1111|
000011b0 31 31 30 31 0d 09 1a 1d 20 20 20 20 20 20 20 20 |1101.... |
000011c0 45 51 55 44 20 20 20 20 25 31 31 31 31 31 31 31 |EQUD %1111111|
000011d0 30 0d 09 24 1d 20 20 20 20 20 20 20 20 45 51 55 |0..$. EQU|
000011e0 44 20 20 20 20 25 31 31 31 31 31 31 31 31 0d 09 |D %11111111..|
000011f0 2e 1d 20 20 20 20 20 20 20 20 45 51 55 44 20 20 |.. EQUD |
00001200 20 20 25 31 31 31 31 31 31 31 31 0d 09 38 1d 20 | %11111111..8. |
00001210 20 20 20 20 20 20 20 45 51 55 44 20 20 20 20 25 | EQUD %|
00001220 31 31 31 31 31 31 31 31 0d 09 42 1d 20 20 20 20 |11111111..B. |
00001230 20 20 20 20 45 51 55 44 20 20 20 20 25 31 31 31 | EQUD %111|
00001240 31 31 31 31 31 0d 09 4c 1d 20 20 20 20 20 20 20 |11111..L. |
00001250 20 45 51 55 44 20 20 20 20 25 31 31 31 31 31 31 | EQUD %111111|
00001260 31 31 0d 09 56 1d 20 20 20 20 20 20 20 20 45 51 |11..V. EQ|
00001270 55 44 20 20 20 20 25 31 31 31 31 31 31 31 31 0d |UD %11111111.|
00001280 09 60 0a 2e 6c 69 6a 73 74 0d 09 6a 05 5d 0d 09 |.`..lijst..j.]..|
00001290 74 05 ed 0d 09 7e 05 e1 0d 09 88 05 3a 0d 09 92 |t....~......:...|
000012a0 11 dd 20 f2 71 75 61 64 72 61 6e 67 6c 65 0d 09 |.. .quadrangle..|
000012b0 9c 13 de 20 64 69 74 61 62 6c 65 20 34 2a 33 32 |... ditable 4*32|
000012c0 30 0d 09 a6 0f e3 20 49 3d 31 20 b8 20 33 32 30 |0..... I=1 . 320|
000012d0 0d 09 b0 1c 20 64 69 74 61 62 6c 65 21 28 34 2a |.... ditable!(4*|
000012e0 49 29 3d 28 31 3c 3c 31 36 29 2f 49 0d 09 ba 05 |I)=(1<<16)/I....|
000012f0 ed 0d 09 c4 0d de 20 71 25 20 32 30 30 30 0d 09 |...... q% 2000..|
00001300 ce 17 61 78 3d 30 3a 61 79 3d 31 3a 62 78 3d 32 |..ax=0:ay=1:bx=2|
00001310 3a 62 79 3d 33 0d 09 d8 17 63 78 3d 34 3a 63 79 |:by=3....cx=4:cy|
00001320 3d 35 3a 64 78 3d 36 3a 64 79 3d 37 0d 09 e2 0d |=5:dx=6:dy=7....|
00001330 63 6f 6c 3d 38 3a 74 3d 39 0d 09 ec 12 61 3d 31 |col=8:t=9....a=1|
00001340 30 3a 62 3d 31 31 3a 63 3d 31 32 0d 09 f6 14 66 |0:b=11:c=12....f|
00001350 3d 38 3a 67 3d 39 3a 74 3d 39 3a 6e 3d 31 30 0d |=8:g=9:t=9:n=10.|
00001360 0a 00 0d 71 3d 31 31 3a 73 3d 31 32 0d 0a 0a 1a |...q=11:s=12....|
00001370 78 6c 3d 30 3a 78 72 3d 31 3a 6c 3d 32 3a 72 3d |xl=0:xr=1:l=2:r=|
00001380 33 3a 63 74 3d 34 0d 0a 14 17 63 31 3d 35 3a 63 |3:ct=4....c1=5:c|
00001390 32 3d 36 3a 63 33 3d 37 3a 63 34 3d 38 0d 0a 1e |2=6:c3=7:c4=8...|
000013a0 18 74 3d 39 3a 6f 3d 31 30 3a 6c 61 3d 31 31 3a |.t=9:o=10:la=11:|
000013b0 72 61 3d 31 32 0d 0a 28 17 73 70 3d 31 33 3a 6c |ra=12..(.sp=13:l|
000013c0 69 6e 6b 3d 31 34 3a 70 63 3d 31 35 0d 0a 32 11 |ink=14:pc=15..2.|
000013d0 e3 20 70 3d 30 20 b8 20 32 20 88 20 32 0d 0a 3c |. p=0 . 2 . 2..<|
000013e0 09 50 25 3d 71 25 0d 0a 46 0a 5b 4f 50 54 20 70 |.P%=q%..F.[OPT p|
000013f0 0d 0a 50 0c 2e 73 63 72 65 65 6e 31 0d 0a 5a 17 |..P..screen1..Z.|
00001400 20 20 20 20 20 20 20 20 45 51 55 44 20 20 20 20 | EQUD |
00001410 31 34 38 0d 0a 64 16 20 20 20 20 20 20 20 20 45 |148..d. E|
00001420 51 55 44 20 20 20 20 2d 31 0d 0a 6e 15 2e 73 63 |QUD -1..n..sc|
00001430 72 65 65 6e 20 45 51 55 44 20 20 20 20 30 0d 0a |reen EQUD 0..|
00001440 78 04 0d 0a 82 1e 2e 73 65 74 20 20 20 20 41 44 |x......set AD|
00001450 52 20 20 20 20 20 72 30 2c 73 63 72 65 65 6e 31 |R r0,screen1|
00001460 0d 0a 8c 1d 20 20 20 20 20 20 20 20 41 44 52 20 |.... ADR |
00001470 20 20 20 20 72 31 2c 73 63 72 65 65 6e 0d 0a 96 | r1,screen...|
00001480 29 20 20 20 20 20 20 20 20 53 57 49 20 20 20 20 |) SWI |
00001490 20 22 4f 53 5f 52 65 61 64 56 64 75 56 61 72 69 | "OS_ReadVduVari|
000014a0 61 62 6c 65 73 22 0d 0a a0 1b 20 20 20 20 20 20 |ables".... |
000014b0 20 20 4d 4f 56 20 20 20 20 20 70 63 2c 6c 69 6e | MOV pc,lin|
000014c0 6b 0d 0a aa 04 0d 0a b4 15 2e 61 78 64 20 20 20 |k.........axd |
000014d0 20 45 51 55 44 20 20 20 20 30 0d 0a be 15 2e 62 | EQUD 0.....b|
000014e0 78 64 20 20 20 20 45 51 55 44 20 20 20 20 30 0d |xd EQUD 0.|
000014f0 0a c8 15 2e 63 78 64 20 20 20 20 45 51 55 44 20 |....cxd EQUD |
00001500 20 20 20 30 0d 0a d2 15 2e 61 62 20 20 20 20 20 | 0.....ab |
00001510 45 51 55 44 20 20 20 20 30 0d 0a dc 15 2e 61 63 |EQUD 0.....ac|
00001520 20 20 20 20 20 45 51 55 44 20 20 20 20 30 0d 0a | EQUD 0..|
00001530 e6 15 2e 62 64 20 20 20 20 20 45 51 55 44 20 20 |...bd EQUD |
00001540 20 20 30 0d 0a f0 15 2e 63 64 20 20 20 20 20 45 | 0.....cd E|
00001550 51 55 44 20 20 20 20 30 0d 0a fa 15 2e 61 64 20 |QUD 0.....ad |
00001560 20 20 20 20 45 51 55 44 20 20 20 20 30 0d 0b 04 | EQUD 0...|
00001570 15 2e 62 63 20 20 20 20 20 45 51 55 44 20 20 20 |..bc EQUD |
00001580 20 30 0d 0b 0e 15 2e 61 61 20 20 20 20 20 45 51 | 0.....aa EQ|
00001590 55 44 20 20 20 20 30 0d 0b 18 15 2e 62 62 20 20 |UD 0.....bb |
000015a0 20 20 20 45 51 55 44 20 20 20 20 30 0d 0b 22 15 | EQUD 0..".|
000015b0 2e 63 63 20 20 20 20 20 45 51 55 44 20 20 20 20 |.cc EQUD |
000015c0 30 0d 0b 2c 15 2e 6b 6c 20 20 20 20 20 45 51 55 |0..,..kl EQU|
000015d0 44 20 20 20 20 30 0d 0b 36 1b 2e 64 69 74 61 62 |D 0..6..ditab|
000015e0 64 20 45 51 55 44 20 20 20 20 64 69 74 61 62 6c |d EQUD ditabl|
000015f0 65 0d 0b 40 04 0d 0b 4a 0f 2e 71 75 61 64 72 61 |e..@...J..quadra|
00001600 6e 67 6c 65 0d 0b 54 20 20 20 20 20 20 20 20 20 |ngle..T |
00001610 53 54 4d 46 44 20 20 20 28 73 70 29 21 2c 7b 6c |STMFD (sp)!,{l|
00001620 69 6e 6b 7d 0d 0b 5e 1a 20 20 20 20 20 20 20 20 |ink}..^. |
00001630 53 54 52 20 20 20 20 20 63 6f 6c 2c 6b 6c 0d 0b |STR col,kl..|
00001640 68 1d 20 20 20 20 20 20 20 20 a4 6d 61 78 28 61 |h. .max(a|
00001650 78 2c 61 79 2c 62 78 2c 62 79 29 0d 0b 72 1d 20 |x,ay,bx,by)..r. |
00001660 20 20 20 20 20 20 20 a4 6d 61 78 28 62 78 2c 62 | .max(bx,b|
00001670 79 2c 63 78 2c 63 79 29 0d 0b 7c 1d 20 20 20 20 |y,cx,cy)..|. |
00001680 20 20 20 20 a4 6d 61 78 28 63 78 2c 63 79 2c 64 | .max(cx,cy,d|
00001690 78 2c 64 79 29 0d 0b 86 1d 20 20 20 20 20 20 20 |x,dy).... |
000016a0 20 a4 6d 61 78 28 61 78 2c 61 79 2c 62 78 2c 62 | .max(ax,ay,bx,b|
000016b0 79 29 0d 0b 90 1d 20 20 20 20 20 20 20 20 a4 6d |y).... .m|
000016c0 61 78 28 62 78 2c 62 79 2c 63 78 2c 63 79 29 0d |ax(bx,by,cx,cy).|
000016d0 0b 9a 1d 20 20 20 20 20 20 20 20 a4 6d 61 78 28 |... .max(|
000016e0 61 78 2c 61 79 2c 62 78 2c 62 79 29 0d 0b a4 1a |ax,ay,bx,by)....|
000016f0 20 20 20 20 20 20 20 20 53 54 52 20 20 20 20 20 | STR |
00001700 61 78 2c 61 78 64 0d 0b ae 1a 20 20 20 20 20 20 |ax,axd.... |
00001710 20 20 53 54 52 20 20 20 20 20 62 78 2c 62 78 64 | STR bx,bxd|
00001720 0d 0b b8 1a 20 20 20 20 20 20 20 20 53 54 52 20 |.... STR |
00001730 20 20 20 20 63 78 2c 63 78 64 0d 0b c2 1b 20 20 | cx,cxd.... |
00001740 20 20 20 20 20 20 53 55 42 20 20 20 20 20 61 2c | SUB a,|
00001750 64 78 2c 61 78 0d 0b cc 1b 20 20 20 20 20 20 20 |dx,ax.... |
00001760 20 53 55 42 20 20 20 20 20 62 2c 64 79 2c 61 79 | SUB b,dy,ay|
00001770 0d 0b d6 1b 20 20 20 20 20 20 20 20 53 55 42 20 |.... SUB |
00001780 20 20 20 20 73 2c 63 78 2c 61 78 0d 0b e0 1b 20 | s,cx,ax.... |
00001790 20 20 20 20 20 20 20 53 55 42 20 20 20 20 20 74 | SUB t|
000017a0 2c 63 79 2c 61 79 0d 0b ea 19 20 20 20 20 20 20 |,cy,ay.... |
000017b0 20 20 4d 55 4c 20 20 20 20 20 74 2c 61 2c 74 0d | MUL t,a,t.|
000017c0 0b f4 19 20 20 20 20 20 20 20 20 4d 55 4c 20 20 |... MUL |
000017d0 20 20 20 73 2c 62 2c 73 0d 0b fe 19 20 20 20 20 | s,b,s.... |
000017e0 20 20 20 20 53 55 42 53 20 20 20 20 66 2c 73 2c | SUBS f,s,|
000017f0 74 0d 0c 08 16 20 20 20 20 20 20 20 20 42 45 51 |t.... BEQ|
00001800 20 20 20 20 20 71 31 0d 0c 12 1b 20 20 20 20 20 | q1.... |
00001810 20 20 20 53 55 42 20 20 20 20 20 73 2c 62 78 2c | SUB s,bx,|
00001820 61 78 0d 0c 1c 1b 20 20 20 20 20 20 20 20 53 55 |ax.... SU|
00001830 42 20 20 20 20 20 74 2c 62 79 2c 61 79 0d 0c 26 |B t,by,ay..&|
00001840 19 20 20 20 20 20 20 20 20 4d 55 4c 20 20 20 20 |. MUL |
00001850 20 74 2c 61 2c 74 0d 0c 30 19 20 20 20 20 20 20 | t,a,t..0. |
00001860 20 20 4d 55 4c 20 20 20 20 20 73 2c 62 2c 73 0d | MUL s,b,s.|
00001870 0c 3a 19 20 20 20 20 20 20 20 20 53 55 42 53 20 |.:. SUBS |
00001880 20 20 20 67 2c 73 2c 74 0d 0c 44 16 20 20 20 20 | g,s,t..D. |
00001890 20 20 20 20 42 45 51 20 20 20 20 20 71 31 0d 0c | BEQ q1..|
000018a0 4e 17 20 20 20 20 20 20 20 20 82 53 20 20 20 20 |N. .S |
000018b0 74 2c 66 2c 67 0d 0c 58 16 20 20 20 20 20 20 20 |t,f,g..X. |
000018c0 20 42 4c 54 20 20 20 20 20 71 31 0d 0c 62 16 20 | BLT q1..b. |
000018d0 20 20 20 20 20 20 20 42 47 45 20 20 20 20 20 71 | BGE q|
000018e0 32 0d 0c 6c 1c 2e 71 31 20 20 20 20 20 4c 44 52 |2..l..q1 LDR|
000018f0 20 20 20 20 20 71 2c 64 69 74 61 62 64 0d 0c 76 | q,ditabd..v|
00001900 1b 20 20 20 20 20 20 20 20 53 55 42 20 20 20 20 |. SUB |
00001910 20 74 2c 62 78 2c 61 78 0d 0c 80 1b 20 20 20 20 | t,bx,ax.... |
00001920 20 20 20 20 53 55 42 20 20 20 20 20 6e 2c 62 79 | SUB n,by|
00001930 2c 61 79 0d 0c 8a 22 20 20 20 20 20 20 20 20 4c |,ay..." L|
00001940 44 52 20 20 20 20 20 6e 2c 5b 71 2c 6e 2c 4c 53 |DR n,[q,n,LS|
00001950 4c 20 23 32 5d 0d 0c 94 19 20 20 20 20 20 20 20 |L #2].... |
00001960 20 4d 55 4c 20 20 20 20 20 6e 2c 74 2c 6e 0d 0c | MUL n,t,n..|
00001970 9e 1f 20 20 20 20 20 20 20 20 4d 4f 56 20 20 20 |.. MOV |
00001980 20 20 6e 2c 6e 2c 41 53 52 20 23 31 30 0d 0c a8 | n,n,ASR #10...|
00001990 18 20 20 20 20 20 20 20 20 53 54 52 20 20 20 20 |. STR |
000019a0 20 6e 2c 61 62 0d 0c b2 1b 20 20 20 20 20 20 20 | n,ab.... |
000019b0 20 53 55 42 20 20 20 20 20 74 2c 63 78 2c 61 78 | SUB t,cx,ax|
000019c0 0d 0c bc 1b 20 20 20 20 20 20 20 20 53 55 42 20 |.... SUB |
000019d0 20 20 20 20 6e 2c 63 79 2c 61 79 0d 0c c6 22 20 | n,cy,ay..." |
000019e0 20 20 20 20 20 20 20 4c 44 52 20 20 20 20 20 6e | LDR n|
000019f0 2c 5b 71 2c 6e 2c 4c 53 4c 20 23 32 5d 0d 0c d0 |,[q,n,LSL #2]...|
00001a00 19 20 20 20 20 20 20 20 20 4d 55 4c 20 20 20 20 |. MUL |
00001a10 20 6e 2c 74 2c 6e 0d 0c da 1f 20 20 20 20 20 20 | n,t,n.... |
00001a20 20 20 4d 4f 56 20 20 20 20 20 6e 2c 6e 2c 41 53 | MOV n,n,AS|
00001a30 52 20 23 31 30 0d 0c e4 18 20 20 20 20 20 20 20 |R #10.... |
00001a40 20 53 54 52 20 20 20 20 20 6e 2c 61 63 0d 0c ee | STR n,ac...|
00001a50 1b 20 20 20 20 20 20 20 20 53 55 42 20 20 20 20 |. SUB |
00001a60 20 74 2c 64 78 2c 62 78 0d 0c f8 1b 20 20 20 20 | t,dx,bx.... |
00001a70 20 20 20 20 53 55 42 20 20 20 20 20 6e 2c 64 79 | SUB n,dy|
00001a80 2c 62 79 0d 0d 02 22 20 20 20 20 20 20 20 20 4c |,by..." L|
00001a90 44 52 20 20 20 20 20 6e 2c 5b 71 2c 6e 2c 4c 53 |DR n,[q,n,LS|
00001aa0 4c 20 23 32 5d 0d 0d 0c 19 20 20 20 20 20 20 20 |L #2].... |
00001ab0 20 4d 55 4c 20 20 20 20 20 6e 2c 74 2c 6e 0d 0d | MUL n,t,n..|
00001ac0 16 1f 20 20 20 20 20 20 20 20 4d 4f 56 20 20 20 |.. MOV |
00001ad0 20 20 6e 2c 6e 2c 41 53 52 20 23 31 30 0d 0d 20 | n,n,ASR #10.. |
00001ae0 18 20 20 20 20 20 20 20 20 53 54 52 20 20 20 20 |. STR |
00001af0 20 6e 2c 62 64 0d 0d 2a 1b 20 20 20 20 20 20 20 | n,bd..*. |
00001b00 20 53 55 42 20 20 20 20 20 74 2c 64 78 2c 63 78 | SUB t,dx,cx|
00001b10 0d 0d 34 1b 20 20 20 20 20 20 20 20 53 55 42 20 |..4. SUB |
00001b20 20 20 20 20 6e 2c 64 79 2c 63 79 0d 0d 3e 22 20 | n,dy,cy..>" |
00001b30 20 20 20 20 20 20 20 4c 44 52 20 20 20 20 20 6e | LDR n|
00001b40 2c 5b 71 2c 6e 2c 4c 53 4c 20 23 32 5d 0d 0d 48 |,[q,n,LSL #2]..H|
00001b50 19 20 20 20 20 20 20 20 20 4d 55 4c 20 20 20 20 |. MUL |
00001b60 20 6e 2c 74 2c 6e 0d 0d 52 1f 20 20 20 20 20 20 | n,t,n..R. |
00001b70 20 20 4d 4f 56 20 20 20 20 20 6e 2c 6e 2c 41 53 | MOV n,n,AS|
00001b80 52 20 23 31 30 0d 0d 5c 18 20 20 20 20 20 20 20 |R #10..\. |
00001b90 20 53 54 52 20 20 20 20 20 6e 2c 63 64 0d 0d 66 | STR n,cd..f|
00001ba0 1b 20 20 20 20 20 20 20 20 53 55 42 20 20 20 20 |. SUB |
00001bb0 20 61 2c 62 79 2c 61 79 0d 0d 70 1b 20 20 20 20 | a,by,ay..p. |
00001bc0 20 20 20 20 53 55 42 20 20 20 20 20 62 2c 63 79 | SUB b,cy|
00001bd0 2c 62 79 0d 0d 7a 1b 20 20 20 20 20 20 20 20 53 |,by..z. S|
00001be0 55 42 20 20 20 20 20 63 2c 64 79 2c 63 79 0d 0d |UB c,dy,cy..|
00001bf0 84 18 20 20 20 20 20 20 20 20 53 54 52 20 20 20 |.. STR |
00001c00 20 20 61 2c 61 61 0d 0d 8e 18 20 20 20 20 20 20 | a,aa.... |
00001c10 20 20 53 54 52 20 20 20 20 20 62 2c 62 62 0d 0d | STR b,bb..|
00001c20 98 18 20 20 20 20 20 20 20 20 53 54 52 20 20 20 |.. STR |
00001c30 20 20 63 2c 63 63 0d 0d a2 1c 20 20 20 20 20 20 | c,cc.... |
00001c40 20 20 4c 44 52 20 20 20 20 20 6f 2c 73 63 72 65 | LDR o,scre|
00001c50 65 6e 0d 0d ac 1a 20 20 20 20 20 20 20 20 4c 44 |en.... LD|
00001c60 52 20 20 20 20 20 63 6f 6c 2c 6b 6c 0d 0d b6 22 |R col,kl..."|
00001c70 20 20 20 20 20 20 20 20 41 44 44 20 20 20 20 20 | ADD |
00001c80 74 2c 61 79 2c 61 79 2c 4c 53 4c 20 23 32 0d 0d |t,ay,ay,LSL #2..|
00001c90 c0 20 20 20 20 20 20 20 20 20 41 44 44 20 20 20 |. ADD |
00001ca0 20 20 6f 2c 6f 2c 74 2c 4c 53 4c 20 23 36 0d 0d | o,o,t,LSL #6..|
00001cb0 ca 23 20 20 20 20 20 20 20 20 41 44 44 20 20 20 |.# ADD |
00001cc0 20 20 63 34 2c 63 34 2c 63 34 2c 4c 53 4c 20 23 | c4,c4,c4,LSL #|
00001cd0 38 0d 0d d4 24 20 20 20 20 20 20 20 20 41 44 44 |8...$ ADD|
00001ce0 20 20 20 20 20 63 34 2c 63 34 2c 63 34 2c 4c 53 | c4,c4,c4,LS|
00001cf0 4c 20 23 31 36 0d 0d de 19 20 20 20 20 20 20 20 |L #16.... |
00001d00 20 4d 4f 56 20 20 20 20 20 63 31 2c 63 34 0d 0d | MOV c1,c4..|
00001d10 e8 19 20 20 20 20 20 20 20 20 4d 4f 56 20 20 20 |.. MOV |
00001d20 20 20 63 32 2c 63 34 0d 0d f2 19 20 20 20 20 20 | c2,c4.... |
00001d30 20 20 20 4d 4f 56 20 20 20 20 20 63 33 2c 63 34 | MOV c3,c4|
00001d40 0d 0d fc 19 20 20 20 20 20 20 20 20 4c 44 52 20 |.... LDR |
00001d50 20 20 20 20 63 74 2c 61 61 0d 0e 06 19 20 20 20 | ct,aa.... |
00001d60 20 20 20 20 20 43 4d 50 20 20 20 20 20 63 74 2c | CMP ct,|
00001d70 23 30 0d 0e 10 19 20 20 20 20 20 20 20 20 4c 44 |#0.... LD|
00001d80 52 20 20 20 20 20 74 2c 61 78 64 0d 0e 1a 1e 20 |R t,axd.... |
00001d90 20 20 20 20 20 20 20 4d 4f 56 20 20 20 20 20 6c | MOV l|
00001da0 2c 74 2c 4c 53 4c 20 23 36 0d 0e 24 1e 20 20 20 |,t,LSL #6..$. |
00001db0 20 20 20 20 20 4d 4f 56 20 20 20 20 20 72 2c 74 | MOV r,t|
00001dc0 2c 4c 53 4c 20 23 36 0d 0e 2e 19 20 20 20 20 20 |,LSL #6.... |
00001dd0 20 20 20 4c 44 52 20 20 20 20 20 6c 61 2c 61 63 | LDR la,ac|
00001de0 0d 0e 38 21 20 20 20 20 20 20 20 20 41 44 44 20 |..8! ADD |
00001df0 20 20 20 20 6c 2c 6c 2c 6c 61 2c 41 53 52 20 23 | l,l,la,ASR #|
00001e00 31 0d 0e 42 1d 20 20 20 20 20 20 20 20 41 44 44 |1..B. ADD|
00001e10 20 20 20 20 20 6c 2c 6c 2c 23 31 3c 3c 35 0d 0e | l,l,#1<<5..|
00001e20 4c 19 20 20 20 20 20 20 20 20 4c 44 52 20 20 20 |L. LDR |
00001e30 20 20 72 61 2c 61 62 0d 0e 56 21 20 20 20 20 20 | ra,ab..V! |
00001e40 20 20 20 41 44 44 20 20 20 20 20 72 2c 72 2c 72 | ADD r,r,r|
00001e50 61 2c 41 53 52 20 23 31 0d 0e 60 1d 20 20 20 20 |a,ASR #1..`. |
00001e60 20 20 20 20 41 44 44 20 20 20 20 20 72 2c 72 2c | ADD r,r,|
00001e70 23 31 3c 3c 35 0d 0e 6a 19 20 20 20 20 20 20 20 |#1<<5..j. |
00001e80 20 42 4c 4e 45 20 20 20 20 70 69 65 63 65 0d 0e | BLNE piece..|
00001e90 74 19 20 20 20 20 20 20 20 20 4c 44 52 20 20 20 |t. LDR |
00001ea0 20 20 63 74 2c 62 62 0d 0e 7e 19 20 20 20 20 20 | ct,bb..~. |
00001eb0 20 20 20 43 4d 50 20 20 20 20 20 63 74 2c 23 30 | CMP ct,#0|
00001ec0 0d 0e 88 19 20 20 20 20 20 20 20 20 4c 44 52 20 |.... LDR |
00001ed0 20 20 20 20 74 2c 62 78 64 0d 0e 92 1e 20 20 20 | t,bxd.... |
00001ee0 20 20 20 20 20 4d 4f 56 20 20 20 20 20 72 2c 74 | MOV r,t|
00001ef0 2c 4c 53 4c 20 23 36 0d 0e 9c 19 20 20 20 20 20 |,LSL #6.... |
00001f00 20 20 20 4c 44 52 20 20 20 20 20 72 61 2c 62 64 | LDR ra,bd|
00001f10 0d 0e a6 21 20 20 20 20 20 20 20 20 41 44 44 20 |...! ADD |
00001f20 20 20 20 20 72 2c 72 2c 72 61 2c 41 53 52 20 23 | r,r,ra,ASR #|
00001f30 31 0d 0e b0 1d 20 20 20 20 20 20 20 20 41 44 44 |1.... ADD|
00001f40 20 20 20 20 20 72 2c 72 2c 23 31 3c 3c 35 0d 0e | r,r,#1<<5..|
00001f50 ba 19 20 20 20 20 20 20 20 20 42 4c 4e 45 20 20 |.. BLNE |
00001f60 20 20 70 69 65 63 65 0d 0e c4 19 20 20 20 20 20 | piece.... |
00001f70 20 20 20 4c 44 52 20 20 20 20 20 63 74 2c 63 63 | LDR ct,cc|
00001f80 0d 0e ce 19 20 20 20 20 20 20 20 20 43 4d 50 20 |.... CMP |
00001f90 20 20 20 20 63 74 2c 23 30 0d 0e d8 19 20 20 20 | ct,#0.... |
00001fa0 20 20 20 20 20 4c 44 52 20 20 20 20 20 74 2c 63 | LDR t,c|
00001fb0 78 64 0d 0e e2 1e 20 20 20 20 20 20 20 20 4d 4f |xd.... MO|
00001fc0 56 20 20 20 20 20 6c 2c 74 2c 4c 53 4c 20 23 36 |V l,t,LSL #6|
00001fd0 0d 0e ec 19 20 20 20 20 20 20 20 20 4c 44 52 20 |.... LDR |
00001fe0 20 20 20 20 6c 61 2c 63 64 0d 0e f6 21 20 20 20 | la,cd...! |
00001ff0 20 20 20 20 20 41 44 44 20 20 20 20 20 6c 2c 6c | ADD l,l|
00002000 2c 6c 61 2c 41 53 52 20 23 31 0d 0f 00 1d 20 20 |,la,ASR #1.... |
00002010 20 20 20 20 20 20 41 44 44 20 20 20 20 20 6c 2c | ADD l,|
00002020 6c 2c 23 31 3c 3c 35 0d 0f 0a 19 20 20 20 20 20 |l,#1<<5.... |
00002030 20 20 20 42 4c 4e 45 20 20 20 20 70 69 65 63 65 | BLNE piece|
00002040 0d 0f 14 1e 20 20 20 20 20 20 20 20 4c 44 4d 46 |.... LDMF|
00002050 44 20 20 20 28 73 70 29 21 2c 7b 70 63 7d 0d 0f |D (sp)!,{pc}..|
00002060 1e 04 0d 0f 28 1c 2e 71 32 20 20 20 20 20 4c 44 |....(..q2 LD|
00002070 52 20 20 20 20 20 71 2c 64 69 74 61 62 64 0d 0f |R q,ditabd..|
00002080 32 1b 20 20 20 20 20 20 20 20 53 55 42 20 20 20 |2. SUB |
00002090 20 20 74 2c 62 78 2c 61 78 0d 0f 3c 1b 20 20 20 | t,bx,ax..<. |
000020a0 20 20 20 20 20 53 55 42 20 20 20 20 20 6e 2c 62 | SUB n,b|
000020b0 79 2c 61 79 0d 0f 46 22 20 20 20 20 20 20 20 20 |y,ay..F" |
000020c0 4c 44 52 20 20 20 20 20 6e 2c 5b 71 2c 6e 2c 4c |LDR n,[q,n,L|
000020d0 53 4c 20 23 32 5d 0d 0f 50 19 20 20 20 20 20 20 |SL #2]..P. |
000020e0 20 20 4d 55 4c 20 20 20 20 20 6e 2c 74 2c 6e 0d | MUL n,t,n.|
000020f0 0f 5a 1f 20 20 20 20 20 20 20 20 4d 4f 56 20 20 |.Z. MOV |
00002100 20 20 20 6e 2c 6e 2c 41 53 52 20 23 31 30 0d 0f | n,n,ASR #10..|
00002110 64 18 20 20 20 20 20 20 20 20 53 54 52 20 20 20 |d. STR |
00002120 20 20 6e 2c 61 62 0d 0f 6e 1b 20 20 20 20 20 20 | n,ab..n. |
00002130 20 20 53 55 42 20 20 20 20 20 74 2c 63 78 2c 62 | SUB t,cx,b|
00002140 78 0d 0f 78 1b 20 20 20 20 20 20 20 20 53 55 42 |x..x. SUB|
00002150 20 20 20 20 20 6e 2c 63 79 2c 62 79 0d 0f 82 22 | n,cy,by..."|
00002160 20 20 20 20 20 20 20 20 4c 44 52 20 20 20 20 20 | LDR |
00002170 6e 2c 5b 71 2c 6e 2c 4c 53 4c 20 23 32 5d 0d 0f |n,[q,n,LSL #2]..|
00002180 8c 19 20 20 20 20 20 20 20 20 4d 55 4c 20 20 20 |.. MUL |
00002190 20 20 6e 2c 74 2c 6e 0d 0f 96 1f 20 20 20 20 20 | n,t,n.... |
000021a0 20 20 20 4d 4f 56 20 20 20 20 20 6e 2c 6e 2c 41 | MOV n,n,A|
000021b0 53 52 20 23 31 30 0d 0f a0 18 20 20 20 20 20 20 |SR #10.... |
000021c0 20 20 53 54 52 20 20 20 20 20 6e 2c 62 63 0d 0f | STR n,bc..|
000021d0 aa 1b 20 20 20 20 20 20 20 20 53 55 42 20 20 20 |.. SUB |
000021e0 20 20 74 2c 64 78 2c 63 78 0d 0f b4 1b 20 20 20 | t,dx,cx.... |
000021f0 20 20 20 20 20 53 55 42 20 20 20 20 20 6e 2c 64 | SUB n,d|
00002200 79 2c 63 79 0d 0f be 22 20 20 20 20 20 20 20 20 |y,cy..." |
00002210 4c 44 52 20 20 20 20 20 6e 2c 5b 71 2c 6e 2c 4c |LDR n,[q,n,L|
00002220 53 4c 20 23 32 5d 0d 0f c8 19 20 20 20 20 20 20 |SL #2].... |
00002230 20 20 4d 55 4c 20 20 20 20 20 6e 2c 74 2c 6e 0d | MUL n,t,n.|
00002240 0f d2 1f 20 20 20 20 20 20 20 20 4d 4f 56 20 20 |... MOV |
00002250 20 20 20 6e 2c 6e 2c 41 53 52 20 23 31 30 0d 0f | n,n,ASR #10..|
00002260 dc 18 20 20 20 20 20 20 20 20 53 54 52 20 20 20 |.. STR |
00002270 20 20 6e 2c 63 64 0d 0f e6 1b 20 20 20 20 20 20 | n,cd.... |
00002280 20 20 53 55 42 20 20 20 20 20 74 2c 64 78 2c 61 | SUB t,dx,a|
00002290 78 0d 0f f0 1b 20 20 20 20 20 20 20 20 53 55 42 |x.... SUB|
000022a0 20 20 20 20 20 6e 2c 64 79 2c 61 79 0d 0f fa 22 | n,dy,ay..."|
000022b0 20 20 20 20 20 20 20 20 4c 44 52 20 20 20 20 20 | LDR |
000022c0 6e 2c 5b 71 2c 6e 2c 4c 53 4c 20 23 32 5d 0d 10 |n,[q,n,LSL #2]..|
000022d0 04 19 20 20 20 20 20 20 20 20 4d 55 4c 20 20 20 |.. MUL |
000022e0 20 20 6e 2c 74 2c 6e 0d 10 0e 1f 20 20 20 20 20 | n,t,n.... |
000022f0 20 20 20 4d 4f 56 20 20 20 20 20 6e 2c 6e 2c 41 | MOV n,n,A|
00002300 53 52 20 23 31 30 0d 10 18 18 20 20 20 20 20 20 |SR #10.... |
00002310 20 20 53 54 52 20 20 20 20 20 6e 2c 61 64 0d 10 | STR n,ad..|
00002320 22 1b 20 20 20 20 20 20 20 20 53 55 42 20 20 20 |". SUB |
00002330 20 20 61 2c 62 79 2c 61 79 0d 10 2c 1b 20 20 20 | a,by,ay..,. |
00002340 20 20 20 20 20 53 55 42 20 20 20 20 20 62 2c 63 | SUB b,c|
00002350 79 2c 62 79 0d 10 36 1b 20 20 20 20 20 20 20 20 |y,by..6. |
00002360 53 55 42 20 20 20 20 20 63 2c 64 79 2c 63 79 0d |SUB c,dy,cy.|
00002370 10 40 18 20 20 20 20 20 20 20 20 53 54 52 20 20 |.@. STR |
00002380 20 20 20 61 2c 61 61 0d 10 4a 18 20 20 20 20 20 | a,aa..J. |
00002390 20 20 20 53 54 52 20 20 20 20 20 62 2c 62 62 0d | STR b,bb.|
000023a0 10 54 18 20 20 20 20 20 20 20 20 53 54 52 20 20 |.T. STR |
000023b0 20 20 20 63 2c 63 63 0d 10 5e 1c 20 20 20 20 20 | c,cc..^. |
000023c0 20 20 20 4c 44 52 20 20 20 20 20 6f 2c 73 63 72 | LDR o,scr|
000023d0 65 65 6e 0d 10 68 1a 20 20 20 20 20 20 20 20 4c |een..h. L|
000023e0 44 52 20 20 20 20 20 63 6f 6c 2c 6b 6c 0d 10 72 |DR col,kl..r|
000023f0 22 20 20 20 20 20 20 20 20 41 44 44 20 20 20 20 |" ADD |
00002400 20 74 2c 61 79 2c 61 79 2c 4c 53 4c 20 23 32 0d | t,ay,ay,LSL #2.|
00002410 10 7c 20 20 20 20 20 20 20 20 20 41 44 44 20 20 |.| ADD |
00002420 20 20 20 6f 2c 6f 2c 74 2c 4c 53 4c 20 23 36 0d | o,o,t,LSL #6.|
00002430 10 86 23 20 20 20 20 20 20 20 20 41 44 44 20 20 |..# ADD |
00002440 20 20 20 63 34 2c 63 34 2c 63 34 2c 4c 53 4c 20 | c4,c4,c4,LSL |
00002450 23 38 0d 10 90 24 20 20 20 20 20 20 20 20 41 44 |#8...$ AD|
00002460 44 20 20 20 20 20 63 34 2c 63 34 2c 63 34 2c 4c |D c4,c4,c4,L|
00002470 53 4c 20 23 31 36 0d 10 9a 19 20 20 20 20 20 20 |SL #16.... |
00002480 20 20 4d 4f 56 20 20 20 20 20 63 31 2c 63 34 0d | MOV c1,c4.|
00002490 10 a4 19 20 20 20 20 20 20 20 20 4d 4f 56 20 20 |... MOV |
000024a0 20 20 20 63 32 2c 63 34 0d 10 ae 19 20 20 20 20 | c2,c4.... |
000024b0 20 20 20 20 4d 4f 56 20 20 20 20 20 63 33 2c 63 | MOV c3,c|
000024c0 34 0d 10 b8 19 20 20 20 20 20 20 20 20 4c 44 52 |4.... LDR|
000024d0 20 20 20 20 20 63 74 2c 61 61 0d 10 c2 19 20 20 | ct,aa.... |
000024e0 20 20 20 20 20 20 43 4d 50 20 20 20 20 20 63 74 | CMP ct|
000024f0 2c 23 30 0d 10 cc 19 20 20 20 20 20 20 20 20 4c |,#0.... L|
00002500 44 52 20 20 20 20 20 74 2c 61 78 64 0d 10 d6 1e |DR t,axd....|
00002510 20 20 20 20 20 20 20 20 4d 4f 56 20 20 20 20 20 | MOV |
00002520 6c 2c 74 2c 4c 53 4c 20 23 36 0d 10 e0 1e 20 20 |l,t,LSL #6.... |
00002530 20 20 20 20 20 20 4d 4f 56 20 20 20 20 20 72 2c | MOV r,|
00002540 74 2c 4c 53 4c 20 23 36 0d 10 ea 19 20 20 20 20 |t,LSL #6.... |
00002550 20 20 20 20 4c 44 52 20 20 20 20 20 6c 61 2c 61 | LDR la,a|
00002560 64 0d 10 f4 21 20 20 20 20 20 20 20 20 41 44 44 |d...! ADD|
00002570 20 20 20 20 20 6c 2c 6c 2c 6c 61 2c 41 53 52 20 | l,l,la,ASR |
00002580 23 31 0d 10 fe 1d 20 20 20 20 20 20 20 20 41 44 |#1.... AD|
00002590 44 20 20 20 20 20 6c 2c 6c 2c 23 31 3c 3c 35 0d |D l,l,#1<<5.|
000025a0 11 08 19 20 20 20 20 20 20 20 20 4c 44 52 20 20 |... LDR |
000025b0 20 20 20 72 61 2c 61 62 0d 11 12 21 20 20 20 20 | ra,ab...! |
000025c0 20 20 20 20 41 44 44 20 20 20 20 20 72 2c 72 2c | ADD r,r,|
000025d0 72 61 2c 41 53 52 20 23 31 0d 11 1c 1d 20 20 20 |ra,ASR #1.... |
000025e0 20 20 20 20 20 41 44 44 20 20 20 20 20 72 2c 72 | ADD r,r|
000025f0 2c 23 31 3c 3c 35 0d 11 26 19 20 20 20 20 20 20 |,#1<<5..&. |
00002600 20 20 42 4c 4e 45 20 20 20 20 70 69 65 63 65 0d | BLNE piece.|
00002610 11 30 19 20 20 20 20 20 20 20 20 4c 44 52 20 20 |.0. LDR |
00002620 20 20 20 63 74 2c 62 62 0d 11 3a 19 20 20 20 20 | ct,bb..:. |
00002630 20 20 20 20 43 4d 50 20 20 20 20 20 63 74 2c 23 | CMP ct,#|
00002640 30 0d 11 44 19 20 20 20 20 20 20 20 20 4c 44 52 |0..D. LDR|
00002650 20 20 20 20 20 74 2c 62 78 64 0d 11 4e 1e 20 20 | t,bxd..N. |
00002660 20 20 20 20 20 20 4d 4f 56 20 20 20 20 20 72 2c | MOV r,|
00002670 74 2c 4c 53 4c 20 23 36 0d 11 58 19 20 20 20 20 |t,LSL #6..X. |
00002680 20 20 20 20 4c 44 52 20 20 20 20 20 72 61 2c 62 | LDR ra,b|
00002690 63 0d 11 62 21 20 20 20 20 20 20 20 20 41 44 44 |c..b! ADD|
000026a0 20 20 20 20 20 72 2c 72 2c 72 61 2c 41 53 52 20 | r,r,ra,ASR |
000026b0 23 31 0d 11 6c 1d 20 20 20 20 20 20 20 20 41 44 |#1..l. AD|
000026c0 44 20 20 20 20 20 72 2c 72 2c 23 31 3c 3c 35 0d |D r,r,#1<<5.|
000026d0 11 76 19 20 20 20 20 20 20 20 20 42 4c 4e 45 20 |.v. BLNE |
000026e0 20 20 20 70 69 65 63 65 0d 11 80 19 20 20 20 20 | piece.... |
000026f0 20 20 20 20 4c 44 52 20 20 20 20 20 63 74 2c 63 | LDR ct,c|
00002700 63 0d 11 8a 19 20 20 20 20 20 20 20 20 43 4d 50 |c.... CMP|
00002710 20 20 20 20 20 63 74 2c 23 30 0d 11 94 19 20 20 | ct,#0.... |
00002720 20 20 20 20 20 20 4c 44 52 20 20 20 20 20 74 2c | LDR t,|
00002730 63 78 64 0d 11 9e 1e 20 20 20 20 20 20 20 20 4d |cxd.... M|
00002740 4f 56 20 20 20 20 20 72 2c 74 2c 4c 53 4c 20 23 |OV r,t,LSL #|
00002750 36 0d 11 a8 19 20 20 20 20 20 20 20 20 4c 44 52 |6.... LDR|
00002760 20 20 20 20 20 72 61 2c 63 64 0d 11 b2 21 20 20 | ra,cd...! |
00002770 20 20 20 20 20 20 41 44 44 20 20 20 20 20 72 2c | ADD r,|
00002780 72 2c 72 61 2c 41 53 52 20 23 31 0d 11 bc 1d 20 |r,ra,ASR #1.... |
00002790 20 20 20 20 20 20 20 41 44 44 20 20 20 20 20 72 | ADD r|
000027a0 2c 72 2c 23 31 3c 3c 35 0d 11 c6 19 20 20 20 20 |,r,#1<<5.... |
000027b0 20 20 20 20 42 4c 4e 45 20 20 20 20 70 69 65 63 | BLNE piec|
000027c0 65 0d 11 d0 1e 20 20 20 20 20 20 20 20 4c 44 4d |e.... LDM|
000027d0 46 44 20 20 20 28 73 70 29 21 2c 7b 70 63 7d 0d |FD (sp)!,{pc}.|
000027e0 11 da 04 0d 11 e4 20 2e 70 69 65 63 65 20 20 53 |...... .piece S|
000027f0 54 4d 46 44 20 20 20 28 73 70 29 21 2c 7b 6c 69 |TMFD (sp)!,{li|
00002800 6e 6b 7d 0d 11 ee 17 2e 6c 6f 20 20 20 20 20 43 |nk}.....lo C|
00002810 4d 50 20 20 20 20 20 6c 2c 72 0d 11 f8 21 20 20 |MP l,r...! |
00002820 20 20 20 20 20 20 41 44 44 4c 4f 20 20 20 78 6c | ADDLO xl|
00002830 2c 6f 2c 6c 2c 4c 53 52 20 23 36 0d 12 02 21 20 |,o,l,LSR #6...! |
00002840 20 20 20 20 20 20 20 41 44 44 4c 4f 20 20 20 78 | ADDLO x|
00002850 72 2c 6f 2c 72 2c 4c 53 52 20 23 36 0d 12 0c 21 |r,o,r,LSR #6...!|
00002860 20 20 20 20 20 20 20 20 41 44 44 48 53 20 20 20 | ADDHS |
00002870 78 6c 2c 6f 2c 72 2c 4c 53 52 20 23 36 0d 12 16 |xl,o,r,LSR #6...|
00002880 21 20 20 20 20 20 20 20 20 41 44 44 48 53 20 20 |! ADDHS |
00002890 20 78 72 2c 6f 2c 6c 2c 4c 53 52 20 23 36 0d 12 | xr,o,l,LSR #6..|
000028a0 20 1b 20 20 20 20 20 20 20 20 53 55 42 53 20 20 | . SUBS |
000028b0 20 20 74 2c 78 72 2c 78 6c 0d 12 2a 1b 20 20 20 | t,xr,xl..*. |
000028c0 20 20 20 20 20 42 45 51 20 20 20 20 20 65 6e 64 | BEQ end|
000028d0 73 70 61 6e 0d 12 34 18 20 20 20 20 20 20 20 20 |span..4. |
000028e0 43 4d 50 20 20 20 20 20 74 2c 23 32 0d 12 3e 1b |CMP t,#2..>.|
000028f0 20 20 20 20 20 20 20 20 53 54 52 4c 53 42 20 20 | STRLSB |
00002900 63 31 2c 5b 78 6c 5d 0d 12 48 1f 20 20 20 20 20 |c1,[xl]..H. |
00002910 20 20 20 53 54 52 4c 53 42 20 20 63 31 2c 5b 78 | STRLSB c1,[x|
00002920 72 2c 23 2d 31 5d 0d 12 52 1b 20 20 20 20 20 20 |r,#-1]..R. |
00002930 20 20 42 4c 53 20 20 20 20 20 65 6e 64 73 70 61 | BLS endspa|
00002940 6e 0d 12 5c 1b 20 20 20 20 20 20 20 20 54 53 54 |n..\. TST|
00002950 20 20 20 20 20 78 6c 2c 23 25 30 31 0d 12 66 1e | xl,#%01..f.|
00002960 20 20 20 20 20 20 20 20 53 54 52 4e 45 42 20 20 | STRNEB |
00002970 63 31 2c 5b 78 6c 5d 2c 23 31 0d 12 70 1b 20 20 |c1,[xl],#1..p. |
00002980 20 20 20 20 20 20 54 53 54 20 20 20 20 20 78 6c | TST xl|
00002990 2c 23 25 31 30 0d 12 7a 1e 20 20 20 20 20 20 20 |,#%10..z. |
000029a0 20 53 54 52 4e 45 42 20 20 63 32 2c 5b 78 6c 5d | STRNEB c2,[xl]|
000029b0 2c 23 31 0d 12 84 1e 20 20 20 20 20 20 20 20 53 |,#1.... S|
000029c0 54 52 4e 45 42 20 20 63 31 2c 5b 78 6c 5d 2c 23 |TRNEB c1,[xl],#|
000029d0 31 0d 12 8e 1b 20 20 20 20 20 20 20 20 54 53 54 |1.... TST|
000029e0 20 20 20 20 20 78 72 2c 23 25 30 31 0d 12 98 20 | xr,#%01... |
000029f0 20 20 20 20 20 20 20 20 53 54 52 4e 45 42 20 20 | STRNEB |
00002a00 63 32 2c 5b 78 72 2c 23 2d 31 5d 21 0d 12 a2 1b |c2,[xr,#-1]!....|
00002a10 20 20 20 20 20 20 20 20 54 53 54 20 20 20 20 20 | TST |
00002a20 78 72 2c 23 25 31 30 0d 12 ac 20 20 20 20 20 20 |xr,#%10... |
00002a30 20 20 20 53 54 52 4e 45 42 20 20 63 31 2c 5b 78 | STRNEB c1,[x|
00002a40 72 2c 23 2d 31 5d 21 0d 12 b6 20 20 20 20 20 20 |r,#-1]!... |
00002a50 20 20 20 53 54 52 4e 45 42 20 20 63 32 2c 5b 78 | STRNEB c2,[x|
00002a60 72 2c 23 2d 31 5d 21 0d 12 c0 1b 20 20 20 20 20 |r,#-1]!.... |
00002a70 20 20 20 53 55 42 53 20 20 20 20 74 2c 78 72 2c | SUBS t,xr,|
00002a80 78 6c 0d 12 ca 1e 20 20 20 20 20 20 20 20 4d 4f |xl.... MO|
00002a90 56 53 20 20 20 20 74 2c 74 2c 4c 53 52 20 23 33 |VS t,t,LSR #3|
00002aa0 0d 12 d4 1e 20 20 20 20 20 20 20 20 53 54 52 43 |.... STRC|
00002ab0 53 20 20 20 63 31 2c 5b 78 6c 5d 2c 23 34 0d 12 |S c1,[xl],#4..|
00002ac0 de 1e 20 20 20 20 20 20 20 20 4d 4f 56 53 20 20 |.. MOVS |
00002ad0 20 20 74 2c 74 2c 4c 53 52 20 23 31 0d 12 e8 21 | t,t,LSR #1...!|
00002ae0 20 20 20 20 20 20 20 20 53 54 4d 43 53 49 41 20 | STMCSIA |
00002af0 28 78 6c 29 21 2c 7b 63 31 2c 63 32 7d 0d 12 f2 |(xl)!,{c1,c2}...|
00002b00 1b 20 20 20 20 20 20 20 20 41 44 52 20 20 20 20 |. ADR |
00002b10 20 78 72 2c 62 61 73 65 0d 12 fc 22 20 20 20 20 | xr,base..." |
00002b20 20 20 20 20 53 55 42 20 20 20 20 20 70 63 2c 78 | SUB pc,x|
00002b30 72 2c 74 2c 4c 53 4c 20 23 32 0d 13 06 11 20 20 |r,t,LSL #2.... |
00002b40 20 20 20 20 20 20 a4 76 75 6c 63 0d 13 10 09 2e | .vulc.....|
00002b50 62 61 73 65 0d 13 1a 0c 2e 65 6e 64 73 70 61 6e |base.....endspan|
00002b60 0d 13 24 1a 20 20 20 20 20 20 20 20 41 44 44 20 |..$. ADD |
00002b70 20 20 20 20 6c 2c 6c 2c 6c 61 0d 13 2e 1a 20 20 | l,l,la.... |
00002b80 20 20 20 20 20 20 41 44 44 20 20 20 20 20 72 2c | ADD r,|
00002b90 72 2c 72 61 0d 13 38 1c 20 20 20 20 20 20 20 20 |r,ra..8. |
00002ba0 41 44 44 20 20 20 20 20 6f 2c 6f 2c 23 33 32 30 |ADD o,o,#320|
00002bb0 0d 13 42 1c 20 20 20 20 20 20 20 20 53 55 42 53 |..B. SUBS|
00002bc0 20 20 20 20 63 74 2c 63 74 2c 23 31 0d 13 4c 16 | ct,ct,#1..L.|
00002bd0 20 20 20 20 20 20 20 20 42 4e 45 20 20 20 20 20 | BNE |
00002be0 6c 6f 0d 13 56 1e 20 20 20 20 20 20 20 20 4c 44 |lo..V. LD|
00002bf0 4d 46 44 20 20 20 28 73 70 29 21 2c 7b 70 63 7d |MFD (sp)!,{pc}|
00002c00 0d 13 60 05 5d 0d 13 6a 05 ed 0d 13 74 05 e1 0d |..`.]..j....t...|
00002c10 13 7e 05 3a 0d 13 88 0b dd 20 a4 76 75 6c 63 0d |.~.:..... .vulc.|
00002c20 13 92 0e e3 20 69 3d 31 20 b8 20 32 30 0d 13 9c |.... i=1 . 20...|
00002c30 0a 5b 4f 50 54 20 70 0d 13 a6 27 20 20 20 20 20 |.[OPT p...' |
00002c40 20 20 20 53 54 4d 49 41 20 20 20 28 78 6c 29 21 | STMIA (xl)!|
00002c50 2c 7b 63 31 2c 63 32 2c 63 33 2c 63 34 7d 0d 13 |,{c1,c2,c3,c4}..|
00002c60 b0 05 5d 0d 13 ba 05 ed 0d 13 c4 07 3d 22 22 0d |..].........="".|
00002c70 13 ce 05 3a 0d 13 d8 17 dd 20 a4 6d 61 78 28 61 |...:..... .max(a|
00002c80 78 2c 61 79 2c 62 78 2c 62 79 29 0d 13 e2 0a 5b |x,ay,bx,by)....[|
00002c90 4f 50 54 20 70 0d 13 ec 19 20 20 20 20 20 20 20 |OPT p.... |
00002ca0 20 43 4d 50 20 20 20 20 20 61 79 2c 62 79 0d 13 | CMP ay,by..|
00002cb0 f6 18 20 20 20 20 20 20 20 20 4d 4f 56 48 49 20 |.. MOVHI |
00002cc0 20 20 74 2c 61 78 0d 14 00 19 20 20 20 20 20 20 | t,ax.... |
00002cd0 20 20 4d 4f 56 48 49 20 20 20 61 78 2c 62 78 0d | MOVHI ax,bx.|
00002ce0 14 0a 18 20 20 20 20 20 20 20 20 4d 4f 56 48 49 |... MOVHI|
00002cf0 20 20 20 62 78 2c 74 0d 14 14 18 20 20 20 20 20 | bx,t.... |
00002d00 20 20 20 4d 4f 56 48 49 20 20 20 74 2c 61 79 0d | MOVHI t,ay.|
00002d10 14 1e 19 20 20 20 20 20 20 20 20 4d 4f 56 48 49 |... MOVHI|
00002d20 20 20 20 61 79 2c 62 79 0d 14 28 18 20 20 20 20 | ay,by..(. |
00002d30 20 20 20 20 4d 4f 56 48 49 20 20 20 62 79 2c 74 | MOVHI by,t|
00002d40 0d 14 32 05 5d 0d 14 3c 06 3d 30 0d ff |..2.]..<.=0..|
00002d4d 
.