home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: ArcFS Archive
(archive/arcFS).
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| ArcFS Archive (archive/arcFS)
| magic
| Supported |
| 100%
| file
| RISC OS archive (ArcFS format)
| default
| |
| 99%
| file
| data
| default
| |
| 100%
| TrID
| Acorn ArcFS Archive
| default
| |
| 100%
| gt2
| Kopftext: 'Archive'
| default (weak)
| |
| 100%
| detectItEasy
| Archive: ArcFS
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | d4 01 00 00 54 03 00 00 |Archive.|....T...|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 61 73 69 6e 7a 2b 62 | 00 00 00 00 b0 01 00 00 |.asinz+b|........|
|00000070| 42 fb ff ff 8a a7 a7 8c | 03 00 30 66 b0 01 00 00 |B.......|..0f....|
|00000080| 24 00 00 00 82 63 6f 6d | 70 6c 65 78 00 00 00 00 |$....com|plex....|
|00000090| e1 1c 00 00 42 fb ff ff | ad b7 17 69 03 00 b0 14 |....B...|...i....|
|000000a0| e1 1c 00 00 f8 01 00 00 | 82 65 78 70 7a 3d 31 00 |........|.expz=1.|
|000000b0| 00 00 00 00 90 01 00 00 | 42 fb ff ff 4b c6 fd 42 |........|B...K..B|
|000000c0| 03 00 f5 b8 90 01 00 00 | fd 1e 00 00 82 66 6f 72 |........|.....for|
|000000d0| 67 74 6d 65 6e 6f 74 00 | de 09 00 00 42 fb ff ff |gtmenot.|....B...|
|000000e0| 03 70 a0 8f 03 00 1c 55 | de 09 00 00 b1 20 00 00 |.p.....U|..... ..|
|000000f0| 82 66 72 61 63 74 61 6c | 61 6e 64 00 2c 0d 00 00 |.fractal|and.,...|
|00000100| 42 fb ff ff 98 01 30 a4 | 03 00 19 c9 2c 0d 00 00 |B.....0.|....,...|
|00000110| b3 2a 00 00 82 67 61 73 | 2d 68 70 2d 63 6f 6c 00 |.*...gas|-hp-col.|
|00000120| 34 19 00 00 42 fb ff ff | 3e 4f af 9e 03 00 df b3 |4...B...|>O......|
|00000130| 34 19 00 00 03 38 00 00 | 82 6a 75 6c 73 69 65 72 |4....8..|.julsier|
|00000140| 70 00 00 00 66 01 00 00 | 41 fb ff ff 26 6d 3a c0 |p...f...|A...&m:.|
|00000150| 03 00 b2 a8 66 01 00 00 | 5b 51 00 00 82 6d 75 6c |....f...|[Q...mul|
|00000160| 74 69 66 61 63 65 00 00 | a0 1e 00 00 42 fb ff ff |tiface..|....B...|
|00000170| 7e d0 f2 80 03 00 12 df | a0 1e 00 00 e5 52 00 00 |~.......|.....R..|
|00000180| 82 4e 45 57 54 4f 4e 50 | 49 00 00 00 3d 03 00 00 |.NEWTONP|I...=...|
|00000190| 42 fb ff ff f2 73 b2 9e | 03 00 02 d4 3d 03 00 00 |B....s..|....=...|
|000001a0| a9 71 00 00 82 52 65 61 | 64 4d 65 00 50 4a 32 00 |.q...Rea|dMe.PJ2.|
|000001b0| e0 00 00 00 43 ff ff ff | 1c 7c 9d 39 03 00 67 cb |....C...|.|.9..g.|
|000001c0| e0 00 00 00 dc 79 00 00 | 82 5a 2d 31 2f 5a 2b 31 |.....y..|.Z-1/Z+1|
|000001d0| 50 4a 32 00 61 02 00 00 | 42 fb ff ff 89 d1 b1 9e |PJ2.a...|B.......|
|000001e0| 03 00 b0 45 61 02 00 00 | 0a 75 00 00 82 5a 2d 31 |...Ea...|.u...Z-1|
|000001f0| 2f 5a 2b 31 50 52 31 00 | 29 02 00 00 42 fb ff ff |/Z+1PR1.|)...B...|
|00000200| 38 bb b1 9e 03 00 6c 76 | 29 02 00 00 8f 77 00 00 |8.....lv|)....w..|
|00000210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000230| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000300| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000350| 00 00 00 00 46 69 6c 65 | 44 61 74 61 82 61 73 69 |....File|Data.asi|
|00000360| 6e 7a 2b 62 00 00 00 00 | b0 01 00 00 42 fb ff ff |nz+b....|....B...|
|00000370| 8a a7 a7 8c 03 00 30 66 | 0d 00 0a 0f f4 20 3e 20 |......0f|..... > |
|00000380| 41 53 49 4e 5a 2b 42 0d | 00 14 11 c8 9b 22 25 2e |ASINZ+B.|....."%.|
|00000390| 43 4f 4d 50 4c 45 58 22 | 0d 00 1e 10 f2 49 4e 49 |COMPLEX"|.....INI|
|000003a0| 54 43 4f 4d 50 4c 45 58 | 0d 00 28 33 eb 20 31 39 |TCOMPLEX|..(3. 19|
|000003b0| 3a e8 22 47 49 56 45 20 | 52 45 41 4c 20 41 4e 44 |:."GIVE |REAL AND|
|000003c0| 20 49 4d 41 47 49 4e 41 | 52 59 20 50 41 52 54 20 | IMAGINA|RY PART |
|000003d0| 4f 46 20 42 22 3b 52 42 | 2c 49 42 0d 00 32 18 eb |OF B";RB|,IB..2..|
|000003e0| 20 31 39 3a fb 33 2c 30 | 2c 32 35 35 2c 30 3a 57 | 19:.3,0|,255,0:W|
|000003f0| 32 3d 31 0d 00 3c 1c 53 | 3d 32 3a 53 25 3d 32 3a |2=1..<.S|=2:S%=2:|
|00000400| f2 53 45 54 28 52 42 2c | 49 42 2c 42 28 29 29 0d |.SET(RB,|IB,B()).|
|00000410| 00 46 12 58 25 3d 30 3a | 59 25 3d 30 3a 58 3d 2d |.F.X%=0:|Y%=0:X=-|
|00000420| 53 0d 00 50 28 ee 20 85 | 20 e7 20 9f 3d 31 37 20 |S..P(. .| . .=17 |
|00000430| e0 20 8b 20 e6 31 2b 28 | 4e 25 20 80 20 31 29 3a |. . .1+(|N% . 1):|
|00000440| f0 36 39 2c 58 25 2c 59 | 25 0d 00 5a 0a 59 25 2b |.69,X%,Y|%..Z.Y%+|
|00000450| 3d 53 25 0d 00 64 57 e7 | 59 25 3e 3d 31 30 32 34 |=S%..dW.|Y%>=1024|
|00000460| 20 59 25 3d 30 3a 58 25 | 2b 3d 53 25 3a 58 3d 28 | Y%=0:X%|+=S%:X=(|
|00000470| 58 25 2d 36 34 30 29 2a | 53 2f 36 34 30 3a e7 58 |X%-640)*|S/640:.X|
|00000480| 25 3e 3d 31 32 38 30 20 | f5 fd be 3d 22 44 22 3a |%>=1280 |...="D":|
|00000490| ff 22 53 43 52 45 45 4e | 53 41 56 45 20 53 49 4e |."SCREEN|SAVE SIN|
|000004a0| 5a 2b 31 2d 50 49 43 22 | 3a e0 0d 00 6e 1e f2 53 |Z+1-PIC"|:...n..S|
|000004b0| 45 54 28 58 2c 28 59 25 | 2d 35 31 32 29 2a 53 2f |ET(X,(Y%|-512)*S/|
|000004c0| 35 31 32 2c 5a 28 29 29 | 0d 00 78 08 4e 25 3d 30 |512,Z())|..x.N%=0|
|000004d0| 0d 00 82 05 f5 0d 00 8c | 25 20 20 f2 53 49 4e 28 |........|% .SIN(|
|000004e0| 5a 28 29 2c 5a 28 29 29 | 3a f2 41 44 44 28 5a 28 |Z(),Z())|:.ADD(Z(|
|000004f0| 29 2c 42 28 29 2c 5a 28 | 29 29 0d 00 96 0b 20 20 |),B(),Z(|)).... |
|00000500| 4e 25 2b 3d 31 0d 00 a0 | 0b fd 20 4e 25 3e 32 30 |N%+=1...|.. N%>20|
|00000510| 0d 00 aa 10 e6 33 3a f0 | 36 39 2c 58 25 2c 59 25 |.....3:.|69,X%,Y%|
|00000520| 0d 00 b4 06 fd a3 0d ff | 46 69 6c 65 44 61 74 61 |........|FileData|
|00000530| 82 63 6f 6d 70 6c 65 78 | 00 00 00 00 e1 1c 00 00 |.complex|........|
|00000540| 42 fb ff ff ad b7 17 69 | 03 00 b0 14 0d 00 0a 3b |B......i|.......;|
|00000550| f4 20 3e 20 25 2e 43 4f | 4d 50 4c 45 58 20 4c 49 |. > %.CO|MPLEX LI|
|00000560| 42 52 41 52 59 20 49 4e | 43 4c 55 44 49 4e 47 20 |BRARY IN|CLUDING |
|00000570| 54 52 41 4e 43 45 44 45 | 4e 54 41 4c 20 46 55 4e |TRANCEDE|NTAL FUN|
|00000580| 43 54 49 4f 4e 53 2e 0d | 00 14 10 f2 49 4e 49 54 |CTIONS..|....INIT|
|00000590| 43 4f 4d 50 4c 45 58 0d | 00 1e 09 f2 48 45 4c 50 |COMPLEX.|....HELP|
|000005a0| 0d 00 28 05 e0 0d 00 32 | 4b f4 2d 2d 2d 2d 2d 2d |..(....2|K.------|
|000005b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005f0| 0d 00 3c 10 f4 20 3e 20 | 54 53 54 43 4d 50 4c 58 |..<.. > |TSTCMPLX|
|00000600| 0d 00 46 18 ee 20 85 20 | c8 9a 20 22 25 2e 43 4f |..F.. . |.. "%.CO|
|00000610| 4d 50 4c 45 58 22 3a f9 | 0d 00 50 10 f2 49 4e 49 |MPLEX":.|..P..INI|
|00000620| 54 43 4f 4d 50 4c 45 58 | 0d 00 5a 09 ee 20 85 20 |TCOMPLEX|..Z.. . |
|00000630| 87 0d 00 64 06 eb 39 0d | 00 6e 22 e3 58 25 3d 30 |...d..9.|.n".X%=0|
|00000640| b8 31 32 38 30 88 34 3a | 58 3d 2d 32 2b 32 2e 35 |.1280.4:|X=-2+2.5|
|00000650| 2a 58 25 2f 31 32 38 30 | 2e 0d 00 78 27 20 20 e3 |*X%/1280|...x' .|
|00000660| 59 25 3d 30 b8 31 30 32 | 34 88 34 3a 59 3d 2d 31 |Y%=0.102|4.4:Y=-1|
|00000670| 2e 32 35 2b 32 2e 35 2a | 59 25 2f 31 30 32 34 2e |.25+2.5*|Y%/1024.|
|00000680| 0d 00 82 15 20 20 20 20 | f2 53 45 54 28 30 2c 30 |.... |.SET(0,0|
|00000690| 2c 5a 28 29 29 0d 00 8c | 15 20 20 20 20 f2 53 45 |,Z())...|. .SE|
|000006a0| 54 28 58 2c 59 2c 43 28 | 29 29 0d 00 96 0c 20 20 |T(X,Y,C(|)).... |
|000006b0| 20 20 4e 25 3d 30 0d 00 | a0 09 20 20 20 20 f5 0d | N%=0..|.. ..|
|000006c0| 00 aa 0f 20 20 20 20 20 | 20 4e 25 2b 3d 31 0d 00 |... | N%+=1..|
|000006d0| b4 1b 20 20 20 20 20 20 | f2 4d 55 4c 28 5a 28 29 |.. |.MUL(Z()|
|000006e0| 2c 5a 28 29 2c 41 28 29 | 29 0d 00 be 1b 20 20 20 |,Z(),A()|).... |
|000006f0| 20 20 20 f2 41 44 44 28 | 41 28 29 2c 43 28 29 2c | .ADD(|A(),C(),|
|00000700| 5a 28 29 29 0d 00 c8 1e | 20 20 20 20 fd 20 4e 25 |Z())....| . N%|
|00000710| 3d 32 30 20 84 20 a4 41 | 42 53 28 5a 28 29 29 3e |=20 . .A|BS(Z())>|
|00000720| 32 2e 0d 00 d2 20 20 20 | 20 20 e7 20 4e 25 3d 32 |2.... | . N%=2|
|00000730| 30 20 e6 30 20 8b 20 e6 | 28 28 4e 25 83 37 29 2b |0 .0 . .|((N%.7)+|
|00000740| 31 29 0d 00 dc 11 20 20 | 20 20 f0 36 39 2c 58 25 |1).... | .69,X%|
|00000750| 2c 59 25 0d 00 e6 07 20 | 20 ed 0d 00 f0 05 ed 0d |,Y%.... | .......|
|00000760| 00 fa 05 e0 0d 01 04 05 | 3a 0d 01 0e 05 3a 0d 01 |........|:....:..|
|00000770| 18 05 3a 0d 01 22 11 f4 | 20 3e 20 54 53 54 43 4d |..:.."..| > TSTCM|
|00000780| 50 4c 58 32 0d 01 2c 18 | ee 20 85 20 c8 9a 20 22 |PLX2..,.|. . .. "|
|00000790| 25 2e 43 4f 4d 50 4c 45 | 58 22 3a f9 0d 01 36 10 |%.COMPLE|X":...6.|
|000007a0| f2 49 4e 49 54 43 4f 4d | 50 4c 45 58 0d 01 40 09 |.INITCOM|PLEX..@.|
|000007b0| 53 3d 31 2e 32 0d 01 4a | 09 ee 20 85 20 87 0d 01 |S=1.2..J|.. . ...|
|000007c0| 54 06 eb 39 0d 01 5e 22 | e3 58 25 3d 30 b8 31 30 |T..9..^"|.X%=0.10|
|000007d0| 32 34 88 34 3a 58 3d 2d | 53 2b 32 2a 53 2a 58 25 |24.4:X=-|S+2*S*X%|
|000007e0| 2f 31 30 32 34 2e 0d 01 | 68 24 20 20 e3 59 25 3d |/1024...|h$ .Y%=|
|000007f0| 30 b8 31 30 32 34 88 34 | 3a 59 3d 2d 53 2b 32 2a |0.1024.4|:Y=-S+2*|
|00000800| 53 2a 59 25 2f 31 30 32 | 34 2e 0d 01 72 15 20 20 |S*Y%/102|4...r. |
|00000810| 20 20 f2 53 45 54 28 58 | 2c 59 2c 5a 28 29 29 0d | .SET(X|,Y,Z()).|
|00000820| 01 7c 16 20 20 20 20 f2 | 53 45 54 28 2e 36 2c 30 |.|. .|SET(.6,0|
|00000830| 2c 43 28 29 29 0d 01 86 | 0c 20 20 20 20 4e 25 3d |,C())...|. N%=|
|00000840| 30 0d 01 90 09 20 20 20 | 20 f5 0d 01 9a 0f 20 20 |0.... | ..... |
|00000850| 20 20 20 20 4e 25 2b 3d | 31 0d 01 a4 1c 20 20 20 | N%+=|1.... |
|00000860| 20 20 20 f2 52 50 4f 57 | 45 52 28 5a 28 29 2c 35 | .RPOW|ER(Z(),5|
|00000870| 2c 41 28 29 29 0d 01 ae | 1b 20 20 20 20 20 20 f2 |,A())...|. .|
|00000880| 41 44 44 28 41 28 29 2c | 43 28 29 2c 5a 28 29 29 |ADD(A(),|C(),Z())|
|00000890| 0d 01 b8 38 20 20 20 20 | fd 20 4e 25 3d 31 30 20 |...8 |. N%=10 |
|000008a0| 84 20 94 28 5a 28 30 29 | 29 3e 31 30 20 84 20 94 |. .(Z(0)|)>10 . .|
|000008b0| 28 5a 28 31 29 29 3e 31 | 30 20 84 20 a4 41 42 53 |(Z(1))>1|0 . .ABS|
|000008c0| 28 5a 28 29 29 3e 31 30 | 0d 01 c2 2b 20 20 20 20 |(Z())>10|...+ |
|000008d0| e7 20 94 28 5a 28 30 29 | 29 3c 31 30 20 84 20 94 |. .(Z(0)|)<10 . .|
|000008e0| 28 5a 28 31 29 29 3c 31 | 30 20 f0 36 39 2c 58 25 |(Z(1))<1|0 .69,X%|
|000008f0| 2c 59 25 0d 01 cc 07 20 | 20 ed 0d 01 d6 05 ed 0d |,Y%.... | .......|
|00000900| 01 e0 05 e0 0d 01 ea 05 | 3a 0d 01 f4 05 3a 0d 01 |........|:....:..|
|00000910| fe 05 3a 0d 02 08 11 f4 | 20 3e 20 54 53 54 43 4d |..:.....| > TSTCM|
|00000920| 50 4c 58 33 0d 02 12 18 | ee 20 85 20 c8 9a 20 22 |PLX3....|. . .. "|
|00000930| 25 2e 43 4f 4d 50 4c 45 | 58 22 3a f9 0d 02 1c 10 |%.COMPLE|X":.....|
|00000940| f2 49 4e 49 54 43 4f 4d | 50 4c 45 58 0d 02 26 09 |.INITCOM|PLEX..&.|
|00000950| 53 3d 31 2e 32 0d 02 30 | 09 ee 20 85 20 87 0d 02 |S=1.2..0|.. . ...|
|00000960| 3a 06 eb 39 0d 02 44 22 | e3 58 25 3d 30 b8 31 30 |:..9..D"|.X%=0.10|
|00000970| 32 34 88 34 3a 58 3d 2d | 53 2b 32 2a 53 2a 58 25 |24.4:X=-|S+2*S*X%|
|00000980| 2f 31 30 32 34 2e 0d 02 | 4e 24 20 20 e3 59 25 3d |/1024...|N$ .Y%=|
|00000990| 30 b8 31 30 32 34 88 34 | 3a 59 3d 2d 53 2b 32 2a |0.1024.4|:Y=-S+2*|
|000009a0| 53 2a 59 25 2f 31 30 32 | 34 2e 0d 02 58 15 20 20 |S*Y%/102|4...X. |
|000009b0| 20 20 f2 53 45 54 28 58 | 2c 59 2c 5a 28 29 29 0d | .SET(X|,Y,Z()).|
|000009c0| 02 62 16 20 20 20 20 f2 | 53 45 54 28 2e 36 2c 30 |.b. .|SET(.6,0|
|000009d0| 2c 43 28 29 29 0d 02 6c | 0c 20 20 20 20 4e 25 3d |,C())..l|. N%=|
|000009e0| 30 0d 02 76 09 20 20 20 | 20 f5 0d 02 80 0f 20 20 |0..v. | ..... |
|000009f0| 20 20 20 20 4e 25 2b 3d | 31 0d 02 8a 1d 20 20 20 | N%+=|1.... |
|00000a00| 20 20 20 f2 50 4f 57 45 | 52 28 5a 28 29 2c 5a 28 | .POWE|R(Z(),Z(|
|00000a10| 29 2c 41 28 29 29 0d 02 | 94 1c 20 20 20 20 20 20 |),A())..|.. |
|00000a20| f2 52 50 4f 57 45 52 28 | 5a 28 29 2c 35 2c 42 28 |.RPOWER(|Z(),5,B(|
|00000a30| 29 29 0d 02 9e 15 20 20 | 20 20 20 20 41 28 29 3d |)).... | A()=|
|00000a40| 41 28 29 2b 42 28 29 0d | 02 a8 1b 20 20 20 20 20 |A()+B().|... |
|00000a50| 20 f2 41 44 44 28 41 28 | 29 2c 43 28 29 2c 5a 28 | .ADD(A(|),C(),Z(|
|00000a60| 29 29 0d 02 b2 38 20 20 | 20 20 fd 20 4e 25 3d 31 |))...8 | . N%=1|
|00000a70| 30 20 84 20 94 28 5a 28 | 30 29 29 3e 31 30 20 84 |0 . .(Z(|0))>10 .|
|00000a80| 20 94 28 5a 28 31 29 29 | 3e 31 30 20 84 20 a4 41 | .(Z(1))|>10 . .A|
|00000a90| 42 53 28 5a 28 29 29 3e | 31 30 0d 02 bc 2b 20 20 |BS(Z())>|10...+ |
|00000aa0| 20 20 e7 20 94 28 5a 28 | 30 29 29 3c 31 30 20 84 | . .(Z(|0))<10 .|
|00000ab0| 20 94 28 5a 28 31 29 29 | 3c 31 30 20 f0 36 39 2c | .(Z(1))|<10 .69,|
|00000ac0| 58 25 2c 59 25 0d 02 c6 | 07 20 20 ed 0d 02 d0 05 |X%,Y%...|. .....|
|00000ad0| ed 0d 02 da 05 e0 0d 02 | e4 05 3a 0d 02 ee 05 3a |........|..:....:|
|00000ae0| 0d 02 f8 05 3a 0d 03 02 | 11 f4 20 3e 20 54 53 54 |....:...|.. > TST|
|00000af0| 43 4d 50 4c 58 34 0d 03 | 0c 18 ee 20 85 20 c8 9a |CMPLX4..|... . ..|
|00000b00| 20 22 25 2e 43 4f 4d 50 | 4c 45 58 22 3a f9 0d 03 | "%.COMP|LEX":...|
|00000b10| 16 10 f2 49 4e 49 54 43 | 4f 4d 50 4c 45 58 0d 03 |...INITC|OMPLEX..|
|00000b20| 20 09 53 3d 32 2e 32 0d | 03 2a 09 ee 20 85 20 87 | .S=2.2.|.*.. . .|
|00000b30| 0d 03 34 06 eb 39 0d 03 | 3e 22 e3 58 25 3d 30 b8 |..4..9..|>".X%=0.|
|00000b40| 31 30 32 34 88 34 3a 58 | 3d 2d 53 2b 32 2a 53 2a |1024.4:X|=-S+2*S*|
|00000b50| 58 25 2f 31 30 32 34 2e | 0d 03 48 24 20 20 e3 59 |X%/1024.|..H$ .Y|
|00000b60| 25 3d 30 b8 31 30 32 34 | 88 34 3a 59 3d 2d 53 2b |%=0.1024|.4:Y=-S+|
|00000b70| 32 2a 53 2a 59 25 2f 31 | 30 32 34 2e 0d 03 52 15 |2*S*Y%/1|024...R.|
|00000b80| 20 20 20 20 f2 53 45 54 | 28 58 2c 59 2c 5a 28 29 | .SET|(X,Y,Z()|
|00000b90| 29 0d 03 5c 16 20 20 20 | 20 f2 53 45 54 28 2e 35 |)..\. | .SET(.5|
|00000ba0| 2c 30 2c 43 28 29 29 0d | 03 66 0c 20 20 20 20 4e |,0,C()).|.f. N|
|00000bb0| 25 3d 30 0d 03 70 09 20 | 20 20 20 f5 0d 03 7a 0f |%=0..p. | ...z.|
|00000bc0| 20 20 20 20 20 20 4e 25 | 2b 3d 31 0d 03 84 17 20 | N%|+=1.... |
|00000bd0| 20 20 20 20 20 f2 53 49 | 4e 28 5a 28 29 2c 41 28 | .SI|N(Z(),A(|
|00000be0| 29 29 0d 03 8e 1c 20 20 | 20 20 20 20 f2 52 50 4f |)).... | .RPO|
|00000bf0| 57 45 52 28 5a 28 29 2c | 32 2c 42 28 29 29 0d 03 |WER(Z(),|2,B())..|
|00000c00| 98 15 20 20 20 20 20 20 | 41 28 29 3d 41 28 29 2b |.. |A()=A()+|
|00000c10| 42 28 29 0d 03 a2 15 20 | 20 20 20 20 20 5a 28 29 |B().... | Z()|
|00000c20| 3d 41 28 29 2b 43 28 29 | 0d 03 ac 38 20 20 20 20 |=A()+C()|...8 |
|00000c30| fd 20 4e 25 3d 31 30 20 | 84 20 94 28 5a 28 30 29 |. N%=10 |. .(Z(0)|
|00000c40| 29 3e 31 30 20 84 20 94 | 28 5a 28 31 29 29 3e 31 |)>10 . .|(Z(1))>1|
|00000c50| 30 20 84 20 a4 41 42 53 | 28 5a 28 29 29 3e 31 30 |0 . .ABS|(Z())>10|
|00000c60| 0d 03 b6 2b 20 20 20 20 | e7 20 94 28 5a 28 30 29 |...+ |. .(Z(0)|
|00000c70| 29 3c 31 30 20 84 20 94 | 28 5a 28 31 29 29 3c 31 |)<10 . .|(Z(1))<1|
|00000c80| 30 20 f0 36 39 2c 58 25 | 2c 59 25 0d 03 c0 07 20 |0 .69,X%|,Y%.... |
|00000c90| 20 ed 0d 03 ca 05 ed 0d | 03 d4 05 e0 0d 03 de 05 | .......|........|
|00000ca0| 3a 0d 03 e8 05 3a 0d 03 | f2 05 3a 0d 03 fc 11 f4 |:....:..|..:.....|
|00000cb0| 20 3e 20 54 53 54 43 4d | 50 4c 58 35 0d 04 06 18 | > TSTCM|PLX5....|
|00000cc0| ee 20 85 20 c8 9a 20 22 | 25 2e 43 4f 4d 50 4c 45 |. . .. "|%.COMPLE|
|00000cd0| 58 22 3a f9 0d 04 10 10 | f2 49 4e 49 54 43 4f 4d |X":.....|.INITCOM|
|00000ce0| 50 4c 45 58 0d 04 1a 09 | 53 3d 33 2e 35 0d 04 24 |PLEX....|S=3.5..$|
|00000cf0| 09 ee 20 85 20 87 0d 04 | 2e 06 eb 39 0d 04 38 22 |.. . ...|...9..8"|
|00000d00| e3 58 25 3d 30 b8 31 30 | 32 34 88 34 3a 58 3d 2d |.X%=0.10|24.4:X=-|
|00000d10| 53 2b 32 2a 53 2a 58 25 | 2f 31 30 32 34 2e 0d 04 |S+2*S*X%|/1024...|
|00000d20| 42 24 20 20 e3 59 25 3d | 30 b8 31 30 32 34 88 34 |B$ .Y%=|0.1024.4|
|00000d30| 3a 59 3d 2d 53 2b 32 2a | 53 2a 59 25 2f 31 30 32 |:Y=-S+2*|S*Y%/102|
|00000d40| 34 2e 0d 04 4c 15 20 20 | 20 20 f2 53 45 54 28 58 |4...L. | .SET(X|
|00000d50| 2c 59 2c 5a 28 29 29 0d | 04 56 15 20 20 20 20 f2 |,Y,Z()).|.V. .|
|00000d60| 53 45 54 28 31 2c 31 2c | 43 28 29 29 0d 04 60 0c |SET(1,1,|C())..`.|
|00000d70| 20 20 20 20 4e 25 3d 30 | 0d 04 6a 09 20 20 20 20 | N%=0|..j. |
|00000d80| f5 0d 04 74 0f 20 20 20 | 20 20 20 4e 25 2b 3d 31 |...t. | N%+=1|
|00000d90| 0d 04 7e 17 20 20 20 20 | 20 20 f2 53 49 4e 28 5a |..~. | .SIN(Z|
|00000da0| 28 29 2c 41 28 29 29 0d | 04 88 17 20 20 20 20 20 |(),A()).|... |
|00000db0| 20 f2 45 58 50 28 5a 28 | 29 2c 42 28 29 29 0d 04 | .EXP(Z(|),B())..|
|00000dc0| 92 15 20 20 20 20 20 20 | 41 28 29 3d 41 28 29 2b |.. |A()=A()+|
|00000dd0| 42 28 29 0d 04 9c 15 20 | 20 20 20 20 20 5a 28 29 |B().... | Z()|
|00000de0| 3d 41 28 29 2b 43 28 29 | 0d 04 a6 38 20 20 20 20 |=A()+C()|...8 |
|00000df0| fd 20 4e 25 3d 31 30 20 | 84 20 94 28 5a 28 30 29 |. N%=10 |. .(Z(0)|
|00000e00| 29 3e 31 30 20 84 20 94 | 28 5a 28 31 29 29 3e 31 |)>10 . .|(Z(1))>1|
|00000e10| 30 20 84 20 a4 41 42 53 | 28 5a 28 29 29 3e 31 30 |0 . .ABS|(Z())>10|
|00000e20| 0d 04 b0 2b 20 20 20 20 | e7 20 94 28 5a 28 30 29 |...+ |. .(Z(0)|
|00000e30| 29 3c 31 30 20 84 20 94 | 28 5a 28 31 29 29 3c 31 |)<10 . .|(Z(1))<1|
|00000e40| 30 20 f0 36 39 2c 58 25 | 2c 59 25 0d 04 ba 07 20 |0 .69,X%|,Y%.... |
|00000e50| 20 ed 0d 04 c4 05 ed 0d | 04 ce 05 e0 0d 04 d8 05 | .......|........|
|00000e60| 3a 0d 04 e2 05 3a 0d 04 | ec 05 3a 0d 04 f6 11 f4 |:....:..|..:.....|
|00000e70| 20 3e 20 54 53 54 43 4d | 50 4c 58 36 0d 05 00 18 | > TSTCM|PLX6....|
|00000e80| ee 20 85 20 c8 9a 20 22 | 25 2e 43 4f 4d 50 4c 45 |. . .. "|%.COMPLE|
|00000e90| 58 22 3a f9 0d 05 0a 10 | f2 49 4e 49 54 43 4f 4d |X":.....|.INITCOM|
|00000ea0| 50 4c 45 58 0d 05 14 0a | 53 3d 33 2e 32 35 0d 05 |PLEX....|S=3.25..|
|00000eb0| 1e 09 ee 20 85 20 87 0d | 05 28 07 eb 31 38 0d 05 |... . ..|.(..18..|
|00000ec0| 32 22 e3 58 25 3d 30 b8 | 31 30 32 34 88 32 3a 58 |2".X%=0.|1024.2:X|
|00000ed0| 3d 2d 53 2b 32 2a 53 2a | 58 25 2f 31 30 32 34 2e |=-S+2*S*|X%/1024.|
|00000ee0| 0d 05 3c 24 20 20 e3 59 | 25 3d 30 b8 31 30 32 34 |..<$ .Y|%=0.1024|
|00000ef0| 88 32 3a 59 3d 2d 53 2b | 32 2a 53 2a 59 25 2f 31 |.2:Y=-S+|2*S*Y%/1|
|00000f00| 30 32 34 2e 0d 05 46 15 | 20 20 20 20 f2 53 45 54 |024...F.| .SET|
|00000f10| 28 58 2c 59 2c 5a 28 29 | 29 0d 05 50 17 20 20 20 |(X,Y,Z()|)..P. |
|00000f20| 20 f2 53 45 54 28 30 2e | 35 2c 30 2c 43 28 29 29 | .SET(0.|5,0,C())|
|00000f30| 0d 05 5a 0c 20 20 20 20 | 4e 25 3d 30 0d 05 64 09 |..Z. |N%=0..d.|
|00000f40| 20 20 20 20 f5 0d 05 6e | 0f 20 20 20 20 20 20 4e | ...n|. N|
|00000f50| 25 2b 3d 31 0d 05 78 18 | 20 20 20 20 20 20 f2 53 |%+=1..x.| .S|
|00000f60| 49 4e 48 28 5a 28 29 2c | 41 28 29 29 0d 05 82 17 |INH(Z(),|A())....|
|00000f70| 20 20 20 20 20 20 f2 53 | 49 4e 28 5a 28 29 2c 42 | .S|IN(Z(),B|
|00000f80| 28 29 29 0d 05 8c 15 20 | 20 20 20 20 20 41 28 29 |()).... | A()|
|00000f90| 3d 41 28 29 2b 43 28 29 | 0d 05 96 15 20 20 20 20 |=A()+C()|.... |
|00000fa0| 20 20 5a 28 29 3d 41 28 | 29 2b 42 28 29 0d 05 a0 | Z()=A(|)+B()...|
|00000fb0| 38 20 20 20 20 fd 20 4e | 25 3d 31 30 20 84 20 94 |8 . N|%=10 . .|
|00000fc0| 28 5a 28 30 29 29 3e 31 | 30 20 84 20 94 28 5a 28 |(Z(0))>1|0 . .(Z(|
|00000fd0| 31 29 29 3e 31 30 20 84 | 20 a4 41 42 53 28 5a 28 |1))>10 .| .ABS(Z(|
|00000fe0| 29 29 3e 31 30 0d 05 aa | 2b 20 20 20 20 e7 20 94 |))>10...|+ . .|
|00000ff0| 28 5a 28 30 29 29 3c 31 | 30 20 84 20 94 28 5a 28 |(Z(0))<1|0 . .(Z(|
|00001000| 31 29 29 3c 31 30 20 f0 | 36 39 2c 58 25 2c 59 25 |1))<10 .|69,X%,Y%|
|00001010| 0d 05 b4 07 20 20 ed 0d | 05 be 05 ed 0d 05 c8 05 |.... ..|........|
|00001020| e0 0d 05 d2 4c f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |....L.--|--------|
|00001030| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001040| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001050| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001060| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 05 dc |--------|-----...|
|00001070| 0a dd f2 48 45 4c 50 0d | 05 e6 05 db 0d 05 f0 37 |...HELP.|.......7|
|00001080| f1 22 54 48 49 53 20 4c | 49 42 52 41 52 59 20 50 |."THIS L|IBRARY P|
|00001090| 52 4f 56 49 44 45 53 20 | 54 48 45 20 46 4f 4c 4c |ROVIDES |THE FOLL|
|000010a0| 4f 57 49 4e 47 20 50 52 | 4f 43 45 44 55 52 45 53 |OWING PR|OCEDURES|
|000010b0| 3a 22 27 0d 05 fa 30 f1 | 22 55 28 29 2c 56 28 29 |:"'...0.|"U(),V()|
|000010c0| 20 41 4e 44 20 57 28 29 | 20 44 45 4e 4f 54 45 20 | AND W()| DENOTE |
|000010d0| 43 4f 4d 50 4c 45 58 20 | 56 41 52 49 41 42 4c 45 |COMPLEX |VARIABLE|
|000010e0| 53 2e 22 0d 06 04 22 f1 | 22 58 20 41 4e 44 20 59 |S."...".|"X AND Y|
|000010f0| 20 44 45 4e 4f 54 45 20 | 52 45 41 4c 20 56 41 4c | DENOTE |REAL VAL|
|00001100| 55 45 53 2e 22 0d 06 0e | 45 f1 22 50 52 4f 43 41 |UES."...|E."PROCA|
|00001110| 44 44 28 20 20 20 55 28 | 29 2c 56 28 29 2c 52 45 |DD( U(|),V(),RE|
|00001120| 54 55 52 4e 20 57 28 29 | 29 20 20 20 50 52 4f 43 |TURN W()|) PROC|
|00001130| 53 55 42 28 20 20 55 28 | 29 2c 56 28 29 2c 52 45 |SUB( U(|),V(),RE|
|00001140| 54 55 52 4e 20 57 28 29 | 29 22 0d 06 18 45 f1 22 |TURN W()|)"...E."|
|00001150| 50 52 4f 43 4d 55 4c 28 | 20 20 20 55 28 29 2c 56 |PROCMUL(| U(),V|
|00001160| 28 29 2c 52 45 54 55 52 | 4e 20 57 28 29 29 20 20 |(),RETUR|N W()) |
|00001170| 20 50 52 4f 43 44 49 56 | 28 20 20 55 28 29 2c 56 | PROCDIV|( U(),V|
|00001180| 28 29 2c 52 45 54 55 52 | 4e 20 57 28 29 29 22 0d |(),RETUR|N W())".|
|00001190| 06 22 45 f1 22 50 52 4f | 43 52 50 4f 57 45 52 28 |."E."PRO|CRPOWER(|
|000011a0| 55 28 29 2c 20 20 58 2c | 52 45 54 55 52 4e 20 57 |U(), X,|RETURN W|
|000011b0| 28 29 29 20 20 20 50 52 | 4f 43 50 4f 57 45 52 28 |()) PR|OCPOWER(|
|000011c0| 55 28 29 2c 56 28 29 2c | 52 45 54 55 52 4e 20 57 |U(),V(),|RETURN W|
|000011d0| 28 29 29 22 0d 06 2c 45 | f1 22 50 52 4f 43 45 58 |())"..,E|."PROCEX|
|000011e0| 50 28 20 20 20 55 28 29 | 2c 20 20 20 20 52 45 54 |P( U()|, RET|
|000011f0| 55 52 4e 20 57 28 29 29 | 20 20 20 50 52 4f 43 4c |URN W())| PROCL|
|00001200| 4e 28 20 20 20 55 28 29 | 2c 20 20 20 20 52 45 54 |N( U()|, RET|
|00001210| 55 52 4e 20 57 28 29 29 | 22 0d 06 36 45 f1 22 50 |URN W())|"..6E."P|
|00001220| 52 4f 43 53 49 4e 28 20 | 20 20 55 28 29 2c 20 20 |ROCSIN( | U(), |
|00001230| 20 20 52 45 54 55 52 4e | 20 57 28 29 29 20 20 20 | RETURN| W()) |
|00001240| 50 52 4f 43 43 4f 53 28 | 20 20 55 28 29 2c 20 20 |PROCCOS(| U(), |
|00001250| 20 20 52 45 54 55 52 4e | 20 57 28 29 29 22 0d 06 | RETURN| W())"..|
|00001260| 40 45 f1 22 50 52 4f 43 | 53 49 4e 48 28 20 20 55 |@E."PROC|SINH( U|
|00001270| 28 29 2c 20 20 20 20 52 | 45 54 55 52 4e 20 57 28 |(), R|ETURN W(|
|00001280| 29 29 20 20 20 50 52 4f | 43 43 4f 53 48 28 20 55 |)) PRO|CCOSH( U|
|00001290| 28 29 2c 20 20 20 20 52 | 45 54 55 52 4e 20 57 28 |(), R|ETURN W(|
|000012a0| 29 29 22 0d 06 4a 45 f1 | 22 50 52 4f 43 54 41 4e |))"..JE.|"PROCTAN|
|000012b0| 28 20 20 20 55 28 29 2c | 20 20 20 20 52 45 54 55 |( U(),| RETU|
|000012c0| 52 4e 20 57 28 29 29 20 | 20 20 50 52 4f 43 53 45 |RN W()) | PROCSE|
|000012d0| 54 28 20 20 20 20 58 2c | 20 20 59 2c 52 45 54 55 |T( X,| Y,RETU|
|000012e0| 52 4e 20 57 28 29 29 22 | 0d 06 54 05 f1 0d 06 5e |RN W())"|..T....^|
|000012f0| 35 f1 22 41 4c 53 4f 20 | 53 55 50 50 4c 49 45 44 |5."ALSO |SUPPLIED|
|00001300| 20 41 52 45 20 54 48 45 | 20 46 4f 4c 4c 4f 57 49 | ARE THE| FOLLOWI|
|00001310| 47 20 52 45 41 4c 20 46 | 55 4e 43 54 49 4f 4e 53 |G REAL F|UNCTIONS|
|00001320| 3a 22 0d 06 68 2b f1 22 | 46 4e 53 48 28 58 29 20 |:"..h+."|FNSH(X) |
|00001330| 20 20 20 20 20 46 4e 43 | 48 28 58 29 20 20 20 20 | FNC|H(X) |
|00001340| 20 46 4e 52 45 41 4c 28 | 5a 28 29 29 22 0d 06 72 | FNREAL(|Z())"..r|
|00001350| 2a f1 22 46 4e 49 4d 41 | 47 28 5a 28 29 29 20 20 |*."FNIMA|G(Z()) |
|00001360| 46 4e 41 42 53 28 5a 28 | 29 29 20 20 46 4e 41 52 |FNABS(Z(|)) FNAR|
|00001370| 47 28 5a 28 29 29 22 0d | 06 7c 42 f1 27 22 4f 46 |G(Z())".|.|B.'"OF|
|00001380| 20 57 48 49 43 48 20 54 | 48 45 20 46 49 52 53 54 | WHICH T|HE FIRST|
|00001390| 20 54 57 4f 20 47 49 56 | 45 20 54 48 45 20 48 59 | TWO GIV|E THE HY|
|000013a0| 50 45 52 42 4f 4c 49 43 | 20 53 49 4e 45 20 41 4e |PERBOLIC| SINE AN|
|000013b0| 44 20 43 4f 53 49 4e 45 | 22 0d 06 86 18 f1 22 4f |D COSINE|"....."O|
|000013c0| 46 20 41 20 52 45 41 4c | 20 56 41 4c 55 45 2e 22 |F A REAL| VALUE."|
|000013d0| 27 0d 06 90 49 f1 22 43 | 41 4c 4c 20 54 48 45 20 |'...I."C|ALL THE |
|000013e0| 50 52 4f 43 45 44 55 52 | 45 20 50 52 4f 43 49 4e |PROCEDUR|E PROCIN|
|000013f0| 49 54 43 4f 4d 50 4c 45 | 58 2c 54 4f 20 44 45 46 |ITCOMPLE|X,TO DEF|
|00001400| 49 4e 45 20 54 48 45 20 | 43 4f 4d 50 4c 45 58 20 |INE THE |COMPLEX |
|00001410| 56 41 52 49 41 42 4c 45 | 53 22 0d 06 9a 46 f1 22 |VARIABLE|S"...F."|
|00001420| 41 28 29 20 54 4f 20 5a | 28 29 20 41 4e 44 20 54 |A() TO Z|() AND T|
|00001430| 48 45 20 49 4e 54 45 52 | 4e 41 4c 20 44 55 4d 4d |HE INTER|NAL DUMM|
|00001440| 59 27 53 20 5f 41 28 29 | 2c 5f 42 28 29 2c 5f 43 |Y'S _A()|,_B(),_C|
|00001450| 28 29 2c 5f 41 2c 5f 42 | 20 41 4e 44 20 5f 43 22 |(),_A,_B| AND _C"|
|00001460| 0d 06 a4 42 f1 22 54 48 | 45 20 4d 55 4c 54 59 56 |...B."TH|E MULTYV|
|00001470| 41 4c 55 45 44 20 52 4f | 55 54 49 4e 45 53 20 47 |ALUED RO|UTINES G|
|00001480| 49 56 45 20 59 4f 55 20 | 54 48 45 20 50 52 49 4e |IVE YOU |THE PRIN|
|00001490| 43 49 50 41 4c 20 56 41 | 4c 55 45 20 4f 4e 4c 59 |CIPAL VA|LUE ONLY|
|000014a0| 2e 22 0d 06 ae 31 f1 27 | 22 54 45 53 54 53 20 48 |."...1.'|"TESTS H|
|000014b0| 41 56 45 20 42 45 45 4e | 20 52 55 4e 20 41 47 41 |AVE BEEN| RUN AGA|
|000014c0| 49 4e 53 54 20 41 43 4f | 52 4e 20 46 4f 52 54 52 |INST ACO|RN FORTR|
|000014d0| 41 4e 22 0d 06 b8 52 f1 | 27 22 36 20 45 58 41 4d |AN"...R.|'"6 EXAM|
|000014e0| 50 4c 45 20 50 52 4f 47 | 52 41 4d 53 20 57 49 54 |PLE PROG|RAMS WIT|
|000014f0| 48 20 49 4e 54 45 52 45 | 53 54 49 4e 47 20 46 52 |H INTERE|STING FR|
|00001500| 41 43 54 41 4c 53 20 43 | 41 4e 20 42 45 20 46 4f |ACTALS C|AN BE FO|
|00001510| 55 4e 44 20 49 4e 53 49 | 44 45 20 54 48 45 20 43 |UND INSI|DE THE C|
|00001520| 4f 44 45 2e 22 0d 06 c2 | 2e f1 27 22 59 4f 55 20 |ODE."...|..'"YOU |
|00001530| 43 41 4e 20 53 50 4c 49 | 54 20 54 48 45 4d 20 4f |CAN SPLI|T THEM O|
|00001540| 46 46 20 46 4f 52 20 54 | 45 53 54 49 4e 47 2c 20 |FF FOR T|ESTING, |
|00001550| 4f 52 22 0d 06 cc 32 f1 | 27 22 59 4f 55 20 43 41 |OR"...2.|'"YOU CA|
|00001560| 4e 20 4c 45 41 56 45 20 | 54 48 45 4d 20 54 48 45 |N LEAVE |THEM THE|
|00001570| 52 45 2c 54 48 45 59 20 | 41 52 45 20 49 47 4e 4f |RE,THEY |ARE IGNO|
|00001580| 52 45 44 2e 22 0d 06 d6 | 05 e1 0d 06 e0 05 20 0d |RED."...|...... .|
|00001590| 06 ea 4c f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..L.----|--------|
|000015a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000015b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000015c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000015d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 06 f4 11 dd |--------|---.....|
|000015e0| f2 49 4e 49 54 43 4f 4d | 50 4c 45 58 0d 06 fe 08 |.INITCOM|PLEX....|
|000015f0| 5f 41 3d 30 0d 07 08 08 | 5f 42 3d 30 0d 07 12 08 |_A=0....|_B=0....|
|00001600| 5f 43 3d 30 0d 07 1c 17 | de 20 5f 41 28 31 29 2c |_C=0....|. _A(1),|
|00001610| 5f 42 28 31 29 2c 5f 43 | 28 31 29 0d 07 26 87 de |_B(1),_C|(1)..&..|
|00001620| 20 41 28 31 29 2c 42 28 | 31 29 2c 43 28 31 29 2c | A(1),B(|1),C(1),|
|00001630| 44 28 31 29 2c 45 28 31 | 29 2c 46 28 31 29 2c 47 |D(1),E(1|),F(1),G|
|00001640| 28 31 29 2c 48 28 31 29 | 2c 49 28 31 29 2c 4a 28 |(1),H(1)|,I(1),J(|
|00001650| 31 29 2c 4b 28 31 29 2c | 4c 28 31 29 2c 4d 28 31 |1),K(1),|L(1),M(1|
|00001660| 29 2c 4e 28 31 29 2c 4f | 28 31 29 2c 50 28 31 29 |),N(1),O|(1),P(1)|
|00001670| 2c 51 28 31 29 2c 52 28 | 31 29 2c 53 28 31 29 2c |,Q(1),R(|1),S(1),|
|00001680| 54 28 31 29 2c 55 28 31 | 29 2c 56 28 31 29 2c 57 |T(1),U(1|),V(1),W|
|00001690| 28 31 29 2c 58 28 31 29 | 2c 59 28 31 29 2c 5a 28 |(1),X(1)|,Y(1),Z(|
|000016a0| 31 29 0d 07 30 05 e1 0d | 07 3a 4c f4 2d 2d 2d 2d |1)..0...|.:L.----|
|000016b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000016c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000016d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 52 45 41 4c 20 |--------|---REAL |
|000016e0| 48 59 50 45 52 42 4f 4c | 49 43 20 53 49 4e 45 2d |HYPERBOL|IC SINE-|
|000016f0| 2d 2d 2d 0d 07 44 19 dd | a4 53 48 28 59 29 3a 3d |---..D..|.SH(Y):=|
|00001700| 28 a1 59 2d a1 28 2d 59 | 29 29 2f 32 0d 07 4e 4c |(.Y-.(-Y|))/2..NL|
|00001710| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.-------|--------|
|00001720| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001730| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001740| 52 45 41 4c 20 48 59 50 | 45 52 42 4f 4c 49 43 20 |REAL HYP|ERBOLIC |
|00001750| 43 4f 53 49 4e 45 2d 2d | 0d 07 58 19 dd a4 43 48 |COSINE--|..X...CH|
|00001760| 28 59 29 3a 3d 28 a1 59 | 2b a1 28 2d 59 29 29 2f |(Y):=(.Y|+.(-Y))/|
|00001770| 32 0d 07 62 4c f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |2..bL.--|--------|
|00001780| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001790| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000017a0| 2d 2d 2d 2d 2d 43 4f 4d | 50 4c 45 58 20 53 49 4e |-----COM|PLEX SIN|
|000017b0| 45 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 07 6c |E-------|-----..l|
|000017c0| 12 dd f2 53 49 4e 28 55 | 28 29 2c 57 28 29 29 0d |...SIN(U|(),W()).|
|000017d0| 07 76 38 5f 41 28 30 29 | 3d b5 55 28 30 29 2a a4 |.v8_A(0)|=.U(0)*.|
|000017e0| 43 48 28 55 28 31 29 29 | 3a 5f 41 28 31 29 3d 9b |CH(U(1))|:_A(1)=.|
|000017f0| 55 28 30 29 2a a4 53 48 | 28 55 28 31 29 29 3a 57 |U(0)*.SH|(U(1)):W|
|00001800| 28 29 3d 5f 41 28 29 0d | 07 80 05 e1 0d 07 8a 4c |()=_A().|.......L|
|00001810| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.-------|--------|
|00001820| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001830| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001840| 43 4f 4d 50 4c 45 58 20 | 43 4f 53 49 4e 45 2d 2d |COMPLEX |COSINE--|
|00001850| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 07 94 12 dd f2 43 4f |--------|......CO|
|00001860| 53 28 55 28 29 2c 57 28 | 29 29 0d 07 9e 39 5f 41 |S(U(),W(|))...9_A|
|00001870| 28 30 29 3d 9b 55 28 30 | 29 2a a4 43 48 28 55 28 |(0)=.U(0|)*.CH(U(|
|00001880| 31 29 29 3a 5f 41 28 31 | 29 3d 2d b5 55 28 30 29 |1)):_A(1|)=-.U(0)|
|00001890| 2a a4 53 48 28 55 28 31 | 29 29 3a 57 28 29 3d 5f |*.SH(U(1|)):W()=_|
|000018a0| 41 28 29 0d 07 a8 05 e1 | 0d 07 b2 4c f4 2d 2d 2d |A().....|...L.---|
|000018b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000018c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000018d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 43 4f 4d 50 |--------|----COMP|
|000018e0| 4c 45 58 20 54 41 4e 47 | 45 4e 54 2d 2d 2d 2d 2d |LEX TANG|ENT-----|
|000018f0| 2d 2d 2d 2d 0d 07 bc 12 | dd f2 54 41 4e 28 55 28 |----....|..TAN(U(|
|00001900| 29 2c 57 28 29 29 0d 07 | c6 12 f2 53 49 4e 28 55 |),W())..|...SIN(U|
|00001910| 28 29 2c 5f 42 28 29 29 | 0d 07 d0 12 f2 43 4f 53 |(),_B())|.....COS|
|00001920| 28 55 28 29 2c 5f 43 28 | 29 29 0d 07 da 18 f2 44 |(U(),_C(|)).....D|
|00001930| 49 56 28 5f 42 28 29 2c | 5f 43 28 29 2c 5f 41 28 |IV(_B(),|_C(),_A(|
|00001940| 29 29 0d 07 e4 0c 57 28 | 29 3d 5f 41 28 29 0d 07 |))....W(|)=_A()..|
|00001950| ee 05 e1 0d 07 f8 4c f4 | 2d 2d 2d 2d 2d 2d 2d 2d |......L.|--------|
|00001960| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001970| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001980| 2d 2d 2d 2d 2d 2d 2d 43 | 4f 4d 50 4c 45 58 20 48 |-------C|OMPLEX H|
|00001990| 59 50 45 52 42 4f 4c 49 | 43 20 53 49 4e 45 2d 0d |YPERBOLI|C SINE-.|
|000019a0| 08 02 13 dd f2 53 49 4e | 48 28 55 28 29 2c 57 28 |.....SIN|H(U(),W(|
|000019b0| 29 29 0d 08 0c 38 5f 41 | 28 30 29 3d a4 53 48 28 |))...8_A|(0)=.SH(|
|000019c0| 55 28 30 29 29 2a 9b 55 | 28 31 29 3a 5f 41 28 31 |U(0))*.U|(1):_A(1|
|000019d0| 29 3d a4 43 48 28 55 28 | 30 29 29 2a b5 55 28 31 |)=.CH(U(|0))*.U(1|
|000019e0| 29 3a 57 28 29 3d 5f 41 | 28 29 0d 08 16 05 e1 0d |):W()=_A|()......|
|000019f0| 08 20 4d f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |. M.----|--------|
|00001a00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001a10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001a20| 2d 2d 2d 43 4f 4d 50 4c | 45 58 20 48 59 50 45 52 |---COMPL|EX HYPER|
|00001a30| 42 4f 4c 49 43 20 43 4f | 53 49 4e 45 0d 08 2a 13 |BOLIC CO|SINE..*.|
|00001a40| dd f2 43 4f 53 48 28 55 | 28 29 2c 57 28 29 29 0d |..COSH(U|(),W()).|
|00001a50| 08 34 38 5f 41 28 30 29 | 3d a4 43 48 28 55 28 30 |.48_A(0)|=.CH(U(0|
|00001a60| 29 29 2a 9b 55 28 31 29 | 3a 5f 41 28 31 29 3d a4 |))*.U(1)|:_A(1)=.|
|00001a70| 53 48 28 55 28 30 29 29 | 2a b5 55 28 31 29 3a 57 |SH(U(0))|*.U(1):W|
|00001a80| 28 29 3d 5f 41 28 29 0d | 08 3e 05 e1 0d 08 48 4c |()=_A().|.>....HL|
|00001a90| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.-------|--------|
|00001aa0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001ab0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001ac0| 43 4f 4d 50 4c 45 58 20 | 4d 55 4c 54 49 50 4c 49 |COMPLEX |MULTIPLI|
|00001ad0| 43 41 54 49 4f 4e 2d 2d | 0d 08 52 16 dd f2 4d 55 |CATION--|..R...MU|
|00001ae0| 4c 28 55 28 29 2c 56 28 | 29 2c 57 28 29 29 0d 08 |L(U(),V(|),W())..|
|00001af0| 5c 40 5f 41 28 30 29 3d | 55 28 30 29 2a 56 28 30 |\@_A(0)=|U(0)*V(0|
|00001b00| 29 2d 55 28 31 29 2a 56 | 28 31 29 3a 5f 41 28 31 |)-U(1)*V|(1):_A(1|
|00001b10| 29 3d 55 28 30 29 2a 56 | 28 31 29 2b 55 28 31 29 |)=U(0)*V|(1)+U(1)|
|00001b20| 2a 56 28 30 29 3a 57 28 | 29 3d 5f 41 28 29 0d 08 |*V(0):W(|)=_A()..|
|00001b30| 66 05 e1 0d 08 70 05 3a | 0d 08 7a 4c f4 2d 2d 2d |f....p.:|..zL.---|
|00001b40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001b50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001b60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 43 4f 4d 50 |--------|----COMP|
|00001b70| 4c 45 58 20 44 49 56 49 | 53 49 4f 4e 2d 2d 2d 2d |LEX DIVI|SION----|
|00001b80| 2d 2d 2d 2d 0d 08 84 74 | dd f2 44 49 56 28 55 28 |----...t|..DIV(U(|
|00001b90| 29 2c 56 28 29 2c 57 28 | 29 29 3a 5f 41 3d 56 28 |),V(),W(|)):_A=V(|
|00001ba0| 30 29 2a 56 28 30 29 2b | 56 28 31 29 2a 56 28 31 |0)*V(0)+|V(1)*V(1|
|00001bb0| 29 3a 5f 41 28 30 29 3d | 28 55 28 30 29 2a 56 28 |):_A(0)=|(U(0)*V(|
|00001bc0| 30 29 2b 55 28 31 29 2a | 56 28 31 29 29 2f 5f 41 |0)+U(1)*|V(1))/_A|
|00001bd0| 3a 5f 41 28 31 29 3d 28 | 55 28 31 29 2a 56 28 30 |:_A(1)=(|U(1)*V(0|
|00001be0| 29 2d 55 28 30 29 2a 56 | 28 31 29 29 2f 5f 41 3a |)-U(0)*V|(1))/_A:|
|00001bf0| 57 28 29 3d 5f 41 28 29 | 0d 08 8e 05 e1 0d 08 98 |W()=_A()|........|
|00001c00| 4c f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |L.------|--------|
|00001c10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001c20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001c30| 2d 43 4f 4d 50 4c 45 58 | 20 41 44 44 49 54 49 4f |-COMPLEX| ADDITIO|
|00001c40| 4e 2d 2d 2d 2d 2d 2d 2d | 2d 0d 08 a2 16 dd f2 41 |N-------|-......A|
|00001c50| 44 44 28 55 28 29 2c 56 | 28 29 2c 57 28 29 29 0d |DD(U(),V|(),W()).|
|00001c60| 08 ac 19 5f 41 28 29 3d | 55 28 29 2b 56 28 29 3a |..._A()=|U()+V():|
|00001c70| 57 28 29 3d 5f 41 28 29 | 0d 08 b6 05 e1 0d 08 c0 |W()=_A()|........|
|00001c80| 4c f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |L.------|--------|
|00001c90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001ca0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001cb0| 2d 43 4f 4d 50 4c 45 58 | 20 53 55 42 54 52 41 43 |-COMPLEX| SUBTRAC|
|00001cc0| 54 49 4f 4e 2d 2d 2d 2d | 2d 0d 08 ca 16 dd f2 53 |TION----|-......S|
|00001cd0| 55 42 28 55 28 29 2c 56 | 28 29 2c 57 28 29 29 0d |UB(U(),V|(),W()).|
|00001ce0| 08 d4 19 5f 41 28 29 3d | 55 28 29 2d 56 28 29 3a |..._A()=|U()-V():|
|00001cf0| 57 28 29 3d 5f 41 28 29 | 0d 08 de 05 e1 0d 08 e8 |W()=_A()|........|
|00001d00| 4d f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |M.------|--------|
|00001d10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001d20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 43 4f 4d 50 4c |--------|---COMPL|
|00001d30| 45 58 20 54 4f 20 41 20 | 52 45 41 4c 28 42 52 4f |EX TO A |REAL(BRO|
|00001d40| 4b 45 4e 29 20 50 4f 57 | 45 52 0d 08 f2 17 dd f2 |KEN) POW|ER......|
|00001d50| 52 50 4f 57 45 52 28 55 | 28 29 2c 58 2c 57 28 29 |RPOWER(U|(),X,W()|
|00001d60| 29 0d 08 fc 12 5f 43 3d | a4 41 42 53 28 55 28 29 |)...._C=|.ABS(U()|
|00001d70| 29 5e 58 0d 09 06 12 5f | 42 3d a4 41 52 47 28 55 |)^X...._|B=.ARG(U|
|00001d80| 28 29 29 2a 58 0d 09 10 | 1d 57 28 30 29 3d 5f 43 |())*X...|.W(0)=_C|
|00001d90| 2a 9b 5f 42 3a 57 28 31 | 29 3d 5f 43 2a b5 5f 42 |*._B:W(1|)=_C*._B|
|00001da0| 3a e1 0d 09 1a 4d f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |:....M.-|--------|
|00001db0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001dc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001dd0| 45 20 54 4f 20 41 20 43 | 4f 4d 50 4c 45 58 20 50 |E TO A C|OMPLEX P|
|00001de0| 4f 57 45 52 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |OWER----|-------.|
|00001df0| 09 24 12 dd f2 45 58 50 | 28 55 28 29 2c 57 28 29 |.$...EXP|(U(),W()|
|00001e00| 29 0d 09 2e 35 5f 41 3d | a1 28 55 28 30 29 29 3a |)...5_A=|.(U(0)):|
|00001e10| 5f 41 28 30 29 3d 5f 41 | 2a 9b 55 28 31 29 3a 5f |_A(0)=_A|*.U(1):_|
|00001e20| 41 28 31 29 3d 5f 41 2a | b5 55 28 31 29 3a 57 28 |A(1)=_A*|.U(1):W(|
|00001e30| 29 3d 5f 41 28 29 0d 09 | 38 05 e1 0d 09 42 4d f4 |)=_A()..|8....BM.|
|00001e40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001e50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001e60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 4e 41 54 55 52 41 4c |--------|-NATURAL|
|00001e70| 20 4c 4f 47 20 4f 46 20 | 41 20 43 4f 4d 50 4c 45 | LOG OF |A COMPLE|
|00001e80| 58 2d 2d 2d 2d 2d 2d 2d | 0d 09 4c 11 dd f2 4c 4e |X-------|..L...LN|
|00001e90| 28 55 28 29 2c 57 28 29 | 29 0d 09 56 26 5f 41 28 |(U(),W()|)..V&_A(|
|00001ea0| 30 29 3d aa 28 a4 41 42 | 53 28 55 28 29 29 29 3a |0)=.(.AB|S(U())):|
|00001eb0| 5f 41 28 31 29 3d a4 41 | 52 47 28 55 28 29 29 0d |_A(1)=.A|RG(U()).|
|00001ec0| 09 60 0c 57 28 29 3d 5f | 41 28 29 0d 09 6a 05 e1 |.`.W()=_|A()..j..|
|00001ed0| 0d 09 74 4d f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..tM.---|--------|
|00001ee0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001ef0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 43 4f |--------|------CO|
|00001f00| 4d 50 4c 45 58 20 54 4f | 20 41 20 43 4f 4d 50 4c |MPLEX TO| A COMPL|
|00001f10| 45 58 20 50 4f 57 45 52 | 2d 2d 2d 2d 2d 0d 09 7e |EX POWER|-----..~|
|00001f20| 18 dd f2 50 4f 57 45 52 | 28 55 28 29 2c 56 28 29 |...POWER|(U(),V()|
|00001f30| 2c 57 28 29 29 0d 09 88 | 11 f2 4c 4e 28 55 28 29 |,W())...|..LN(U()|
|00001f40| 2c 5f 42 28 29 29 0d 09 | 92 17 f2 4d 55 4c 28 56 |,_B())..|...MUL(V|
|00001f50| 28 29 2c 5f 42 28 29 2c | 5f 42 28 29 29 0d 09 9c |(),_B(),|_B())...|
|00001f60| 13 f2 45 58 50 28 5f 42 | 28 29 2c 5f 42 28 29 29 |..EXP(_B|(),_B())|
|00001f70| 0d 09 a6 0c 57 28 29 3d | 5f 42 28 29 0d 09 b0 05 |....W()=|_B()....|
|00001f80| e1 0d 09 ba 4d f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |....M.--|--------|
|00001f90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001fa0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 53 |--------|-------S|
|00001fb0| 45 54 20 41 20 43 4f 4d | 50 4c 45 58 20 54 4f 20 |ET A COM|PLEX TO |
|00001fc0| 41 20 56 41 4c 55 45 2d | 2d 2d 2d 2d 2d 2d 0d 09 |A VALUE-|------..|
|00001fd0| c4 12 dd f2 53 45 54 28 | 58 2c 59 2c 57 28 29 29 |....SET(|X,Y,W())|
|00001fe0| 0d 09 ce 0a 57 28 30 29 | 3d 58 0d 09 d8 0a 57 28 |....W(0)|=X....W(|
|00001ff0| 31 29 3d 59 0d 09 e2 05 | e1 0d 09 ec 4d f4 2d 2d |1)=Y....|....M.--|
|00002000| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002010| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002020| 2d 2d 2d 2d 2d 2d 2d 47 | 45 54 20 52 45 41 4c 20 |-------G|ET REAL |
|00002030| 50 41 52 54 20 4f 46 20 | 43 4f 4d 50 4c 45 58 2d |PART OF |COMPLEX-|
|00002040| 2d 2d 2d 2d 2d 2d 0d 09 | f6 15 dd a4 52 45 41 4c |------..|....REAL|
|00002050| 28 55 28 29 29 3a 3d 55 | 28 30 29 0d 0a 00 4d f4 |(U()):=U|(0)...M.|
|00002060| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002070| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002080| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 47 45 54 20 49 4d 41 |--------|-GET IMA|
|00002090| 47 49 4e 41 49 52 59 20 | 50 41 52 54 20 4f 46 20 |GINAIRY |PART OF |
|000020a0| 43 4f 4d 50 4c 45 58 2d | 0d 0a 0a 15 dd a4 49 4d |COMPLEX-|......IM|
|000020b0| 41 47 28 55 28 29 29 3a | 3d 55 28 31 29 0d 0a 14 |AG(U()):|=U(1)...|
|000020c0| 4d f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |M.------|--------|
|000020d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000020e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 47 45 54 20 41 |--------|---GET A|
|000020f0| 42 53 4f 4c 55 54 45 20 | 56 41 4c 55 45 20 4f 46 |BSOLUTE |VALUE OF|
|00002100| 20 43 4f 4d 50 4c 45 58 | 2d 2d 0d 0a 1e 26 dd a4 | COMPLEX|--...&..|
|00002110| 41 42 53 28 55 28 29 29 | 3a 3d b6 28 55 28 30 29 |ABS(U())|:=.(U(0)|
|00002120| 2a 55 28 30 29 2b 55 28 | 31 29 2a 55 28 31 29 29 |*U(0)+U(|1)*U(1))|
|00002130| 0d 0a 28 4d f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..(M.---|--------|
|00002140| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002150| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 47 45 |--------|------GE|
|00002160| 54 20 41 52 47 55 4d 45 | 4e 54 20 4f 46 20 43 4f |T ARGUME|NT OF CO|
|00002170| 4d 50 4c 45 58 2d 2d 2d | 2d 2d 2d 2d 2d 0d 0a 32 |MPLEX---|-----..2|
|00002180| 0e dd a4 41 52 47 28 55 | 28 29 29 0d 0a 3c 0e e7 |...ARG(U|())..<..|
|00002190| 20 55 28 30 29 3d 30 20 | 8c 0d 0a 46 2e 20 20 e7 | U(0)=0 |...F. .|
|000021a0| 20 55 28 31 29 3e 30 20 | 5f 41 3d af 2f 32 20 8b | U(1)>0 |_A=./2 .|
|000021b0| e7 20 55 28 31 29 3c 30 | 20 5f 41 3d 2d af 2f 32 |. U(1)<0| _A=-./2|
|000021c0| 20 8b 20 5f 41 3d 30 0d | 0a 50 05 cc 0d 0a 5a 15 | . _A=0.|.P....Z.|
|000021d0| 20 20 5f 41 3d 99 28 55 | 28 31 29 2f 55 28 30 29 | _A=.(U|(1)/U(0)|
|000021e0| 29 0d 0a 64 1f 20 20 e7 | 55 28 30 29 3c 30 20 80 |)..d. .|U(0)<0 .|
|000021f0| 20 55 28 31 29 3e 3d 30 | 20 5f 41 3d 5f 41 2b af | U(1)>=0| _A=_A+.|
|00002200| 0d 0a 6e 1f 20 20 e7 55 | 28 30 29 3c 30 20 80 20 |..n. .U|(0)<0 . |
|00002210| 55 28 31 29 3c 30 20 20 | 5f 41 3d 5f 41 2d af 0d |U(1)<0 |_A=_A-..|
|00002220| 0a 78 05 cd 0d 0a 82 07 | 3d 5f 41 0d ff 46 69 6c |.x......|=_A..Fil|
|00002230| 65 44 61 74 61 82 65 78 | 70 7a 3d 31 00 00 00 00 |eData.ex|pz=1....|
|00002240| 00 90 01 00 00 42 fb ff | ff 4b c6 fd 42 03 00 f5 |.....B..|.K..B...|
|00002250| b8 0d 00 0a 0e f4 20 3e | 20 45 58 50 5a 3d 31 0d |...... >| EXPZ=1.|
|00002260| 00 14 08 eb 20 31 38 0d | 00 1e 08 c8 97 20 ee 0d |.... 18.|..... ..|
|00002270| 00 28 0b 58 25 3d 31 32 | 37 38 0d 00 32 09 59 25 |.(.X%=12|78..2.Y%|
|00002280| 3d 2d 32 0d 00 3c 1f ee | 20 85 20 e7 20 9f 3d 31 |=-2..<..| . . .=1|
|00002290| 37 20 e0 20 8b 20 e6 31 | 3a f0 36 39 2c 58 25 2c |7 . . .1|:.69,X%,|
|000022a0| 59 25 0d 00 46 05 d8 0d | 00 50 05 f5 0d 00 5a 52 |Y%..F...|.P....ZR|
|000022b0| 58 25 3d 58 25 2b 32 3a | c8 97 20 b8 20 58 25 2c |X%=X%+2:|.. . X%,|
|000022c0| 59 25 3a e7 20 58 25 3e | 3d 31 32 38 30 20 58 25 |Y%:. X%>|=1280 X%|
|000022d0| 3d 30 3a 59 25 3d 59 25 | 2b 32 3a e7 20 59 25 3d |=0:Y%=Y%|+2:. Y%=|
|000022e0| 31 30 32 34 20 ff 28 22 | 53 43 52 45 45 4e 53 41 |1024 .("|SCREENSA|
|000022f0| 56 45 20 45 58 50 5a 49 | 53 31 22 29 3a e0 0d 00 |VE EXPZI|S1"):...|
|00002300| 64 16 58 3d 2d 2e 36 2b | 59 25 2a 2e 38 35 2f 31 |d.X=-.6+|Y%*.85/1|
|00002310| 30 32 34 2e 0d 00 6e 16 | 59 3d 2d 2e 36 2b 58 25 |024...n.|Y=-.6+X%|
|00002320| 2a 31 2e 32 2f 31 32 38 | 30 2e 0d 00 78 12 58 4e |*1.2/128|0...x.XN|
|00002330| 3d 58 2f 28 58 2a 58 2b | 59 2a 59 29 0d 00 82 12 |=X/(X*X+|Y*Y)....|
|00002340| 59 4e 3d 59 2f 28 58 2a | 58 2b 59 2a 59 29 0d 00 |YN=Y/(X*|X+Y*Y)..|
|00002350| 8c 05 3a 0d 00 96 1c 4e | 25 3d 30 3a f5 3a 58 3d |..:....N|%=0:.:X=|
|00002360| 58 4e 3a 59 3d 59 4e 3a | 4e 25 3d 4e 25 2b 31 0d |XN:Y=YN:|N%=N%+1.|
|00002370| 00 a0 17 45 3d a1 28 2d | 58 29 3a 58 4e 3d 58 2d |...E=.(-|X):XN=X-|
|00002380| 31 2b 45 2a 9b 59 0d 00 | aa 0d 59 4e 3d 59 2d 45 |1+E*.Y..|..YN=Y-E|
|00002390| 2a b5 59 0d 00 b4 30 fd | 20 4e 25 3e 33 30 30 20 |*.Y...0.| N%>300 |
|000023a0| 84 20 28 28 94 28 58 2d | 58 4e 29 3c 31 45 2d 35 |. ((.(X-|XN)<1E-5|
|000023b0| 29 20 80 20 28 94 28 59 | 2d 59 4e 29 3c 31 45 2d |) . (.(Y|-YN)<1E-|
|000023c0| 35 29 29 0d 00 be 10 e6 | 30 3a f0 36 39 2c 58 25 |5)).....|0:.69,X%|
|000023d0| 2c 59 25 0d 00 c8 0c fd | 59 25 3d 31 30 32 34 0d |,Y%.....|Y%=1024.|
|000023e0| ff 46 69 6c 65 44 61 74 | 61 82 66 6f 72 67 74 6d |.FileDat|a.forgtm|
|000023f0| 65 6e 6f 74 00 de 09 00 | 00 42 fb ff ff 03 70 a0 |enot....|.B....p.|
|00002400| 8f 03 00 1c 55 0d 00 0a | 12 f4 20 3e 20 46 4f 52 |....U...|.. > FOR|
|00002410| 47 54 4d 45 4e 4f 54 0d | 00 14 32 f4 20 4a 55 53 |GTMENOT.|..2. JUS|
|00002420| 54 20 41 20 56 45 52 59 | 20 4e 49 43 45 20 41 4c |T A VERY| NICE AL|
|00002430| 47 4f 52 49 54 4d 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e |GORITM..|........|
|00002440| 2e 2e 2e 2e 2e 2e 2e 2e | 2e 0d 00 1e 2d f4 20 2d |........|....-. -|
|00002450| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 31 32 |--------|------12|
|00002460| 2e 38 2e 31 20 50 41 47 | 45 20 31 33 32 2d 2d 2d |.8.1 PAG|E 132---|
|00002470| 2d 2d 2d 2d 2d 2d 0d 00 | 28 05 3a 0d 00 32 09 f2 |------..|(.:..2..|
|00002480| 49 4e 49 54 0d 00 3c 05 | 3a 0d 00 46 0d f2 41 53 |INIT..<.|:..F..AS|
|00002490| 53 45 4d 42 4c 45 0d 00 | 50 05 3a 0d 00 5a 09 f2 |SEMBLE..|P.:..Z..|
|000024a0| 46 49 4c 4c 0d 00 64 05 | 3a 0d 00 6e 05 f5 0d 00 |FILL..d.|:..n....|
|000024b0| 78 11 20 20 20 20 20 20 | d6 20 53 57 45 45 50 0d |x. |. SWEEP.|
|000024c0| 00 82 27 20 20 20 20 20 | 20 e7 20 bf 28 30 29 3d |..' | . .(0)=|
|000024d0| 22 20 22 20 3a 21 50 48 | 41 53 45 3d 21 50 48 41 |" " :!PH|ASE=!PHA|
|000024e0| 53 45 20 82 20 31 0d 00 | 8c 06 fd a3 0d 00 96 05 |SE . 1..|........|
|000024f0| 3a 0d 00 a0 05 3a 0d 00 | aa 0e dd f2 41 53 53 45 |:....:..|....ASSE|
|00002500| 4d 42 4c 45 0d 00 b4 12 | e3 20 41 25 3d 30 20 b8 |MBLE....|. A%=0 .|
|00002510| 20 32 20 88 20 32 0d 00 | be 0b 50 25 3d 41 53 53 | 2 . 2..|..P%=ASS|
|00002520| 25 0d 00 c8 0b 5b 4f 50 | 54 20 41 25 0d 00 d2 3a |%....[OP|T A%...:|
|00002530| 2e 50 48 41 53 45 20 20 | 20 20 45 51 55 44 20 20 |.PHASE | EQUD |
|00002540| 30 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |0 | |
|00002550| 20 20 5c 50 48 41 53 45 | 20 ca 53 45 54 54 20 e3 | \PHASE| .SETT .|
|00002560| 20 58 20 80 20 59 0d 00 | dc 36 2e 53 52 43 20 20 | X . Y..|.6.SRC |
|00002570| 20 20 20 20 45 51 55 44 | 20 20 41 44 52 25 20 20 | EQUD| ADR% |
|00002580| 20 20 20 20 20 20 20 20 | 20 20 20 20 5c dc 20 53 | | \. S|
|00002590| 43 52 45 45 4e 20 41 44 | 52 45 53 53 0d 00 e6 13 |CREEN AD|RESS....|
|000025a0| 20 20 20 20 20 20 20 20 | 20 20 41 4c 49 47 4e 0d | | ALIGN.|
|000025b0| 00 f0 05 5c 0d 00 fa 3e | 2e 53 57 45 45 50 20 20 |...\...>|.SWEEP |
|000025c0| 20 20 53 54 4d 46 44 20 | 52 31 33 21 2c 7b 52 30 | STMFD |R13!,{R0|
|000025d0| 2d 52 31 32 2c 52 31 34 | 7d 20 5c c7 99 20 52 45 |-R12,R14|} \.. RE|
|000025e0| 47 49 53 54 45 52 53 20 | 46 52 4f 4d 20 41 42 55 |GISTERS |FROM ABU|
|000025f0| 53 45 0d 01 04 05 5c 0d | 01 0e 3f 20 20 20 20 20 |SE....\.|..? |
|00002600| 20 20 20 20 20 4c 44 52 | 20 20 20 52 30 2c 53 52 | LDR| R0,SR|
|00002610| 43 20 20 20 20 20 20 20 | 20 20 20 20 20 5c 4d 41 |C | \MA|
|00002620| 49 4e 20 4c 4f 4f 50 2c | 20 a5 20 53 4f 55 52 43 |IN LOOP,| . SOURC|
|00002630| 45 20 c8 92 45 52 0d 01 | 18 2e 20 20 20 20 20 20 |E ..ER..|.. |
|00002640| 20 20 20 20 4c 44 52 20 | 20 20 52 31 34 2c 50 48 | LDR | R14,PH|
|00002650| 41 53 45 20 20 20 20 20 | 20 20 20 20 5c a5 20 50 |ASE | \. P|
|00002660| 48 41 53 45 0d 01 22 35 | 20 20 20 20 20 20 20 20 |HASE.."5| |
|00002670| 20 20 43 4d 50 20 20 20 | 52 31 34 2c 23 31 20 20 | CMP |R14,#1 |
|00002680| 20 20 20 20 20 20 20 20 | 20 20 5c 32 27 43 4e 44 | | \2'CND|
|00002690| 20 50 48 41 53 45 3f 3f | 3f 0d 01 2c 39 20 20 20 | PHASE??|?..,9 |
|000026a0| 20 20 20 20 20 20 20 41 | 44 44 45 51 20 52 30 2c | A|DDEQ R0,|
|000026b0| 52 30 2c 23 33 32 30 20 | 20 20 20 20 20 20 20 5c |R0,#320 | \|
|000026c0| e7 20 53 4f 2c 88 20 b8 | 20 43 4f 52 52 45 43 54 |. SO,. .| CORRECT|
|000026d0| 20 86 0d 01 36 3d 20 20 | 20 20 20 20 20 20 20 20 | ...6= | |
|000026e0| 4d 4f 56 20 20 20 52 31 | 2c 52 31 34 20 20 20 20 |MOV R1|,R14 |
|000026f0| 20 20 20 20 20 20 20 20 | 5c 53 45 54 20 4f 55 54 | |\SET OUT|
|00002700| 45 52 20 4c 4f 4f 50 20 | 43 4f 55 4e 54 45 52 0d |ER LOOP |COUNTER.|
|00002710| 01 40 1c 20 20 20 20 20 | 20 20 20 20 20 4d 4f 56 |.@. | MOV|
|00002720| 20 20 20 52 31 32 2c 23 | 33 32 30 0d 01 4a 3e 20 | R12,#|320..J> |
|00002730| 20 20 20 20 20 20 20 20 | 20 53 55 42 20 20 20 52 | | SUB R|
|00002740| 31 32 2c 52 31 32 2c 23 | 31 20 20 20 20 20 20 20 |12,R12,#|1 |
|00002750| 20 5c c7 94 20 49 4e 4e | 45 52 20 4c 4f 4f 50 20 | \.. INN|ER LOOP |
|00002760| 4c 49 4d 49 54 20 bb 55 | 45 0d 01 54 05 5c 0d 01 |LIMIT .U|E..T.\..|
|00002770| 5e 3d 2e 53 43 4e 4c 4f | 4f 50 20 20 4d 4f 56 20 |^=.SCNLO|OP MOV |
|00002780| 20 20 52 32 2c 52 31 34 | 20 20 20 20 20 20 20 20 | R2,R14| |
|00002790| 20 20 20 20 5c 53 45 54 | 20 49 4e 4e 45 52 20 4c | \SET| INNER L|
|000027a0| 4f 4f 50 20 43 4f 55 4e | 54 45 52 0d 01 68 33 20 |OOP COUN|TER..h3 |
|000027b0| 20 20 20 20 20 20 20 20 | 20 41 44 44 20 20 20 52 | | ADD R|
|000027c0| 33 2c 52 30 2c 52 31 34 | 20 20 20 20 20 20 20 20 |3,R0,R14| |
|000027d0| 20 5c a5 20 49 4e 4e 45 | 52 20 c8 92 45 52 0d 01 | \. INNE|R ..ER..|
|000027e0| 72 05 5c 0d 01 7c 27 2e | 4c 59 4e 4c 4f 4f 50 20 |r.\..|'.|LYNLOOP |
|000027f0| 20 4c 44 52 42 20 20 52 | 34 2c 5b 52 33 5d 20 20 | LDRB R|4,[R3] |
|00002800| 20 20 20 20 20 20 20 20 | 20 5c 0d 01 86 27 20 20 | | \...' |
|00002810| 20 20 20 20 20 20 20 20 | 4c 44 52 42 20 20 52 35 | |LDRB R5|
|00002820| 2c 5b 52 33 2c 23 31 5d | 20 20 20 20 20 20 20 20 |,[R3,#1]| |
|00002830| 5c 0d 01 90 27 20 20 20 | 20 20 20 20 20 20 20 4c |\...' | L|
|00002840| 44 52 42 20 20 52 36 2c | 5b 52 33 2c 23 33 32 30 |DRB R6,|[R3,#320|
|00002850| 5d 20 20 20 20 20 20 5c | 0d 01 9a 43 20 20 20 20 |] \|...C |
|00002860| 20 20 20 20 20 20 4c 44 | 52 42 20 20 52 37 2c 5b | LD|RB R7,[|
|00002870| 52 33 2c 23 33 32 31 5d | 20 20 20 20 20 20 5c a5 |R3,#321]| \.|
|00002880| 20 4e 45 49 47 48 42 4f | 55 52 53 20 49 4e 20 ea | NEIGHBO|URS IN .|
|00002890| 20 32 58 32 20 53 51 55 | 41 52 45 0d 01 a4 25 20 | 2X2 SQU|ARE...% |
|000028a0| 20 20 20 20 20 20 20 20 | 20 82 20 20 20 52 38 2c | | . R8,|
|000028b0| 52 35 2c 52 36 20 20 20 | 20 20 20 20 20 20 20 5c |R5,R6 | \|
|000028c0| 0d 01 ae 25 20 20 20 20 | 20 20 20 20 20 20 82 20 |...% | . |
|000028d0| 20 20 52 38 2c 52 38 2c | 52 37 20 20 20 20 20 20 | R8,R8,|R7 |
|000028e0| 20 20 20 20 5c 0d 01 b8 | 25 20 20 20 20 20 20 20 | \...|% |
|000028f0| 20 20 20 82 20 20 20 52 | 39 2c 52 34 2c 52 36 20 | . R|9,R4,R6 |
|00002900| 20 20 20 20 20 20 20 20 | 20 5c 0d 01 c2 25 20 20 | | \...% |
|00002910| 20 20 20 20 20 20 20 20 | 82 20 20 20 52 39 2c 52 | |. R9,R|
|00002920| 39 2c 52 37 20 20 20 20 | 20 20 20 20 20 20 5c 0d |9,R7 | \.|
|00002930| 01 cc 25 20 20 20 20 20 | 20 20 20 20 20 82 20 20 |..% | . |
|00002940| 20 52 31 30 2c 52 35 2c | 52 34 20 20 20 20 20 20 | R10,R5,|R4 |
|00002950| 20 20 20 5c 0d 01 d6 25 | 20 20 20 20 20 20 20 20 | \...%| |
|00002960| 20 20 82 20 20 20 52 31 | 30 2c 52 31 30 2c 52 37 | . R1|0,R10,R7|
|00002970| 20 20 20 20 20 20 20 20 | 5c 0d 01 e0 25 20 20 20 | |\...% |
|00002980| 20 20 20 20 20 20 20 82 | 20 20 20 52 31 31 2c 52 | .| R11,R|
|00002990| 35 2c 52 36 20 20 20 20 | 20 20 20 20 20 5c 0d 01 |5,R6 | \..|
|000029a0| ea 25 20 20 20 20 20 20 | 20 20 20 20 82 20 20 20 |.% | . |
|000029b0| 52 31 31 2c 52 31 31 2c | 52 34 20 20 20 20 20 20 |R11,R11,|R4 |
|000029c0| 20 20 5c 0d 01 f4 3a 20 | 20 20 20 20 20 20 20 20 | \...: | |
|000029d0| 20 53 54 52 42 20 20 52 | 38 2c 5b 52 33 5d 20 20 | STRB R|8,[R3] |
|000029e0| 20 20 20 20 20 20 20 20 | 20 5c c7 96 20 52 34 3d | | \.. R4=|
|000029f0| 20 52 35 20 82 20 52 36 | 20 82 20 52 37 0d 01 fe | R5 . R6| . R7...|
|00002a00| 3a 20 20 20 20 20 20 20 | 20 20 20 53 54 52 42 20 |: | STRB |
|00002a10| 20 52 39 2c 5b 52 33 2c | 23 31 5d 20 20 20 20 20 | R9,[R3,|#1] |
|00002a20| 20 20 20 5c c7 96 20 52 | 35 3d 20 52 34 20 82 20 | \.. R|5= R4 . |
|00002a30| 52 36 20 82 20 52 37 0d | 02 08 3a 20 20 20 20 20 |R6 . R7.|..: |
|00002a40| 20 20 20 20 20 53 54 52 | 42 20 20 52 31 30 2c 5b | STR|B R10,[|
|00002a50| 52 33 2c 23 33 32 30 5d | 20 20 20 20 20 5c c7 96 |R3,#320]| \..|
|00002a60| 20 52 36 3d 20 52 35 20 | 82 20 52 34 20 82 20 52 | R6= R5 |. R4 . R|
|00002a70| 37 0d 02 12 3a 20 20 20 | 20 20 20 20 20 20 20 53 |7...: | S|
|00002a80| 54 52 42 20 20 52 31 31 | 2c 5b 52 33 2c 23 33 32 |TRB R11|,[R3,#32|
|00002a90| 31 5d 20 20 20 20 20 5c | c7 96 20 52 37 3d 20 52 |1] \|.. R7= R|
|00002aa0| 35 20 82 20 52 36 20 82 | 20 52 34 0d 02 1c 05 5c |5 . R6 .| R4....\|
|00002ab0| 0d 02 26 1c 2e 4c 52 45 | 41 44 59 20 20 20 41 44 |..&..LRE|ADY AD|
|00002ac0| 44 20 20 20 52 33 2c 52 | 33 2c 23 32 0d 02 30 39 |D R3,R|3,#2..09|
|00002ad0| 20 20 20 20 20 20 20 20 | 20 20 41 44 44 20 20 20 | | ADD |
|00002ae0| 52 32 2c 52 32 2c 23 32 | 20 20 20 20 20 20 20 20 |R2,R2,#2| |
|00002af0| 20 20 5c 53 48 49 46 54 | 20 58 20 54 57 4f 20 50 | \SHIFT| X TWO P|
|00002b00| 49 58 45 4c 53 0d 02 3a | 1a 20 20 20 20 20 20 20 |IXELS..:|. |
|00002b10| 20 20 20 43 4d 50 20 20 | 20 52 32 2c 52 31 32 0d | CMP | R2,R12.|
|00002b20| 02 44 3c 20 20 20 20 20 | 20 20 20 20 20 42 4d 49 |.D< | BMI|
|00002b30| 20 20 20 4c 59 4e 4c 4f | 4f 50 20 20 20 20 20 20 | LYNLO|OP |
|00002b40| 20 20 20 20 20 5c 49 4e | 4e 45 52 20 4c 4f 4f 50 | \IN|NER LOOP|
|00002b50| 20 46 49 4e 49 53 48 45 | 44 3f 3f 0d 02 4e 05 5c | FINISHE|D??..N.\|
|00002b60| 0d 02 58 05 5c 0d 02 62 | 37 20 20 20 20 20 20 20 |..X.\..b|7 |
|00002b70| 20 20 20 41 44 44 20 20 | 20 52 30 2c 52 30 2c 23 | ADD | R0,R0,#|
|00002b80| 36 34 30 20 20 20 20 20 | 20 20 20 5c 53 48 49 46 |640 | \SHIF|
|00002b90| 54 20 53 52 43 20 54 57 | 4f 20 86 53 0d 02 6c 05 |T SRC TW|O .S..l.|
|00002ba0| 5c 0d 02 76 05 5c 0d 02 | 80 1c 20 20 20 20 20 20 |\..v.\..|.. |
|00002bb0| 20 20 20 20 41 44 44 20 | 20 20 52 31 2c 52 31 2c | ADD | R1,R1,|
|00002bc0| 23 32 0d 02 8a 3d 20 20 | 20 20 20 20 20 20 20 20 |#2...= | |
|00002bd0| 43 4d 50 20 20 20 52 31 | 2c 23 32 35 35 20 20 20 |CMP R1|,#255 |
|00002be0| 20 20 20 20 20 20 20 20 | 5c 4f 55 54 45 52 20 4c | |\OUTER L|
|00002bf0| 4f 4f 50 20 46 49 4e 49 | 53 48 45 44 3f 3f 3f 0d |OOP FINI|SHED???.|
|00002c00| 02 94 1b 20 20 20 20 20 | 20 20 20 20 20 42 4d 49 |... | BMI|
|00002c10| 20 20 20 53 43 4e 4c 4f | 4f 50 0d 02 9e 05 5c 0d | SCNLO|OP....\.|
|00002c20| 02 a8 05 5c 0d 02 b2 30 | 20 20 20 20 20 20 20 20 |...\...0| |
|00002c30| 20 20 82 20 20 20 52 31 | 34 2c 52 31 34 2c 23 31 | . R1|4,R14,#1|
|00002c40| 20 20 20 20 20 20 20 20 | 5c b8 47 47 4c 45 20 50 | |\.GGLE P|
|00002c50| 48 41 53 45 0d 02 bc 31 | 20 20 20 20 20 20 20 20 |HASE...1| |
|00002c60| 20 20 53 54 52 20 20 20 | 52 31 34 2c 50 48 41 53 | STR |R14,PHAS|
|00002c70| 45 20 20 20 20 20 20 20 | 20 20 5c 80 20 c7 99 20 |E | \. .. |
|00002c80| 50 48 41 53 45 0d 02 c6 | 30 20 20 20 20 20 20 20 |PHASE...|0 |
|00002c90| 20 20 20 4c 44 4d 46 44 | 20 52 31 33 21 2c 7b 52 | LDMFD| R13!,{R|
|00002ca0| 30 2d 52 31 32 2c 52 31 | 35 7d 5e 5c 80 20 f8 20 |0-R12,R1|5}^\. . |
|00002cb0| b8 20 d6 45 52 0d 02 d0 | 05 5c 0d 02 da 05 5c 0d |. .ER...|.\....\.|
|00002cc0| 02 e4 05 5c 0d 02 ee 05 | 5d 0d 02 f8 05 ed 0d 03 |...\....|].......|
|00002cd0| 02 05 e1 0d 03 0c 05 3a | 0d 03 16 05 3a 0d 03 20 |.......:|....:.. |
|00002ce0| 0a dd f2 46 49 4c 4c 0d | 03 2a 0d 20 20 20 eb 20 |...FILL.|.*. . |
|00002cf0| 31 32 3a 87 0d 03 34 0b | 20 20 20 44 25 3d 33 0d |12:...4.| D%=3.|
|00002d00| 03 3e 1c 20 20 20 e3 58 | 25 3d 31 35 39 2d 44 25 |.>. .X|%=159-D%|
|00002d10| 20 b8 20 31 35 39 2b 44 | 25 2d 31 0d 03 48 1f 20 | . 159+D|%-1..H. |
|00002d20| 20 20 20 20 20 e3 59 25 | 3d 31 32 38 2d 44 25 2b | .Y%|=128-D%+|
|00002d30| 31 20 b8 20 31 32 38 2b | 44 25 0d 03 52 1e 20 20 |1 . 128+|D%..R. |
|00002d40| 20 20 20 20 41 44 52 25 | 3f 28 58 25 2b 33 32 30 | ADR%|?(X%+320|
|00002d50| 2a 59 25 29 3d 26 33 33 | 0d 03 5c 0a 20 20 20 ed |*Y%)=&33|..\. .|
|00002d60| 3a ed 0d 03 66 05 e1 0d | 03 70 05 3a 0d 03 7a 05 |:...f...|.p.:..z.|
|00002d70| 3a 0d 03 84 0a dd f2 49 | 4e 49 54 0d 03 8e 07 eb |:......I|NIT.....|
|00002d80| 31 33 0d 03 98 16 de 20 | 42 25 20 31 30 2c 41 53 |13..... |B% 10,AS|
|00002d90| 53 25 20 31 30 30 30 30 | 0d 03 a2 0b 21 42 25 3d |S% 10000|....!B%=|
|00002da0| 31 34 38 0d 03 ac 0b 42 | 25 21 34 3d 2d 31 0d 03 |148....B|%!4=-1..|
|00002db0| b6 22 c8 99 20 22 4f 53 | 5f 52 65 61 64 56 64 75 |.".. "OS|_ReadVdu|
|00002dc0| 56 61 72 69 61 62 6c 65 | 73 22 2c 42 25 2c 42 25 |Variable|s",B%,B%|
|00002dd0| 0d 03 c0 0c 41 44 52 25 | 3d 21 42 25 0d 03 ca 05 |....ADR%|=!B%....|
|00002de0| e1 0d ff 46 69 6c 65 44 | 61 74 61 82 66 72 61 63 |...FileD|ata.frac|
|00002df0| 74 61 6c 61 6e 64 00 2c | 0d 00 00 42 fb ff ff 98 |taland.,|...B....|
|00002e00| 01 30 a4 03 00 19 c9 0d | 00 0a 12 f4 20 3e 20 46 |.0......|.... > F|
|00002e10| 52 41 43 54 41 4c 41 4e | 44 0d 00 14 08 eb 20 32 |RACTALAN|D..... 2|
|00002e20| 30 0d 00 1e 0c 78 25 3d | b3 28 2d 91 29 0d 00 28 |0....x%=|.(-.)..(|
|00002e30| 10 f2 53 54 41 52 54 53 | 43 52 45 45 4e 0d 00 32 |..STARTS|CREEN..2|
|00002e40| 33 eb 20 31 32 3a e3 4b | 4c 49 25 3d 30 b8 31 35 |3. 12:.K|LI%=0.15|
|00002e50| 3a fb 4b 4c 49 25 2c 4b | 4c 49 25 2a 31 36 2c 4b |:.KLI%,K|LI%*16,K|
|00002e60| 4c 49 25 2a 31 36 2c 4b | 4c 49 25 2a 31 36 3a ed |LI%*16,K|LI%*16:.|
|00002e70| 0d 00 3c 0e c8 91 20 36 | 34 30 2c 38 30 30 0d 00 |..<... 6|40,800..|
|00002e80| 46 08 f2 56 41 52 0d 00 | 50 05 3a 0d 00 5a 27 3a |F..VAR..|P.:..Z':|
|00002e90| f4 20 46 49 4c 4c 49 4e | 47 20 41 52 52 41 59 20 |. FILLIN|G ARRAY |
|00002ea0| 54 4f 20 4c 49 4d 49 54 | 20 4f 46 20 4d 45 4d 4f |TO LIMIT| OF MEMO|
|00002eb0| 52 59 0d 00 64 05 3a 0d | 00 6e 05 f5 0d 00 78 07 |RY..d.:.|.n....x.|
|00002ec0| 20 20 db 0d 00 82 17 20 | 20 e3 53 5a 25 3d 45 53 | ..... | .SZ%=ES|
|00002ed0| 25 b8 42 53 25 88 2d 44 | 53 25 0d 00 8c 33 20 20 |%.BS%.-D|S%...3 |
|00002ee0| 20 20 5a 31 3d 5a 42 2b | 28 53 5a 25 2d 44 53 25 | Z1=ZB+|(SZ%-DS%|
|00002ef0| 29 2a 44 5a 3a 5a 32 3d | 5a 31 3a 5a 33 3d 5a 42 |)*DZ:Z2=|Z1:Z3=ZB|
|00002f00| 2b 53 5a 25 2a 44 5a 3a | 5a 34 3d 5a 33 0d 00 96 |+SZ%*DZ:|Z4=Z3...|
|00002f10| 18 20 20 20 20 e3 53 58 | 25 3d 42 53 25 b8 45 53 |. .SX|%=BS%.ES|
|00002f20| 25 88 44 53 25 0d 00 a0 | 35 20 20 20 20 20 20 58 |%.DS%...|5 X|
|00002f30| 31 3d 58 42 2b 28 53 58 | 25 2d 44 53 25 29 2a 44 |1=XB+(SX|%-DS%)*D|
|00002f40| 58 3a 58 34 3d 58 31 3a | 58 32 3d 58 42 2b 53 58 |X:X4=X1:|X2=XB+SX|
|00002f50| 25 2a 44 58 3a 58 33 3d | 58 32 0d 00 aa 31 20 20 |%*DX:X3=|X2...1 |
|00002f60| 20 20 20 20 59 31 3d 59 | 28 53 58 25 2d 44 53 25 | Y1=Y|(SX%-DS%|
|00002f70| 2c 53 5a 25 2d 44 53 25 | 29 3a 59 32 3d 59 28 53 |,SZ%-DS%|):Y2=Y(S|
|00002f80| 58 25 2c 53 5a 25 2d 44 | 53 25 29 0d 00 b4 29 20 |X%,SZ%-D|S%)...) |
|00002f90| 20 20 20 20 20 59 33 3d | 59 28 53 58 25 2c 53 5a | Y3=|Y(SX%,SZ|
|00002fa0| 25 29 3a 59 34 3d 59 28 | 53 58 25 2d 44 53 25 2c |%):Y4=Y(|SX%-DS%,|
|00002fb0| 53 5a 25 29 0d 00 be 12 | 20 20 20 20 20 20 49 25 |SZ%)....| I%|
|00002fc0| 3d 44 53 25 81 32 0d 00 | c8 16 20 20 20 20 20 20 |=DS%.2..|.. |
|00002fd0| f2 42 41 43 4b 3a f2 46 | 52 4f 4e 54 0d 00 d2 13 |.BACK:.F|RONT....|
|00002fe0| 20 20 20 20 20 20 e7 20 | 44 53 25 3e 31 20 8c 0d | . |DS%>1 ..|
|00002ff0| 00 dc 2e 20 20 20 20 20 | 20 20 59 28 53 58 25 2d |... | Y(SX%-|
|00003000| 49 25 2c 53 5a 25 2d 44 | 53 25 29 3d 28 59 31 2b |I%,SZ%-D|S%)=(Y1+|
|00003010| 59 32 29 2a 2e 35 2b a4 | 53 48 49 46 54 0d 00 e6 |Y2)*.5+.|SHIFT...|
|00003020| 2a 20 20 20 20 20 20 20 | 59 28 53 58 25 2c 53 5a |* |Y(SX%,SZ|
|00003030| 25 2d 49 25 29 3d 28 59 | 32 2b 59 33 29 2a 2e 35 |%-I%)=(Y|2+Y3)*.5|
|00003040| 2b a4 53 48 49 46 54 0d | 00 f0 2a 20 20 20 20 20 |+.SHIFT.|..* |
|00003050| 20 20 59 28 53 58 25 2d | 49 25 2c 53 5a 25 29 3d | Y(SX%-|I%,SZ%)=|
|00003060| 28 59 33 2b 59 34 29 2a | 2e 35 2b a4 53 48 49 46 |(Y3+Y4)*|.5+.SHIF|
|00003070| 54 0d 00 fa 2e 20 20 20 | 20 20 20 20 59 28 53 58 |T.... | Y(SX|
|00003080| 25 2d 44 53 25 2c 53 5a | 25 2d 49 25 29 3d 28 59 |%-DS%,SZ|%-I%)=(Y|
|00003090| 34 2b 59 31 29 2a 2e 35 | 2b a4 53 48 49 46 54 0d |4+Y1)*.5|+.SHIFT.|
|000030a0| 01 04 32 20 20 20 20 20 | 20 20 59 28 53 58 25 2d |..2 | Y(SX%-|
|000030b0| 49 25 2c 53 5a 25 2d 49 | 25 29 3d 28 59 31 2b 59 |I%,SZ%-I|%)=(Y1+Y|
|000030c0| 32 2b 59 33 2b 59 34 29 | 2f 34 2b a4 53 48 49 46 |2+Y3+Y4)|/4+.SHIF|
|000030d0| 54 0d 01 0e 0b 20 20 20 | 20 20 20 cd 0d 01 18 09 |T.... | .....|
|000030e0| 20 20 20 20 ed 0d 01 22 | 07 20 20 ed 0d 01 2c 1c | ..."|. ...,.|
|000030f0| 20 20 44 53 25 3d 44 53 | 25 20 81 32 3a 42 53 25 | DS%=DS|% .2:BS%|
|00003100| 3d 42 53 25 20 81 20 32 | 0d 01 36 16 20 20 58 24 |=BS% . 2|..6. X$|
|00003110| 3d be 3a e7 20 58 24 3c | 3e 22 20 22 20 f9 0d 01 |=.:. X$<|>" " ...|
|00003120| 40 07 20 20 db 0d 01 4a | 0b fd 20 44 53 25 3d 30 |@. ...J|.. DS%=0|
|00003130| 0d 01 54 05 3a 0d 01 5e | 1c f4 20 52 45 43 55 52 |..T.:..^|.. RECUR|
|00003140| 53 49 56 45 20 46 55 54 | 48 45 52 20 53 50 4c 49 |SIVE FUT|HER SPLI|
|00003150| 54 0d 01 68 05 3a 0d 01 | 72 09 f2 57 49 50 45 0d |T..h.:..|r..WIPE.|
|00003160| 01 7c 14 e3 53 5a 25 3d | 45 53 25 20 b8 20 31 20 |.|..SZ%=|ES% . 1 |
|00003170| 88 2d 31 0d 01 86 2f 20 | 20 5a 31 3d 5a 42 2b 28 |.-1.../ | Z1=ZB+(|
|00003180| 53 5a 25 2d 31 29 2a 44 | 5a 3a 5a 32 3d 5a 31 3a |SZ%-1)*D|Z:Z2=Z1:|
|00003190| 5a 33 3d 5a 42 2b 53 5a | 25 2a 44 5a 3a 5a 34 3d |Z3=ZB+SZ|%*DZ:Z4=|
|000031a0| 5a 33 0d 01 90 12 20 20 | e3 53 58 25 3d 31 20 b8 |Z3.... |.SX%=1 .|
|000031b0| 20 45 53 25 0d 01 9a 31 | 20 20 20 20 58 31 3d 58 | ES%...1| X1=X|
|000031c0| 42 2b 28 53 58 25 2d 31 | 29 2a 44 58 3a 58 34 3d |B+(SX%-1|)*DX:X4=|
|000031d0| 58 31 3a 58 32 3d 58 42 | 2b 53 58 25 2a 44 58 3a |X1:X2=XB|+SX%*DX:|
|000031e0| 58 33 3d 58 32 0d 01 a4 | 29 20 20 20 20 59 31 3d |X3=X2...|) Y1=|
|000031f0| 59 28 53 58 25 2d 31 2c | 53 5a 25 2d 31 29 3a 59 |Y(SX%-1,|SZ%-1):Y|
|00003200| 32 3d 59 28 53 58 25 2c | 53 5a 25 2d 31 29 0d 01 |2=Y(SX%,|SZ%-1)..|
|00003210| ae 25 20 20 20 20 59 33 | 3d 59 28 53 58 25 2c 53 |.% Y3|=Y(SX%,S|
|00003220| 5a 25 29 3a 59 34 3d 59 | 28 53 58 25 2d 31 2c 53 |Z%):Y4=Y|(SX%-1,S|
|00003230| 5a 25 29 0d 01 b8 30 20 | 20 20 20 f2 53 51 28 58 |Z%)...0 | .SQ(X|
|00003240| 31 2c 59 31 2c 5a 31 2c | 58 32 2c 59 32 2c 5a 32 |1,Y1,Z1,|X2,Y2,Z2|
|00003250| 2c 58 33 2c 59 33 2c 5a | 33 2c 58 34 2c 59 34 2c |,X3,Y3,Z|3,X4,Y4,|
|00003260| 5a 34 29 0d 01 c2 07 20 | 20 ed 0d 01 cc 05 ed 0d |Z4).... | .......|
|00003270| 01 d6 19 2a 53 43 52 45 | 45 4e 53 41 56 45 20 46 |...*SCRE|ENSAVE F|
|00003280| 52 41 43 4f 4e 49 55 4d | 0d 01 e0 09 f5 20 fd 20 |RACONIUM|..... . |
|00003290| a3 0d 01 ea 05 3a 0d 01 | f4 05 3a 0d 01 fe 20 dd |.....:..|..:... .|
|000032a0| a4 53 48 49 46 54 3a 3d | 28 b3 28 31 29 2d 2e 33 |.SHIFT:=|(.(1)-.3|
|000032b0| 29 2a 52 2a 28 58 32 2d | 58 31 29 0d 02 08 05 3a |)*R*(X2-|X1)....:|
|000032c0| 0d 02 12 05 3a 0d 02 1c | 0a dd f2 42 41 43 4b 0d |....:...|...BACK.|
|000032d0| 02 26 13 e7 28 59 31 2b | 59 33 2b 59 34 29 3c 30 |.&..(Y1+|Y3+Y4)<0|
|000032e0| 20 8c 0d 02 30 0a 20 20 | 4b 25 3d 34 0d 02 3a 05 | ...0. |K%=4..:.|
|000032f0| cc 0d 02 44 30 20 20 48 | 31 3d 48 4c 2d 9d 99 28 |...D0 H|1=HL-..(|
|00003300| 28 59 33 2d 59 34 29 2f | 28 58 33 2d 58 34 29 29 |(Y3-Y4)/|(X3-X4))|
|00003310| 3a e7 20 94 28 48 31 29 | 3e 39 30 20 48 31 3d 39 |:. .(H1)|>90 H1=9|
|00003320| 30 0d 02 4e 30 20 20 48 | 32 3d 48 46 2d 9d 99 28 |0..N0 H|2=HF-..(|
|00003330| 28 59 34 2d 59 31 29 2f | 28 5a 34 2d 5a 31 29 29 |(Y4-Y1)/|(Z4-Z1))|
|00003340| 3a e7 20 94 28 48 32 29 | 3e 39 30 20 48 32 3d 39 |:. .(H2)|>90 H2=9|
|00003350| 30 0d 02 58 15 20 20 4b | 25 3d 31 35 2a 9b b2 48 |0..X. K|%=15*..H|
|00003360| 31 2a 9b b2 48 32 0d 02 | 62 05 cd 0d 02 6c 1f e6 |1*..H2..|b....l..|
|00003370| 20 30 2c 4b 25 3a ec 58 | 34 2a 55 2f 5a 34 2c 28 | 0,K%:.X|4*U/Z4,(|
|00003380| 59 34 2d 48 29 2a 55 2f | 5a 34 0d 02 76 18 ec 58 |Y4-H)*U/|Z4..v..X|
|00003390| 33 2a 55 2f 5a 33 2c 28 | 59 33 2d 48 29 2a 55 2f |3*U/Z3,(|Y3-H)*U/|
|000033a0| 5a 33 0d 02 80 1b f0 38 | 35 2c 58 31 2a 55 2f 5a |Z3.....8|5,X1*U/Z|
|000033b0| 31 2c 28 59 31 2d 48 29 | 2a 55 2f 5a 31 0d 02 8a |1,(Y1-H)|*U/Z1...|
|000033c0| 05 e1 0d 02 94 05 3a 0d | 02 9e 05 3a 0d 02 a8 0b |......:.|...:....|
|000033d0| dd f2 46 52 4f 4e 54 0d | 02 b2 13 e7 28 59 31 2b |..FRONT.|....(Y1+|
|000033e0| 59 32 2b 59 33 29 3c 30 | 20 8c 0d 02 bc 0b 20 20 |Y2+Y3)<0| ..... |
|000033f0| 20 4b 25 3d 34 0d 02 c6 | 05 cc 0d 02 d0 31 20 20 | K%=4...|.....1 |
|00003400| 20 48 31 3d 48 4c 2d 9d | 99 28 28 59 32 2d 59 31 | H1=HL-.|.((Y2-Y1|
|00003410| 29 2f 28 58 32 2d 58 31 | 29 29 3a e7 20 94 28 48 |)/(X2-X1|)):. .(H|
|00003420| 31 29 3e 39 30 20 48 31 | 3d 39 30 0d 02 da 31 20 |1)>90 H1|=90...1 |
|00003430| 20 20 48 32 3d 48 46 2d | 9d 99 28 28 59 33 2d 59 | H2=HF-|..((Y3-Y|
|00003440| 32 29 2f 28 5a 33 2d 5a | 32 29 29 3a e7 20 94 28 |2)/(Z3-Z|2)):. .(|
|00003450| 48 31 29 3e 39 30 20 48 | 31 3d 39 30 0d 02 e4 16 |H1)>90 H|1=90....|
|00003460| 20 20 20 4b 25 3d 31 35 | 2a 9b b2 48 31 2a 9b b2 | K%=15|*..H1*..|
|00003470| 48 32 0d 02 ee 05 cd 0d | 02 f8 22 e6 20 30 2c 4b |H2......|..". 0,K|
|00003480| 25 3a f0 38 35 2c 58 32 | 2a 55 2f 5a 32 2c 28 59 |%:.85,X2|*U/Z2,(Y|
|00003490| 32 2d 48 29 2a 55 2f 5a | 32 0d 03 02 05 e1 0d 03 |2-H)*U/Z|2.......|
|000034a0| 0c 05 3a 0d 03 16 05 3a | 0d 03 20 09 dd f2 56 41 |..:....:|.. ...VA|
|000034b0| 52 0d 03 2a 32 53 3d 2e | 35 3a f4 20 20 20 20 20 |R..*2S=.|5:. |
|000034c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000034d0| 20 44 49 53 54 41 4e 43 | 45 20 54 4f 20 53 43 52 | DISTANC|E TO SCR|
|000034e0| 45 45 4e 0d 03 34 2c 48 | 3d 32 35 30 3a f4 20 20 |EEN..4,H|=250:. |
|000034f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003500| 20 20 20 41 4c 54 49 54 | 55 44 45 20 45 59 45 0d | ALTIT|UDE EYE.|
|00003510| 03 3e 12 53 43 52 45 45 | 4e 53 49 5a 45 3d 2e 32 |.>.SCREE|NSIZE=.2|
|00003520| 35 0d 03 48 29 50 49 58 | 45 4c 3d 31 32 38 30 2e |5..H)PIX|EL=1280.|
|00003530| 2f 53 43 52 45 45 4e 53 | 49 5a 45 3a f4 20 20 20 |/SCREENS|IZE:. |
|00003540| 20 50 49 58 45 4c 53 49 | 5a 45 0d 03 52 2f 55 3d | PIXELSI|ZE..R/U=|
|00003550| 53 2a 50 49 58 45 4c 3a | f4 20 20 20 20 20 20 20 |S*PIXEL:|. |
|00003560| 20 20 20 20 20 20 20 20 | 20 20 43 4f 4d 42 49 4e | | COMBIN|
|00003570| 45 44 20 53 43 41 4c 41 | 52 0d 03 5c 32 52 3d 2e |ED SCALA|R..\2R=.|
|00003580| 34 3a f4 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |4:. | |
|00003590| 20 20 20 20 20 20 20 20 | 52 4f 55 47 48 4e 45 53 | |ROUGHNES|
|000035a0| 53 20 50 41 52 41 4d 45 | 54 45 52 0d 03 66 0a 4c |S PARAME|TER..f.L|
|000035b0| 25 3d 31 32 38 0d 03 70 | 2a de 20 59 28 4c 25 2c |%=128..p|*. Y(L%,|
|000035c0| 4c 25 29 3a f4 20 20 20 | 20 20 20 20 20 20 20 20 |L%):. | |
|000035d0| 20 41 4c 54 49 54 55 44 | 45 20 41 52 52 41 59 0d | ALTITUD|E ARRAY.|
|000035e0| 03 7a 0f 59 28 30 2c 30 | 29 3d 2d 38 30 30 0d 03 |.z.Y(0,0|)=-800..|
|000035f0| 84 10 59 28 4c 25 2c 30 | 29 3d 2d 38 30 30 0d 03 |..Y(L%,0|)=-800..|
|00003600| 8e 22 58 42 3d 2d 31 32 | 30 30 3a 44 58 3d 32 34 |."XB=-12|00:DX=24|
|00003610| 30 30 2f 4c 25 3a 58 42 | 3d 58 42 2d 44 58 2f 32 |00/L%:XB|=XB-DX/2|
|00003620| 0d 03 98 1b 5a 42 3d 34 | 30 30 3a 44 5a 3d 28 35 |....ZB=4|00:DZ=(5|
|00003630| 30 30 30 2d 38 30 30 29 | 2f 4c 25 0d 03 a2 39 45 |000-800)|/L%...9E|
|00003640| 53 25 3d 4c 25 3a 44 53 | 25 3d 4c 25 3a 42 53 25 |S%=L%:DS|%=L%:BS%|
|00003650| 3d 4c 25 3a f4 20 20 20 | 20 20 20 20 20 20 20 4c |=L%:. | L|
|00003660| 4f 4f 50 20 53 54 41 52 | 54 20 50 41 52 41 4d 45 |OOP STAR|T PARAME|
|00003670| 54 45 52 53 0d 03 ac 3d | 48 4c 3d 34 35 3a 48 46 |TERS...=|HL=45:HF|
|00003680| 3d 32 35 3a f4 20 20 20 | 20 20 20 20 20 20 20 20 |=25:. | |
|00003690| 20 20 20 20 20 20 4c 49 | 4e 4b 53 45 20 45 4e 20 | LI|NKSE EN |
|000036a0| 46 4f 52 57 41 52 44 20 | 5a 4f 4e 4e 45 48 4f 45 |FORWARD |ZONNEHOE|
|000036b0| 4b 0d 03 b6 05 e1 0d 03 | c0 05 3a 0d 03 ca 05 3a |K.......|..:....:|
|000036c0| 0d 03 d4 0a dd f2 57 49 | 50 45 0d 03 de 1f e6 30 |......WI|PE.....0|
|000036d0| 2c 31 32 3a c8 93 20 c8 | 90 20 2d 37 30 30 2c 30 |,12:.. .|. -700,0|
|000036e0| 2c 31 34 30 30 2c 33 30 | 30 0d 03 e8 22 e6 30 2c |,1400,30|0...".0,|
|000036f0| 34 20 3a c8 93 20 c8 90 | 20 2d 37 30 30 2c 2d 39 |4 :.. ..| -700,-9|
|00003700| 30 30 2c 31 34 30 30 2c | 39 30 30 0d 03 f2 21 f1 |00,1400,|900...!.|
|00003710| 8a 32 30 2c 32 30 29 3b | 22 28 4c 49 4d 3d 31 29 |.20,20);|"(LIM=1)|
|00003720| 20 44 45 50 54 48 3a 22 | 3b 44 53 25 0d 03 fc 05 | DEPTH:"|;DS%....|
|00003730| e1 0d 04 06 05 3a 0d 04 | 10 05 3a 0d 04 1a 2d dd |.....:..|..:...-.|
|00003740| f2 53 51 28 58 31 2c 59 | 31 2c 5a 31 2c 58 32 2c |.SQ(X1,Y|1,Z1,X2,|
|00003750| 59 32 2c 5a 32 2c 58 33 | 2c 59 33 2c 5a 33 2c 58 |Y2,Z2,X3|,Y3,Z3,X|
|00003760| 34 2c 59 34 2c 5a 34 29 | 0d 04 24 71 e7 20 b0 58 |4,Y4,Z4)|..$q. .X|
|00003770| 31 2a 55 2f 5a 31 2c 28 | 59 31 2d 48 29 2a 55 2f |1*U/Z1,(|Y1-H)*U/|
|00003780| 5a 31 29 3d 2d 31 20 80 | 20 b0 58 32 2a 55 2f 5a |Z1)=-1 .| .X2*U/Z|
|00003790| 32 2c 28 59 32 2d 48 29 | 2a 55 2f 5a 32 29 3d 2d |2,(Y2-H)|*U/Z2)=-|
|000037a0| 31 20 80 20 b0 58 33 2a | 55 2f 5a 33 2c 28 59 33 |1 . .X3*|U/Z3,(Y3|
|000037b0| 2d 48 29 2a 55 2f 5a 33 | 29 3d 2d 31 20 80 20 b0 |-H)*U/Z3|)=-1 . .|
|000037c0| 58 34 2a 55 2f 5a 34 2c | 28 59 34 2d 48 29 2a 55 |X4*U/Z4,|(Y4-H)*U|
|000037d0| 2f 5a 34 29 3d 2d 31 20 | e1 0d 04 2e 28 e7 20 28 |/Z4)=-1 |....(. (|
|000037e0| 58 32 2a 55 2f 5a 32 2d | 58 31 2a 55 2f 5a 32 29 |X2*U/Z2-|X1*U/Z2)|
|000037f0| 3c 37 20 f2 42 41 43 4b | 3a f2 46 52 4f 4e 54 3a |<7 .BACK|:.FRONT:|
|00003800| e1 0d 04 38 3e ea 20 58 | 31 32 2c 59 31 32 2c 5a |...8>. X|12,Y12,Z|
|00003810| 31 32 2c 58 32 33 2c 59 | 32 33 2c 5a 32 33 2c 58 |12,X23,Y|23,Z23,X|
|00003820| 33 34 2c 59 33 34 2c 5a | 33 34 2c 58 34 31 2c 59 |34,Y34,Z|34,X41,Y|
|00003830| 34 31 2c 5a 34 31 2c 58 | 4d 2c 59 4d 2c 5a 4d 0d |41,Z41,X|M,YM,ZM.|
|00003840| 04 42 4e 58 31 32 3d 28 | 58 31 2b 58 32 29 2f 32 |.BNX12=(|X1+X2)/2|
|00003850| 3a 58 32 33 3d 28 58 32 | 2b 58 33 29 2f 32 3a 58 |:X23=(X2|+X3)/2:X|
|00003860| 33 34 3d 28 58 33 2b 58 | 34 29 2f 32 3a 58 34 31 |34=(X3+X|4)/2:X41|
|00003870| 3d 28 58 34 2b 58 31 29 | 2f 32 3a 58 4d 3d 28 58 |=(X4+X1)|/2:XM=(X|
|00003880| 31 2b 58 32 2b 58 33 2b | 58 34 29 2f 34 0d 04 4c |1+X2+X3+|X4)/4..L|
|00003890| 4e 5a 31 32 3d 28 5a 31 | 2b 5a 32 29 2f 32 3a 5a |NZ12=(Z1|+Z2)/2:Z|
|000038a0| 32 33 3d 28 5a 32 2b 5a | 33 29 2f 32 3a 5a 33 34 |23=(Z2+Z|3)/2:Z34|
|000038b0| 3d 28 5a 33 2b 5a 34 29 | 2f 32 3a 5a 34 31 3d 28 |=(Z3+Z4)|/2:Z41=(|
|000038c0| 5a 34 2b 5a 31 29 2f 32 | 3a 5a 4d 3d 28 5a 31 2b |Z4+Z1)/2|:ZM=(Z1+|
|000038d0| 5a 32 2b 5a 33 2b 5a 34 | 29 2f 34 0d 04 56 2d 59 |Z2+Z3+Z4|)/4..V-Y|
|000038e0| 31 32 3d 28 59 31 2b 59 | 32 29 2f 32 2b a4 53 48 |12=(Y1+Y|2)/2+.SH|
|000038f0| 49 46 54 3a 59 32 33 3d | 28 59 32 2b 59 33 29 2f |IFT:Y23=|(Y2+Y3)/|
|00003900| 32 2b a4 53 48 49 46 54 | 0d 04 60 2d 59 33 34 3d |2+.SHIFT|..`-Y34=|
|00003910| 28 59 33 2b 59 34 29 2f | 32 2b a4 53 48 49 46 54 |(Y3+Y4)/|2+.SHIFT|
|00003920| 3a 59 34 31 3d 28 59 34 | 2b 59 31 29 2f 32 2b a4 |:Y41=(Y4|+Y1)/2+.|
|00003930| 53 48 49 46 54 0d 04 6a | 1d 59 4d 3d 28 59 31 2b |SHIFT..j|.YM=(Y1+|
|00003940| 59 32 2b 59 33 2b 59 34 | 29 2f 34 2b a4 53 48 49 |Y2+Y3+Y4|)/4+.SHI|
|00003950| 46 54 0d 04 74 32 f2 53 | 51 28 58 34 31 2c 59 34 |FT..t2.S|Q(X41,Y4|
|00003960| 31 2c 5a 34 31 2c 58 4d | 2c 59 4d 2c 5a 4d 2c 58 |1,Z41,XM|,YM,ZM,X|
|00003970| 33 34 2c 59 33 34 2c 5a | 33 34 2c 58 34 2c 59 34 |34,Y34,Z|34,X4,Y4|
|00003980| 2c 5a 34 29 0d 04 7e 32 | f2 53 51 28 58 4d 2c 59 |,Z4)..~2|.SQ(XM,Y|
|00003990| 4d 2c 5a 4d 2c 58 32 33 | 2c 59 32 33 2c 5a 32 33 |M,ZM,X23|,Y23,Z23|
|000039a0| 2c 58 33 2c 59 33 2c 5a | 33 2c 58 33 34 2c 59 33 |,X3,Y3,Z|3,X34,Y3|
|000039b0| 34 2c 5a 33 34 29 0d 04 | 88 32 f2 53 51 28 58 31 |4,Z34)..|.2.SQ(X1|
|000039c0| 2c 59 31 2c 5a 31 2c 58 | 31 32 2c 59 31 32 2c 5a |,Y1,Z1,X|12,Y12,Z|
|000039d0| 31 32 2c 58 4d 2c 59 4d | 2c 5a 4d 2c 58 34 31 2c |12,XM,YM|,ZM,X41,|
|000039e0| 59 34 31 2c 5a 34 31 29 | 0d 04 92 32 f2 53 51 28 |Y41,Z41)|...2.SQ(|
|000039f0| 58 31 32 2c 59 31 32 2c | 5a 31 32 2c 58 32 2c 59 |X12,Y12,|Z12,X2,Y|
|00003a00| 32 2c 5a 32 2c 58 32 33 | 2c 59 32 33 2c 5a 32 33 |2,Z2,X23|,Y23,Z23|
|00003a10| 2c 58 4d 2c 59 4d 2c 5a | 4d 29 0d 04 9c 05 e1 0d |,XM,YM,Z|M)......|
|00003a20| 04 a6 05 3a 0d 04 b0 05 | 3a 0d 04 ba 11 dd f2 53 |...:....|:......S|
|00003a30| 54 41 52 54 53 43 52 45 | 45 4e 0d 04 c4 1a f1 22 |TARTSCRE|EN....."|
|00003a40| 46 52 41 43 54 41 4c 20 | 4c 41 4e 44 53 43 41 50 |FRACTAL |LANDSCAP|
|00003a50| 45 2e 22 27 0d 04 ce 26 | f1 22 42 45 43 41 55 53 |E."'...&|."BECAUS|
|00003a60| 45 20 54 48 45 20 50 49 | 43 54 55 52 45 20 49 53 |E THE PI|CTURE IS|
|00003a70| 20 52 41 4e 44 4f 4d 2c | 22 27 0d 04 d8 20 f1 22 | RANDOM,|"'... ."|
|00003a80| 57 49 54 48 4f 55 54 20 | 41 4e 59 20 52 45 53 52 |WITHOUT |ANY RESR|
|00003a90| 49 43 54 49 4f 4e 53 2c | 22 27 0d 04 e2 22 f1 22 |ICTIONS,|"'..."."|
|00003aa0| 53 4f 4d 45 20 50 49 43 | 54 55 52 45 53 20 4c 4f |SOME PIC|TURES LO|
|00003ab0| 4f 4b 20 55 47 4c 59 2e | 22 27 27 27 0d 04 ec 21 |OK UGLY.|"'''...!|
|00003ac0| f1 22 53 41 56 45 44 20 | 41 53 20 22 22 46 52 41 |."SAVED |AS ""FRA|
|00003ad0| 43 4f 4e 49 55 4d 22 22 | 22 27 27 27 27 0d 04 f6 |CONIUM""|"''''...|
|00003ae0| 23 f1 22 48 49 54 20 53 | 50 41 43 45 20 46 4f 52 |#."HIT S|PACE FOR|
|00003af0| 20 4e 45 58 54 20 53 54 | 41 47 45 53 2c 22 27 27 | NEXT ST|AGES,"''|
|00003b00| 0d 05 00 25 f1 22 4f 52 | 20 41 4e 59 20 4f 54 48 |...%."OR| ANY OTH|
|00003b10| 45 52 20 46 4f 52 20 4e | 45 57 20 50 49 43 54 55 |ER FOR N|EW PICTU|
|00003b20| 52 45 22 27 27 0d 05 0a | 07 58 3d a5 0d 05 14 05 |RE"''...|.X=.....|
|00003b30| e1 0d ff 46 69 6c 65 44 | 61 74 61 82 67 61 73 2d |...FileD|ata.gas-|
|00003b40| 68 70 2d 63 6f 6c 00 34 | 19 00 00 42 fb ff ff 3e |hp-col.4|...B...>|
|00003b50| 4f af 9e 03 00 df b3 0d | 00 0a 12 f4 20 3e 20 47 |O.......|.... > G|
|00003b60| 41 53 2d 48 50 2d 43 4f | 4c 0d 00 14 07 eb 31 32 |AS-HP-CO|L.....12|
|00003b70| 0d 00 1e 31 f1 22 52 45 | 56 45 52 53 49 42 4c 45 |...1."RE|VERSIBLE|
|00003b80| 20 42 49 4e 41 52 59 20 | 47 41 53 20 57 49 54 48 | BINARY |GAS WITH|
|00003b90| 20 43 4f 4c 4c 49 53 49 | 4f 4e 20 4d 4f 44 45 22 | COLLISI|ON MODE"|
|00003ba0| 27 0d 00 28 24 f1 22 48 | 49 54 20 53 50 41 43 45 |'..($."H|IT SPACE|
|00003bb0| 20 54 4f 20 52 45 4d 4f | 56 45 20 53 54 4f 50 50 | TO REMO|VE STOPP|
|00003bc0| 45 52 2e 22 27 0d 00 32 | 24 f1 22 48 49 54 20 22 |ER."'..2|$."HIT "|
|00003bd0| 22 46 22 22 20 46 4f 52 | 20 54 49 4d 45 20 52 45 |"F"" FOR| TIME RE|
|00003be0| 56 45 52 53 41 4c 2e 22 | 27 0d 00 3c 47 f1 22 41 |VERSAL."|'..<G."A|
|00003bf0| 20 43 4c 55 4d 50 20 4f | 46 20 47 41 53 20 49 53 | CLUMP O|F GAS IS|
|00003c00| 20 52 45 4c 45 41 53 45 | 44 20 49 4e 20 54 48 45 | RELEASE|D IN THE|
|00003c10| 20 4d 49 44 44 4c 45 20 | 4f 46 20 41 4e 20 4f 4c | MIDDLE |OF AN OL|
|00003c20| 44 20 42 4f 54 54 4c 45 | 2e 2e 2e 2e 22 27 27 27 |D BOTTLE|...."'''|
|00003c30| 0d 00 46 14 f1 22 48 49 | 54 20 53 50 41 43 45 2e |..F.."HI|T SPACE.|
|00003c40| 2e 2e 22 3b 0d 00 50 07 | 58 3d a5 0d 00 5a 05 3a |..";..P.|X=...Z.:|
|00003c50| 0d 00 64 2b f4 20 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..d+. --|--------|
|00003c60| 2d 2d 2d 2d 2d 31 32 2e | 32 20 50 41 47 45 20 31 |-----12.|2 PAGE 1|
|00003c70| 32 31 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 00 6e 05 3a |21------|---..n.:|
|00003c80| 0d 00 78 09 f2 49 4e 49 | 54 0d 00 82 05 3a 0d 00 |..x..INI|T....:..|
|00003c90| 8c 0d f2 41 53 53 45 4d | 42 4c 45 0d 00 96 05 3a |...ASSEM|BLE....:|
|00003ca0| 0d 00 a0 09 f2 46 49 4c | 4c 0d 00 aa 05 3a 0d 00 |.....FIL|L....:..|
|00003cb0| b4 0a 4b 25 3d 37 38 30 | 0d 00 be 05 f5 0d 00 c8 |..K%=780|........|
|00003cc0| 11 20 20 20 20 20 20 d6 | 20 53 57 45 45 50 0d 00 |. .| SWEEP..|
|00003cd0| d2 13 20 20 20 20 20 20 | c8 8e 20 bf 28 30 29 20 |.. |.. .(0) |
|00003ce0| ca 0d 00 dc 29 20 20 20 | 20 20 20 20 20 c9 20 22 |....) | . "|
|00003cf0| 20 22 3a e6 30 3a c8 93 | 20 c8 90 20 35 38 30 2c | ":.0:..| .. 580,|
|00003d00| 4b 25 2c 31 31 38 2c 31 | 30 30 0d 00 e6 1a 20 20 |K%,118,1|00.... |
|00003d10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3a 4b | | :K|
|00003d20| 25 2b 3d 34 0d 00 f0 2c | 20 20 20 20 20 20 20 20 |%+=4...,| |
|00003d30| 20 20 20 20 20 20 20 20 | 3a e6 31 3a c8 93 20 c8 | |:.1:.. .|
|00003d40| 90 20 35 38 30 2c 4b 25 | 2c 31 31 38 2c 31 30 30 |. 580,K%|,118,100|
|00003d50| 0d 00 fa 21 20 20 20 20 | 20 20 20 20 c9 20 22 46 |...! | . "F|
|00003d60| 22 3a 21 46 41 53 45 3d | 21 46 41 53 45 20 82 20 |":!FASE=|!FASE . |
|00003d70| 31 0d 01 04 0b 20 20 20 | 20 20 20 cb 0d 01 0e 06 |1.... | .....|
|00003d80| fd a3 0d 01 18 05 3a 0d | 01 22 05 3a 0d 01 2c 0e |......:.|.".:..,.|
|00003d90| dd f2 41 53 53 45 4d 42 | 4c 45 0d 01 36 12 e3 20 |..ASSEMB|LE..6.. |
|00003da0| 41 25 3d 30 20 b8 20 32 | 20 88 20 32 0d 01 40 0b |A%=0 . 2| . 2..@.|
|00003db0| 50 25 3d 41 53 53 25 0d | 01 4a 0b 5b 4f 50 54 20 |P%=ASS%.|.J.[OPT |
|00003dc0| 41 25 0d 01 54 3a 2e 46 | 41 53 45 20 20 20 20 20 |A%..T:.F|ASE |
|00003dd0| 45 51 55 44 20 20 30 20 | 20 20 20 20 20 20 20 20 |EQUD 0 | |
|00003de0| 20 20 20 20 20 20 20 20 | 5c c8 92 45 52 20 ca 53 | |\..ER .S|
|00003df0| 45 54 54 46 4f 52 20 58 | 20 80 20 59 0d 01 5e 36 |ETTFOR X| . Y..^6|
|00003e00| 2e 53 52 43 20 20 20 20 | 20 20 45 51 55 44 20 20 |.SRC | EQUD |
|00003e10| 41 44 52 25 20 20 20 20 | 20 20 20 20 20 20 20 20 |ADR% | |
|00003e20| 20 20 5c dc 20 53 43 52 | 45 45 4e 20 41 44 52 45 | \. SCR|EEN ADRE|
|00003e30| 53 53 0d 01 68 13 20 20 | 20 20 20 20 20 20 20 20 |SS..h. | |
|00003e40| 41 4c 49 47 4e 0d 01 72 | 05 5c 0d 01 7c 3a 5c 20 |ALIGN..r|.\..|:\ |
|00003e50| 52 4f 55 54 49 4e 45 20 | e3 20 f4 4f 56 41 4c 20 |ROUTINE |. .OVAL |
|00003e60| 4f 46 20 53 49 4e 47 4c | 45 20 52 45 44 20 50 49 |OF SINGL|E RED PI|
|00003e70| 58 45 4c 53 20 49 4e 20 | 41 20 53 43 52 45 45 4e |XELS IN |A SCREEN|
|00003e80| 42 59 54 45 0d 01 86 05 | 5c 0d 01 90 3c 2e 43 48 |BYTE....|\...<.CH|
|00003e90| 45 43 4b 20 20 20 20 4c | 44 52 20 20 20 52 30 2c |ECK L|DR R0,|
|00003ea0| 53 52 43 20 20 20 20 20 | 20 20 20 20 20 20 20 5c |SRC | \|
|00003eb0| a5 20 46 49 52 53 54 20 | 53 43 52 45 45 4e 20 41 |. FIRST |SCREEN A|
|00003ec0| 44 52 45 53 53 0d 01 9a | 40 20 20 20 20 20 20 20 |DRESS...|@ |
|00003ed0| 20 20 20 41 44 44 20 20 | 20 52 31 2c 52 30 2c 23 | ADD | R1,R0,#|
|00003ee0| 33 32 30 2a 32 35 36 20 | 20 20 20 5c a5 20 4c 41 |320*256 | \. LA|
|00003ef0| 53 54 20 20 53 43 52 45 | 45 4e 20 41 44 52 45 53 |ST SCRE|EN ADRES|
|00003f00| 53 20 2b 20 31 0d 01 a4 | 41 20 20 20 20 20 20 20 |S + 1...|A |
|00003f10| 20 20 20 4d 4f 56 20 20 | 20 52 33 2c 23 26 31 31 | MOV | R3,#&11|
|00003f20| 20 20 20 20 20 20 20 20 | 20 20 20 5c 50 52 45 50 | | \PREP|
|00003f30| 41 52 45 20 52 33 20 57 | 49 54 48 20 44 4f 55 42 |ARE R3 W|ITH DOUB|
|00003f40| 4c 45 20 52 45 44 0d 01 | ae 05 5c 0d 01 b8 05 5c |LE RED..|..\....\|
|00003f50| 0d 01 c2 30 2e 43 48 45 | 43 4b 31 20 20 20 4c 44 |...0.CHE|CK1 LD|
|00003f60| 52 42 20 20 52 32 2c 5b | 52 30 5d 20 20 20 20 20 |RB R2,[|R0] |
|00003f70| 20 20 20 20 20 20 5c a5 | 20 41 20 50 49 58 45 4c | \.| A PIXEL|
|00003f80| 0d 01 cc 44 20 20 20 20 | 20 20 20 20 20 20 43 4d |...D | CM|
|00003f90| 50 20 20 20 52 32 2c 23 | 31 20 20 20 20 20 20 20 |P R2,#|1 |
|00003fa0| 20 20 20 20 20 20 5c b5 | 47 4c 45 20 52 45 44 20 | \.|GLE RED |
|00003fb0| 49 4e 20 4c 4f 57 45 52 | 20 20 34 20 42 49 54 53 |IN LOWER| 4 BITS|
|00003fc0| 3f 3f 3f 3f 0d 01 d6 44 | 20 20 20 20 20 20 20 20 |????...D| |
|00003fd0| 20 20 43 4d 50 4e 45 20 | 20 20 52 32 2c 23 26 31 | CMPNE | R2,#&1|
|00003fe0| 30 20 20 20 20 20 20 20 | 20 20 5c b5 47 4c 45 20 |0 | \.GLE |
|00003ff0| 52 45 44 20 49 4e 20 48 | 49 47 48 45 52 20 34 20 |RED IN H|IGHER 4 |
|00004000| 42 49 54 53 3f 3f 3f 3f | 0d 01 e0 43 20 20 20 20 |BITS????|...C |
|00004010| 20 20 20 20 20 20 53 54 | 52 45 51 42 20 52 33 2c | ST|REQB R3,|
|00004020| 5b 52 30 5d 20 20 20 20 | 20 20 20 20 20 20 5c e7 |[R0] | \.|
|00004030| 20 53 4f 2c 52 45 50 4c | 41 43 45 20 57 49 54 48 | SO,REPL|ACE WITH|
|00004040| 20 44 4f 55 42 4c 45 20 | 52 45 44 0d 01 ea 1c 20 | DOUBLE |RED.... |
|00004050| 20 20 20 20 20 20 20 20 | 20 41 44 44 20 20 20 52 | | ADD R|
|00004060| 30 2c 52 30 2c 23 31 0d | 01 f4 19 20 20 20 20 20 |0,R0,#1.|... |
|00004070| 20 20 20 20 20 43 4d 50 | 20 20 20 52 30 2c 52 31 | CMP| R0,R1|
|00004080| 0d 01 fe 39 20 20 20 20 | 20 20 20 20 20 20 42 4e |...9 | BN|
|00004090| 45 20 20 20 43 48 45 43 | 4b 31 20 20 20 20 20 20 |E CHEC|K1 |
|000040a0| 20 20 20 20 20 20 5c 43 | 48 45 43 4b 20 4c 4f 4f | \C|HECK LOO|
|000040b0| 50 2c e7 20 f3 59 2c c8 | 98 0d 02 08 1b 20 20 20 |P,. .Y,.|..... |
|000040c0| 20 20 20 20 20 20 20 4d | 4f 56 20 20 20 52 31 35 | M|OV R15|
|000040d0| 2c 52 31 34 0d 02 12 05 | 5c 0d 02 1c 42 5c 20 52 |,R14....|\...B\ R|
|000040e0| 4f 55 54 49 4e 45 20 b8 | 20 c8 90 20 41 20 53 43 |OUTINE .| .. A SC|
|000040f0| 52 45 45 4e 20 53 51 55 | 41 52 45 20 57 49 54 48 |REEN SQU|ARE WITH|
|00004100| 20 59 45 4c 4c 4f 57 20 | 47 41 53 28 37 35 25 20 | YELLOW |GAS(75% |
|00004110| 43 4f 4d 50 52 45 53 53 | 45 44 29 0d 02 26 05 5c |COMPRESS|ED)..&.\|
|00004120| 0d 02 30 3e 2e 52 4e 44 | 42 4c 4b 20 20 20 53 54 |..0>.RND|BLK ST|
|00004130| 4d 46 44 20 52 31 33 21 | 2c 7b 52 30 2d 52 31 32 |MFD R13!|,{R0-R12|
|00004140| 2c 52 31 34 7d 20 5c c7 | 99 20 52 45 47 49 53 54 |,R14} \.|. REGIST|
|00004150| 45 52 53 20 46 52 4f 4d | 20 41 42 55 53 45 0d 02 |ERS FROM| ABUSE..|
|00004160| 3a 36 20 20 20 20 20 20 | 20 20 20 20 4c 44 52 20 |:6 | LDR |
|00004170| 20 20 52 30 2c 53 52 43 | 20 20 20 20 20 20 20 20 | R0,SRC| |
|00004180| 20 20 20 20 5c a5 20 53 | 43 52 45 45 4e 20 41 44 | \. S|CREEN AD|
|00004190| 52 45 53 53 0d 02 44 38 | 20 20 20 20 20 20 20 20 |RESS..D8| |
|000041a0| 20 20 41 44 44 20 20 20 | 52 30 2c 52 30 2c 23 37 | ADD |R0,R0,#7|
|000041b0| 32 2a 33 32 30 20 20 20 | 20 20 5c 43 41 4c 43 20 |2*320 | \CALC |
|000041c0| 53 54 41 52 54 20 41 44 | 52 45 53 53 0d 02 4e 3f |START AD|RESS..N?|
|000041d0| 20 20 20 20 20 20 20 20 | 20 20 4d 4f 56 20 20 20 | | MOV |
|000041e0| 52 32 2c 23 31 31 31 20 | 20 20 20 20 20 20 20 20 |R2,#111 | |
|000041f0| 20 20 5c 53 45 54 20 4c | 4f 4f 50 43 4f 55 4e 54 | \SET L|OOPCOUNT|
|00004200| 20 4f 55 54 45 52 20 4c | 4f 4f 50 0d 02 58 3f 2e | OUTER L|OOP..X?.|
|00004210| 52 4e 44 4f 55 54 20 20 | 20 4d 4f 56 20 20 20 52 |RNDOUT | MOV R|
|00004220| 33 2c 23 31 34 32 2d 35 | 36 20 20 20 20 20 20 20 |3,#142-5|6 |
|00004230| 20 5c 53 45 54 20 4c 4f | 4f 50 43 4f 55 4e 54 20 | \SET LO|OPCOUNT |
|00004240| 49 4e 4e 45 52 20 4c 4f | 4f 50 0d 02 62 3a 2e 52 |INNER LO|OP..b:.R|
|00004250| 4e 44 49 4e 20 20 20 20 | 42 4c 20 20 20 20 41 52 |NDIN |BL AR|
|00004260| 4e 44 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |ND | |
|00004270| 5c a5 20 49 4e 20 52 31 | 32 20 52 41 4e 44 4f 4d |\. IN R1|2 RANDOM|
|00004280| 20 30 2d 33 0d 02 6c 1a | 20 20 20 20 20 20 20 20 | 0-3..l.| |
|00004290| 20 20 43 4d 50 20 20 20 | 52 31 34 2c 23 30 0d 02 | CMP |R14,#0..|
|000042a0| 76 45 20 20 20 20 20 20 | 20 20 20 20 53 54 52 4e |vE | STRN|
|000042b0| 45 42 20 20 52 36 2c 5b | 52 33 2c 52 30 5d 20 20 |EB R6,[|R3,R0] |
|000042c0| 20 20 20 20 5c 4d 41 59 | 42 45 20 53 54 4f 52 45 | \MAY|BE STORE|
|000042d0| 20 50 49 58 45 4c 28 37 | 35 20 25 20 59 45 4c 4c | PIXEL(7|5 % YELL|
|000042e0| 4f 57 29 0d 02 80 1c 20 | 20 20 20 20 20 20 20 20 |OW).... | |
|000042f0| 20 41 44 44 20 20 20 52 | 33 2c 52 33 2c 23 31 0d | ADD R|3,R3,#1.|
|00004300| 02 8a 35 20 20 20 20 20 | 20 20 20 20 20 43 4d 50 |..5 | CMP|
|00004310| 20 20 20 52 33 2c 23 31 | 34 32 2b 35 36 20 20 20 | R3,#1|42+56 |
|00004320| 20 20 20 20 20 5c 49 4e | 4e 45 52 20 4c 4f 4f 50 | \IN|NER LOOP|
|00004330| 20 f3 59 3f 0d 02 94 19 | 20 20 20 20 20 20 20 20 | .Y?....| |
|00004340| 20 20 42 4e 45 20 20 20 | 52 4e 44 49 4e 0d 02 9e | BNE |RNDIN...|
|00004350| 2c 20 20 20 20 20 20 20 | 20 20 20 41 44 44 20 20 |, | ADD |
|00004360| 20 52 30 2c 52 30 2c 23 | 33 32 30 20 20 20 20 20 | R0,R0,#|320 |
|00004370| 20 20 20 5c 88 20 41 20 | 86 0d 02 a8 33 20 20 20 | \. A |....3 |
|00004380| 20 20 20 20 20 20 20 53 | 55 42 53 20 20 52 32 2c | S|UBS R2,|
|00004390| 52 32 2c 23 31 20 20 20 | 20 20 20 20 20 20 20 5c |R2,#1 | \|
|000043a0| 88 20 4f 55 54 45 52 20 | 4c 4f 4f 50 0d 02 b2 35 |. OUTER |LOOP...5|
|000043b0| 20 20 20 20 20 20 20 20 | 20 20 42 50 4c 20 20 20 | | BPL |
|000043c0| 52 4e 44 4f 55 54 20 20 | 20 20 20 20 20 20 20 20 |RNDOUT | |
|000043d0| 20 20 5c f3 59 20 4f 55 | 54 45 52 20 4c 4f 4f 50 | \.Y OU|TER LOOP|
|000043e0| 3f 0d 02 bc 34 20 20 20 | 20 20 20 20 20 20 20 4c |?...4 | L|
|000043f0| 44 4d 46 44 20 52 31 33 | 21 2c 7b 52 30 2d 52 31 |DMFD R13|!,{R0-R1|
|00004400| 32 2c 52 31 35 7d 5e 5c | f7 20 52 45 47 49 53 54 |2,R15}^\|. REGIST|
|00004410| 45 52 53 2c f8 0d 02 c6 | 05 5c 0d 02 d0 05 5c 0d |ERS,....|.\....\.|
|00004420| 02 da 3e 2e 53 57 45 45 | 50 20 20 20 20 53 54 4d |..>.SWEE|P STM|
|00004430| 46 44 20 52 31 33 21 2c | 7b 52 30 2d 52 31 32 2c |FD R13!,|{R0-R12,|
|00004440| 52 31 34 7d 20 5c c7 99 | 20 52 45 47 49 53 54 45 |R14} \..| REGISTE|
|00004450| 52 53 20 46 52 4f 4d 20 | 41 42 55 53 45 0d 02 e4 |RS FROM |ABUSE...|
|00004460| 05 5c 0d 02 ee 3f 20 20 | 20 20 20 20 20 20 20 20 |.\...? | |
|00004470| 4c 44 52 20 20 20 52 30 | 2c 53 52 43 20 20 20 20 |LDR R0|,SRC |
|00004480| 20 20 20 20 20 20 20 20 | 5c 4d 41 49 4e 20 4c 4f | |\MAIN LO|
|00004490| 4f 50 2c 20 a5 20 53 4f | 55 52 43 45 20 c8 92 45 |OP, . SO|URCE ..E|
|000044a0| 52 0d 02 f8 2d 20 20 20 | 20 20 20 20 20 20 20 4c |R...- | L|
|000044b0| 44 52 20 20 20 52 31 34 | 2c 46 41 53 45 20 20 20 |DR R14|,FASE |
|000044c0| 20 20 20 20 20 20 20 5c | a5 20 46 41 53 45 0d 03 | \|. FASE..|
|000044d0| 02 34 20 20 20 20 20 20 | 20 20 20 20 43 4d 50 20 |.4 | CMP |
|000044e0| 20 20 52 31 34 2c 23 31 | 20 20 20 20 20 20 20 20 | R14,#1| |
|000044f0| 20 20 20 20 5c 32 27 43 | 4e 44 20 46 41 53 45 3f | \2'C|ND FASE?|
|00004500| 3f 3f 0d 03 0c 39 20 20 | 20 20 20 20 20 20 20 20 |??...9 | |
|00004510| 41 44 44 45 51 20 52 30 | 2c 52 30 2c 23 33 32 30 |ADDEQ R0|,R0,#320|
|00004520| 20 20 20 20 20 20 20 20 | 5c e7 20 53 4f 2c 88 20 | |\. SO,. |
|00004530| b8 20 43 4f 52 52 45 43 | 54 20 86 0d 03 16 3d 20 |. CORREC|T ....= |
|00004540| 20 20 20 20 20 20 20 20 | 20 4d 4f 56 20 20 20 52 | | MOV R|
|00004550| 31 2c 52 31 34 20 20 20 | 20 20 20 20 20 20 20 20 |1,R14 | |
|00004560| 20 5c 53 45 54 20 4f 55 | 54 45 52 20 4c 4f 4f 50 | \SET OU|TER LOOP|
|00004570| 20 43 4f 55 4e 54 45 52 | 0d 03 20 1c 20 20 20 20 | COUNTER|.. . |
|00004580| 20 20 20 20 20 20 4d 4f | 56 20 20 20 52 31 32 2c | MO|V R12,|
|00004590| 23 33 32 30 0d 03 2a 3e | 20 20 20 20 20 20 20 20 |#320..*>| |
|000045a0| 20 20 53 55 42 20 20 20 | 52 31 32 2c 52 31 32 2c | SUB |R12,R12,|
|000045b0| 23 32 20 20 20 20 20 20 | 20 20 5c c7 94 20 49 4e |#2 | \.. IN|
|000045c0| 4e 45 52 20 4c 4f 4f 50 | 20 4c 49 4d 49 54 20 bb |NER LOOP| LIMIT .|
|000045d0| 55 45 0d 03 34 05 5c 0d | 03 3e 3d 2e 53 43 4e 4c |UE..4.\.|.>=.SCNL|
|000045e0| 4f 4f 50 20 20 4d 4f 56 | 20 20 20 52 32 2c 52 31 |OOP MOV| R2,R1|
|000045f0| 34 20 20 20 20 20 20 20 | 20 20 20 20 20 5c 53 45 |4 | \SE|
|00004600| 54 20 49 4e 4e 45 52 20 | 4c 4f 4f 50 20 43 4f 55 |T INNER |LOOP COU|
|00004610| 4e 54 45 52 0d 03 48 33 | 20 20 20 20 20 20 20 20 |NTER..H3| |
|00004620| 20 20 41 44 44 20 20 20 | 52 33 2c 52 30 2c 52 31 | ADD |R3,R0,R1|
|00004630| 34 20 20 20 20 20 20 20 | 20 20 5c a5 20 49 4e 4e |4 | \. INN|
|00004640| 45 52 20 c8 92 45 52 0d | 03 52 05 5c 0d 03 5c 27 |ER ..ER.|.R.\..\'|
|00004650| 2e 4c 59 4e 4c 4f 4f 50 | 20 20 4c 44 52 42 20 20 |.LYNLOOP| LDRB |
|00004660| 52 34 2c 5b 52 33 5d 20 | 20 20 20 20 20 20 20 20 |R4,[R3] | |
|00004670| 20 20 5c 0d 03 66 27 20 | 20 20 20 20 20 20 20 20 | \..f' | |
|00004680| 20 4c 44 52 42 20 20 52 | 35 2c 5b 52 33 2c 23 31 | LDRB R|5,[R3,#1|
|00004690| 5d 20 20 20 20 20 20 20 | 20 5c 0d 03 70 27 20 20 |] | \..p' |
|000046a0| 20 20 20 20 20 20 20 20 | 4c 44 52 42 20 20 52 36 | |LDRB R6|
|000046b0| 2c 5b 52 33 2c 23 33 32 | 30 5d 20 20 20 20 20 20 |,[R3,#32|0] |
|000046c0| 5c 0d 03 7a 35 20 20 20 | 20 20 20 20 20 20 20 4c |\..z5 | L|
|000046d0| 44 52 42 20 20 52 37 2c | 5b 52 33 2c 23 33 32 31 |DRB R7,|[R3,#321|
|000046e0| 5d 20 20 20 20 20 20 5c | a5 20 46 4f 55 52 20 ea |] \|. FOUR .|
|000046f0| 20 43 45 4c 4c 53 0d 03 | 84 05 5c 0d 03 8e 05 5c | CELLS..|..\....\|
|00004700| 0d 03 98 1b 20 20 20 20 | 20 20 20 20 20 20 43 4d |.... | CM|
|00004710| 50 20 20 20 52 34 2c 23 | 26 31 31 0d 03 a2 1b 20 |P R4,#|&11.... |
|00004720| 20 20 20 20 20 20 20 20 | 20 43 4d 50 4e 45 20 52 | | CMPNE R|
|00004730| 35 2c 23 26 31 31 0d 03 | ac 1b 20 20 20 20 20 20 |5,#&11..|.. |
|00004740| 20 20 20 20 43 4d 50 4e | 45 20 52 36 2c 23 26 31 | CMPN|E R6,#&1|
|00004750| 31 0d 03 b6 1b 20 20 20 | 20 20 20 20 20 20 20 43 |1.... | C|
|00004760| 4d 50 4e 45 20 52 37 2c | 23 26 31 31 0d 03 c0 40 |MPNE R7,|#&11...@|
|00004770| 20 20 20 20 20 20 20 20 | 20 20 42 45 51 20 52 52 | | BEQ RR|
|00004780| 45 41 44 59 20 20 20 20 | 20 20 20 20 20 20 20 20 |EADY | |
|00004790| 20 20 5c 43 48 45 43 4b | 20 e7 20 4e 45 41 52 20 | \CHECK| . NEAR |
|000047a0| 57 41 4c 4c 2c c8 98 20 | e7 20 53 4f 0d 03 ca 05 |WALL,.. |. SO....|
|000047b0| 5c 0d 03 d4 05 5c 0d 03 | de 19 2e 43 4f 4c 4c 20 |\....\..|...COLL |
|000047c0| 20 20 20 20 43 4d 50 20 | 20 20 52 34 2c 52 37 0d | CMP | R4,R7.|
|000047d0| 03 e8 31 20 20 20 20 20 | 20 20 20 20 20 43 4d 50 |..1 | CMP|
|000047e0| 45 51 20 52 35 2c 52 36 | 20 20 20 20 20 20 20 20 |EQ R5,R6| |
|000047f0| 20 20 20 20 20 5c 43 4f | 4c 4c 49 53 49 4f 4e 3f | \CO|LLISION?|
|00004800| 0d 03 f2 1a 20 20 20 20 | 20 20 20 20 20 20 42 4e |.... | BN|
|00004810| 45 20 20 20 4d 49 52 52 | 4f 52 0d 03 fc 27 20 20 |E MIRR|OR...' |
|00004820| 20 20 20 20 20 20 20 20 | 53 54 52 42 20 20 52 34 | |STRB R4|
|00004830| 2c 5b 52 33 2c 23 31 5d | 20 20 20 20 20 20 20 20 |,[R3,#1]| |
|00004840| 5c 0d 04 06 27 20 20 20 | 20 20 20 20 20 20 20 53 |\...' | S|
|00004850| 54 52 42 20 20 52 35 2c | 5b 52 33 2c 23 33 32 31 |TRB R5,|[R3,#321|
|00004860| 5d 20 20 20 20 20 20 5c | 0d 04 10 27 20 20 20 20 |] \|...' |
|00004870| 20 20 20 20 20 20 53 54 | 52 42 20 20 52 37 2c 5b | ST|RB R7,[|
|00004880| 52 33 2c 23 33 32 30 5d | 20 20 20 20 20 20 5c 0d |R3,#320]| \.|
|00004890| 04 1a 27 20 20 20 20 20 | 20 20 20 20 20 53 54 52 |..' | STR|
|000048a0| 42 20 20 52 36 2c 5b 52 | 33 5d 20 20 20 20 20 20 |B R6,[R|3] |
|000048b0| 20 20 20 20 20 5c 0d 04 | 24 3c 20 20 20 20 20 20 | \..|$< |
|000048c0| 20 20 20 20 42 20 20 20 | 20 20 52 52 45 41 44 59 | B | RREADY|
|000048d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 5c e7 20 53 | | \. S|
|000048e0| 4f 2c 52 4f 54 41 54 45 | 20 43 4c 4f 43 4b 57 49 |O,ROTATE| CLOCKWI|
|000048f0| 53 45 0d 04 2e 05 5c 0d | 04 38 05 5c 0d 04 42 29 |SE....\.|.8.\..B)|
|00004900| 2e 4d 49 52 52 4f 52 20 | 20 20 53 54 52 42 20 20 |.MIRROR | STRB |
|00004910| 52 34 2c 5b 52 33 2c 23 | 33 32 31 5d 20 20 20 20 |R4,[R3,#|321] |
|00004920| 20 20 5c 8b 2c 0d 04 4c | 27 20 20 20 20 20 20 20 | \.,..L|' |
|00004930| 20 20 20 53 54 52 42 20 | 20 52 35 2c 5b 52 33 2c | STRB | R5,[R3,|
|00004940| 23 33 32 30 5d 20 20 20 | 20 20 20 5c 0d 04 56 27 |#320] | \..V'|
|00004950| 20 20 20 20 20 20 20 20 | 20 20 53 54 52 42 20 20 | | STRB |
|00004960| 52 36 2c 5b 52 33 2c 23 | 31 5d 20 20 20 20 20 20 |R6,[R3,#|1] |
|00004970| 20 20 5c 0d 04 60 38 20 | 20 20 20 20 20 20 20 20 | \..`8 | |
|00004980| 20 53 54 52 42 20 20 52 | 37 2c 5b 52 33 5d 20 20 | STRB R|7,[R3] |
|00004990| 20 20 20 20 20 20 20 20 | 20 5c 4d 49 52 52 4f 52 | | \MIRROR|
|000049a0| 20 44 49 41 47 4f 4e 41 | 4c 4c 59 0d 04 6a 05 5c | DIAGONA|LLY..j.\|
|000049b0| 0d 04 74 45 2e 52 52 45 | 41 44 59 20 20 20 41 44 |..tE.RRE|ADY AD|
|000049c0| 44 20 20 20 52 33 2c 52 | 33 2c 23 32 20 20 20 20 |D R3,R|3,#2 |
|000049d0| 20 20 20 20 20 20 5c 53 | 48 49 46 54 20 42 49 54 | \S|HIFT BIT|
|000049e0| 20 c8 92 45 52 20 80 20 | 58 20 9c 20 54 57 4f 20 | ..ER . |X . TWO |
|000049f0| 42 59 54 45 53 0d 04 7e | 1c 20 20 20 20 20 20 20 |BYTES..~|. |
|00004a00| 20 20 20 41 44 44 20 20 | 20 52 32 2c 52 32 2c 23 | ADD | R2,R2,#|
|00004a10| 32 0d 04 88 1a 20 20 20 | 20 20 20 20 20 20 20 43 |2.... | C|
|00004a20| 4d 50 20 20 20 52 32 2c | 52 31 32 0d 04 92 3c 20 |MP R2,|R12...< |
|00004a30| 20 20 20 20 20 20 20 20 | 20 42 4d 49 20 20 20 4c | | BMI L|
|00004a40| 59 4e 4c 4f 4f 50 20 20 | 20 20 20 20 20 20 20 20 |YNLOOP | |
|00004a50| 20 5c 49 4e 4e 45 52 20 | 4c 4f 4f 50 20 46 49 4e | \INNER |LOOP FIN|
|00004a60| 49 53 48 45 44 3f 3f 0d | 04 9c 05 5c 0d 04 a6 05 |ISHED??.|...\....|
|00004a70| 5c 0d 04 b0 45 20 20 20 | 20 20 20 20 20 20 20 41 |\...E | A|
|00004a80| 44 44 20 20 20 52 30 2c | 52 30 2c 23 36 34 30 20 |DD R0,|R0,#640 |
|00004a90| 20 20 20 20 20 20 20 5c | 53 48 49 46 54 20 53 43 | \|SHIFT SC|
|00004aa0| 52 4e 50 4f 49 4e 54 45 | 52 20 80 20 59 20 9c 20 |RNPOINTE|R . Y . |
|00004ab0| 54 57 4f 20 86 53 0d 04 | ba 1c 20 20 20 20 20 20 |TWO .S..|.. |
|00004ac0| 20 20 20 20 41 44 44 20 | 20 20 52 31 2c 52 31 2c | ADD | R1,R1,|
|00004ad0| 23 32 0d 04 c4 3d 20 20 | 20 20 20 20 20 20 20 20 |#2...= | |
|00004ae0| 43 4d 50 20 20 20 52 31 | 2c 23 32 35 35 20 20 20 |CMP R1|,#255 |
|00004af0| 20 20 20 20 20 20 20 20 | 5c 4f 55 54 45 52 20 4c | |\OUTER L|
|00004b00| 4f 4f 50 20 46 49 4e 49 | 53 48 45 44 3f 3f 3f 0d |OOP FINI|SHED???.|
|00004b10| 04 ce 1b 20 20 20 20 20 | 20 20 20 20 20 42 4d 49 |... | BMI|
|00004b20| 20 20 20 53 43 4e 4c 4f | 4f 50 0d 04 d8 05 5c 0d | SCNLO|OP....\.|
|00004b30| 04 e2 05 5c 0d 04 ec 2f | 20 20 20 20 20 20 20 20 |...\.../| |
|00004b40| 20 20 82 20 20 20 52 31 | 34 2c 52 31 34 2c 23 31 | . R1|4,R14,#1|
|00004b50| 20 20 20 20 20 20 20 20 | 5c b8 47 47 4c 45 20 46 | |\.GGLE F|
|00004b60| 41 53 45 0d 04 f6 30 20 | 20 20 20 20 20 20 20 20 |ASE...0 | |
|00004b70| 20 53 54 52 20 20 20 52 | 31 34 2c 46 41 53 45 20 | STR R|14,FASE |
|00004b80| 20 20 20 20 20 20 20 20 | 20 5c 80 20 c7 99 20 46 | | \. .. F|
|00004b90| 41 53 45 0d 05 00 30 20 | 20 20 20 20 20 20 20 20 |ASE...0 | |
|00004ba0| 20 4c 44 4d 46 44 20 52 | 31 33 21 2c 7b 52 30 2d | LDMFD R|13!,{R0-|
|00004bb0| 52 31 32 2c 52 31 35 7d | 5e 5c 80 20 f8 20 b8 20 |R12,R15}|^\. . . |
|00004bc0| d6 45 52 0d 05 0a 05 5c | 0d 05 14 17 2e 49 4e 49 |.ER....\|.....INI|
|00004bd0| 54 30 20 20 20 20 20 20 | 20 45 51 55 44 20 b3 0d |T0 | EQUD ..|
|00004be0| 05 1e 17 2e 49 4e 49 54 | 31 20 20 20 20 20 20 20 |....INIT|1 |
|00004bf0| 45 51 55 44 20 b3 0d 05 | 28 17 2e 49 4e 49 54 32 |EQUD ...|(..INIT2|
|00004c00| 20 20 20 20 20 20 20 45 | 51 55 44 20 b3 0d 05 32 | E|QUD ...2|
|00004c10| 36 2e 41 52 4e 44 20 20 | 20 53 54 4d 46 44 20 52 |6.ARND | STMFD R|
|00004c20| 31 33 21 2c 7b 52 31 30 | 2d 52 31 32 2c 52 31 34 |13!,{R10|-R12,R14|
|00004c30| 7d 5c 50 52 4f 54 45 43 | 54 20 52 45 47 49 53 54 |}\PROTEC|T REGIST|
|00004c40| 45 52 53 0d 05 3c 1b 20 | 20 20 20 20 20 20 20 4c |ERS..<. | L|
|00004c50| 44 52 20 20 20 52 31 34 | 2c 49 4e 49 54 32 0d 05 |DR R14|,INIT2..|
|00004c60| 46 1b 20 20 20 20 20 20 | 20 20 4c 44 52 20 20 20 |F. | LDR |
|00004c70| 52 31 32 2c 49 4e 49 54 | 31 0d 05 50 3b 20 20 20 |R12,INIT|1..P; |
|00004c80| 20 20 20 20 20 4c 44 52 | 20 20 20 52 31 31 2c 49 | LDR| R11,I|
|00004c90| 4e 49 54 30 20 20 20 20 | 20 20 20 20 5c a5 20 52 |NIT0 | \. R|
|00004ca0| 41 4e 44 4f 4d 20 42 4c | 4f 43 4b 20 56 41 52 49 |ANDOM BL|OCK VARI|
|00004cb0| 41 42 4c 45 0d 05 5a 2e | 20 20 20 20 20 20 20 20 |ABLE..Z.| |
|00004cc0| 82 20 20 20 52 31 30 2c | 52 31 31 2c 52 31 31 2c |. R10,|R11,R11,|
|00004cd0| 4c 53 52 23 31 5c 82 20 | 54 48 45 20 52 45 53 55 |LSR#1\. |THE RESU|
|00004ce0| 4c 54 0d 05 64 33 20 20 | 20 20 20 20 20 20 4d 4f |LT..d3 | MO|
|00004cf0| 56 53 20 20 52 31 30 2c | 52 31 30 2c 52 52 58 20 |VS R10,|R10,RRX |
|00004d00| 20 20 20 20 20 5c 52 45 | 53 55 4c 54 20 49 4e 20 | \RE|SULT IN |
|00004d10| 43 41 52 52 59 0d 05 6e | 34 20 20 20 20 20 20 20 |CARRY..n|4 |
|00004d20| 20 4d 4f 56 53 20 20 52 | 31 34 2c 52 31 34 2c 52 | MOVS R|14,R14,R|
|00004d30| 52 58 20 20 20 20 20 20 | 5c 52 4f 54 41 54 45 20 |RX |\ROTATE |
|00004d40| 42 49 54 20 36 35 2d 39 | 36 0d 05 78 34 20 20 20 |BIT 65-9|6..x4 |
|00004d50| 20 20 20 20 20 4d 4f 56 | 53 20 20 52 31 32 2c 52 | MOV|S R12,R|
|00004d60| 31 32 2c 52 52 58 20 20 | 20 20 20 20 5c 52 4f 54 |12,RRX | \ROT|
|00004d70| 41 54 45 20 42 49 54 20 | 33 33 2d 36 34 0d 05 82 |ATE BIT |33-64...|
|00004d80| 33 20 20 20 20 20 20 20 | 20 4d 4f 56 53 20 20 52 |3 | MOVS R|
|00004d90| 31 31 2c 52 31 31 2c 52 | 52 58 20 20 20 20 20 20 |11,R11,R|RX |
|00004da0| 5c 52 4f 54 41 54 45 20 | 42 49 54 20 31 2d 33 32 |\ROTATE |BIT 1-32|
|00004db0| 0d 05 8c 2e 20 20 20 20 | 20 20 20 20 82 20 20 20 |.... | . |
|00004dc0| 52 31 30 2c 52 31 31 2c | 52 31 31 2c 4c 53 52 23 |R10,R11,|R11,LSR#|
|00004dd0| 31 5c 82 20 54 48 45 20 | 52 45 53 55 4c 54 0d 05 |1\. THE |RESULT..|
|00004de0| 96 33 20 20 20 20 20 20 | 20 20 4d 4f 56 53 20 20 |.3 | MOVS |
|00004df0| 52 31 30 2c 52 31 30 2c | 52 52 58 20 20 20 20 20 |R10,R10,|RRX |
|00004e00| 20 5c 52 45 53 55 4c 54 | 20 49 4e 20 43 41 52 52 | \RESULT| IN CARR|
|00004e10| 59 0d 05 a0 34 20 20 20 | 20 20 20 20 20 4d 4f 56 |Y...4 | MOV|
|00004e20| 53 20 20 52 31 34 2c 52 | 31 34 2c 52 52 58 20 20 |S R14,R|14,RRX |
|00004e30| 20 20 20 20 5c 52 4f 54 | 41 54 45 20 42 49 54 20 | \ROT|ATE BIT |
|00004e40| 36 35 2d 39 36 0d 05 aa | 34 20 20 20 20 20 20 20 |65-96...|4 |
|00004e50| 20 4d 4f 56 53 20 20 52 | 31 32 2c 52 31 32 2c 52 | MOVS R|12,R12,R|
|00004e60| 52 58 20 20 20 20 20 20 | 5c 52 4f 54 41 54 45 20 |RX |\ROTATE |
|00004e70| 42 49 54 20 33 33 2d 36 | 34 0d 05 b4 33 20 20 20 |BIT 33-6|4...3 |
|00004e80| 20 20 20 20 20 4d 4f 56 | 53 20 20 52 31 31 2c 52 | MOV|S R11,R|
|00004e90| 31 31 2c 52 52 58 20 20 | 20 20 20 20 5c 52 4f 54 |11,RRX | \ROT|
|00004ea0| 41 54 45 20 42 49 54 20 | 31 2d 33 32 0d 05 be 1b |ATE BIT |1-32....|
|00004eb0| 20 20 20 20 20 20 20 20 | 53 54 52 20 20 20 52 31 | |STR R1|
|00004ec0| 34 2c 49 4e 49 54 32 0d | 05 c8 1b 20 20 20 20 20 |4,INIT2.|... |
|00004ed0| 20 20 20 53 54 52 20 20 | 20 52 31 32 2c 49 4e 49 | STR | R12,INI|
|00004ee0| 54 31 0d 05 d2 3c 20 20 | 20 20 20 20 20 20 53 54 |T1...< | ST|
|00004ef0| 52 20 20 20 52 31 31 2c | 49 4e 49 54 30 20 20 20 |R R11,|INIT0 |
|00004f00| 20 20 20 20 20 5c c7 99 | 20 52 41 4e 44 4f 4d 20 | \..| RANDOM |
|00004f10| 42 4c 4f 43 4b 20 56 41 | 52 49 41 42 4c 45 0d 05 |BLOCK VA|RIABLE..|
|00004f20| dc 46 20 20 20 20 20 20 | 20 20 80 20 20 20 52 31 |.F | . R1|
|00004f30| 34 2c 52 31 31 2c 23 33 | 20 20 20 20 20 20 20 5c |4,R11,#3| \|
|00004f40| c7 99 20 39 36 20 42 49 | 54 20 52 45 47 49 53 54 |.. 96 BI|T REGIST|
|00004f50| 45 52 2c 43 4f 50 59 20 | 4c 4f 57 45 53 54 20 32 |ER,COPY |LOWEST 2|
|00004f60| 20 42 49 54 0d 05 e6 3a | 20 20 20 20 20 20 20 20 | BIT...:| |
|00004f70| 4c 44 4d 46 44 20 52 31 | 33 21 2c 7b 52 31 30 2d |LDMFD R1|3!,{R10-|
|00004f80| 52 31 32 2c 52 31 35 7d | 5e 5c f7 20 55 53 45 44 |R12,R15}|^\. USED|
|00004f90| 20 52 45 47 49 53 54 45 | 52 53 20 80 20 f8 0d 05 | REGISTE|RS . ...|
|00004fa0| f0 05 5c 0d 05 fa 05 5c | 0d 06 04 05 5d 0d 06 0e |..\....\|....]...|
|00004fb0| 05 ed 0d 06 18 05 e1 0d | 06 22 05 3a 0d 06 2c 05 |........|.".:..,.|
|00004fc0| 3a 0d 06 36 0a dd f2 46 | 49 4c 4c 0d 06 40 0a eb |:..6...F|ILL..@..|
|00004fd0| 20 31 32 3a 87 0d 06 4a | 0d c8 91 20 2d 37 32 2c | 12:...J|... -72,|
|00004fe0| 34 30 0d 06 54 17 ef 32 | 34 2c 32 32 38 3b 30 3b |40..T..2|4,228;0;|
|00004ff0| 31 30 35 32 3b 39 38 33 | 7c 0d 06 5e 1b e6 31 3a |1052;983||..^..1:|
|00005000| c8 8f 20 c8 90 20 36 34 | 30 2c 2d 32 30 30 30 2c |.. .. 64|0,-2000,|
|00005010| 32 30 36 30 0d 06 68 1b | e6 30 3a c8 8f 20 c8 90 |2060..h.|.0:.. ..|
|00005020| 20 36 34 30 2c 2d 32 30 | 30 30 2c 32 30 34 30 0d | 640,-20|00,2040.|
|00005030| 06 72 07 ef 32 36 0d 06 | 7c 0d c8 91 20 2d 37 32 |.r..26..||... -72|
|00005040| 2c 34 30 0d 06 86 28 e6 | 31 3a ec 20 20 32 32 38 |,40...(.|1:. 228|
|00005050| 2c 38 30 3a ec 20 32 32 | 38 2d 38 30 2c 38 30 3a |,80:. 22|8-80,80:|
|00005060| f0 26 42 35 2c 20 32 32 | 38 2c 30 0d 06 90 2b 20 |.&B5, 22|8,0...+ |
|00005070| 20 20 20 20 20 ec 20 31 | 30 35 32 2c 38 30 3a ec | . 1|052,80:.|
|00005080| 31 30 35 32 2c 30 3a f0 | 26 42 35 2c 31 30 35 32 |1052,0:.|&B5,1052|
|00005090| 2b 38 30 2c 38 30 0d 06 | 9a 28 e6 30 3a ec 20 20 |+80,80..|.(.0:. |
|000050a0| 32 32 38 2c 38 30 3a ec | 20 32 32 38 2d 36 30 2c |228,80:.| 228-60,|
|000050b0| 38 30 3a f0 26 42 35 2c | 20 32 32 38 2c 30 0d 06 |80:.&B5,| 228,0..|
|000050c0| a4 2c 20 20 20 20 20 20 | ec 20 31 30 35 32 2c 38 |., |. 1052,8|
|000050d0| 30 3a ec 31 30 35 32 2c | 32 30 3a f0 26 42 35 2c |0:.1052,|20:.&B5,|
|000050e0| 31 30 35 32 2b 38 30 2c | 38 30 0d 06 ae 1d e6 31 |1052+80,|80.....1|
|000050f0| 3a c8 93 20 c8 90 20 32 | 32 38 2d 38 30 2c 38 30 |:.. .. 2|28-80,80|
|00005100| 2c 31 38 2c 36 32 30 0d | 06 b8 22 20 20 20 20 20 |,18,620.|.." |
|00005110| 20 c8 93 20 c8 90 20 31 | 30 35 32 2b 38 30 2c 38 | .. .. 1|052+80,8|
|00005120| 30 2c 2d 31 38 2c 36 32 | 30 0d 06 c2 35 20 20 20 |0,-18,62|0...5 |
|00005130| 20 20 20 ec 20 31 31 31 | 34 2c 37 35 32 3a ec 20 | . 111|4,752:. |
|00005140| 31 31 31 34 2c 37 35 32 | 2d 31 36 32 3a f0 26 42 |1114,752|-162:.&B|
|00005150| 35 2c 31 31 31 34 2d 31 | 36 32 2c 37 35 32 0d 06 |5,1114-1|62,752..|
|00005160| cc 38 e6 30 3a ec 20 31 | 31 31 34 2c 37 35 32 3a |.8.0:. 1|114,752:|
|00005170| ec 20 31 31 31 34 2c 37 | 35 32 2d 31 36 32 2b 32 |. 1114,7|52-162+2|
|00005180| 30 3a f0 26 42 35 2c 31 | 31 31 34 2d 31 36 32 2b |0:.&B5,1|114-162+|
|00005190| 32 30 2c 37 35 32 0d 06 | d6 2e e6 31 3a ec 31 31 |20,752..|...1:.11|
|000051a0| 31 34 2c 37 35 32 3a ec | 31 31 31 34 2c 37 35 32 |14,752:.|1114,752|
|000051b0| 2d 37 30 3a f0 26 42 35 | 2c 31 31 31 34 2d 37 30 |-70:.&B5|,1114-70|
|000051c0| 2c 37 35 32 0d 06 e0 2e | e6 30 3a ec 31 31 31 34 |,752....|.0:.1114|
|000051d0| 2c 37 35 32 3a ec 31 31 | 31 34 2c 37 35 32 2d 35 |,752:.11|14,752-5|
|000051e0| 30 3a f0 26 42 35 2c 31 | 31 31 34 2d 35 30 2c 37 |0:.&B5,1|114-50,7|
|000051f0| 35 32 0d 06 ea 2a e6 31 | 3a ec 20 20 32 32 38 2c |52...*.1|:. 228,|
|00005200| 37 30 30 3a ec 32 32 38 | 2c 37 38 30 3a f0 26 42 |700:.228|,780:.&B|
|00005210| 35 2c 32 32 38 2d 38 30 | 2c 37 30 30 0d 06 f4 2f |5,228-80|,700.../|
|00005220| 20 20 20 20 20 20 ec 20 | 31 30 35 32 2c 37 30 30 | . |1052,700|
|00005230| 3a ec 31 30 35 32 2b 38 | 30 2c 37 30 30 3a f0 26 |:.1052+8|0,700:.&|
|00005240| 42 35 2c 31 30 35 32 2c | 37 38 30 0d 06 fe 2a e6 |B5,1052,|780...*.|
|00005250| 30 3a ec 20 20 32 32 38 | 2c 37 30 30 3a ec 32 32 |0:. 228|,700:.22|
|00005260| 38 2c 37 36 30 3a f0 26 | 42 35 2c 32 32 38 2d 36 |8,760:.&|B5,228-6|
|00005270| 30 2c 37 30 30 0d 07 08 | 2f 20 20 20 20 20 20 ec |0,700...|/ .|
|00005280| 20 31 30 35 32 2c 37 30 | 30 3a ec 31 30 35 32 2b | 1052,70|0:.1052+|
|00005290| 36 30 2c 37 30 30 3a f0 | 26 42 35 2c 31 30 35 32 |60,700:.|&B5,1052|
|000052a0| 2c 37 36 30 0d 07 12 19 | ef 32 34 2c 32 32 38 3b |,760....|.24,228;|
|000052b0| 37 30 30 3b 31 30 35 32 | 3b 39 38 33 3b 0d 07 1c |700;1052|;983;...|
|000052c0| 1b e6 31 3a c8 8f 20 c8 | 90 20 36 34 30 2c 2d 31 |..1:.. .|. 640,-1|
|000052d0| 32 33 34 2c 32 30 36 30 | 0d 07 26 1b e6 30 3a c8 |234,2060|..&..0:.|
|000052e0| 8f 20 c8 90 20 36 34 30 | 2c 2d 31 32 33 34 2c 32 |. .. 640|,-1234,2|
|000052f0| 30 34 30 0d 07 30 1e 20 | 20 20 20 20 20 c8 93 20 |040..0. | .. |
|00005300| c8 90 20 35 38 30 2c 38 | 30 30 2c 31 32 30 2c 34 |.. 580,8|00,120,4|
|00005310| 30 0d 07 3a 1b e6 31 3a | c8 93 20 c8 90 20 35 35 |0..:..1:|.. .. 55|
|00005320| 38 2c 38 32 30 2c 32 30 | 2c 31 30 30 0d 07 44 1f |8,820,20|,100..D.|
|00005330| 20 20 20 20 20 20 c8 93 | 20 c8 90 20 37 32 30 2c | ..| .. 720,|
|00005340| 38 32 30 2c 2d 32 30 2c | 31 30 30 0d 07 4e 1e 20 |820,-20,|100..N. |
|00005350| 20 20 20 20 20 c8 93 20 | c8 90 20 35 34 30 2c 39 | .. |.. 540,9|
|00005360| 32 30 2c 32 30 2c 2d 32 | 30 0d 07 58 1e 20 20 20 |20,20,-2|0..X. |
|00005370| 20 20 20 c8 93 20 c8 90 | 20 37 32 30 2c 39 32 30 | .. ..| 720,920|
|00005380| 2c 32 30 2c 2d 32 30 0d | 07 62 1f 20 20 20 20 20 |,20,-20.|.b. |
|00005390| 20 c8 93 20 c8 90 20 35 | 38 30 2c 37 38 30 2c 31 | .. .. 5|80,780,1|
|000053a0| 31 38 2c 31 30 30 0d 07 | 6c 06 e6 33 0d 07 76 16 |18,100..|l..3..v.|
|000053b0| ef 31 39 2c 31 2c 32 34 | 2c 30 2c 31 35 30 2c 31 |.19,1,24|,0,150,1|
|000053c0| 35 30 0d 07 80 0b d6 20 | 43 48 45 43 4b 0d 07 8a |50..... |CHECK...|
|000053d0| 07 ef 32 36 0d 07 94 13 | 47 25 3d 26 33 33 3a d6 |..26....|G%=&33:.|
|000053e0| 20 52 4e 44 42 4c 4b 0d | 07 9e 0d c8 91 20 2d 37 | RNDBLK.|..... -7|
|000053f0| 32 2c 34 30 0d 07 a8 05 | e1 0d 07 b2 05 3a 0d 07 |2,40....|.....:..|
|00005400| bc 05 3a 0d 07 c6 0a dd | f2 49 4e 49 54 0d 07 d0 |..:.....|.INIT...|
|00005410| 07 eb 31 32 0d 07 da 10 | 42 41 4c 4c 53 25 3d 32 |..12....|BALLS%=2|
|00005420| 30 30 30 30 0d 07 e4 1c | de 20 42 25 20 31 30 2c |0000....|. B% 10,|
|00005430| 43 25 20 31 30 2c 41 53 | 53 25 20 31 30 30 30 30 |C% 10,AS|S% 10000|
|00005440| 0d 07 ee 0b 21 42 25 3d | 31 34 38 0d 07 f8 0b 42 |....!B%=|148....B|
|00005450| 25 21 34 3d 2d 31 0d 08 | 02 22 c8 99 20 22 4f 53 |%!4=-1..|.".. "OS|
|00005460| 5f 52 65 61 64 56 64 75 | 56 61 72 69 61 62 6c 65 |_ReadVdu|Variable|
|00005470| 73 22 2c 42 25 2c 43 25 | 0d 08 0c 0c 41 44 52 25 |s",B%,C%|....ADR%|
|00005480| 3d 21 43 25 0d 08 16 05 | e1 0d ff 46 69 6c 65 44 |=!C%....|...FileD|
|00005490| 61 74 61 82 6a 75 6c 73 | 69 65 72 70 00 00 00 66 |ata.juls|ierp...f|
|000054a0| 01 00 00 41 fb ff ff 26 | 6d 3a c0 03 00 b2 a8 0d |...A...&|m:......|
|000054b0| 00 0a 10 f4 20 3e 20 4a | 55 4c 53 49 45 52 50 0d |.... > J|ULSIERP.|
|000054c0| 00 14 13 46 24 3d 22 4a | 55 4c 53 49 45 52 50 49 |...F$="J|ULSIERPI|
|000054d0| 43 22 0d 00 1e 07 eb 32 | 30 0d 00 28 3f 58 42 3d |C".....2|0..(?XB=|
|000054e0| 2d 2e 32 3a 58 45 3d 31 | 2e 32 3a 59 42 3d 2d 2e |-.2:XE=1|.2:YB=-.|
|000054f0| 32 3a 59 45 3d 31 2e 32 | 3a 53 58 3d 28 58 45 2d |2:YE=1.2|:SX=(XE-|
|00005500| 58 42 29 2f 31 30 32 34 | 3a 53 59 3d 28 59 45 2d |XB)/1024|:SY=(YE-|
|00005510| 59 42 29 2f 31 30 32 34 | 0d 00 32 07 52 3d 32 0d |YB)/1024|..2.R=2.|
|00005520| 00 3c 09 4d 25 3d 32 30 | 0d 00 46 1d e3 58 25 3d |.<.M%=20|..F..X%=|
|00005530| 30 b8 31 32 38 30 88 32 | 3a e3 59 25 3d 30 b8 31 |0.1280.2|:.Y%=0.1|
|00005540| 30 32 34 88 32 0d 00 50 | 19 58 3d 58 42 2b 58 25 |024.2..P|.X=XB+X%|
|00005550| 2a 53 58 3a 59 3d 59 42 | 2b 53 59 2a 59 25 0d 00 |*SX:Y=YB|+SY*Y%..|
|00005560| 5a 08 4e 25 3d 30 0d 00 | 64 05 f5 0d 00 6e 0b 20 |Z.N%=0..|d....n. |
|00005570| 20 4e 25 2b 3d 31 0d 00 | 78 3f 20 20 e7 20 59 3e | N%+=1..|x? . Y>|
|00005580| 3d 2e 35 20 58 3d 58 2b | 58 3a 59 3d 59 2b 59 2d |=.5 X=X+|X:Y=Y+Y-|
|00005590| 31 20 8b e7 58 3e 3d 2e | 35 20 58 3d 58 2b 58 2d |1 ..X>=.|5 X=X+X-|
|000055a0| 31 3a 59 3d 59 2b 59 20 | 8b 20 58 3d 58 2b 58 3a |1:Y=Y+Y |. X=X+X:|
|000055b0| 59 3d 59 2b 59 0d 00 82 | 19 fd 20 28 58 2a 58 2b |Y=Y+Y...|.. (X*X+|
|000055c0| 59 2a 59 29 3e 52 20 84 | 20 4e 25 3e 4d 25 0d 00 |Y*Y)>R .| N%>M%..|
|000055d0| 8c 1c e7 20 4e 25 3e 4d | 25 20 e6 30 20 8b 20 e6 |... N%>M|% .0 . .|
|000055e0| 31 2b 28 4e 25 20 83 20 | 37 29 0d 00 96 0d f0 36 |1+(N% . |7).....6|
|000055f0| 39 2c 58 25 2c 59 25 0d | 00 a0 07 ed 3a ed 0d 00 |9,X%,Y%.|....:...|
|00005600| aa 15 ff 22 53 43 52 45 | 45 4e 53 41 56 45 20 22 |..."SCRE|ENSAVE "|
|00005610| 2b 46 24 0d ff 46 69 6c | 65 44 61 74 61 82 6d 75 |+F$..Fil|eData.mu|
|00005620| 6c 74 69 66 61 63 65 00 | 00 a0 1e 00 00 42 fb ff |ltiface.|.....B..|
|00005630| ff 7e d0 f2 80 03 00 12 | df 0d 00 0a 11 f4 20 3e |.~......|...... >|
|00005640| 20 4d 55 4c 54 49 46 41 | 43 45 0d 00 14 05 3a 0d | MULTIFA|CE....:.|
|00005650| 00 1e 3b f4 20 4d 41 44 | 45 20 42 59 20 53 2e 42 |..;. MAD|E BY S.B|
|00005660| 55 52 52 59 20 20 20 52 | 41 44 45 4d 41 4b 45 52 |URRY R|ADEMAKER|
|00005670| 53 54 52 2e 31 34 20 53 | 4f 45 53 54 45 52 42 45 |STR.14 S|OESTERBE|
|00005680| 52 47 2d 48 4f 4c 4c 41 | 4e 44 0d 00 28 05 3a 0d |RG-HOLLA|ND..(.:.|
|00005690| 00 32 21 f4 20 44 41 54 | 41 20 46 4f 52 20 43 4f |.2!. DAT|A FOR CO|
|000056a0| 52 4e 45 52 53 20 43 41 | 4d 45 20 46 52 4f 4d 3a |RNERS CA|ME FROM:|
|000056b0| 0d 00 3c 26 f4 20 22 4d | 65 65 74 6b 75 6e 64 65 |..<&. "M|eetkunde|
|000056c0| 20 6d 65 74 20 64 65 20 | 6d 69 63 72 6f 63 6f 6d | met de |microcom|
|000056d0| 70 75 74 65 72 22 0d 00 | 46 2c f4 20 66 72 6f 6d |puter"..|F,. from|
|000056e0| 20 48 2e 41 2e 4c 61 75 | 77 65 72 69 65 72 20 2c | H.A.Lau|werier ,|
|000056f0| 49 53 42 4e 20 39 30 2d | 35 30 34 31 2d 30 31 32 |ISBN 90-|5041-012|
|00005700| 2d 58 0d 00 5a 0a f2 5f | 49 4e 49 54 0d 00 6e 05 |-X..Z.._|INIT..n.|
|00005710| f5 0d 00 78 10 20 20 20 | 20 20 f2 5f 54 45 54 52 |...x. | ._TETR|
|00005720| 41 0d 00 82 0f 20 20 20 | 20 20 f2 5f 43 55 42 45 |A.... | ._CUBE|
|00005730| 0d 00 8c 13 20 20 20 20 | 20 f2 5f 4f 4b 54 41 45 |.... | ._OKTAE|
|00005740| 44 45 52 0d 00 96 15 20 | 20 20 20 20 f2 5f 44 4f |DER.... | ._DO|
|00005750| 44 45 4b 41 45 44 45 52 | 0d 00 a0 15 20 20 20 20 |DEKAEDER|.... |
|00005760| 20 f2 5f 53 55 52 46 41 | 43 45 5f 31 32 0d 00 aa | ._SURFA|CE_12...|
|00005770| 15 20 20 20 20 20 f2 5f | 53 55 52 46 41 43 45 5f |. ._|SURFACE_|
|00005780| 31 34 0d 00 b4 14 20 20 | 20 20 20 f2 5f 49 4b 4f |14.... | ._IKO|
|00005790| 53 41 45 44 45 52 0d 00 | be 1a 20 20 20 20 20 f2 |SAEDER..|.. .|
|000057a0| 5f 53 50 4c 49 54 5f 49 | 4b 4f 53 41 45 44 45 52 |_SPLIT_I|KOSAEDER|
|000057b0| 0d 00 c8 06 fd a3 0d 00 | d2 05 e0 0d 00 dc 4d 5f |........|......M_|
|000057c0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|000057d0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|000057e0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|000057f0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00005800| 5f 5f 5f 5f 5f 5f 5f 5f | 0d 00 e6 05 2d 0d 00 f0 |________|....-...|
|00005810| 0b dd f2 5f 49 4e 49 54 | 0d 00 fa 1b ee 20 85 20 |..._INIT|..... . |
|00005820| eb 20 31 39 3a f6 3a f1 | 22 20 41 54 20 22 3b 9e |. 19:.:.|" AT ";.|
|00005830| 3b 3a e0 0d 01 04 08 eb | 20 31 39 0d 01 0e 0e fb |;:......| 19.....|
|00005840| 31 2c 31 35 30 2c 30 2c | 30 0d 01 18 0f fb 30 2c |1,150,0,|0.....0,|
|00005850| 37 35 2c 37 35 2c 37 35 | 0d 01 22 32 de 20 58 28 |75,75,75|.."2. X(|
|00005860| 32 30 30 29 2c 59 28 31 | 30 30 29 2c 5a 28 31 30 |200),Y(1|00),Z(10|
|00005870| 30 29 2c 58 31 28 31 30 | 30 29 2c 59 31 28 31 30 |0),X1(10|0),Y1(10|
|00005880| 30 29 2c 5a 31 28 31 30 | 30 29 0d 01 2c 33 de 20 |0),Z1(10|0)..,3. |
|00005890| 48 28 31 30 30 29 2c 56 | 28 31 30 30 29 2c 4b 25 |H(100),V|(100),K%|
|000058a0| 28 31 30 30 29 2c 4c 25 | 28 31 30 30 29 2c 49 25 |(100),L%|(100),I%|
|000058b0| 28 31 30 30 29 2c 4a 25 | 28 31 30 30 29 0d 01 36 |(100),J%|(100)..6|
|000058c0| 1b 51 3d 2d 2e 33 3a 52 | 53 3d b5 b2 2d 32 30 3a |.Q=-.3:R|S=..-20:|
|000058d0| 43 53 3d 9b b2 2d 32 30 | 0d 01 40 08 46 25 3d 30 |CS=..-20|..@.F%=0|
|000058e0| 0d 01 4a 0e c8 91 20 36 | 34 30 2c 35 31 32 0d 01 |..J... 6|40,512..|
|000058f0| 54 05 e1 0d 01 5e 4a 5f | 5f 5f 5f 5f 5f 5f 5f 5f |T....^J_|________|
|00005900| 5f 5f 5f 5f 47 45 4e 45 | 52 41 4c 20 43 4f 52 4e |____GENE|RAL CORN|
|00005910| 45 52 20 f3 20 52 4f 55 | 54 49 4e 45 2e 5f 5f 5f |ER . ROU|TINE.___|
|00005920| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00005930| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 0d 01 68 |________|_____..h|
|00005940| 4c 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 52 45 |L_______|______RE|
|00005950| 41 44 20 58 2c 59 2c 5a | 2c 20 52 4f 54 41 54 45 |AD X,Y,Z|, ROTATE|
|00005960| 20 41 52 4f 55 4e 44 20 | 5a 20 41 58 49 53 2c 54 | AROUND |Z AXIS,T|
|00005970| 52 41 4e 53 4c 41 54 45 | 20 b8 20 53 43 52 45 45 |RANSLATE| . SCREE|
|00005980| 4e 5f 5f 5f 5f 5f 5f 5f | 5f 0d 01 72 4d 5f 5f 5f |N_______|_..rM___|
|00005990| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 48 20 49 53 20 48 |________|__H IS H|
|000059a0| 4f 52 49 5a 4f 4e 54 41 | 4c 2c 56 3d 56 45 52 54 |ORIZONTA|L,V=VERT|
|000059b0| 43 41 4c 20 53 43 52 45 | 45 4e 20 43 4f 4f 52 44 |CAL SCRE|EN COORD|
|000059c0| 49 4e 41 54 45 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |INATE___|________|
|000059d0| 5f 5f 5f 5f 5f 5f 0d 01 | 7c 05 2d 0d 01 86 16 dd |______..||.-.....|
|000059e0| f2 5f 4e 45 57 5f 43 4f | 52 4e 45 52 53 28 4e 25 |._NEW_CO|RNERS(N%|
|000059f0| 29 0d 01 90 0c e3 49 25 | 3d 31 b8 4e 25 0d 01 9a |).....I%|=1.N%...|
|00005a00| 2b 20 f3 58 2c 59 2c 5a | 28 49 25 29 3a 58 28 49 |+ .X,Y,Z|(I%):X(I|
|00005a10| 25 29 3d 58 2a 43 2d 59 | 2a 53 3a 59 28 49 25 29 |%)=X*C-Y|*S:Y(I%)|
|00005a20| 3d 43 2a 59 2b 53 2a 58 | 0d 01 a4 2e 20 48 28 49 |=C*Y+S*X|.... H(I|
|00005a30| 25 29 3d 59 28 49 25 29 | 2a 47 3a 56 28 49 25 29 |%)=Y(I%)|*G:V(I%)|
|00005a40| 3d 28 52 53 2a 58 28 49 | 25 29 2b 43 53 2a 5a 28 |=(RS*X(I|%)+CS*Z(|
|00005a50| 49 25 29 29 2a 47 0d 01 | ae 05 ed 0d 01 b8 05 e1 |I%))*G..|........|
|00005a60| 0d 01 c2 4c 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |...L____|________|
|00005a70| 5f 47 45 4e 45 52 41 4c | 20 56 45 52 54 49 43 45 |_GENERAL| VERTICE|
|00005a80| 20 b8 20 53 49 44 45 20 | 44 45 54 45 43 54 49 4f | . SIDE |DETECTIO|
|00005a90| 4e 20 52 4f 55 54 49 4e | 45 5f 5f 5f 5f 5f 5f 5f |N ROUTIN|E_______|
|00005aa0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 0d 01 cc 05 |________|____....|
|00005ab0| 2d 0d 01 d6 34 dd f2 5f | 47 45 54 5f 53 49 44 45 |-...4.._|GET_SIDE|
|00005ac0| 53 28 58 28 29 2c 59 28 | 29 2c 5a 28 29 2c 4b 25 |S(X(),Y(|),Z(),K%|
|00005ad0| 28 29 2c 4c 25 28 29 2c | 54 45 53 54 2c 4e 25 2c |(),L%(),|TEST,N%,|
|00005ae0| f8 20 41 25 29 0d 01 e0 | 11 ea 20 4b 25 2c 4c 25 |. A%)...|.. K%,L%|
|00005af0| 2c 58 2c 59 2c 5a 0d 01 | ea 08 41 25 3d 30 0d 01 |,X,Y,Z..|..A%=0..|
|00005b00| f4 11 e3 20 4b 25 3d 31 | 20 b8 20 4e 25 2d 31 0d |... K%=1| . N%-1.|
|00005b10| 01 fe 13 20 e3 20 4c 25 | 3d 4b 25 2b 31 20 b8 20 |... . L%|=K%+1 . |
|00005b20| 4e 25 0d 02 08 2f 20 20 | 58 3d 58 28 4b 25 29 2d |N%.../ |X=X(K%)-|
|00005b30| 58 28 4c 25 29 3a 59 3d | 59 28 4b 25 29 2d 59 28 |X(L%):Y=|Y(K%)-Y(|
|00005b40| 4c 25 29 3a 5a 3d 5a 28 | 4b 25 29 2d 5a 28 4c 25 |L%):Z=Z(|K%)-Z(L%|
|00005b50| 29 0d 02 12 48 20 20 e7 | 20 58 2a 58 2b 59 2a 59 |)...H .| X*X+Y*Y|
|00005b60| 2b 5a 2a 5a 3c 54 45 53 | 54 20 41 25 2b 3d 31 3a |+Z*Z<TES|T A%+=1:|
|00005b70| 4c 25 28 41 25 29 3d 4c | 25 3a 4b 25 28 41 25 29 |L%(A%)=L|%:K%(A%)|
|00005b80| 3d 4b 25 3a f4 20 53 54 | 4f 52 45 20 50 52 4f 50 |=K%:. ST|ORE PROP|
|00005b90| 45 52 20 53 49 44 45 3f | 3f 0d 02 1c 06 20 ed 0d |ER SIDE?|?.... ..|
|00005ba0| 02 26 05 ed 0d 02 30 05 | e1 0d 02 3a 4a 5f 5f 5f |.&....0.|...:J___|
|00005bb0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 47 45 4e 45 52 41 |________|__GENERA|
|00005bc0| 4c 20 4f 42 4a 45 43 54 | 20 df 20 52 4f 55 54 49 |L OBJECT| . ROUTI|
|00005bd0| 4e 45 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |NE______|________|
|00005be0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00005bf0| 5f 5f 5f 0d 02 44 49 5f | 5f 5f 5f 5f 5f 5f 5f 5f |___..DI_|________|
|00005c00| 5f 5f 5f 5f 50 4c 4f 54 | 20 52 45 44 20 42 45 48 |____PLOT| RED BEH|
|00005c10| 49 4e 44 20 54 48 45 20 | 50 4c 41 4e 45 20 dd 49 |IND THE |PLANE .I|
|00005c20| 4e 45 44 20 42 59 20 51 | 2c 80 20 57 48 49 54 45 |NED BY Q|,. WHITE|
|00005c30| 20 49 4e 20 46 52 4f 4e | 54 5f 5f 5f 0d 02 4e 48 | IN FRON|T___..NH|
|00005c40| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 53 48 49 |________|_____SHI|
|00005c50| 46 54 20 50 4c 41 4e 45 | 20 57 49 54 48 20 4c 45 |FT PLANE| WITH LE|
|00005c60| 46 54 20 80 20 52 49 47 | 48 54 20 c8 97 20 42 55 |FT . RIG|HT .. BU|
|00005c70| 54 54 4f 4e 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |TTON____|________|
|00005c80| 5f 5f 5f 5f 0d 02 58 05 | 2d 0d 02 62 2b dd f2 5f |____..X.|-..b+.._|
|00005c90| 44 52 41 57 5f 53 49 44 | 45 53 28 41 25 2c 4b 25 |DRAW_SID|ES(A%,K%|
|00005ca0| 28 29 2c 4c 25 28 29 2c | 58 28 29 2c 48 28 29 2c |(),L%(),|X(),H(),|
|00005cb0| 56 28 29 29 0d 02 6c 1d | ea 20 4b 25 2c 4c 25 2c |V())..l.|. K%,L%,|
|00005cc0| 58 31 2c 58 32 2c 58 42 | 2c 59 42 2c 58 45 2c 59 |X1,X2,XB|,YB,XE,Y|
|00005cd0| 45 0d 02 76 20 e3 4e 25 | 3d 31 b8 41 25 3a 4b 25 |E..v .N%|=1.A%:K%|
|00005ce0| 3d 4b 25 28 4e 25 29 3a | 4c 25 3d 4c 25 28 4e 25 |=K%(N%):|L%=L%(N%|
|00005cf0| 29 0d 02 80 3a 20 58 31 | 3d 58 28 4b 25 29 3a 58 |)...: X1|=X(K%):X|
|00005d00| 32 3d 58 28 4c 25 29 3a | 58 42 3d 48 28 4b 25 29 |2=X(L%):|XB=H(K%)|
|00005d10| 3a 59 42 3d 56 28 4b 25 | 29 3a 58 45 3d 48 28 4c |:YB=V(K%|):XE=H(L|
|00005d20| 25 29 3a 59 45 3d 56 28 | 4c 25 29 0d 02 8a 3b 20 |%):YE=V(|L%)...; |
|00005d30| c8 97 53 25 2c 54 25 2c | 55 25 3a 51 2b 3d 28 55 |..S%,T%,|U%:Q+=(U|
|00005d40| 25 3d 34 29 2a 2e 30 31 | 2d 28 55 25 3d 31 29 2a |%=4)*.01|-(U%=1)*|
|00005d50| 2e 30 31 3a f4 20 53 48 | 49 46 54 20 42 41 43 4b |.01:. SH|IFT BACK|
|00005d60| 47 52 4f 55 4e 44 0d 02 | 94 0c 20 ec 20 58 42 2c |GROUND..|.. . XB,|
|00005d70| 59 42 0d 02 9e 0b 20 c8 | 8e 20 b9 20 ca 0d 02 a8 |YB.... .|. . ....|
|00005d80| 1a 20 20 c9 20 58 31 3c | 3d 51 20 80 20 58 32 3c |. . X1<|=Q . X2<|
|00005d90| 3d 51 3a e6 31 2c 31 0d | 02 b2 1a 20 20 c9 20 58 |=Q:.1,1.|... . X|
|00005da0| 31 3e 3d 51 20 80 20 58 | 32 3e 3d 51 3a e6 31 2c |1>=Q . X|2>=Q:.1,|
|00005db0| 33 0d 02 bc 23 20 20 c9 | 20 58 31 3c 58 32 3a 52 |3...# .| X1<X2:R|
|00005dc0| 3d 28 51 2d 58 31 29 2f | 28 58 32 2d 58 31 29 3a |=(Q-X1)/|(X2-X1):|
|00005dd0| e6 31 2c 31 0d 02 c6 32 | 20 20 20 20 20 20 20 20 |.1,1...2| |
|00005de0| 20 20 20 20 3a df 58 45 | 2a 52 2b 58 42 2a 28 31 | :.XE|*R+XB*(1|
|00005df0| 2d 52 29 2c 59 45 2a 52 | 2b 59 42 2a 28 31 2d 52 |-R),YE*R|+YB*(1-R|
|00005e00| 29 3a e6 31 2c 33 0d 02 | d0 1e 20 20 7f 20 3a 52 |):.1,3..|.. . :R|
|00005e10| 3d 28 51 2d 58 32 29 2f | 28 58 31 2d 58 32 29 3a |=(Q-X2)/|(X1-X2):|
|00005e20| e6 31 2c 33 0d 02 da 32 | 20 20 20 20 20 20 20 20 |.1,3...2| |
|00005e30| 20 20 20 20 3a df 58 42 | 2a 52 2b 58 45 2a 28 31 | :.XB|*R+XE*(1|
|00005e40| 2d 52 29 2c 59 42 2a 52 | 2b 59 45 2a 28 31 2d 52 |-R),YB*R|+YE*(1-R|
|00005e50| 29 3a e6 31 2c 31 0d 02 | e4 06 20 cb 0d 02 ee 0b |):.1,1..|.. .....|
|00005e60| 20 df 58 45 2c 59 45 0d | 02 f8 05 ed 0d 03 02 05 | .XE,YE.|........|
|00005e70| e1 0d 03 0c 4d 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |....M___|________|
|00005e80| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00005e90| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00005ea0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00005eb0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 0d 03 |________|______..|
|00005ec0| 16 05 2d 0d 03 20 0c dd | f2 5f 54 45 54 52 41 0d |..-.. ..|._TETRA.|
|00005ed0| 03 2a 3c 41 24 3d 22 54 | 45 54 52 41 45 44 45 52 |.*<A$="T|ETRAEDER|
|00005ee0| 22 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |" | |
|00005ef0| 20 20 20 20 20 20 20 3a | 47 3d 32 30 30 3a 42 25 | :|G=200:B%|
|00005f00| 3d 30 3a 48 25 3d 30 3a | d1 3d 30 0d 03 34 05 f5 |=0:H%=0:|.=0..4..|
|00005f10| 0d 03 3e 0f 20 20 20 f2 | 5f 54 4f 47 47 4c 45 0d |..>. .|_TOGGLE.|
|00005f20| 03 48 1a 20 20 20 53 3d | b5 b2 48 25 3a 43 3d 9b |.H. S=|..H%:C=.|
|00005f30| b2 48 25 3a 48 25 2b 3d | 32 0d 03 52 0b 20 20 20 |.H%:H%+=|2..R. |
|00005f40| f7 20 2b 30 0d 03 5c 49 | 20 20 20 dc 20 2d 32 2e |. +0..\I| . -2.|
|00005f50| 38 33 2c 30 2c 2d 31 2d | 2e 36 2c 20 20 20 31 2e |83,0,-1-|.6, 1.|
|00005f60| 34 31 2c 32 2e 34 35 2c | 2d 31 2d 2e 36 2c 20 20 |41,2.45,|-1-.6, |
|00005f70| 20 31 2e 34 31 2c 2d 32 | 2e 34 35 2c 2d 31 2d 2e | 1.41,-2|.45,-1-.|
|00005f80| 36 2c 20 20 20 30 2c 30 | 2c 33 2d 2e 36 0d 03 66 |6, 0,0|,3-.6..f|
|00005f90| 17 20 20 20 f2 5f 4e 45 | 57 5f 43 4f 52 4e 45 52 |. ._NE|W_CORNER|
|00005fa0| 53 28 34 29 0d 03 70 0f | 20 20 20 e7 20 42 25 3d |S(4)..p.| . B%=|
|00005fb0| 30 20 8c 0d 03 7a 0e 20 | 20 20 20 20 20 42 25 3d |0 ...z. | B%=|
|00005fc0| 31 0d 03 84 35 20 20 20 | 20 20 20 f2 5f 47 45 54 |1...5 | ._GET|
|00005fd0| 5f 53 49 44 45 53 28 58 | 28 29 2c 59 28 29 2c 5a |_SIDES(X|(),Y(),Z|
|00005fe0| 28 29 2c 4b 25 28 29 2c | 4c 25 28 29 2c 31 30 30 |(),K%(),|L%(),100|
|00005ff0| 2c 34 2c 41 25 29 0d 03 | 8e 08 20 20 20 cd 0d 03 |,4,A%)..|.. ...|
|00006000| 98 2d 20 20 20 f2 5f 44 | 52 41 57 5f 53 49 44 45 |.- ._D|RAW_SIDE|
|00006010| 53 28 41 25 2c 4b 25 28 | 29 2c 4c 25 28 29 2c 58 |S(A%,K%(|),L%(),X|
|00006020| 28 29 2c 48 28 29 2c 56 | 28 29 29 0d 03 a2 17 fd |(),H(),V|()).....|
|00006030| 20 bf 28 30 29 3c 3e 22 | 22 20 84 20 91 3e 31 30 | .(0)<>"|" . .>10|
|00006040| 30 30 0d 03 ac 05 e1 0d | 03 b6 4d 5f 5f 5f 5f 5f |00......|..M_____|
|00006050| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00006060| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00006070| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00006080| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00006090| 5f 5f 5f 5f 0d 03 c0 05 | 2d 0d 03 ca 0b dd f2 5f |____....|-......_|
|000060a0| 43 55 42 45 0d 03 d4 3c | 41 24 3d 22 43 55 42 45 |CUBE...<|A$="CUBE|
|000060b0| 22 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |" | |
|000060c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 3a 47 3d 33 | | :G=3|
|000060d0| 30 30 3a 42 25 3d 30 3a | 48 25 3d 30 3a d1 3d 30 |00:B%=0:|H%=0:.=0|
|000060e0| 0d 03 de 05 f5 0d 03 e8 | 0f 20 20 20 f2 5f 54 4f |........|. ._TO|
|000060f0| 47 47 4c 45 0d 03 f2 1a | 20 20 20 53 3d b5 b2 48 |GGLE....| S=..H|
|00006100| 25 3a 43 3d 9b b2 48 25 | 3a 48 25 2b 3d 32 0d 03 |%:C=..H%|:H%+=2..|
|00006110| fc 0b 20 20 20 f7 20 2b | 30 0d 04 06 35 20 20 20 |.. . +|0...5 |
|00006120| dc 20 2d 31 2c 2d 31 2c | 2d 31 20 20 20 2c 20 31 |. -1,-1,|-1 , 1|
|00006130| 2c 2d 31 2c 2d 31 2c 20 | 20 20 2d 31 2c 20 31 2c |,-1,-1, | -1, 1,|
|00006140| 2d 31 2c 20 20 20 20 31 | 2c 20 31 2c 2d 31 0d 04 |-1, 1|, 1,-1..|
|00006150| 10 35 20 20 20 dc 20 2d | 31 2c 2d 31 2c 20 31 2c |.5 . -|1,-1, 1,|
|00006160| 20 20 20 2d 31 2c 20 31 | 2c 20 31 2c 20 20 20 20 | -1, 1|, 1, |
|00006170| 31 2c 2d 31 2c 20 31 2c | 20 20 20 20 31 2c 20 31 |1,-1, 1,| 1, 1|
|00006180| 2c 20 31 0d 04 1a 17 20 | 20 20 f2 5f 4e 45 57 5f |, 1.... | ._NEW_|
|00006190| 43 4f 52 4e 45 52 53 28 | 38 29 0d 04 24 0f 20 20 |CORNERS(|8)..$. |
|000061a0| 20 e7 20 42 25 3d 30 20 | 8c 0d 04 2e 0e 20 20 20 | . B%=0 |..... |
|000061b0| 20 20 20 42 25 3d 31 0d | 04 38 35 20 20 20 20 20 | B%=1.|.85 |
|000061c0| 20 f2 5f 47 45 54 5f 53 | 49 44 45 53 28 58 28 29 | ._GET_S|IDES(X()|
|000061d0| 2c 59 28 29 2c 5a 28 29 | 2c 4b 25 28 29 2c 4c 25 |,Y(),Z()|,K%(),L%|
|000061e0| 28 29 2c 34 2e 31 2c 38 | 2c 41 25 29 0d 04 42 08 |(),4.1,8|,A%)..B.|
|000061f0| 20 20 20 cd 0d 04 4c 2d | 20 20 20 f2 5f 44 52 41 | ...L-| ._DRA|
|00006200| 57 5f 53 49 44 45 53 28 | 41 25 2c 4b 25 28 29 2c |W_SIDES(|A%,K%(),|
|00006210| 4c 25 28 29 2c 58 28 29 | 2c 48 28 29 2c 56 28 29 |L%(),X()|,H(),V()|
|00006220| 29 0d 04 56 17 fd 20 bf | 28 30 29 3c 3e 22 22 20 |)..V.. .|(0)<>"" |
|00006230| 84 20 91 3e 31 30 30 30 | 0d 04 60 05 e1 0d 04 6a |. .>1000|..`....j|
|00006240| 4d 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |M_______|________|
|00006250| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00006260| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00006270| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00006280| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 0d 04 74 05 2d 0d |________|__..t.-.|
|00006290| 04 7e 0f dd f2 5f 4f 4b | 54 41 45 44 45 52 0d 04 |.~..._OK|TAEDER..|
|000062a0| 88 3c 41 24 3d 22 4f 4b | 54 41 45 44 45 52 22 20 |.<A$="OK|TAEDER" |
|000062b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000062c0| 20 20 20 20 20 20 3a 47 | 3d 35 30 30 3a 42 25 3d | :G|=500:B%=|
|000062d0| 30 3a 48 25 3d 30 3a d1 | 3d 30 0d 04 92 05 f5 0d |0:H%=0:.|=0......|
|000062e0| 04 9c 0f 20 20 20 f2 5f | 54 4f 47 47 4c 45 0d 04 |... ._|TOGGLE..|
|000062f0| a6 1a 20 20 20 53 3d b5 | b2 48 25 3a 43 3d 9b b2 |.. S=.|.H%:C=..|
|00006300| 48 25 3a 48 25 2b 3d 32 | 0d 04 b0 0b 20 20 20 f7 |H%:H%+=2|.... .|
|00006310| 20 2b 30 0d 04 ba 38 20 | 20 20 dc 20 2d 31 2c 20 | +0...8 | . -1, |
|00006320| 30 2c 20 30 2d 2e 30 35 | 2c 20 20 20 20 20 31 2c |0, 0-.05|, 1,|
|00006330| 20 30 2c 20 30 2d 2e 30 | 35 2c 20 20 20 20 20 20 | 0, 0-.0|5, |
|00006340| 30 2c 2d 31 2c 20 30 2d | 2e 30 35 0d 04 c4 38 20 |0,-1, 0-|.05...8 |
|00006350| 20 20 dc 20 20 30 2c 20 | 31 2c 20 30 2d 2e 30 35 | . 0, |1, 0-.05|
|00006360| 2c 20 20 20 20 20 30 2c | 20 30 2c 2d 31 2d 2e 30 |, 0,| 0,-1-.0|
|00006370| 35 2c 20 20 20 20 20 20 | 30 2c 20 30 2c 20 31 2d |5, |0, 0, 1-|
|00006380| 2e 30 35 0d 04 ce 17 20 | 20 20 f2 5f 4e 45 57 5f |.05.... | ._NEW_|
|00006390| 43 4f 52 4e 45 52 53 28 | 36 29 0d 04 d8 0f 20 20 |CORNERS(|6).... |
|000063a0| 20 e7 20 42 25 3d 30 20 | 8c 0d 04 e2 0e 20 20 20 | . B%=0 |..... |
|000063b0| 20 20 20 42 25 3d 31 0d | 04 ec 35 20 20 20 20 20 | B%=1.|..5 |
|000063c0| 20 f2 5f 47 45 54 5f 53 | 49 44 45 53 28 58 28 29 | ._GET_S|IDES(X()|
|000063d0| 2c 59 28 29 2c 5a 28 29 | 2c 4b 25 28 29 2c 4c 25 |,Y(),Z()|,K%(),L%|
|000063e0| 28 29 2c 32 2e 31 2c 36 | 2c 41 25 29 0d 04 f6 08 |(),2.1,6|,A%)....|
|000063f0| 20 20 20 cd 0d 05 00 2d | 20 20 20 f2 5f 44 52 41 | ....-| ._DRA|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
