home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 2 / DATAFILE_PDCD2.iso / fractals / basicfts / IFS_EscTim < prev    next >
Unknown  |  1992-01-24  |  14.5 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 12 f4 20 3e 20 | 45 73 63 54 69 6d 65 4e |..... > |EscTimeN|
|00000010| 45 57 0d 00 14 05 f4 0d | 00 1e 1c ee 20 85 20 ee |EW......|.... . .|
|00000020| 3a f6 3a f1 22 20 61 74 | 20 6c 69 6e 65 20 22 3b |:.:." at| line ";|
|00000030| 9e 3a e0 0d 00 28 05 3a | 0d 00 32 0a eb 20 31 33 |.:...(.:|..2.. 13|
|00000040| 3a 87 0d 00 3c 05 3a 0d | 00 46 0f f2 69 6e 69 74 |:...<.:.|.F..init|
|00000050| 69 61 6c 69 73 65 0d 00 | 50 05 3a 0d 00 5a 11 f2 |ialise..|P.:..Z..|
|00000060| 69 6e 73 74 72 75 63 74 | 69 6f 6e 73 0d 00 64 05 |instruct|ions..d.|
|00000070| 3a 0d 00 6e 05 f5 0d 00 | 78 0e f5 20 fd 20 ac 20 |:..n....|x.. . . |
|00000080| a6 2d 31 37 0d 00 82 0d | c8 99 20 36 2c 31 35 2c |.-17....|.. 6,15,|
|00000090| 31 0d 00 8c 0f e8 20 8a | 33 32 2c 30 29 3b 6e 25 |1..... .|32,0);n%|
|000000a0| 0d 00 96 05 f5 0d 00 a0 | 0e 74 6c 66 25 3d 6e 25 |........|.tlf%=n%|
|000000b0| 81 36 34 0d 00 aa 12 62 | 6c 66 25 3d 28 6e 25 80 |.64....b|lf%=(n%.|
|000000c0| 36 33 29 81 38 0d 00 b4 | 0d 62 72 66 25 3d 6e 25 |63).8...|.brf%=n%|
|000000d0| 80 37 0d 00 be 0d f2 61 | 73 73 65 6d 62 6c 65 0d |.7.....a|ssemble.|
|000000e0| 00 c8 07 d1 3d 30 0d 00 | d2 0d d6 20 70 69 63 74 |....=0..|... pict|
|000000f0| 75 72 65 0d 00 dc 12 f1 | 8a 33 32 2c 32 29 3b 91 |ure.....|.32,2);.|
|00000100| 3b 22 20 20 22 0d 00 e6 | 08 6b 25 3d 30 0d 00 f0 |;" "...|.k%=0...|
|00000110| 05 f5 0d 00 fa 22 e7 20 | a6 2d 33 38 20 6b 25 3d |.....". |.-38 k%=|
|00000120| 31 20 20 3a f4 20 53 65 | 6c 65 63 74 20 7a 6f 6f |1 :. Se|lect zoo|
|00000130| 6d 20 69 6e 0d 01 04 23 | e7 20 a6 2d 35 35 20 6b |m in...#|. .-55 k|
|00000140| 25 3d 2d 31 20 3a f4 20 | 53 65 6c 65 63 74 20 7a |%=-1 :. |Select z|
|00000150| 6f 6f 6d 20 6f 75 74 0d | 01 0e 1f e7 20 a6 2d 31 |oom out.|.... .-1|
|00000160| 37 20 6b 25 3d 32 3a 61 | 3d 2d 31 2e 35 3a 62 3d |7 k%=2:a|=-1.5:b=|
|00000170| 2d 31 3a 73 3d 34 0d 01 | 18 0d e7 20 a6 2d 31 30 |-1:s=4..|... .-10|
|00000180| 32 20 8c 0d 01 22 19 f5 | 20 fd 20 ac 20 a6 2d 31 |2 ..."..| . . .-1|
|00000190| 30 32 3a c8 99 20 36 2c | 31 35 2c 31 0d 01 2c 0f |02:.. 6,|15,1..,.|
|000001a0| e8 20 8a 33 32 2c 34 29 | 3b 6d 25 0d 01 36 0d f2 |. .32,4)|;m%..6..|
|000001b0| 6d 6f 64 65 28 6d 25 29 | 0d 01 40 05 cd 0d 01 4a |mode(m%)|..@....J|
|000001c0| 0c e7 20 a6 2d 35 36 20 | 8c 0d 01 54 18 f5 20 fd |.. .-56 |...T.. .|
|000001d0| 20 ac 20 a6 2d 35 36 3a | c8 99 20 36 2c 31 35 2c | . .-56:|.. 6,15,|
|000001e0| 31 0d 01 5e 0f e8 20 8a | 33 32 2c 36 29 3b 63 25 |1..^.. .|32,6);c%|
|000001f0| 0d 01 68 12 f2 73 65 74 | 63 6f 6c 6d 61 70 28 63 |..h..set|colmap(c|
|00000200| 25 29 0d 01 72 05 cd 0d | 01 7c 0c e7 20 a6 2d 35 |%)..r...|.|.. .-5|
|00000210| 32 20 8c 0d 01 86 18 f5 | 20 fd 20 ac 20 a6 2d 35 |2 ......| . . .-5|
|00000220| 32 3a c8 99 20 36 2c 31 | 35 2c 31 0d 01 90 17 e8 |2:.. 6,1|5,1.....|
|00000230| 20 8a 33 32 2c 38 29 3b | 72 3a f2 73 65 74 72 28 | .32,8);|r:.setr(|
|00000240| 72 29 0d 01 9a 05 cd 0d | 01 a4 11 e7 20 a6 2d 38 |r)......|.... .-8|
|00000250| 33 20 f2 73 77 69 72 6c | 0d 01 ae 0f e7 20 a6 2d |3 .swirl|..... .-|
|00000260| 36 36 20 6b 25 3d 33 0d | 01 b8 08 fd 20 6b 25 0d |66 k%=3.|.... k%.|
|00000270| 01 c2 18 e7 20 6b 25 3d | 31 20 84 20 6b 25 3d 2d |.... k%=|1 . k%=-|
|00000280| 31 20 f2 7a 6f 6f 6d 0d | 01 cc 0a fd 20 6b 25 3d |1 .zoom.|.... k%=|
|00000290| 32 0d 01 d6 07 fd 20 30 | 0d 01 e0 05 3a 0d 01 ea |2..... 0|....:...|
|000002a0| 05 e0 0d 01 f4 05 3a 0d | 01 fe 05 3a 0d 02 08 13 |......:.|...:....|
|000002b0| dd 20 f2 69 6e 73 74 72 | 75 63 74 69 6f 6e 73 0d |. .instr|uctions.|
|000002c0| 02 12 0d c8 99 20 36 2c | 31 35 2c 31 0d 02 1c 21 |..... 6,|15,1...!|
|000002d0| f1 22 50 72 65 73 73 20 | 27 49 27 20 66 6f 72 20 |."Press |'I' for |
|000002e0| 69 6e 73 74 72 75 63 74 | 69 6f 6e 73 22 0d 02 26 |instruct|ions"..&|
|000002f0| 08 6b 24 3d be 0d 02 30 | 0f e7 20 6b 24 3c 3e 22 |.k$=...0|.. k$<>"|
|00000300| 49 22 20 e1 0d 02 3a 0e | f5 20 fd 20 ac 20 a6 2d |I" ...:.|. . . .-|
|00000310| 33 38 0d 02 44 0d c8 99 | 20 36 2c 31 35 2c 31 0d |38..D...| 6,15,1.|
|00000320| 02 4e 08 6d 25 3d eb 0d | 02 58 07 eb 20 30 0d 02 |.N.m%=..|.X.. 0..|
|00000330| 62 fa f1 22 20 20 54 68 | 69 73 20 69 73 20 61 20 |b.." Th|is is a |
|00000340| 64 65 76 65 6c 6f 70 6d | 65 6e 74 20 76 65 72 73 |developm|ent vers|
|00000350| 69 6f 6e 20 6f 66 20 61 | 20 66 72 61 63 74 61 6c |ion of a| fractal|
|00000360| 20 67 72 61 70 68 69 63 | 73 20 61 70 70 6c 69 63 | graphic|s applic|
|00000370| 61 74 69 6f 6e 20 77 68 | 69 63 68 22 27 22 73 68 |ation wh|ich"'"sh|
|00000380| 6f 75 6c 64 20 62 65 20 | 66 75 6c 6c 79 20 6d 75 |ould be |fully mu|
|00000390| 6c 74 69 74 61 73 6b 69 | 6e 67 2e 20 54 68 69 73 |ltitaski|ng. This|
|000003a0| 20 69 6d 70 6c 65 6d 65 | 6e 74 61 74 69 6f 6e 20 | impleme|ntation |
|000003b0| 69 73 20 6f 6e 6c 79 20 | 35 20 64 61 79 73 20 6f |is only |5 days o|
|000003c0| 6c 64 20 26 20 69 73 22 | 27 22 72 61 74 68 65 72 |ld & is"|'"rather|
|000003d0| 20 75 73 65 72 2d 75 6e | 66 72 69 65 6e 64 6c 79 | user-un|friendly|
|000003e0| 3b 20 69 74 20 63 6f 6e | 74 61 69 6e 73 20 6f 6e |; it con|tains on|
|000003f0| 6c 79 20 74 68 65 20 69 | 6d 61 67 65 20 67 65 6e |ly the i|mage gen|
|00000400| 65 72 61 74 69 6f 6e 20 | 26 20 74 65 73 74 22 27 |eration |& test"'|
|00000410| 22 6d 61 6e 69 70 75 6c | 61 74 69 6f 6e 20 72 6f |"manipul|ation ro|
|00000420| 75 74 69 6e 65 73 2e 22 | 0d 02 6c 41 f1 22 20 20 |utines."|..lA." |
|00000430| 54 68 65 73 65 20 69 6e | 73 74 72 75 63 74 69 6f |These in|structio|
|00000440| 6e 73 20 61 72 65 20 61 | 6e 20 61 66 74 65 72 74 |ns are a|n aftert|
|00000450| 68 6f 75 67 68 74 20 66 | 6f 72 20 79 6f 75 72 20 |hought f|or your |
|00000460| 62 65 6e 65 66 69 74 2e | 22 0d 02 76 e0 f1 22 20 |benefit.|"..v.." |
|00000470| 20 54 68 65 20 66 69 6e | 61 6c 20 76 65 72 73 69 | The fin|al versi|
|00000480| 6f 6e 20 73 68 6f 75 6c | 64 20 62 65 20 61 76 61 |on shoul|d be ava|
|00000490| 69 6c 61 62 6c 65 20 77 | 69 74 68 69 6e 20 32 20 |ilable w|ithin 2 |
|000004a0| 74 6f 20 34 20 77 65 65 | 6b 73 2c 20 26 20 77 69 |to 4 wee|ks, & wi|
|000004b0| 6c 6c 22 27 22 70 72 6f | 62 61 62 6c 79 20 62 65 |ll"'"pro|bably be|
|000004c0| 20 77 72 69 74 74 65 6e | 20 69 6e 20 61 20 63 6f | written| in a co|
|000004d0| 6d 62 69 6e 61 74 69 6f | 6e 20 6f 66 20 43 2c 20 |mbinatio|n of C, |
|000004e0| 61 73 73 65 6d 62 6c 79 | 2c 20 26 20 42 61 73 69 |assembly|, & Basi|
|000004f0| 63 20 7b 3f 21 20 69 66 | 20 49 20 63 61 6e 22 27 |c {?! if| I can"'|
|00000500| 22 77 6f 72 6b 20 6f 75 | 74 20 68 6f 77 7d 2e 20 |"work ou|t how}. |
|00000510| 49 20 68 6f 70 65 20 41 | 72 63 68 69 6d 65 64 65 |I hope A|rchimede|
|00000520| 73 20 57 6f 72 6c 64 20 | 77 69 6c 6c 20 62 65 20 |s World |will be |
|00000530| 69 6e 74 65 72 65 73 74 | 65 64 20 69 6e 20 70 75 |interest|ed in pu|
|00000540| 62 6c 69 73 68 69 6e 67 | 22 0d 02 80 cb f1 22 69 |blishing|"....."i|
|00000550| 74 2c 20 62 75 74 20 73 | 68 6f 75 6c 64 20 79 6f |t, but s|hould yo|
|00000560| 75 20 6c 69 6b 65 20 61 | 20 63 6f 70 79 20 73 6f |u like a| copy so|
|00000570| 6f 6e 65 72 20 7b 74 68 | 65 79 20 75 73 75 61 6c |oner {th|ey usual|
|00000580| 6c 79 20 74 61 6b 65 20 | 33 20 74 6f 20 36 20 6d |ly take |3 to 6 m|
|00000590| 6f 6e 74 68 73 20 74 6f | 22 27 22 70 75 62 6c 69 |onths to|"'"publi|
|000005a0| 73 68 20 61 20 70 72 6f | 67 72 61 6d 7d 2c 20 49 |sh a pro|gram}, I|
|000005b0| 20 77 6f 75 6c 64 20 62 | 65 20 68 61 70 70 79 20 | would b|e happy |
|000005c0| 74 6f 20 6c 65 74 20 79 | 6f 75 20 68 61 76 65 20 |to let y|ou have |
|000005d0| 61 20 63 6f 70 79 3b 20 | 69 66 20 79 6f 75 20 73 |a copy; |if you s|
|000005e0| 65 6e 64 22 27 22 61 20 | 64 69 73 63 20 26 20 53 |end"'"a |disc & S|
|000005f0| 41 45 2c 20 65 74 63 2e | 3b 20 61 73 20 73 6f 6f |AE, etc.|; as soo|
|00000600| 6e 20 61 73 20 69 74 27 | 73 20 66 69 6e 69 73 68 |n as it'|s finish|
|00000610| 65 64 2e 22 0d 02 8a b3 | f1 22 20 20 54 68 65 20 |ed."....|." The |
|00000620| 70 75 72 70 6f 73 65 20 | 6f 66 20 74 68 69 73 20 |purpose |of this |
|00000630| 61 70 70 6c 69 63 61 74 | 69 6f 6e 20 69 73 20 74 |applicat|ion is t|
|00000640| 6f 20 67 65 6e 65 72 61 | 74 65 20 69 6d 61 67 65 |o genera|te image|
|00000650| 73 2c 20 76 69 61 20 74 | 68 65 20 65 73 63 61 70 |s, via t|he escap|
|00000660| 65 22 27 22 74 69 6d 65 | 20 61 6c 67 6f 72 69 74 |e"'"time| algorit|
|00000670| 68 6d 2c 20 6f 66 20 74 | 68 65 20 72 65 67 69 6f |hm, of t|he regio|
|00000680| 6e 73 20 73 75 72 72 6f | 75 6e 64 69 6e 67 20 74 |ns surro|unding t|
|00000690| 68 65 20 61 74 74 72 61 | 63 74 6f 72 73 20 6f 66 |he attra|ctors of|
|000006a0| 20 61 20 6e 75 6d 62 65 | 72 20 6f 66 22 27 22 70 | a numbe|r of"'"p|
|000006b0| 72 65 64 65 66 69 6e 65 | 64 20 73 69 6d 70 6c 65 |redefine|d simple|
|000006c0| 20 49 46 53 27 73 22 0d | 02 94 c5 f1 22 54 68 65 | IFS's".|...."The|
|000006d0| 73 65 20 69 6e 63 6c 75 | 64 65 20 74 68 65 20 66 |se inclu|de the f|
|000006e0| 61 6d 69 6c 69 61 72 20 | 53 69 65 72 70 69 6e 73 |amiliar |Sierpins|
|000006f0| 6b 69 20 67 61 73 6b 65 | 74 2e 22 27 22 20 20 54 |ki gaske|t."'" T|
|00000700| 6f 20 74 68 65 20 69 6e | 66 6f 72 6d 65 64 2c 20 |o the in|formed, |
|00000710| 74 68 65 20 73 70 65 63 | 69 66 69 63 20 6e 61 74 |the spec|ific nat|
|00000720| 75 72 65 20 6f 66 20 74 | 68 65 73 65 20 49 46 53 |ure of t|hese IFS|
|00000730| 27 73 20 69 73 20 61 73 | 20 66 6f 6c 6c 6f 77 73 |'s is as| follows|
|00000740| 3a 22 27 22 65 61 63 68 | 20 63 6f 6e 73 69 73 74 |:"'"each| consist|
|00000750| 73 20 6f 66 20 61 20 33 | 20 66 75 6e 63 74 69 6f |s of a 3| functio|
|00000760| 6e 20 49 46 53 2c 20 77 | 68 65 72 65 20 65 61 63 |n IFS, w|here eac|
|00000770| 68 20 66 75 6e 63 74 69 | 6f 6e 20 69 73 20 61 20 |h functi|on is a |
|00000780| 73 69 6d 69 6c 69 74 75 | 64 65 2c 22 0d 02 9e de |similitu|de,"....|
|00000790| f1 22 77 69 74 68 20 6d | 61 67 6e 69 66 69 63 61 |."with m|agnifica|
|000007a0| 74 69 6f 6e 20 66 61 63 | 74 6f 72 20 30 2e 35 2c |tion fac|tor 0.5,|
|000007b0| 20 72 6f 74 61 74 69 6f | 6e 20 62 79 20 61 6e 20 | rotatio|n by an |
|000007c0| 69 6e 74 65 67 65 72 20 | 6d 75 6c 74 69 70 6c 65 |integer |multiple|
|000007d0| 20 6f 66 22 27 22 39 30 | 20 64 65 67 72 65 65 73 | of"'"90| degrees|
|000007e0| 2c 20 6f 70 74 69 6f 6e | 61 6c 20 72 65 66 6c 65 |, option|al refle|
|000007f0| 63 74 69 6f 6e 2c 20 26 | 20 74 72 61 6e 73 6c 61 |ction, &| transla|
|00000800| 74 69 6f 6e 20 73 75 63 | 68 20 74 68 61 74 20 74 |tion suc|h that t|
|00000810| 68 65 20 74 72 61 6e 73 | 66 6f 72 6d 65 64 22 27 |he trans|formed"'|
|00000820| 22 75 6e 69 74 20 73 71 | 75 61 72 65 20 7b 76 65 |"unit sq|uare {ve|
|00000830| 72 74 69 63 65 73 20 61 | 74 20 28 30 2c 30 29 20 |rtices a|t (0,0) |
|00000840| 26 20 28 31 2c 31 29 7d | 20 69 73 20 6f 6e 65 20 |& (1,1)}| is one |
|00000850| 6f 66 20 74 68 65 20 74 | 68 72 65 65 20 71 75 61 |of the t|hree qua|
|00000860| 64 72 61 6e 74 73 20 6f | 66 22 0d 02 a8 a7 f1 22 |drants o|f"....."|
|00000870| 74 68 65 20 75 6e 69 74 | 20 73 71 75 61 72 65 20 |the unit| square |
|00000880| 61 73 20 69 6e 64 69 63 | 61 74 65 64 20 2d 20 65 |as indic|ated - e|
|00000890| 69 74 68 65 72 20 74 6f | 70 20 6c 65 66 74 2c 20 |ither to|p left, |
|000008a0| 62 6f 74 74 6f 6d 20 6c | 65 66 74 2c 22 27 22 6f |bottom l|eft,"'"o|
|000008b0| 72 20 62 6f 74 74 6f 6d | 20 72 69 67 68 74 20 2d |r bottom| right -|
|000008c0| 20 77 69 74 68 20 65 61 | 63 68 20 66 75 6e 63 74 | with ea|ch funct|
|000008d0| 69 6f 6e 20 69 6e 20 61 | 6e 20 49 46 53 20 63 6f |ion in a|n IFS co|
|000008e0| 72 72 65 73 70 6f 6e 64 | 69 6e 67 20 74 6f 20 70 |rrespond|ing to p|
|000008f0| 72 65 63 69 73 65 6c 79 | 22 27 22 6f 6e 65 20 6f |recisely|"'"one o|
|00000900| 66 20 74 68 65 73 65 20 | 72 65 67 69 6f 6e 73 2e |f these |regions.|
|00000910| 22 0d 02 b2 d8 f1 22 54 | 68 75 73 20 65 61 63 68 |"....."T|hus each|
|00000920| 20 66 75 6e 63 74 69 6f | 6e 20 63 61 6e 20 62 65 | functio|n can be|
|00000930| 20 73 70 65 63 69 66 69 | 65 64 20 62 79 20 61 6e | specifi|ed by an|
|00000940| 20 69 6e 74 65 67 65 72 | 20 62 65 74 77 65 65 6e | integer| between|
|00000950| 20 30 20 26 20 37 2c 22 | 27 22 26 20 65 61 63 68 | 0 & 7,"|'"& each|
|00000960| 20 49 46 53 20 62 79 20 | 61 20 6e 75 6d 62 65 72 | IFS by |a number|
|00000970| 20 62 65 74 77 65 65 6e | 20 30 20 26 20 35 31 31 | between| 0 & 511|
|00000980| 20 7b 61 6c 74 68 6f 75 | 67 68 20 74 68 65 73 65 | {althou|gh these|
|00000990| 20 64 6f 6e 27 74 20 61 | 6c 6c 20 67 69 76 65 22 | don't a|ll give"|
|000009a0| 27 22 64 69 73 74 69 6e | 63 74 20 61 74 74 72 61 |'"distin|ct attra|
|000009b0| 63 74 6f 72 73 7d 2e 20 | 41 74 74 65 6e 74 69 6f |ctors}. |Attentio|
|000009c0| 6e 20 68 61 73 20 62 65 | 65 6e 20 72 65 73 74 72 |n has be|en restr|
|000009d0| 69 63 74 65 64 20 74 6f | 20 74 68 65 73 65 20 66 |icted to| these f|
|000009e0| 75 6e 63 74 69 6f 6e 73 | 22 0d 02 bc 8f f1 22 62 |unctions|"....."b|
|000009f0| 65 63 61 75 73 65 20 74 | 68 65 69 72 20 69 6e 76 |ecause t|heir inv|
|00000a00| 65 72 73 65 20 74 72 61 | 6e 73 66 6f 72 6d 61 74 |erse tra|nsformat|
|00000a10| 69 6f 6e 73 2c 20 72 65 | 71 75 69 72 65 64 20 66 |ions, re|quired f|
|00000a20| 6f 72 20 74 68 65 20 65 | 73 63 61 70 65 20 74 69 |or the e|scape ti|
|00000a30| 6d 65 22 27 22 61 6c 67 | 6f 72 69 74 68 6d 2c 20 |me"'"alg|orithm, |
|00000a40| 63 61 6e 20 62 65 20 70 | 72 6f 67 72 61 6d 6d 65 |can be p|rogramme|
|00000a50| 64 20 69 6e 20 61 73 73 | 65 6d 62 6c 79 2c 20 74 |d in ass|embly, t|
|00000a60| 6f 20 65 78 65 63 75 74 | 65 20 76 65 72 79 20 72 |o execut|e very r|
|00000a70| 61 70 69 64 6c 79 2e 22 | 0d 02 c6 22 f1 27 22 20 |apidly."|...".'" |
|00000a80| 20 50 72 65 73 73 20 52 | 65 74 75 72 6e 20 74 6f | Press R|eturn to|
|00000a90| 20 63 6f 6e 74 69 6e 75 | 65 22 0d 02 d0 0c f5 20 | continu|e"..... |
|00000aa0| fd 20 a6 2d 37 34 0d 02 | da 0e f5 20 fd 20 ac 20 |. .-74..|... . . |
|00000ab0| a6 2d 37 34 0d 02 e4 05 | db 0d 02 ee 2e f1 22 20 |.-74....|......" |
|00000ac0| 20 41 6e 64 20 6e 6f 77 | 20 66 6f 72 20 73 6f 6d | And now| for som|
|00000ad0| 65 20 61 63 74 75 61 6c | 20 69 6e 73 74 72 75 63 |e actual| instruc|
|00000ae0| 74 69 6f 6e 73 3a 22 0d | 02 f8 e0 f1 22 20 20 57 |tions:".|...." W|
|00000af0| 68 65 6e 20 72 75 6e 20 | 79 6f 75 20 61 72 65 20 |hen run |you are |
|00000b00| 70 72 6f 6d 70 74 65 64 | 20 66 6f 72 20 61 20 6e |prompted| for a n|
|00000b10| 75 6d 62 65 72 3b 20 74 | 68 69 73 20 73 65 6c 65 |umber; t|his sele|
|00000b20| 63 74 73 20 74 68 65 20 | 49 46 53 20 26 20 73 6f |cts the |IFS & so|
|00000b30| 22 27 22 73 68 6f 75 6c | 64 20 62 65 20 62 65 74 |"'"shoul|d be bet|
|00000b40| 77 65 65 6e 20 30 20 26 | 20 35 31 31 2e 20 41 6e |ween 0 &| 511. An|
|00000b50| 20 69 6d 61 67 65 20 69 | 73 20 74 68 65 6e 20 67 | image i|s then g|
|00000b60| 65 6e 65 72 61 74 65 64 | 20 7b 69 6e 20 6d 6f 64 |enerated| {in mod|
|00000b70| 65 20 31 33 7d 2c 20 75 | 73 69 6e 67 22 27 22 73 |e 13}, u|sing"'"s|
|00000b80| 65 76 65 72 61 6c 20 70 | 72 65 64 65 66 69 6e 65 |everal p|redefine|
|00000b90| 64 20 70 61 72 61 6d 65 | 74 65 72 73 2e 20 4f 6e |d parame|ters. On|
|00000ba0| 63 65 20 63 6f 6d 70 6c | 65 74 65 2c 20 74 68 65 |ce compl|ete, the|
|00000bb0| 20 70 72 6f 67 72 61 6d | 20 77 61 69 74 73 20 66 | program| waits f|
|00000bc0| 6f 72 20 79 6f 75 22 0d | 03 02 28 f1 22 74 6f 20 |or you".|..(."to |
|00000bd0| 70 72 65 73 73 20 6f 6e | 65 20 6f 66 20 61 20 6e |press on|e of a n|
|00000be0| 75 6d 62 65 72 20 6f 66 | 20 6b 65 79 73 3a 22 0d |umber of| keys:".|
|00000bf0| 03 0c 30 f1 22 27 51 27 | 20 61 6c 6c 6f 77 73 20 |..0."'Q'| allows |
|00000c00| 79 6f 75 20 74 6f 20 69 | 6e 70 75 74 20 61 20 6e |you to i|nput a n|
|00000c10| 65 77 20 49 46 53 20 6e | 75 6d 62 65 72 2e 22 0d |ew IFS n|umber.".|
|00000c20| 03 16 8d f1 22 27 41 27 | 20 72 65 70 65 61 74 73 |...."'A'| repeats|
|00000c30| 20 74 68 65 20 69 6d 61 | 67 65 20 67 65 6e 65 72 | the ima|ge gener|
|00000c40| 61 74 69 6f 6e 20 26 20 | 69 73 20 72 65 71 75 69 |ation & |is requi|
|00000c50| 72 65 64 20 74 6f 20 67 | 65 6e 65 72 61 74 65 20 |red to g|enerate |
|00000c60| 61 20 6e 65 77 20 69 6d | 61 67 65 22 27 22 61 66 |a new im|age"'"af|
|00000c70| 74 65 72 20 61 6c 74 65 | 72 69 6e 67 20 61 6e 79 |ter alte|ring any|
|00000c80| 20 6f 66 20 74 68 65 20 | 66 6f 6c 6c 6f 77 69 6e | of the |followin|
|00000c90| 67 20 70 61 72 61 6d 65 | 74 65 72 73 20 7b 65 78 |g parame|ters {ex|
|00000ca0| 63 65 70 74 20 7a 6f 6f | 6d 7d 2e 22 0d 03 20 e2 |cept zoo|m}.".. .|
|00000cb0| f1 22 27 50 27 20 6c 65 | 74 73 20 79 6f 75 20 61 |."'P' le|ts you a|
|00000cc0| 6c 74 65 72 20 74 68 65 | 20 70 61 6c 65 74 74 65 |lter the| palette|
|00000cd0| 20 75 73 65 64 20 74 6f | 20 72 65 6e 64 65 72 20 | used to| render |
|00000ce0| 74 68 65 20 70 69 63 74 | 75 72 65 3b 20 65 6e 74 |the pict|ure; ent|
|00000cf0| 65 72 20 61 20 6e 75 6d | 62 65 72 22 27 22 62 65 |er a num|ber"'"be|
|00000d00| 74 77 65 65 6e 20 30 20 | 26 20 35 2e 20 54 68 69 |tween 0 |& 5. Thi|
|00000d10| 73 20 69 6e 63 6c 75 64 | 65 73 20 61 20 42 2f 57 |s includ|es a B/W|
|00000d20| 20 6f 70 74 69 6f 6e 20 | 7b 30 7d 20 75 73 65 66 | option |{0} usef|
|00000d30| 75 6c 20 66 6f 72 20 68 | 69 72 65 73 20 73 63 72 |ul for h|ires scr|
|00000d40| 65 65 6e 22 27 22 64 75 | 6d 70 73 2c 20 26 20 61 |een"'"du|mps, & a|
|00000d50| 20 67 72 65 79 73 63 61 | 6c 65 20 7b 31 7d 20 77 | greysca|le {1} w|
|00000d60| 68 69 63 68 20 49 20 66 | 69 6e 64 20 6f 66 20 75 |hich I f|ind of u|
|00000d70| 73 65 20 70 61 72 74 69 | 63 75 6c 61 72 6c 79 20 |se parti|cularly |
|00000d80| 77 68 65 6e 20 7a 6f 6f | 6d 69 6e 67 2e 22 0d 03 |when zoo|ming."..|
|00000d90| 2a a3 f1 22 27 43 27 20 | 73 65 6c 65 63 74 73 20 |*.."'C' |selects |
|00000da0| 74 68 65 20 63 6f 6c 6f | 75 72 20 63 79 63 6c 65 |the colo|ur cycle|
|00000db0| 20 6f 70 74 69 6f 6e 2e | 20 41 6c 74 65 72 20 74 | option.| Alter t|
|00000dc0| 68 65 20 59 20 63 6f 6f | 72 64 69 6e 61 74 65 20 |he Y coo|rdinate |
|00000dd0| 6f 66 20 74 68 65 22 27 | 22 70 6f 69 6e 74 65 72 |of the"'|"pointer|
|00000de0| 20 74 6f 20 63 68 61 6e | 67 65 20 74 68 65 20 73 | to chan|ge the s|
|00000df0| 70 65 65 64 20 26 20 64 | 69 72 65 63 74 69 6f 6e |peed & d|irection|
|00000e00| 3b 20 73 65 6c 65 63 74 | 20 26 20 61 64 6a 75 73 |; select| & adjus|
|00000e10| 74 20 70 61 75 73 65 20 | 74 68 65 20 63 79 63 6c |t pause |the cycl|
|00000e20| 65 3b 22 27 22 6d 65 6e | 75 20 71 75 69 74 73 2e |e;"'"men|u quits.|
|00000e30| 22 0d 03 34 ca f1 22 27 | 49 27 20 26 20 27 4f 27 |"..4.."'|I' & 'O'|
|00000e40| 20 73 65 6c 65 63 74 20 | 7a 6f 6f 6d 20 69 6e 20 | select |zoom in |
|00000e50| 26 20 6f 75 74 2c 20 72 | 65 73 70 65 63 74 69 76 |& out, r|espectiv|
|00000e60| 65 6c 79 2e 20 4d 6f 76 | 65 20 74 68 65 20 70 6f |ely. Mov|e the po|
|00000e70| 69 6e 74 65 72 20 74 6f | 20 73 65 6c 65 63 74 22 |inter to| select"|
|00000e80| 27 22 61 20 72 65 67 69 | 6f 6e 3b 20 73 65 6c 65 |'"a regi|on; sele|
|00000e90| 63 74 20 26 20 61 64 6a | 75 73 74 20 61 6c 74 65 |ct & adj|ust alte|
|00000ea0| 72 20 74 68 65 20 73 69 | 7a 65 20 6f 66 20 74 68 |r the si|ze of th|
|00000eb0| 69 73 20 74 61 72 67 65 | 74 20 72 65 67 69 6f 6e |is targe|t region|
|00000ec0| 3b 22 27 22 6d 65 6e 75 | 20 73 65 6c 65 63 74 73 |;"'"menu| selects|
|00000ed0| 20 74 68 65 20 72 65 67 | 69 6f 6e 20 69 6e 20 74 | the reg|ion in t|
|00000ee0| 68 65 20 74 61 72 67 65 | 74 20 77 69 6e 64 6f 77 |he targe|t window|
|00000ef0| 20 66 6f 72 20 7a 6f 6f | 6d 2e 22 0d 03 3e 97 f1 | for zoo|m."..>..|
|00000f00| 22 27 4d 27 20 61 6c 6c | 6f 77 73 20 79 6f 75 20 |"'M' all|ows you |
|00000f10| 74 6f 20 63 68 61 6e 67 | 65 20 74 68 65 20 73 63 |to chang|e the sc|
|00000f20| 72 65 65 6e 20 6d 6f 64 | 65 3b 20 31 33 2c 20 31 |reen mod|e; 13, 1|
|00000f30| 35 2c 20 26 20 32 31 20 | 61 72 65 20 73 75 70 70 |5, & 21 |are supp|
|00000f40| 6f 72 74 65 64 2e 22 27 | 22 49 20 77 6f 75 6c 64 |orted."'|"I would|
|00000f50| 20 72 65 63 6f 6d 6d 65 | 6e 64 20 31 33 20 66 6f | recomme|nd 13 fo|
|00000f60| 72 20 70 72 65 76 69 65 | 77 73 2c 20 26 20 77 68 |r previe|ws, & wh|
|00000f70| 65 6e 20 75 73 69 6e 67 | 20 74 68 65 20 63 6f 6c |en using| the col|
|00000f80| 6f 75 72 20 63 79 63 6c | 65 20 6f 70 74 69 6f 6e |our cycl|e option|
|00000f90| 2e 22 0d 03 48 d5 f1 22 | 27 52 27 20 61 6c 6c 6f |."..H.."|'R' allo|
|00000fa0| 77 73 20 61 6c 74 65 72 | 61 74 69 6f 6e 20 6f 66 |ws alter|ation of|
|00000fb0| 20 74 68 65 20 72 61 64 | 69 75 73 20 6f 66 20 74 | the rad|ius of t|
|00000fc0| 68 65 20 72 65 67 69 6f | 6e 20 75 73 65 64 20 74 |he regio|n used t|
|00000fd0| 6f 20 64 65 74 65 72 6d | 69 6e 65 20 74 68 65 22 |o determ|ine the"|
|00000fe0| 27 22 6c 65 76 65 6c 20 | 73 65 74 20 64 65 63 6f |'"level |set deco|
|00000ff0| 6d 70 6f 73 69 74 69 6f | 6e 3b 20 74 68 61 74 20 |mpositio|n; that |
|00001000| 69 73 2c 20 69 74 20 73 | 70 65 63 69 66 69 65 73 |is, it s|pecifies|
|00001010| 20 74 68 65 20 72 65 67 | 69 6f 6e 20 62 65 79 6f | the reg|ion beyo|
|00001020| 6e 64 20 77 68 69 63 68 | 22 27 22 69 74 65 72 61 |nd which|"'"itera|
|00001030| 74 65 73 20 6d 75 73 74 | 20 72 65 61 63 68 20 69 |tes must| reach i|
|00001040| 6e 6f 72 64 65 72 20 74 | 6f 20 64 65 74 65 72 6d |norder t|o determ|
|00001050| 69 6e 65 20 74 68 65 69 | 72 20 65 73 63 61 70 65 |ine thei|r escape|
|00001060| 20 74 69 6d 65 2e 22 0d | 03 52 8f f1 22 4e 6f 74 | time.".|.R.."Not|
|00001070| 65 2c 20 74 68 69 73 20 | 69 73 20 63 69 72 63 75 |e, this |is circu|
|00001080| 6c 61 72 2c 20 63 65 6e | 74 72 65 64 20 6f 6e 20 |lar, cen|tred on |
|00001090| 28 32 2f 33 2c 32 2f 33 | 29 20 7b 74 68 65 20 63 |(2/3,2/3|) {the c|
|000010a0| 65 6e 74 72 6f 69 64 20 | 6f 66 20 74 68 65 22 27 |entroid |of the"'|
|000010b0| 22 74 72 69 61 6e 67 6c | 65 20 28 30 2c 31 29 2c |"triangl|e (0,1),|
|000010c0| 28 30 2c 30 29 2c 28 31 | 2c 30 29 7d 2e 20 54 72 |(0,0),(1|,0)}. Tr|
|000010d0| 79 20 32 20 74 6f 20 31 | 32 38 20 7b 64 65 66 61 |y 2 to 1|28 {defa|
|000010e0| 75 6c 74 20 69 73 20 33 | 7d 3b 20 6c 6f 77 20 76 |ult is 3|}; low v|
|000010f0| 61 6c 75 65 73 22 0d 03 | 5c 8a f1 22 63 61 75 73 |alues"..|\.."caus|
|00001100| 65 20 74 68 65 20 73 68 | 61 70 65 20 6f 66 20 6c |e the sh|ape of l|
|00001110| 65 76 65 6c 20 73 65 74 | 73 20 74 6f 20 62 65 20 |evel set|s to be |
|00001120| 64 6f 6d 69 6e 61 74 65 | 64 20 62 79 20 74 68 65 |dominate|d by the|
|00001130| 20 63 69 72 63 75 6c 61 | 72 20 61 72 63 73 3b 22 | circula|r arcs;"|
|00001140| 27 22 68 69 67 68 20 76 | 61 6c 75 65 73 20 61 6c |'"high v|alues al|
|00001150| 6c 6f 77 20 74 68 65 20 | 73 74 72 75 63 74 75 72 |low the |structur|
|00001160| 65 20 6f 66 20 74 68 65 | 20 61 74 74 72 61 63 74 |e of the| attract|
|00001170| 6f 72 20 74 6f 20 64 6f | 6d 69 6e 61 74 65 2e 22 |or to do|minate."|
|00001180| 0d 03 66 98 f1 22 20 20 | 4f 6e 65 20 6c 61 73 74 |..f.." |One last|
|00001190| 20 74 68 69 6e 67 3b 20 | 69 66 20 79 6f 75 20 63 | thing; |if you c|
|000011a0| 72 65 61 74 65 20 61 6e | 79 20 70 61 72 74 69 63 |reate an|y partic|
|000011b0| 75 6c 61 72 6c 79 20 69 | 6e 74 65 72 65 73 74 69 |ularly i|nteresti|
|000011c0| 6e 67 20 70 69 63 74 75 | 72 65 73 2c 22 27 22 6f |ng pictu|res,"'"o|
|000011d0| 72 20 68 61 76 65 20 61 | 6e 79 20 73 75 67 67 65 |r have a|ny sugge|
|000011e0| 73 74 69 6f 6e 73 20 72 | 65 67 61 72 64 69 6e 67 |stions r|egarding|
|000011f0| 20 74 68 69 73 20 70 72 | 6f 67 72 61 6d 2c 20 74 | this pr|ogram, t|
|00001200| 68 65 6e 20 70 6c 65 61 | 73 65 20 6c 65 74 20 6d |hen plea|se let m|
|00001210| 65 20 6b 6e 6f 77 2e 22 | 0d 03 70 25 f1 27 22 20 |e know."|..p%.'" |
|00001220| 20 50 72 65 73 73 20 52 | 65 74 75 72 6e 20 74 6f | Press R|eturn to|
|00001230| 20 72 75 6e 20 70 72 6f | 67 72 61 6d 22 0d 03 7a | run pro|gram"..z|
|00001240| 0c f5 20 fd 20 a6 2d 37 | 34 0d 03 84 0e f5 20 fd |.. . .-7|4..... .|
|00001250| 20 ac 20 a6 2d 37 34 0d | 03 8e 0a eb 20 6d 25 3a | . .-74.|.... m%:|
|00001260| 87 0d 03 98 0d c8 99 20 | 36 2c 31 35 2c 31 0d 03 |....... |6,15,1..|
|00001270| a2 05 e1 0d 03 ac 05 3a | 0d 03 b6 0c dd 20 f2 73 |.......:|..... .s|
|00001280| 77 69 72 6c 0d 03 c0 0d | c8 99 20 36 2c 31 35 2c |wirl....|.. 6,15,|
|00001290| 30 0d 03 ca 17 c8 97 20 | c8 93 20 31 32 37 39 2c |0...... |.. 1279,|
|000012a0| 30 2c 30 2c 31 30 32 33 | 0d 03 d4 08 c8 97 20 ee |0,0,1023|...... .|
|000012b0| 0d 03 de 05 f5 0d 03 e8 | 0f c8 97 20 78 25 2c 79 |........|... x%,y|
|000012c0| 25 2c 7a 25 0d 03 f2 2f | e7 20 79 25 3e 35 31 32 |%,z%.../|. y%>512|
|000012d0| 20 21 61 73 77 69 72 6c | 3d 73 77 69 72 6c 6f 75 | !aswirl|=swirlou|
|000012e0| 74 20 8b 20 21 61 73 77 | 69 72 6c 3d 73 77 69 72 |t . !asw|irl=swir|
|000012f0| 6c 69 6e 0d 03 fc 19 c8 | 95 20 7a 25 80 35 20 c8 |lin.....|. z%.5 .|
|00001300| 97 20 78 25 2c 79 25 2c | 7a 25 3a ce 0d 04 06 0e |. x%,y%,|z%:.....|
|00001310| c8 96 3a d6 20 73 77 69 | 72 6c 0d 04 10 20 d1 3d |..:. swi|rl... .=|
|00001320| 30 3a f5 20 fd 20 91 3e | 28 35 31 32 2d 94 28 79 |0:. . .>|(512-.(y|
|00001330| 25 2d 35 31 32 29 29 2f | 32 35 0d 04 1a 0e fd 20 |%-512))/|25..... |
|00001340| 28 7a 25 80 32 29 3d 32 | 0d 04 24 18 f5 20 c8 97 |(z%.2)=2|..$.. ..|
|00001350| 20 78 25 2c 79 25 2c 7a | 25 3a fd 20 7a 25 3d 30 | x%,y%,z|%:. z%=0|
|00001360| 0d 04 2e 08 c8 97 20 87 | 0d 04 38 17 c8 97 20 c8 |...... .|..8... .|
|00001370| 93 20 30 2c 30 2c 31 32 | 37 39 2c 31 30 32 33 0d |. 0,0,12|79,1023.|
|00001380| 04 42 05 e1 0d 04 4c 05 | 3a 0d 04 56 0b dd 20 f2 |.B....L.|:..V.. .|
|00001390| 7a 6f 6f 6d 0d 04 60 0a | e6 20 33 2c 36 33 0d 04 |zoom..`.|. 3,63..|
|000013a0| 6a 0a 6c 25 3d 31 32 38 | 0d 04 74 0c e7 20 6b 25 |j.l%=128|..t.. k%|
|000013b0| 3d 31 20 8c 0d 04 7e 1d | e7 20 6c 25 2f 31 30 32 |=1 ...~.|. l%/102|
|000013c0| 34 2a 73 3c 3d 6d 69 6e | 69 20 6c 25 3d 31 30 32 |4*s<=min|i l%=102|
|000013d0| 34 0d 04 88 05 cc 0d 04 | 92 1d e7 20 31 30 32 34 |4.......|... 1024|
|000013e0| 2f 6c 25 2a 73 3e 3d 6d | 61 78 69 20 6c 25 3d 31 |/l%*s>=m|axi l%=1|
|000013f0| 30 32 34 0d 04 9c 05 cd | 0d 04 a6 0d c8 99 20 36 |024.....|...... 6|
|00001400| 2c 31 35 2c 30 0d 04 b0 | 34 6f 6c 25 3d 6c 25 3a |,15,0...|4ol%=l%:|
|00001410| c8 97 20 6f 78 25 2c 6f | 79 25 2c 7a 25 3a 6f 78 |.. ox%,o|y%,z%:ox|
|00001420| 25 3d 6f 78 25 80 36 35 | 35 33 32 3a 6f 79 25 3d |%=ox%.65|532:oy%=|
|00001430| 6f 79 25 80 36 35 35 33 | 32 0d 04 ba 2e c8 93 20 |oy%.6553|2...... |
|00001440| 6f 78 25 2d 6f 6c 25 2a | 2e 36 32 35 2c 6f 79 25 |ox%-ol%*|.625,oy%|
|00001450| 2d 6f 6c 25 81 32 2c 6f | 6c 25 2a 31 2e 32 35 2b |-ol%.2,o|l%*1.25+|
|00001460| 34 2c 6f 6c 25 2b 34 0d | 04 c4 05 f5 0d 04 ce 27 |4,ol%+4.|.......'|
|00001470| c8 97 20 78 25 2c 79 25 | 2c 7a 25 3a 78 25 3d 78 |.. x%,y%|,z%:x%=x|
|00001480| 25 80 36 35 35 33 32 3a | 79 25 3d 79 25 80 36 35 |%.65532:|y%=y%.65|
|00001490| 35 33 32 0d 04 d8 13 e7 | 20 7a 25 80 34 20 80 20 |532.....| z%.4 . |
|000014a0| 6c 25 3e 34 20 8c 0d 04 | e2 25 e7 20 6b 25 3d 31 |l%>4 ...|.%. k%=1|
|000014b0| 20 80 20 28 6c 25 2d 34 | 29 2f 31 30 32 34 2a 73 | . (l%-4|)/1024*s|
|000014c0| 3e 6d 69 6e 69 20 6c 25 | 2d 3d 34 0d 04 ec 26 e7 |>mini l%|-=4...&.|
|000014d0| 20 6b 25 3d 2d 31 20 80 | 20 31 30 32 34 2f 28 6c | k%=-1 .| 1024/(l|
|000014e0| 25 2d 34 29 2a 73 3c 6d | 61 78 69 20 6c 25 2d 3d |%-4)*s<m|axi l%-=|
|000014f0| 34 0d 04 f6 05 cd 0d 05 | 00 1a e7 20 7a 25 80 31 |4.......|... z%.1|
|00001500| 20 80 20 6c 25 3c 31 30 | 32 34 20 6c 25 2b 3d 34 | . l%<10|24 l%+=4|
|00001510| 0d 05 0a 06 c8 96 0d 05 | 14 2e c8 93 20 6f 78 25 |........|.... ox%|
|00001520| 2d 6f 6c 25 2a 2e 36 32 | 35 2c 6f 79 25 2d 6f 6c |-ol%*.62|5,oy%-ol|
|00001530| 25 81 32 2c 6f 6c 25 2a | 31 2e 32 35 2b 34 2c 6f |%.2,ol%*|1.25+4,o|
|00001540| 6c 25 2b 34 0d 05 1e 28 | c8 93 20 78 25 2d 6c 25 |l%+4...(|.. x%-l%|
|00001550| 2a 2e 36 32 35 2c 79 25 | 2d 6c 25 81 32 2c 6c 25 |*.625,y%|-l%.2,l%|
|00001560| 2a 31 2e 32 35 2b 34 2c | 6c 25 2b 34 0d 05 28 12 |*1.25+4,|l%+4..(.|
|00001570| e7 20 76 70 69 78 25 3d | 35 31 32 20 c8 96 0d 05 |. vpix%=|512 ....|
|00001580| 32 18 6f 78 25 3d 78 25 | 3a 6f 79 25 3d 79 25 3a |2.ox%=x%|:oy%=y%:|
|00001590| 6f 6c 25 3d 6c 25 0d 05 | 3c 0a fd 20 7a 25 80 32 |ol%=l%..|<.. z%.2|
|000015a0| 0d 05 46 0c e7 20 6b 25 | 3d 31 20 8c 0d 05 50 1d |..F.. k%|=1 ...P.|
|000015b0| 61 2b 3d 78 25 2f 31 30 | 32 34 2a 73 3a 62 2b 3d |a+=x%/10|24*s:b+=|
|000015c0| 79 25 2f 31 30 32 34 2a | 73 0d 05 5a 0f 73 3d 73 |y%/1024*|s..Z.s=s|
|000015d0| 2a 6c 25 2f 31 30 32 34 | 0d 05 64 15 61 2d 3d 2e |*l%/1024|..d.a-=.|
|000015e0| 36 32 35 2a 73 3a 62 2d | 3d 2e 35 2a 73 0d 05 6e |625*s:b-|=.5*s..n|
|000015f0| 05 cc 0d 05 78 25 61 2b | 3d 28 2e 36 32 35 2d 78 |....x%a+|=(.625-x|
|00001600| 25 2f 6c 25 29 2a 73 3a | 62 2b 3d 28 2e 35 2d 79 |%/l%)*s:|b+=(.5-y|
|00001610| 25 2f 6c 25 29 2a 73 0d | 05 82 0f 73 3d 73 2a 31 |%/l%)*s.|...s=s*1|
|00001620| 30 32 34 2f 6c 25 0d 05 | 8c 05 cd 0d 05 96 15 f2 |024/l%..|........|
|00001630| 73 65 74 77 69 6e 64 6f | 77 28 61 2c 62 2c 73 29 |setwindo|w(a,b,s)|
|00001640| 0d 05 a0 05 e1 0d 05 aa | 05 3a 0d 05 b4 11 dd 20 |........|.:..... |
|00001650| f2 69 6e 69 74 69 61 6c | 69 73 65 0d 05 be 15 6d |.initial|ise....m|
|00001660| 69 6e 69 3d 37 45 2d 35 | 3a 6d 61 78 69 3d 36 34 |ini=7E-5|:maxi=64|
|00001670| 0d 05 c8 36 62 63 25 3d | a4 6c 63 6f 6c 28 25 31 |...6bc%=|.lcol(%1|
|00001680| 31 30 30 30 30 29 3a 72 | 63 25 3d a4 6c 63 6f 6c |10000):r|c%=.lcol|
|00001690| 28 25 31 31 29 3a 67 63 | 25 3d a4 6c 63 6f 6c 28 |(%11):gc|%=.lcol(|
|000016a0| 25 31 31 30 30 29 0d 05 | d2 42 de 20 74 25 28 37 |%1100)..|.B. t%(7|
|000016b0| 29 3a 74 25 28 29 3d 30 | 2c 62 63 25 2c 72 63 25 |):t%()=0|,bc%,rc%|
|000016c0| 2c 62 63 25 2b 72 63 25 | 2c 67 63 25 2c 62 63 25 |,bc%+rc%|,gc%,bc%|
|000016d0| 2b 67 63 25 2c 72 63 25 | 2b 67 63 25 2c 62 63 25 |+gc%,rc%|+gc%,bc%|
|000016e0| 2b 72 63 25 2b 67 63 25 | 0d 05 dc 0c 2a 50 4f 49 |+rc%+gc%|....*POI|
|000016f0| 4e 54 45 52 0d 05 e6 08 | c8 97 20 87 0d 05 f0 1a |NTER....|.. .....|
|00001700| 63 6d 65 6d 25 3d 31 30 | 32 34 30 3a 63 6d 6d 65 |cmem%=10|240:cmme|
|00001710| 6d 25 3d 32 35 36 0d 05 | fa 37 de 20 63 6f 64 65 |m%=256..|.7. code|
|00001720| 25 20 63 6d 65 6d 25 2d | 31 2c 20 63 6f 6c 6d 61 |% cmem%-|1, colma|
|00001730| 70 25 20 63 6d 6d 65 6d | 25 2d 31 2c 62 75 66 25 |p% cmmem|%-1,buf%|
|00001740| 20 37 2c 73 77 69 72 6c | 73 20 35 31 31 0d 06 04 | 7,swirl|s 511...|
|00001750| 12 4c 25 3d 63 6f 64 65 | 25 2b 63 6d 65 6d 25 0d |.L%=code|%+cmem%.|
|00001760| 06 0e 0e 6e 6f 6e 65 25 | 3d 32 5e 32 33 0d 06 18 |...none%|=2^23...|
|00001770| 05 3a 0d 06 22 18 74 6c | 66 25 3d 33 3a 62 6c 66 |.:..".tl|f%=3:blf|
|00001780| 25 3d 30 3a 62 72 66 25 | 3d 31 0d 06 2c 1b 6e 69 |%=0:brf%|=1..,.ni|
|00001790| 74 65 72 25 3d a4 72 6f | 75 6e 64 6d 61 67 75 70 |ter%=.ro|undmagup|
|000017a0| 28 31 32 37 29 0d 06 36 | 13 61 3d 2d 31 2e 35 3a |(127)..6|.a=-1.5:|
|000017b0| 62 3d 2d 31 3a 73 3d 34 | 0d 06 40 10 f4 61 3d 30 |b=-1:s=4|..@..a=0|
|000017c0| 3a 62 3d 30 3a 73 3d 32 | 0d 06 4a 19 f4 74 6c 66 |:b=0:s=2|..J..tlf|
|000017d0| 25 3d 30 3a 62 6c 66 25 | 3d 30 3a 62 72 66 25 3d |%=0:blf%|=0:brf%=|
|000017e0| 30 0d 06 54 19 f4 74 6c | 66 25 3d 31 3a 62 6c 66 |0..T..tl|f%=1:blf|
|000017f0| 25 3d 32 3a 62 72 66 25 | 3d 37 0d 06 5e 19 f4 74 |%=2:brf%|=7..^..t|
|00001800| 6c 66 25 3d 32 3a 62 6c | 66 25 3d 33 3a 62 72 66 |lf%=2:bl|f%=3:brf|
|00001810| 25 3d 30 0d 06 68 19 f4 | 74 6c 66 25 3d 33 3a 62 |%=0..h..|tlf%=3:b|
|00001820| 6c 66 25 3d 31 3a 62 72 | 66 25 3d 30 0d 06 72 19 |lf%=1:br|f%=0..r.|
|00001830| f4 74 6c 66 25 3d 33 3a | 62 6c 66 25 3d 32 3a 62 |.tlf%=3:|blf%=2:b|
|00001840| 72 66 25 3d 30 0d 06 7c | 0c f2 6d 6f 64 65 28 eb |rf%=0..||..mode(.|
|00001850| 29 0d 06 86 22 f2 73 65 | 74 72 28 33 29 20 20 20 |)...".se|tr(3) |
|00001860| 20 20 20 20 3a f4 20 54 | 52 59 20 32 20 74 6f 20 | :. T|RY 2 to |
|00001870| 31 32 38 0d 06 90 11 f2 | 73 65 74 63 6f 6c 6d 61 |128.....|setcolma|
|00001880| 70 28 35 29 0d 06 9a 05 | e1 0d 06 a4 05 3a 0d 06 |p(5)....|.....:..|
|00001890| ae 0f dd 20 f2 6d 6f 64 | 65 28 6d 25 29 0d 06 b8 |... .mod|e(m%)...|
|000018a0| 0a eb 20 6d 25 3a 87 0d | 06 c2 17 21 62 75 66 25 |.. m%:..|...!buf%|
|000018b0| 3d 31 34 38 3a 62 75 66 | 25 21 34 3d 2d 31 0d 06 |=148:buf|%!4=-1..|
|000018c0| cc 26 c8 99 20 22 4f 53 | 5f 52 65 61 64 56 64 75 |.&.. "OS|_ReadVdu|
|000018d0| 56 61 72 69 61 62 6c 65 | 73 22 2c 62 75 66 25 2c |Variable|s",buf%,|
|000018e0| 62 75 66 25 0d 06 d6 0f | 73 63 72 73 74 3d 21 62 |buf%....|scrst=!b|
|000018f0| 75 66 25 0d 06 e0 15 f2 | 73 65 74 6d 6f 64 65 70 |uf%.....|setmodep|
|00001900| 61 72 61 6d 73 28 eb 29 | 0d 06 ea 05 e1 0d 06 f4 |arams(.)|........|
|00001910| 05 3a 0d 06 fe 18 dd 20 | f2 73 65 74 6d 6f 64 65 |.:..... |.setmode|
|00001920| 70 61 72 61 6d 73 28 6d | 25 29 0d 07 08 0b c8 8e |params(m|%)......|
|00001930| 20 6d 25 20 ca 0d 07 12 | 08 c9 20 31 33 0d 07 1c | m% ....|.. 13...|
|00001940| 17 68 70 69 78 25 3d 33 | 32 30 3a 76 70 69 78 25 |.hpix%=3|20:vpix%|
|00001950| 3d 32 35 36 0d 07 26 17 | 68 72 65 73 25 3d 33 32 |=256..&.|hres%=32|
|00001960| 30 3a 76 72 65 73 25 3d | 32 35 36 0d 07 30 08 c9 |0:vres%=|256..0..|
|00001970| 20 31 35 0d 07 3a 17 68 | 70 69 78 25 3d 36 34 30 | 15..:.h|pix%=640|
|00001980| 3a 76 70 69 78 25 3d 32 | 35 36 0d 07 44 17 68 72 |:vpix%=2|56..D.hr|
|00001990| 65 73 25 3d 36 34 30 3a | 76 72 65 73 25 3d 32 35 |es%=640:|vres%=25|
|000019a0| 36 0d 07 4e 08 c9 20 32 | 31 0d 07 58 17 68 70 69 |6..N.. 2|1..X.hpi|
|000019b0| 78 25 3d 36 34 30 3a 76 | 70 69 78 25 3d 35 31 32 |x%=640:v|pix%=512|
|000019c0| 0d 07 62 17 68 72 65 73 | 25 3d 36 34 30 3a 76 72 |..b.hres|%=640:vr|
|000019d0| 65 73 25 3d 35 31 32 0d | 07 6c 05 cb 0d 07 76 05 |es%=512.|.l....v.|
|000019e0| e1 0d 07 80 05 3a 0d 07 | 8a 0e dd 20 f2 73 65 74 |.....:..|... .set|
|000019f0| 72 28 52 29 0d 07 94 27 | 73 74 25 3d a4 72 6f 75 |r(R)...'|st%=.rou|
|00001a00| 6e 64 6d 61 67 64 6f 77 | 6e 28 6e 6f 6e 65 25 2a |ndmagdow|n(none%*|
|00001a10| 28 52 2d 31 29 2f 31 2e | 34 32 29 0d 07 9e 2a 52 |(R-1)/1.|42)...*R|
|00001a20| 25 3d 52 2a 6e 6f 6e 65 | 25 2f 32 5e 31 36 3a 52 |%=R*none|%/2^16:R|
|00001a30| 32 25 3d a4 72 6f 75 6e | 64 6d 61 67 75 70 28 52 |2%=.roun|dmagup(R|
|00001a40| 25 2a 52 25 29 0d 07 a8 | 05 e1 0d 07 b2 05 3a 0d |%*R%)...|......:.|
|00001a50| 07 bc 14 dd 20 f2 73 65 | 74 63 6f 6c 6d 61 70 28 |.... .se|tcolmap(|
|00001a60| 69 25 29 0d 07 c6 0b c8 | 8e 20 69 25 20 ca 0d 07 |i%).....|. i% ...|
|00001a70| d0 1f c9 20 30 20 20 20 | 20 20 20 20 20 20 20 20 |... 0 | |
|00001a80| 20 3a f4 20 42 2f 57 20 | 62 61 6e 64 73 0d 07 da | :. B/W |bands...|
|00001a90| 1c 74 65 72 6d 69 6e 61 | 6c 25 3d 28 6e 69 74 65 |.termina|l%=(nite|
|00001aa0| 72 25 80 31 29 2a 32 35 | 34 0d 07 e4 10 e3 20 6f |r%.1)*25|4..... o|
|00001ab0| 25 3d 30 20 b8 20 32 35 | 35 0d 07 ee 19 63 6f 6c |%=0 . 25|5....col|
|00001ac0| 6d 61 70 25 3f 6f 25 3d | 28 6f 25 80 31 29 2a 32 |map%?o%=|(o%.1)*2|
|00001ad0| 35 35 0d 07 f8 05 ed 0d | 08 02 20 c9 20 31 20 20 |55......|.. . 1 |
|00001ae0| 20 20 20 20 20 20 20 20 | 20 20 3a f4 20 47 72 65 | | :. Gre|
|00001af0| 79 20 73 63 61 6c 65 0d | 08 0c 11 74 65 72 6d 69 |y scale.|...termi|
|00001b00| 6e 61 6c 25 3d 32 35 35 | 0d 08 16 10 e3 20 6f 25 |nal%=255|..... o%|
|00001b10| 3d 30 20 b8 20 32 35 35 | 0d 08 20 23 63 25 3d 31 |=0 . 255|.. #c%=1|
|00001b20| 35 2d 28 6f 25 2a 31 2e | 38 29 83 31 36 3a e7 20 |5-(o%*1.|8).16:. |
|00001b30| 63 25 3d 31 35 20 63 25 | 3d 31 34 0d 08 2a 2d 63 |c%=15 c%|=14..*-c|
|00001b40| 6f 6c 6d 61 70 25 3f 6f | 25 3d a4 6c 63 6f 6c 28 |olmap%?o|%=.lcol(|
|00001b50| 36 34 2a 28 63 25 83 34 | 29 2b 28 63 25 81 34 29 |64*(c%.4|)+(c%.4)|
|00001b60| 2a 25 31 30 31 30 31 29 | 0d 08 34 05 ed 0d 08 3e |*%10101)|..4....>|
|00001b70| 1f c9 20 32 20 20 20 20 | 20 20 20 20 20 20 20 20 |.. 2 | |
|00001b80| 3a f4 20 36 20 43 6f 6c | 6f 75 72 73 0d 08 48 11 |:. 6 Col|ours..H.|
|00001b90| 74 65 72 6d 69 6e 61 6c | 25 3d 32 35 35 0d 08 52 |terminal|%=255..R|
|00001ba0| 1d 74 25 28 29 3d 36 34 | 2c 31 33 32 2c 31 34 38 |.t%()=64|,132,148|
|00001bb0| 2c 32 30 2c 38 36 2c 31 | 31 39 0d 08 5c 10 e3 20 |,20,86,1|19..\.. |
|00001bc0| 6f 25 3d 30 20 b8 20 32 | 35 35 0d 08 66 0b 63 25 |o%=0 . 2|55..f.c%|
|00001bd0| 3d 6f 25 83 36 0d 08 70 | 15 63 6f 6c 6d 61 70 25 |=o%.6..p|.colmap%|
|00001be0| 3f 6f 25 3d 74 25 28 63 | 25 29 0d 08 7a 05 ed 0d |?o%=t%(c|%)..z...|
|00001bf0| 08 84 1e c9 20 33 20 20 | 20 20 20 20 20 20 20 20 |.... 3 | |
|00001c00| 20 20 3a f4 20 53 68 61 | 64 65 73 20 31 0d 08 8e | :. Sha|des 1...|
|00001c10| 0f 74 65 72 6d 69 6e 61 | 6c 25 3d 30 0d 08 98 10 |.termina|l%=0....|
|00001c20| e3 20 6f 25 3d 30 20 b8 | 20 32 35 35 0d 08 a2 1d |. o%=0 .| 255....|
|00001c30| 63 6f 6c 6d 61 70 25 3f | 6f 25 3d 28 32 35 35 2d |colmap%?|o%=(255-|
|00001c40| 6f 25 29 2a 32 2b 31 32 | 39 0d 08 ac 05 ed 0d 08 |o%)*2+12|9.......|
|00001c50| b6 1e c9 20 34 20 20 20 | 20 20 20 20 20 20 20 20 |... 4 | |
|00001c60| 20 3a f4 20 53 68 61 64 | 65 73 20 32 0d 08 c0 15 | :. Shad|es 2....|
|00001c70| 74 65 72 6d 69 6e 61 6c | 25 3d 30 3a 66 6c 25 3d |terminal|%=0:fl%=|
|00001c80| 30 0d 08 ca 10 e3 20 6f | 25 3d 30 20 b8 20 32 35 |0..... o|%=0 . 25|
|00001c90| 35 0d 08 d4 25 e7 20 28 | 28 31 32 38 2d 6f 25 29 |5...%. (|(128-o%)|
|00001ca0| 80 32 35 35 29 3d 74 65 | 72 6d 69 6e 61 6c 25 20 |.255)=te|rminal% |
|00001cb0| 66 6c 25 3d 2d 31 0d 08 | de 19 63 6f 6c 6d 61 70 |fl%=-1..|..colmap|
|00001cc0| 25 3f 6f 25 3d 31 32 38 | 2d 6f 25 2b 66 6c 25 0d |%?o%=128|-o%+fl%.|
|00001cd0| 08 e8 05 ed 0d 08 f2 1e | c9 20 35 20 20 20 20 20 |........|. 5 |
|00001ce0| 20 20 20 20 20 20 20 3a | f4 20 53 68 61 64 65 73 | :|. Shades|
|00001cf0| 20 33 0d 08 fc 0f 74 65 | 72 6d 69 6e 61 6c 25 3d | 3....te|rminal%=|
|00001d00| 30 0d 09 06 05 f7 0d 09 | 10 10 e3 20 6f 25 3d 30 |0.......|... o%=0|
|00001d10| 20 b8 20 32 35 35 0d 09 | 1a 10 f3 20 63 6f 6c 6d | . 255..|... colm|
|00001d20| 61 70 25 3f 6f 25 0d 09 | 24 05 ed 0d 09 2e dd dc |ap%?o%..|$.......|
|00001d30| 20 31 32 37 2c 31 32 36 | 2c 31 32 35 2c 31 32 34 | 127,126|,125,124|
|00001d40| 2c 38 33 2c 38 32 2c 38 | 31 2c 38 30 2c 39 35 2c |,83,82,8|1,80,95,|
|00001d50| 39 34 2c 39 33 2c 39 32 | 2c 35 31 2c 35 30 2c 34 |94,93,92|,51,50,4|
|00001d60| 39 2c 34 38 2c 36 33 2c | 36 32 2c 36 31 2c 36 30 |9,48,63,|62,61,60|
|00001d70| 2c 31 39 2c 31 38 2c 31 | 37 2c 31 36 2c 31 35 35 |,19,18,1|7,16,155|
|00001d80| 2c 31 35 34 2c 31 35 33 | 2c 31 35 32 2c 31 34 33 |,154,153|,152,143|
|00001d90| 2c 31 34 32 2c 31 34 31 | 2c 31 34 30 2c 31 33 39 |,142,141|,140,139|
|00001da0| 2c 31 33 38 2c 31 33 37 | 2c 31 33 36 2c 31 37 31 |,138,137|,136,171|
|00001db0| 2c 31 37 30 2c 31 36 39 | 2c 31 36 38 2c 32 30 33 |,170,169|,168,203|
|00001dc0| 2c 32 30 32 2c 32 30 31 | 2c 32 30 30 2c 32 33 35 |,202,201|,200,235|
|00001dd0| 2c 32 33 34 2c 32 33 33 | 2c 32 33 32 2c 32 32 37 |,234,233|,232,227|
|00001de0| 2c 32 32 36 2c 32 32 35 | 2c 32 32 34 2c 31 30 37 |,226,225|,224,107|
|00001df0| 2c 31 30 36 2c 31 30 35 | 2c 31 30 34 2c 39 39 2c |,106,105|,104,99,|
|00001e00| 39 38 2c 39 37 2c 39 36 | 0d 09 38 b1 dc 20 31 30 |98,97,96|..8.. 10|
|00001e10| 33 2c 31 30 32 2c 31 30 | 31 2c 31 30 30 2c 31 31 |3,102,10|1,100,11|
|00001e20| 35 2c 31 31 34 2c 31 31 | 33 2c 31 31 32 2c 31 31 |5,114,11|3,112,11|
|00001e30| 39 2c 31 31 38 2c 31 31 | 37 2c 31 31 36 2c 38 37 |9,118,11|7,116,87|
|00001e40| 2c 38 36 2c 38 35 2c 38 | 34 2c 35 35 2c 35 34 2c |,86,85,8|4,55,54,|
|00001e50| 35 33 2c 35 32 2c 32 33 | 2c 32 32 2c 32 31 2c 32 |53,52,23|,22,21,2|
|00001e60| 30 2c 33 31 2c 33 30 2c | 32 39 2c 32 38 2c 31 35 |0,31,30,|29,28,15|
|00001e70| 31 2c 31 35 30 2c 31 34 | 39 2c 31 34 38 2c 31 35 |1,150,14|9,148,15|
|00001e80| 39 2c 31 35 38 2c 31 35 | 37 2c 31 35 36 2c 32 32 |9,158,15|7,156,22|
|00001e90| 33 2c 32 32 32 2c 32 32 | 31 2c 32 32 30 2c 31 37 |3,222,22|1,220,17|
|00001ea0| 39 2c 31 37 38 2c 31 37 | 37 2c 31 37 36 2c 31 35 |9,178,17|7,176,15|
|00001eb0| 2c 31 34 2c 31 33 2c 31 | 32 0d 09 42 bb dc 20 32 |,14,13,1|2..B.. 2|
|00001ec0| 31 39 2c 32 31 38 2c 32 | 31 37 2c 32 31 36 2c 31 |19,218,2|17,216,1|
|00001ed0| 36 37 2c 31 36 36 2c 31 | 36 35 2c 31 36 34 2c 31 |67,166,1|65,164,1|
|00001ee0| 31 2c 31 30 2c 39 2c 38 | 2c 32 35 31 2c 32 35 30 |1,10,9,8|,251,250|
|00001ef0| 2c 32 34 39 2c 32 34 38 | 2c 31 39 39 2c 31 39 38 |,249,248|,199,198|
|00001f00| 2c 31 39 37 2c 31 39 36 | 2c 34 33 2c 34 32 2c 34 |,197,196|,43,42,4|
|00001f10| 31 2c 34 30 2c 32 34 33 | 2c 32 34 32 2c 32 34 31 |1,40,243|,242,241|
|00001f20| 2c 32 34 30 2c 37 39 2c | 37 38 2c 37 37 2c 37 36 |,240,79,|78,77,76|
|00001f30| 2c 33 35 2c 33 34 2c 33 | 33 2c 33 32 2c 32 34 37 |,35,34,3|3,32,247|
|00001f40| 2c 32 34 36 2c 32 34 35 | 2c 32 34 34 2c 39 31 2c |,246,245|,244,91,|
|00001f50| 39 30 2c 38 39 2c 38 38 | 2c 33 39 2c 33 38 2c 33 |90,89,88|,39,38,3|
|00001f60| 37 2c 33 36 2c 32 31 35 | 2c 32 31 34 2c 32 31 33 |7,36,215|,214,213|
|00001f70| 2c 32 31 32 0d 09 4c c7 | dc 20 35 39 2c 35 38 2c |,212..L.|. 59,58,|
|00001f80| 35 37 2c 35 36 2c 37 2c | 36 2c 35 2c 34 2c 32 35 |57,56,7,|6,5,4,25|
|00001f90| 35 2c 32 35 34 2c 32 35 | 33 2c 32 35 32 2c 32 31 |5,254,25|3,252,21|
|00001fa0| 31 2c 32 31 30 2c 32 30 | 39 2c 32 30 38 2c 34 37 |1,210,20|9,208,47|
|00001fb0| 2c 34 36 2c 34 35 2c 34 | 34 2c 33 2c 32 2c 31 2c |,46,45,4|4,3,2,1,|
|00001fc0| 31 38 33 2c 31 38 32 2c | 31 38 31 2c 31 38 30 2c |183,182,|181,180,|
|00001fd0| 32 37 2c 32 36 2c 32 35 | 2c 32 34 2c 31 39 31 2c |27,26,25|,24,191,|
|00001fe0| 31 39 30 2c 31 38 39 2c | 31 38 38 2c 31 34 37 2c |190,189,|188,147,|
|00001ff0| 31 34 36 2c 31 34 35 2c | 31 34 34 2c 31 38 37 2c |146,145,|144,187,|
|00002000| 31 38 36 2c 31 38 35 2c | 31 38 34 2c 31 33 35 2c |186,185,|184,135,|
|00002010| 31 33 34 2c 31 33 33 2c | 31 33 32 2c 31 37 35 2c |134,133,|132,175,|
|00002020| 31 37 34 2c 31 37 33 2c | 31 37 32 2c 31 33 31 2c |174,173,|172,131,|
|00002030| 31 33 30 2c 31 32 39 2c | 31 32 38 0d 09 56 9d dc |130,129,|128..V..|
|00002040| 20 32 30 37 2c 32 30 36 | 2c 32 30 35 2c 32 30 34 | 207,206|,205,204|
|00002050| 2c 31 36 33 2c 31 36 32 | 2c 31 36 31 2c 31 36 30 |,163,162|,161,160|
|00002060| 2c 32 33 39 2c 32 33 38 | 2c 32 33 37 2c 32 33 36 |,239,238|,237,236|
|00002070| 2c 31 39 35 2c 31 39 34 | 2c 31 39 33 2c 31 39 32 |,195,194|,193,192|
|00002080| 2c 32 33 31 2c 32 33 30 | 2c 32 32 39 2c 32 32 38 |,231,230|,229,228|
|00002090| 2c 37 35 2c 37 34 2c 37 | 33 2c 37 32 2c 31 31 31 |,75,74,7|3,72,111|
|000020a0| 2c 31 31 30 2c 31 30 39 | 2c 31 30 38 2c 36 37 2c |,110,109|,108,67,|
|000020b0| 36 36 2c 36 35 2c 36 34 | 2c 31 32 33 2c 31 32 32 |66,65,64|,123,122|
|000020c0| 2c 31 32 31 2c 31 32 30 | 2c 37 31 2c 37 30 2c 36 |,121,120|,71,70,6|
|000020d0| 39 2c 36 38 2c 31 32 37 | 0d 09 60 05 cb 0d 09 6a |9,68,127|..`....j|
|000020e0| 11 f2 73 65 74 73 77 69 | 72 6c 64 61 74 61 0d 09 |..setswi|rldata..|
|000020f0| 74 05 e1 0d 09 7e 05 3a | 0d 09 88 13 dd 20 f2 73 |t....~.:|..... .s|
|00002100| 65 74 73 77 69 72 6c 64 | 61 74 61 0d 09 92 13 73 |etswirld|ata....s|
|00002110| 77 69 72 6c 6f 75 74 3d | 73 77 69 72 6c 73 0d 09 |wirlout=|swirls..|
|00002120| 9c 16 73 77 69 72 6c 69 | 6e 3d 73 77 69 72 6c 73 |..swirli|n=swirls|
|00002130| 2b 32 35 36 0d 09 a6 17 | 63 25 3d 63 6f 6c 6d 61 |+256....|c%=colma|
|00002140| 70 25 3f 30 3a 66 63 25 | 3d 63 25 0d 09 b0 08 6f |p%?0:fc%|=c%....o|
|00002150| 25 3d 31 0d 09 ba 05 f5 | 0d 09 c4 12 6e 63 25 3d |%=1.....|....nc%=|
|00002160| 63 6f 6c 6d 61 70 25 3f | 6f 25 0d 09 ce 13 73 77 |colmap%?|o%....sw|
|00002170| 69 72 6c 6f 75 74 3f 63 | 25 3d 6e 63 25 0d 09 d8 |irlout?c|%=nc%...|
|00002180| 12 73 77 69 72 6c 69 6e | 3f 6e 63 25 3d 63 25 0d |.swirlin|?nc%=c%.|
|00002190| 09 e2 0a 63 25 3d 6e 63 | 25 0d 09 ec 09 6f 25 2b |...c%=nc|%....o%+|
|000021a0| 3d 31 0d 09 f6 1a fd 20 | 63 6f 6c 6d 61 70 25 3f |=1..... |colmap%?|
|000021b0| 28 6f 25 83 32 35 36 29 | 3d 66 63 25 0d 0a 00 13 |(o%.256)|=fc%....|
|000021c0| 73 77 69 72 6c 6f 75 74 | 3f 63 25 3d 66 63 25 0d |swirlout|?c%=fc%.|
|000021d0| 0a 0a 12 73 77 69 72 6c | 69 6e 3f 66 63 25 3d 63 |...swirl|in?fc%=c|
|000021e0| 25 0d 0a 14 20 73 77 69 | 72 6c 6f 75 74 3f 74 65 |%... swi|rlout?te|
|000021f0| 72 6d 69 6e 61 6c 25 3d | 74 65 72 6d 69 6e 61 6c |rminal%=|terminal|
|00002200| 25 0d 0a 1e 1f 73 77 69 | 72 6c 69 6e 3f 74 65 72 |%....swi|rlin?ter|
|00002210| 6d 69 6e 61 6c 25 3d 74 | 65 72 6d 69 6e 61 6c 25 |minal%=t|erminal%|
|00002220| 0d 0a 28 05 e1 0d 0a 32 | 05 3a 0d 0a 3c 17 dd 20 |..(....2|.:..<.. |
|00002230| f2 73 65 74 77 69 6e 64 | 6f 77 28 61 2c 62 2c 73 |.setwind|ow(a,b,s|
|00002240| 29 0d 0a 46 19 21 61 69 | 6e 63 3d 28 73 2f 76 70 |)..F.!ai|nc=(s/vp|
|00002250| 69 78 25 29 2a 6e 6f 6e | 65 25 0d 0a 50 13 21 61 |ix%)*non|e%..P.!a|
|00002260| 73 63 61 6e 78 3d 61 2a | 6e 6f 6e 65 25 0d 0a 5a |scanx=a*|none%..Z|
|00002270| 13 21 61 73 63 61 6e 79 | 3d 62 2a 6e 6f 6e 65 25 |.!ascany|=b*none%|
|00002280| 0d 0a 64 05 e1 0d 0a 6e | 05 3a 0d 0a 78 05 3a 0d |..d....n|.:..x.:.|
|00002290| 0a 82 0f dd 20 f2 61 73 | 73 65 6d 62 6c 65 0d 0a |.... .as|semble..|
|000022a0| 8c 37 78 3d 30 3a 79 3d | 31 3a 63 6f 75 6e 74 3d |.7x=0:y=|1:count=|
|000022b0| 32 3a 74 77 6f 3d 33 3a | 6d 74 77 6f 3d 34 3a 66 |2:two=3:|mtwo=4:f|
|000022c0| 6f 75 72 3d 35 3a 74 65 | 6d 70 32 3d 36 3a 74 65 |our=5:te|mp2=6:te|
|000022d0| 6d 70 3d 31 34 0d 0a 96 | 16 e3 20 70 61 73 73 25 |mp=14...|.. pass%|
|000022e0| 3d 38 20 b8 20 31 30 20 | 88 20 32 0d 0a a0 0c 50 |=8 . 10 |. 2....P|
|000022f0| 25 3d 63 6f 64 65 25 0d | 0a aa 0e 5b 4f 50 54 20 |%=code%.|...[OPT |
|00002300| 70 61 73 73 25 0d 0a b4 | 14 2e 61 73 63 72 20 45 |pass%...|..ascr E|
|00002310| 51 55 44 20 73 63 72 73 | 74 0d 0a be 17 2e 61 73 |QUD scrs|t.....as|
|00002320| 77 69 72 6c 20 45 51 55 | 44 20 73 77 69 72 6c 73 |wirl EQU|D swirls|
|00002330| 0d 0a c8 20 2e 73 77 63 | 6f 75 6e 74 20 45 51 55 |... .swc|ount EQU|
|00002340| 44 20 68 70 69 78 25 2a | 76 70 69 78 25 81 32 30 |D hpix%*|vpix%.20|
|00002350| 0d 0a d2 0a 2e 73 77 69 | 72 6c 0d 0a dc 14 53 54 |.....swi|rl....ST|
|00002360| 4d 46 44 20 52 31 33 21 | 2c 7b 52 31 34 7d 0d 0a |MFD R13!|,{R14}..|
|00002370| e6 0f 53 54 52 20 52 31 | 33 2c 61 73 70 0d 0a f0 |..STR R1|3,asp...|
|00002380| 10 4c 44 52 20 52 31 34 | 2c 61 73 63 72 0d 0a fa |.LDR R14|,ascr...|
|00002390| 13 4c 44 52 20 52 31 33 | 2c 73 77 63 6f 75 6e 74 |.LDR R13|,swcount|
|000023a0| 0d 0b 04 12 4c 44 52 20 | 52 31 32 2c 61 73 77 69 |....LDR |R12,aswi|
|000023b0| 72 6c 0d 0b 0e 0f 4d 4f | 56 20 52 37 2c 23 32 35 |rl....MO|V R7,#25|
|000023c0| 35 0d 0b 18 12 4c 44 4d | 49 41 20 52 31 34 2c 7b |5....LDM|IA R14,{|
|000023d0| 52 36 7d 0d 0b 22 22 80 | 20 52 31 31 2c 52 37 2c |R6}.."".| R11,R7,|
|000023e0| 52 36 3a 4c 44 52 42 20 | 52 31 31 2c 5b 52 31 32 |R6:LDRB |R11,[R12|
|000023f0| 2c 52 31 31 5d 0d 0b 2c | 29 80 20 52 31 30 2c 52 |,R11]..,|). R10,R|
|00002400| 37 2c 52 36 2c 4c 53 52 | 20 23 38 3a 4c 44 52 42 |7,R6,LSR| #8:LDRB|
|00002410| 20 52 31 30 2c 5b 52 31 | 32 2c 52 31 30 5d 0d 0b | R10,[R1|2,R10]..|
|00002420| 36 27 80 20 52 39 2c 52 | 37 2c 52 36 2c 4c 53 52 |6'. R9,R|7,R6,LSR|
|00002430| 20 23 31 36 3a 4c 44 52 | 42 20 52 39 2c 5b 52 31 | #16:LDR|B R9,[R1|
|00002440| 32 2c 52 39 5d 0d 0b 40 | 27 80 20 52 38 2c 52 37 |2,R9]..@|'. R8,R7|
|00002450| 2c 52 36 2c 4c 53 52 20 | 23 32 34 3a 4c 44 52 42 |,R6,LSR |#24:LDRB|
|00002460| 20 52 38 2c 5b 52 31 32 | 2c 52 38 5d 0d 0b 4a 19 | R8,[R12|,R8]..J.|
|00002470| 84 52 20 52 31 31 2c 52 | 31 31 2c 52 31 30 2c 4c |.R R11,R|11,R10,L|
|00002480| 53 4c 20 23 38 0d 0b 54 | 19 84 52 20 52 31 31 2c |SL #8..T|..R R11,|
|00002490| 52 31 31 2c 52 39 2c 4c | 53 4c 20 23 31 36 0d 0b |R11,R9,L|SL #16..|
|000024a0| 5e 18 84 52 20 52 35 2c | 52 31 31 2c 52 38 2c 4c |^..R R5,|R11,R8,L|
|000024b0| 53 4c 20 23 32 34 0d 0b | 68 0d 2e 73 6f 75 74 6c |SL #24..|h..soutl|
|000024c0| 6f 6f 70 0d 0b 72 15 4c | 44 4d 49 41 20 52 31 34 |oop..r.L|DMIA R14|
|000024d0| 2c 7b 52 30 2d 52 34 7d | 0d 0b 7c 0d 43 4d 50 20 |,{R0-R4}|..|.CMP |
|000024e0| 52 30 2c 52 36 0d 0b 86 | 0c 42 45 51 20 73 6f 6c |R0,R6...|.BEQ sol|
|000024f0| 30 0d 0b 90 22 80 20 52 | 31 31 2c 52 37 2c 52 30 |0...". R|11,R7,R0|
|00002500| 3a 4c 44 52 42 20 52 31 | 31 2c 5b 52 31 32 2c 52 |:LDRB R1|1,[R12,R|
|00002510| 31 31 5d 0d 0b 9a 29 80 | 20 52 31 30 2c 52 37 2c |11]...).| R10,R7,|
|00002520| 52 30 2c 4c 53 52 20 23 | 38 3a 4c 44 52 42 20 52 |R0,LSR #|8:LDRB R|
|00002530| 31 30 2c 5b 52 31 32 2c | 52 31 30 5d 0d 0b a4 27 |10,[R12,|R10]...'|
|00002540| 80 20 52 39 2c 52 37 2c | 52 30 2c 4c 53 52 20 23 |. R9,R7,|R0,LSR #|
|00002550| 31 36 3a 4c 44 52 42 20 | 52 39 2c 5b 52 31 32 2c |16:LDRB |R9,[R12,|
|00002560| 52 39 5d 0d 0b ae 27 80 | 20 52 38 2c 52 37 2c 52 |R9]...'.| R8,R7,R|
|00002570| 30 2c 4c 53 52 20 23 32 | 34 3a 4c 44 52 42 20 52 |0,LSR #2|4:LDRB R|
|00002580| 38 2c 5b 52 31 32 2c 52 | 38 5d 0d 0b b8 19 84 52 |8,[R12,R|8].....R|
|00002590| 20 52 31 31 2c 52 31 31 | 2c 52 31 30 2c 4c 53 4c | R11,R11|,R10,LSL|
|000025a0| 20 23 38 0d 0b c2 19 84 | 52 20 52 31 31 2c 52 31 | #8.....|R R11,R1|
|000025b0| 31 2c 52 39 2c 4c 53 4c | 20 23 31 36 0d 0b cc 18 |1,R9,LSL| #16....|
|000025c0| 84 52 20 52 35 2c 52 31 | 31 2c 52 38 2c 4c 53 4c |.R R5,R1|1,R8,LSL|
|000025d0| 20 23 32 34 0d 0b d6 09 | 2e 73 6f 6c 30 0d 0b e0 | #24....|.sol0...|
|000025e0| 0d 43 4d 50 20 52 31 2c | 52 30 0d 0b ea 0d 4d 4f |.CMP R1,|R0....MO|
|000025f0| 56 20 52 30 2c 52 35 0d | 0b f4 0b 42 45 51 20 73 |V R0,R5.|...BEQ s|
|00002600| 6f 31 0d 0b fe 22 80 20 | 52 31 31 2c 52 37 2c 52 |o1...". |R11,R7,R|
|00002610| 31 3a 4c 44 52 42 20 52 | 31 31 2c 5b 52 31 32 2c |1:LDRB R|11,[R12,|
|00002620| 52 31 31 5d 0d 0c 08 29 | 80 20 52 31 30 2c 52 37 |R11]...)|. R10,R7|
|00002630| 2c 52 31 2c 4c 53 52 20 | 23 38 3a 4c 44 52 42 20 |,R1,LSR |#8:LDRB |
|00002640| 52 31 30 2c 5b 52 31 32 | 2c 52 31 30 5d 0d 0c 12 |R10,[R12|,R10]...|
|00002650| 27 80 20 52 39 2c 52 37 | 2c 52 31 2c 4c 53 52 20 |'. R9,R7|,R1,LSR |
|00002660| 23 31 36 3a 4c 44 52 42 | 20 52 39 2c 5b 52 31 32 |#16:LDRB| R9,[R12|
|00002670| 2c 52 39 5d 0d 0c 1c 27 | 80 20 52 38 2c 52 37 2c |,R9]...'|. R8,R7,|
|00002680| 52 31 2c 4c 53 52 20 23 | 32 34 3a 4c 44 52 42 20 |R1,LSR #|24:LDRB |
|00002690| 52 38 2c 5b 52 31 32 2c | 52 38 5d 0d 0c 26 18 84 |R8,[R12,|R8]..&..|
|000026a0| 52 20 31 31 2c 52 31 31 | 2c 52 31 30 2c 4c 53 4c |R 11,R11|,R10,LSL|
|000026b0| 20 23 38 0d 0c 30 19 84 | 52 20 52 31 31 2c 52 31 | #8..0..|R R11,R1|
|000026c0| 31 2c 52 39 2c 4c 53 4c | 20 23 31 36 0d 0c 3a 18 |1,R9,LSL| #16..:.|
|000026d0| 84 52 20 52 35 2c 52 31 | 31 2c 52 38 2c 4c 53 4c |.R R5,R1|1,R8,LSL|
|000026e0| 20 23 32 34 0d 0c 44 08 | 2e 73 6f 31 0d 0c 4e 0d | #24..D.|.so1..N.|
|000026f0| 43 4d 50 20 52 32 2c 52 | 31 0d 0c 58 0d 4d 4f 56 |CMP R2,R|1..X.MOV|
|00002700| 20 52 31 2c 52 35 0d 0c | 62 0b 42 45 51 20 73 6f | R1,R5..|b.BEQ so|
|00002710| 32 0d 0c 6c 22 80 20 52 | 31 31 2c 52 37 2c 52 32 |2..l". R|11,R7,R2|
|00002720| 3a 4c 44 52 42 20 52 31 | 31 2c 5b 52 31 32 2c 52 |:LDRB R1|1,[R12,R|
|00002730| 31 31 5d 0d 0c 76 29 80 | 20 52 31 30 2c 52 37 2c |11]..v).| R10,R7,|
|00002740| 52 32 2c 4c 53 52 20 23 | 38 3a 4c 44 52 42 20 52 |R2,LSR #|8:LDRB R|
|00002750| 31 30 2c 5b 52 31 32 2c | 52 31 30 5d 0d 0c 80 27 |10,[R12,|R10]...'|
|00002760| 80 20 52 39 2c 52 37 2c | 52 32 2c 4c 53 52 20 23 |. R9,R7,|R2,LSR #|
|00002770| 31 36 3a 4c 44 52 42 20 | 52 39 2c 5b 52 31 32 2c |16:LDRB |R9,[R12,|
|00002780| 52 39 5d 0d 0c 8a 27 80 | 20 52 38 2c 52 37 2c 52 |R9]...'.| R8,R7,R|
|00002790| 32 2c 4c 53 52 20 23 32 | 34 3a 4c 44 52 42 20 52 |2,LSR #2|4:LDRB R|
|000027a0| 38 2c 5b 52 31 32 2c 52 | 38 5d 0d 0c 94 19 84 52 |8,[R12,R|8].....R|
|000027b0| 20 52 31 31 2c 52 31 31 | 2c 52 31 30 2c 4c 53 4c | R11,R11|,R10,LSL|
|000027c0| 20 23 38 0d 0c 9e 19 84 | 52 20 52 31 31 2c 52 31 | #8.....|R R11,R1|
|000027d0| 31 2c 52 39 2c 4c 53 4c | 20 23 31 36 0d 0c a8 18 |1,R9,LSL| #16....|
|000027e0| 84 52 20 52 35 2c 52 31 | 31 2c 52 38 2c 4c 53 4c |.R R5,R1|1,R8,LSL|
|000027f0| 20 23 32 34 0d 0c b2 08 | 2e 73 6f 32 0d 0c bc 0d | #24....|.so2....|
|00002800| 43 4d 50 20 52 33 2c 52 | 32 0d 0c c6 0d 4d 4f 56 |CMP R3,R|2....MOV|
|00002810| 20 52 32 2c 52 35 0d 0c | d0 0b 42 45 51 20 73 6f | R2,R5..|..BEQ so|
|00002820| 33 0d 0c da 22 80 20 52 | 31 31 2c 52 37 2c 52 33 |3...". R|11,R7,R3|
|00002830| 3a 4c 44 52 42 20 52 31 | 31 2c 5b 52 31 32 2c 52 |:LDRB R1|1,[R12,R|
|00002840| 31 31 5d 0d 0c e4 29 80 | 20 52 31 30 2c 52 37 2c |11]...).| R10,R7,|
|00002850| 52 33 2c 4c 53 52 20 23 | 38 3a 4c 44 52 42 20 52 |R3,LSR #|8:LDRB R|
|00002860| 31 30 2c 5b 52 31 32 2c | 52 31 30 5d 0d 0c ee 27 |10,[R12,|R10]...'|
|00002870| 80 20 52 39 2c 52 37 2c | 52 33 2c 4c 53 52 20 23 |. R9,R7,|R3,LSR #|
|00002880| 31 36 3a 4c 44 52 42 20 | 52 39 2c 5b 52 31 32 2c |16:LDRB |R9,[R12,|
|00002890| 52 39 5d 0d 0c f8 27 80 | 20 52 38 2c 52 37 2c 52 |R9]...'.| R8,R7,R|
|000028a0| 33 2c 4c 53 52 20 23 32 | 34 3a 4c 44 52 42 20 52 |3,LSR #2|4:LDRB R|
|000028b0| 38 2c 5b 52 31 32 2c 52 | 38 5d 0d 0d 02 19 84 52 |8,[R12,R|8].....R|
|000028c0| 20 52 31 31 2c 52 31 31 | 2c 52 31 30 2c 4c 53 4c | R11,R11|,R10,LSL|
|000028d0| 20 23 38 0d 0d 0c 19 84 | 52 20 52 31 31 2c 52 31 | #8.....|R R11,R1|
|000028e0| 31 2c 52 39 2c 4c 53 4c | 20 23 31 36 0d 0d 16 18 |1,R9,LSL| #16....|
|000028f0| 84 52 20 52 35 2c 52 31 | 31 2c 52 38 2c 4c 53 4c |.R R5,R1|1,R8,LSL|
|00002900| 20 23 32 34 0d 0d 20 08 | 2e 73 6f 33 0d 0d 2a 0d | #24.. .|.so3..*.|
|00002910| 43 4d 50 20 52 34 2c 52 | 33 0d 0d 34 0d 4d 4f 56 |CMP R4,R|3..4.MOV|
|00002920| 20 52 33 2c 52 35 0d 0d | 3e 0b 42 45 51 20 73 6f | R3,R5..|>.BEQ so|
|00002930| 34 0d 0d 48 22 80 20 52 | 31 31 2c 52 37 2c 52 34 |4..H". R|11,R7,R4|
|00002940| 3a 4c 44 52 42 20 52 31 | 31 2c 5b 52 31 32 2c 52 |:LDRB R1|1,[R12,R|
|00002950| 31 31 5d 0d 0d 52 29 80 | 20 52 31 30 2c 52 37 2c |11]..R).| R10,R7,|
|00002960| 52 34 2c 4c 53 52 20 23 | 38 3a 4c 44 52 42 20 52 |R4,LSR #|8:LDRB R|
|00002970| 31 30 2c 5b 52 31 32 2c | 52 31 30 5d 0d 0d 5c 27 |10,[R12,|R10]..\'|
|00002980| 80 20 52 39 2c 52 37 2c | 52 34 2c 4c 53 52 20 23 |. R9,R7,|R4,LSR #|
|00002990| 31 36 3a 4c 44 52 42 20 | 52 39 2c 5b 52 31 32 2c |16:LDRB |R9,[R12,|
|000029a0| 52 39 5d 0d 0d 66 27 80 | 20 52 38 2c 52 37 2c 52 |R9]..f'.| R8,R7,R|
|000029b0| 34 2c 4c 53 52 20 23 32 | 34 3a 4c 44 52 42 20 52 |4,LSR #2|4:LDRB R|
|000029c0| 38 2c 5b 52 31 32 2c 52 | 38 5d 0d 0d 70 19 84 52 |8,[R12,R|8]..p..R|
|000029d0| 20 52 31 31 2c 52 31 31 | 2c 52 31 30 2c 4c 53 4c | R11,R11|,R10,LSL|
|000029e0| 20 23 38 0d 0d 7a 19 84 | 52 20 52 31 31 2c 52 31 | #8..z..|R R11,R1|
|000029f0| 31 2c 52 39 2c 4c 53 4c | 20 23 31 36 0d 0d 84 18 |1,R9,LSL| #16....|
|00002a00| 84 52 20 52 35 2c 52 31 | 31 2c 52 38 2c 4c 53 4c |.R R5,R1|1,R8,LSL|
|00002a10| 20 23 32 34 0d 0d 8e 08 | 2e 73 6f 34 0d 0d 98 0d | #24....|.so4....|
|00002a20| 4d 4f 56 20 52 36 2c 52 | 34 0d 0d a2 0d 4d 4f 56 |MOV R6,R|4....MOV|
|00002a30| 20 52 34 2c 52 35 0d 0d | ac 16 53 54 4d 49 41 20 | R4,R5..|..STMIA |
|00002a40| 52 31 34 21 2c 7b 52 30 | 2d 52 34 7d 0d 0d b6 13 |R14!,{R0|-R4}....|
|00002a50| 53 55 42 53 20 52 31 33 | 2c 52 31 33 2c 23 31 0d |SUBS R13|,R13,#1.|
|00002a60| 0d c0 10 42 4e 45 20 73 | 6f 75 74 6c 6f 6f 70 0d |...BNE s|outloop.|
|00002a70| 0d ca 0f 4c 44 52 20 52 | 31 33 2c 61 73 70 0d 0d |...LDR R|13,asp..|
|00002a80| d4 13 4c 44 4d 46 44 20 | 52 31 33 21 2c 7b 50 43 |..LDMFD |R13!,{PC|
|00002a90| 7d 0d 0d de 0f 4c 44 52 | 20 52 31 33 2c 61 73 70 |}....LDR| R13,asp|
|00002aa0| 0d 0d e8 13 4c 44 4d 46 | 44 20 52 31 33 21 2c 7b |....LDMF|D R13!,{|
|00002ab0| 50 43 7d 0d 0d f2 26 2e | 61 73 63 72 73 74 20 45 |PC}...&.|ascrst E|
|00002ac0| 51 55 44 20 73 63 72 73 | 74 2b 68 70 69 78 25 2a |QUD scrs|t+hpix%*|
|00002ad0| 28 76 70 69 78 25 2d 31 | 29 0d 0d fc 1e 2e 61 69 |(vpix%-1|).....ai|
|00002ae0| 6e 63 20 45 51 55 44 20 | 28 73 2f 76 70 69 78 25 |nc EQUD |(s/vpix%|
|00002af0| 29 2a 6e 6f 6e 65 25 0d | 0e 06 0e 2e 63 6f 6e 73 |)*none%.|....cons|
|00002b00| 74 61 6e 74 73 0d 0e 10 | 1e 45 51 55 44 20 32 2a |tants...|.EQUD 2*|
|00002b10| 6e 6f 6e 65 25 3a 45 51 | 55 44 20 2d 32 2a 6e 6f |none%:EQ|UD -2*no|
|00002b20| 6e 65 25 0d 0e 1a 10 45 | 51 55 44 20 34 2a 6e 6f |ne%....E|QUD 4*no|
|00002b30| 6e 65 25 0d 0e 24 18 2e | 61 73 63 61 6e 78 20 45 |ne%..$..|ascanx E|
|00002b40| 51 55 44 20 61 2a 6e 6f | 6e 65 25 0d 0e 2e 18 2e |QUD a*no|ne%.....|
|00002b50| 61 73 63 61 6e 79 20 45 | 51 55 44 20 62 2a 6e 6f |ascany E|QUD b*no|
|00002b60| 6e 65 25 0d 0e 38 19 2e | 61 63 6f 6c 6d 61 70 20 |ne%..8..|acolmap |
|00002b70| 45 51 55 44 20 63 6f 6c | 6d 61 70 25 0d 0e 42 0f |EQUD col|map%..B.|
|00002b80| 2e 61 73 70 20 45 51 55 | 44 20 30 0d 0e 4c 0c 2e |.asp EQU|D 0..L..|
|00002b90| 70 69 63 74 75 72 65 0d | 0e 56 14 53 54 4d 46 44 |picture.|.V.STMFD|
|00002ba0| 20 52 31 33 21 2c 7b 52 | 31 34 7d 0d 0e 60 0f 53 | R13!,{R|14}..`.S|
|00002bb0| 54 52 20 52 31 33 2c 61 | 73 70 0d 0e 6a 13 4c 44 |TR R13,a|sp..j.LD|
|00002bc0| 52 20 52 31 33 2c 61 63 | 6f 6c 6d 61 70 0d 0e 74 |R R13,ac|olmap..t|
|00002bd0| 15 41 44 52 20 52 31 34 | 2c 63 6f 6e 73 74 61 6e |.ADR R14|,constan|
|00002be0| 74 73 0d 0e 7e 1d 4c 44 | 4d 49 41 20 52 31 34 2c |ts..~.LD|MIA R14,|
|00002bf0| 7b 74 77 6f 2c 6d 74 77 | 6f 2c 66 6f 75 72 7d 0d |{two,mtw|o,four}.|
|00002c00| 0e 88 11 4c 44 52 20 52 | 38 2c 61 73 63 61 6e 79 |...LDR R|8,ascany|
|00002c10| 0d 0e 92 11 4c 44 52 20 | 52 39 2c 61 73 63 72 73 |....LDR |R9,ascrs|
|00002c20| 74 0d 0e 9c 10 4c 44 52 | 20 52 31 32 2c 61 69 6e |t....LDR| R12,ain|
|00002c30| 63 0d 0e a6 12 4d 4f 56 | 20 52 31 31 2c 23 76 72 |c....MOV| R11,#vr|
|00002c40| 65 73 25 0d 0e b0 0c 2e | 72 6f 77 6c 6f 6f 70 0d |es%.....|rowloop.|
|00002c50| 0e ba 12 4d 4f 56 20 52 | 31 30 2c 23 68 72 65 73 |...MOV R|10,#hres|
|00002c60| 25 0d 0e c4 11 4c 44 52 | 20 52 37 2c 61 73 63 61 |%....LDR| R7,asca|
|00002c70| 6e 78 0d 0e ce 0c 2e 63 | 6f 6c 6c 6f 6f 70 0d 0e |nx.....c|olloop..|
|00002c80| d8 17 4d 4f 56 20 52 30 | 2c 52 37 3a 4d 4f 56 20 |..MOV R0|,R7:MOV |
|00002c90| 52 31 2c 52 38 0d 0e e2 | 12 4d 4f 56 20 52 32 2c |R1,R8...|.MOV R2,|
|00002ca0| 23 6e 69 74 65 72 25 0d | 0e ec 0b 2e 66 6e 6c 6f |#niter%.|....fnlo|
|00002cb0| 6f 70 0d 0e f6 10 43 4d | 50 20 79 2c 23 6e 6f 6e |op....CM|P y,#non|
|00002cc0| 65 25 0d 0f 00 14 a4 74 | 6f 70 6c 65 66 74 66 6e |e%.....t|opleftfn|
|00002cd0| 28 74 6c 66 25 29 0d 0f | 0a 0e 42 47 54 20 66 6e |(tlf%)..|..BGT fn|
|00002ce0| 64 6f 6e 65 0d 0f 14 10 | 43 4d 50 20 78 2c 23 6e |done....|CMP x,#n|
|00002cf0| 6f 6e 65 25 0d 0f 1e 17 | a4 62 6f 74 74 6f 6d 6c |one%....|.bottoml|
|00002d00| 65 66 74 66 6e 28 62 6c | 66 25 29 0d 0f 28 18 a4 |eftfn(bl|f%)..(..|
|00002d10| 62 6f 74 74 6f 6d 72 69 | 67 68 74 66 6e 28 62 72 |bottomri|ghtfn(br|
|00002d20| 66 25 29 0d 0f 32 0b 2e | 66 6e 64 6f 6e 65 0d 0f |f%)..2..|fndone..|
|00002d30| 3c 0e 43 4d 50 20 78 2c | 23 73 74 25 0d 0f 46 10 |<.CMP x,|#st%..F.|
|00002d40| 43 4d 50 4c 54 20 79 2c | 23 73 74 25 0d 0f 50 13 |CMPLT y,|#st%..P.|
|00002d50| 42 47 45 20 63 68 65 63 | 6b 74 61 72 67 65 74 0d |BGE chec|ktarget.|
|00002d60| 0f 5a 0e 43 4d 4e 20 78 | 2c 23 73 74 25 0d 0f 64 |.Z.CMN x|,#st%..d|
|00002d70| 10 43 4d 4e 47 54 20 79 | 2c 23 73 74 25 0d 0f 6e |.CMNGT y|,#st%..n|
|00002d80| 13 42 4c 45 20 63 68 65 | 63 6b 74 61 72 67 65 74 |.BLE che|cktarget|
|00002d90| 0d 0f 78 17 53 55 42 53 | 20 63 6f 75 6e 74 2c 63 |..x.SUBS| count,c|
|00002da0| 6f 75 6e 74 2c 23 31 0d | 0f 82 0e 42 47 54 20 66 |ount,#1.|...BGT f|
|00002db0| 6e 6c 6f 6f 70 0d 0f 8c | 18 4d 4f 56 20 63 6f 75 |nloop...|.MOV cou|
|00002dc0| 6e 74 2c 23 74 65 72 6d | 69 6e 61 6c 25 0d 0f 96 |nt,#term|inal%...|
|00002dd0| 0e 42 20 73 74 6f 72 65 | 63 6f 6c 0d 0f a0 10 2e |.B store|col.....|
|00002de0| 63 68 65 63 6b 74 61 72 | 67 65 74 0d 0f aa 1c 53 |checktar|get....S|
|00002df0| 55 42 20 74 65 6d 70 2c | 78 2c 23 6e 6f 6e 65 25 |UB temp,|x,#none%|
|00002e00| 2a 38 35 2f 31 32 38 0d | 0f b4 19 4d 4f 56 20 74 |*85/128.|...MOV t|
|00002e10| 65 6d 70 2c 74 65 6d 70 | 2c 41 53 52 20 23 31 36 |emp,temp|,ASR #16|
|00002e20| 0d 0f be 17 4d 55 4c 20 | 74 65 6d 70 32 2c 74 65 |....MUL |temp2,te|
|00002e30| 6d 70 2c 74 65 6d 70 0d | 0f c8 1c 53 55 42 20 74 |mp,temp.|...SUB t|
|00002e40| 65 6d 70 2c 79 2c 23 6e | 6f 6e 65 25 2a 38 35 2f |emp,y,#n|one%*85/|
|00002e50| 31 32 38 0d 0f d2 19 4d | 4f 56 20 74 65 6d 70 2c |128....M|OV temp,|
|00002e60| 74 65 6d 70 2c 41 53 52 | 20 23 31 36 0d 0f dc 1d |temp,ASR| #16....|
|00002e70| 4d 4c 41 20 74 65 6d 70 | 32 2c 74 65 6d 70 2c 74 |MLA temp|2,temp,t|
|00002e80| 65 6d 70 2c 74 65 6d 70 | 32 0d 0f e6 12 43 4d 50 |emp,temp|2....CMP|
|00002e90| 20 74 65 6d 70 32 2c 23 | 52 32 25 0d 0f f0 11 42 | temp2,#|R2%....B|
|00002ea0| 47 45 20 67 6f 74 63 6f | 6c 6f 75 72 0d 0f fa 17 |GE gotco|lour....|
|00002eb0| 53 55 42 53 20 63 6f 75 | 6e 74 2c 63 6f 75 6e 74 |SUBS cou|nt,count|
|00002ec0| 2c 23 31 0d 10 04 0e 42 | 47 54 20 66 6e 6c 6f 6f |,#1....B|GT fnloo|
|00002ed0| 70 0d 10 0e 18 4d 4f 56 | 20 63 6f 75 6e 74 2c 23 |p....MOV| count,#|
|00002ee0| 74 65 72 6d 69 6e 61 6c | 25 0d 10 18 0e 42 20 73 |terminal|%....B s|
|00002ef0| 74 6f 72 65 63 6f 6c 0d | 10 22 0e 2e 67 6f 74 63 |torecol.|."..gotc|
|00002f00| 6f 6c 6f 75 72 0d 10 2c | 1b 52 53 42 20 63 6f 75 |olour..,|.RSB cou|
|00002f10| 6e 74 2c 63 6f 75 6e 74 | 2c 23 6e 69 74 65 72 25 |nt,count|,#niter%|
|00002f20| 0d 10 36 16 80 20 63 6f | 75 6e 74 2c 63 6f 75 6e |..6.. co|unt,coun|
|00002f30| 74 2c 23 32 35 35 0d 10 | 40 1a 4c 44 52 42 20 63 |t,#255..|@.LDRB c|
|00002f40| 6f 75 6e 74 2c 5b 52 31 | 33 2c 63 6f 75 6e 74 5d |ount,[R1|3,count]|
|00002f50| 0d 10 4a 0d 2e 73 74 6f | 72 65 63 6f 6c 0d 10 54 |..J..sto|recol..T|
|00002f60| 16 53 54 52 42 20 63 6f | 75 6e 74 2c 5b 52 39 5d |.STRB co|unt,[R9]|
|00002f70| 2c 23 31 0d 10 5e 05 5d | 0d 10 68 17 e7 20 68 70 |,#1..^.]|..h.. hp|
|00002f80| 69 78 25 3d 32 2e 35 2a | 76 70 69 78 25 20 8c 0d |ix%=2.5*|vpix% ..|
|00002f90| 10 72 0e 5b 4f 50 54 20 | 70 61 73 73 25 0d 10 7c |.r.[OPT |pass%..||
|00002fa0| 18 41 44 44 20 52 37 2c | 52 37 2c 52 31 32 2c 41 |.ADD R7,|R7,R12,A|
|00002fb0| 53 52 20 23 31 0d 10 86 | 05 5d 0d 10 90 05 cc 0d |SR #1...|.]......|
|00002fc0| 10 9a 0e 5b 4f 50 54 20 | 70 61 73 73 25 0d 10 a4 |...[OPT |pass%...|
|00002fd0| 11 41 44 44 20 52 37 2c | 52 37 2c 52 31 32 0d 10 |.ADD R7,|R7,R12..|
|00002fe0| ae 05 5d 0d 10 b8 05 cd | 0d 10 c2 0e 5b 4f 50 54 |..].....|....[OPT|
|00002ff0| 20 70 61 73 73 25 0d 10 | cc 13 53 55 42 53 20 52 | pass%..|..SUBS R|
|00003000| 31 30 2c 52 31 30 2c 23 | 31 0d 10 d6 0f 42 4e 45 |10,R10,#|1....BNE|
|00003010| 20 63 6f 6c 6c 6f 6f 70 | 0d 10 e0 1c 53 55 42 20 | colloop|....SUB |
|00003020| 52 39 2c 52 39 2c 23 28 | 68 72 65 73 25 2b 68 70 |R9,R9,#(|hres%+hp|
|00003030| 69 78 25 29 0d 10 ea 11 | 41 44 44 20 52 38 2c 52 |ix%)....|ADD R8,R|
|00003040| 38 2c 52 31 32 0d 10 f4 | 13 53 55 42 53 20 52 31 |8,R12...|.SUBS R1|
|00003050| 31 2c 52 31 31 2c 23 31 | 0d 10 fe 0f 42 4e 45 20 |1,R11,#1|....BNE |
|00003060| 72 6f 77 6c 6f 6f 70 0d | 11 08 0f 4c 44 52 20 52 |rowloop.|...LDR R|
|00003070| 31 33 2c 61 73 70 0d 11 | 12 13 4c 44 4d 46 44 20 |13,asp..|..LDMFD |
|00003080| 52 31 33 21 2c 7b 50 43 | 7d 0d 11 1c 05 5d 0d 11 |R13!,{PC|}....]..|
|00003090| 26 05 ed 0d 11 30 05 e1 | 0d 11 3a 05 3a 0d 11 44 |&....0..|..:.:..D|
|000030a0| 14 dd 20 a4 74 6f 70 6c | 65 66 74 66 6e 28 6e 25 |.. .topl|eftfn(n%|
|000030b0| 29 0d 11 4e 0b c8 8e 20 | 6e 25 20 ca 0d 11 58 07 |)..N... |n% ...X.|
|000030c0| c9 20 30 0d 11 62 0e 5b | 4f 50 54 20 70 61 73 73 |. 0..b.[|OPT pass|
|000030d0| 25 0d 11 6c 0f 41 44 44 | 47 54 20 78 2c 78 2c 78 |%..l.ADD|GT x,x,x|
|000030e0| 0d 11 76 19 41 44 44 47 | 54 20 79 2c 6d 74 77 6f |..v.ADDG|T y,mtwo|
|000030f0| 2c 79 2c 41 53 4c 20 23 | 31 0d 11 80 05 5d 0d 11 |,y,ASL #|1....]..|
|00003100| 8a 07 c9 20 31 0d 11 94 | 0e 5b 4f 50 54 20 70 61 |... 1...|.[OPT pa|
|00003110| 73 73 25 0d 11 9e 17 53 | 55 42 47 54 20 74 65 6d |ss%....S|UBGT tem|
|00003120| 70 2c 79 2c 23 6e 6f 6e | 65 25 0d 11 a8 18 53 55 |p,y,#non|e%....SU|
|00003130| 42 47 54 20 79 2c 74 77 | 6f 2c 78 2c 41 53 4c 20 |BGT y,tw|o,x,ASL |
|00003140| 23 31 0d 11 b2 15 41 44 | 44 47 54 20 78 2c 74 65 |#1....AD|DGT x,te|
|00003150| 6d 70 2c 74 65 6d 70 0d | 11 bc 05 5d 0d 11 c6 07 |mp,temp.|...]....|
|00003160| c9 20 32 0d 11 d0 0e 5b | 4f 50 54 20 70 61 73 73 |. 2....[|OPT pass|
|00003170| 25 0d 11 da 18 53 55 42 | 47 54 20 78 2c 74 77 6f |%....SUB|GT x,two|
|00003180| 2c 78 2c 41 53 4c 20 23 | 31 0d 11 e4 19 53 55 42 |,x,ASL #|1....SUB|
|00003190| 47 54 20 79 2c 66 6f 75 | 72 2c 79 2c 41 53 4c 20 |GT y,fou|r,y,ASL |
|000031a0| 23 31 0d 11 ee 05 5d 0d | 11 f8 07 c9 20 33 0d 12 |#1....].|.... 3..|
|000031b0| 02 0e 5b 4f 50 54 20 70 | 61 73 73 25 0d 12 0c 14 |..[OPT p|ass%....|
|000031c0| 53 55 42 47 54 20 74 65 | 6d 70 2c 74 77 6f 2c 79 |SUBGT te|mp,two,y|
|000031d0| 0d 12 16 0f 41 44 44 47 | 54 20 79 2c 78 2c 78 0d |....ADDG|T y,x,x.|
|000031e0| 12 20 15 41 44 44 47 54 | 20 78 2c 74 65 6d 70 2c |. .ADDGT| x,temp,|
|000031f0| 74 65 6d 70 0d 12 2a 05 | 5d 0d 12 34 07 c9 20 34 |temp..*.|]..4.. 4|
|00003200| 0d 12 3e 0e 5b 4f 50 54 | 20 70 61 73 73 25 0d 12 |..>.[OPT| pass%..|
|00003210| 48 0f 41 44 44 47 54 20 | 78 2c 78 2c 78 0d 12 52 |H.ADDGT |x,x,x..R|
|00003220| 19 53 55 42 47 54 20 79 | 2c 66 6f 75 72 2c 79 2c |.SUBGT y|,four,y,|
|00003230| 41 53 4c 20 23 31 0d 12 | 5c 05 5d 0d 12 66 07 c9 |ASL #1..|\.]..f..|
|00003240| 20 35 0d 12 70 0e 5b 4f | 50 54 20 70 61 73 73 25 | 5..p.[O|PT pass%|
|00003250| 0d 12 7a 14 53 55 42 47 | 54 20 74 65 6d 70 2c 74 |..z.SUBG|T temp,t|
|00003260| 77 6f 2c 79 0d 12 84 18 | 53 55 42 47 54 20 79 2c |wo,y....|SUBGT y,|
|00003270| 74 77 6f 2c 78 2c 41 53 | 4c 20 23 31 0d 12 8e 15 |two,x,AS|L #1....|
|00003280| 41 44 44 47 54 20 78 2c | 74 65 6d 70 2c 74 65 6d |ADDGT x,|temp,tem|
|00003290| 70 0d 12 98 05 5d 0d 12 | a2 07 c9 20 36 0d 12 ac |p....]..|... 6...|
|000032a0| 0e 5b 4f 50 54 20 70 61 | 73 73 25 0d 12 b6 18 53 |.[OPT pa|ss%....S|
|000032b0| 55 42 47 54 20 78 2c 74 | 77 6f 2c 78 2c 41 53 4c |UBGT x,t|wo,x,ASL|
|000032c0| 20 23 31 0d 12 c0 19 41 | 44 44 47 54 20 79 2c 6d | #1....A|DDGT y,m|
|000032d0| 74 77 6f 2c 79 2c 41 53 | 4c 20 23 31 0d 12 ca 05 |two,y,AS|L #1....|
|000032e0| 5d 0d 12 d4 07 c9 20 37 | 0d 12 de 0e 5b 4f 50 54 |]..... 7|....[OPT|
|000032f0| 20 70 61 73 73 25 0d 12 | e8 17 53 55 42 47 54 20 | pass%..|..SUBGT |
|00003300| 74 65 6d 70 2c 79 2c 23 | 6e 6f 6e 65 25 0d 12 f2 |temp,y,#|none%...|
|00003310| 0f 41 44 44 47 54 20 79 | 2c 78 2c 78 0d 12 fc 15 |.ADDGT y|,x,x....|
|00003320| 41 44 44 47 54 20 78 2c | 74 65 6d 70 2c 74 65 6d |ADDGT x,|temp,tem|
|00003330| 70 0d 13 06 05 5d 0d 13 | 10 05 cb 0d 13 1a 06 3d |p....]..|.......=|
|00003340| 30 0d 13 24 05 3a 0d 13 | 2e 17 dd 20 a4 62 6f 74 |0..$.:..|... .bot|
|00003350| 74 6f 6d 6c 65 66 74 66 | 6e 28 6e 25 29 0d 13 38 |tomleftf|n(n%)..8|
|00003360| 0b c8 8e 20 6e 25 20 ca | 0d 13 42 07 c9 20 30 0d |... n% .|..B.. 0.|
|00003370| 13 4c 0e 5b 4f 50 54 20 | 70 61 73 73 25 0d 13 56 |.L.[OPT |pass%..V|
|00003380| 0f 41 44 44 4c 54 20 78 | 2c 78 2c 78 0d 13 60 0f |.ADDLT x|,x,x..`.|
|00003390| 41 44 44 4c 54 20 79 2c | 79 2c 79 0d 13 6a 05 5d |ADDLT y,|y,y..j.]|
|000033a0| 0d 13 74 07 c9 20 31 0d | 13 7e 0e 5b 4f 50 54 20 |..t.. 1.|.~.[OPT |
|000033b0| 70 61 73 73 25 0d 13 88 | 12 41 44 44 4c 54 20 74 |pass%...|.ADDLT t|
|000033c0| 65 6d 70 2c 79 2c 79 0d | 13 92 18 53 55 42 4c 54 |emp,y,y.|...SUBLT|
|000033d0| 20 79 2c 74 77 6f 2c 78 | 2c 41 53 4c 20 23 31 0d | y,two,x|,ASL #1.|
|000033e0| 13 9c 10 4d 4f 56 4c 54 | 20 78 2c 74 65 6d 70 0d |...MOVLT| x,temp.|
|000033f0| 13 a6 05 5d 0d 13 b0 07 | c9 20 32 0d 13 ba 0e 5b |...]....|. 2....[|
|00003400| 4f 50 54 20 70 61 73 73 | 25 0d 13 c4 18 53 55 42 |OPT pass|%....SUB|
|00003410| 4c 54 20 78 2c 74 77 6f | 2c 78 2c 41 53 4c 20 23 |LT x,two|,x,ASL #|
|00003420| 31 0d 13 ce 18 53 55 42 | 4c 54 20 79 2c 74 77 6f |1....SUB|LT y,two|
|00003430| 2c 79 2c 41 53 4c 20 23 | 31 0d 13 d8 05 5d 0d 13 |,y,ASL #|1....]..|
|00003440| e2 07 c9 20 33 0d 13 ec | 0e 5b 4f 50 54 20 70 61 |... 3...|.[OPT pa|
|00003450| 73 73 25 0d 13 f6 17 52 | 53 42 4c 54 20 74 65 6d |ss%....R|SBLT tem|
|00003460| 70 2c 79 2c 23 6e 6f 6e | 65 25 0d 14 00 0f 41 44 |p,y,#non|e%....AD|
|00003470| 44 4c 54 20 79 2c 78 2c | 78 0d 14 0a 15 41 44 44 |DLT y,x,|x....ADD|
|00003480| 4c 54 20 78 2c 74 65 6d | 70 2c 74 65 6d 70 0d 14 |LT x,tem|p,temp..|
|00003490| 14 05 5d 0d 14 1e 07 c9 | 20 34 0d 14 28 0e 5b 4f |..].....| 4..(.[O|
|000034a0| 50 54 20 70 61 73 73 25 | 0d 14 32 0f 41 44 44 4c |PT pass%|..2.ADDL|
|000034b0| 54 20 78 2c 78 2c 78 0d | 14 3c 18 53 55 42 4c 54 |T x,x,x.|.<.SUBLT|
|000034c0| 20 79 2c 74 77 6f 2c 79 | 2c 41 53 4c 20 23 31 0d | y,two,y|,ASL #1.|
|000034d0| 14 46 05 5d 0d 14 50 07 | c9 20 35 0d 14 5a 0e 5b |.F.]..P.|. 5..Z.[|
|000034e0| 4f 50 54 20 70 61 73 73 | 25 0d 14 64 17 52 53 42 |OPT pass|%..d.RSB|
|000034f0| 4c 54 20 74 65 6d 70 2c | 79 2c 23 6e 6f 6e 65 25 |LT temp,|y,#none%|
|00003500| 0d 14 6e 18 53 55 42 4c | 54 20 79 2c 74 77 6f 2c |..n.SUBL|T y,two,|
|00003510| 78 2c 41 53 4c 20 23 31 | 0d 14 78 15 41 44 44 4c |x,ASL #1|..x.ADDL|
|00003520| 54 20 78 2c 74 65 6d 70 | 2c 74 65 6d 70 0d 14 82 |T x,temp|,temp...|
|00003530| 05 5d 0d 14 8c 07 c9 20 | 36 0d 14 96 0e 5b 4f 50 |.]..... |6....[OP|
|00003540| 54 20 70 61 73 73 25 0d | 14 a0 18 53 55 42 4c 54 |T pass%.|...SUBLT|
|00003550| 20 78 2c 74 77 6f 2c 78 | 2c 41 53 4c 20 23 31 0d | x,two,x|,ASL #1.|
|00003560| 14 aa 0f 41 44 44 4c 54 | 20 79 2c 79 2c 79 0d 14 |...ADDLT| y,y,y..|
|00003570| b4 05 5d 0d 14 be 07 c9 | 20 37 0d 14 c8 0e 5b 4f |..].....| 7....[O|
|00003580| 50 54 20 70 61 73 73 25 | 0d 14 d2 12 41 44 44 4c |PT pass%|....ADDL|
|00003590| 54 20 74 65 6d 70 2c 79 | 2c 79 0d 14 dc 0f 41 44 |T temp,y|,y....AD|
|000035a0| 44 4c 54 20 79 2c 78 2c | 78 0d 14 e6 10 4d 4f 56 |DLT y,x,|x....MOV|
|000035b0| 4c 54 20 78 2c 74 65 6d | 70 0d 14 f0 05 5d 0d 14 |LT x,tem|p....]..|
|000035c0| fa 05 cb 0d 15 04 06 3d | 30 0d 15 0e 05 3a 0d 15 |.......=|0....:..|
|000035d0| 18 18 dd 20 a4 62 6f 74 | 74 6f 6d 72 69 67 68 74 |... .bot|tomright|
|000035e0| 66 6e 28 6e 25 29 0d 15 | 22 0b c8 8e 20 6e 25 20 |fn(n%)..|"... n% |
|000035f0| ca 0d 15 2c 07 c9 20 30 | 0d 15 36 0e 5b 4f 50 54 |...,.. 0|..6.[OPT|
|00003600| 20 70 61 73 73 25 0d 15 | 40 19 41 44 44 47 45 20 | pass%..|@.ADDGE |
|00003610| 78 2c 6d 74 77 6f 2c 78 | 2c 41 53 4c 20 23 31 0d |x,mtwo,x|,ASL #1.|
|00003620| 15 4a 0f 41 44 44 47 45 | 20 79 2c 79 2c 79 0d 15 |.J.ADDGE| y,y,y..|
|00003630| 54 05 5d 0d 15 5e 07 c9 | 20 31 0d 15 68 0e 5b 4f |T.]..^..| 1..h.[O|
|00003640| 50 54 20 70 61 73 73 25 | 0d 15 72 12 41 44 44 47 |PT pass%|..r.ADDG|
|00003650| 45 20 74 65 6d 70 2c 79 | 2c 79 0d 15 7c 19 53 55 |E temp,y|,y..|.SU|
|00003660| 42 47 45 20 79 2c 66 6f | 75 72 2c 78 2c 41 53 4c |BGE y,fo|ur,x,ASL|
|00003670| 20 23 31 0d 15 86 10 4d | 4f 56 47 45 20 78 2c 74 | #1....M|OVGE x,t|
|00003680| 65 6d 70 0d 15 90 05 5d | 0d 15 9a 07 c9 20 32 0d |emp....]|..... 2.|
|00003690| 15 a4 0e 5b 4f 50 54 20 | 70 61 73 73 25 0d 15 ae |...[OPT |pass%...|
|000036a0| 19 53 55 42 47 45 20 78 | 2c 66 6f 75 72 2c 78 2c |.SUBGE x|,four,x,|
|000036b0| 41 53 4c 20 23 31 0d 15 | b8 18 53 55 42 47 45 20 |ASL #1..|..SUBGE |
|000036c0| 79 2c 74 77 6f 2c 79 2c | 41 53 4c 20 23 31 0d 15 |y,two,y,|ASL #1..|
|000036d0| c2 05 5d 0d 15 cc 07 c9 | 20 33 0d 15 d6 0e 5b 4f |..].....| 3....[O|
|000036e0| 50 54 20 70 61 73 73 25 | 0d 15 e0 17 52 53 42 47 |PT pass%|....RSBG|
|000036f0| 45 20 74 65 6d 70 2c 79 | 2c 23 6e 6f 6e 65 25 0d |E temp,y|,#none%.|
|00003700| 15 ea 19 41 44 44 47 45 | 20 79 2c 6d 74 77 6f 2c |...ADDGE| y,mtwo,|
|00003710| 78 2c 41 53 4c 20 23 31 | 0d 15 f4 15 41 44 44 47 |x,ASL #1|....ADDG|
|00003720| 45 20 78 2c 74 65 6d 70 | 2c 74 65 6d 70 0d 15 fe |E x,temp|,temp...|
|00003730| 05 5d 0d 16 08 07 c9 20 | 34 0d 16 12 0e 5b 4f 50 |.]..... |4....[OP|
|00003740| 54 20 70 61 73 73 25 0d | 16 1c 19 41 44 44 47 45 |T pass%.|...ADDGE|
|00003750| 20 78 2c 6d 74 77 6f 2c | 78 2c 41 53 4c 20 23 31 | x,mtwo,|x,ASL #1|
|00003760| 0d 16 26 18 53 55 42 47 | 45 20 79 2c 74 77 6f 2c |..&.SUBG|E y,two,|
|00003770| 79 2c 41 53 4c 20 23 31 | 0d 16 30 05 5d 0d 16 3a |y,ASL #1|..0.]..:|
|00003780| 07 c9 20 35 0d 16 44 0e | 5b 4f 50 54 20 70 61 73 |.. 5..D.|[OPT pas|
|00003790| 73 25 0d 16 4e 17 52 53 | 42 47 45 20 74 65 6d 70 |s%..N.RS|BGE temp|
|000037a0| 2c 79 2c 23 6e 6f 6e 65 | 25 0d 16 58 19 53 55 42 |,y,#none|%..X.SUB|
|000037b0| 47 45 20 79 2c 66 6f 75 | 72 2c 78 2c 41 53 4c 20 |GE y,fou|r,x,ASL |
|000037c0| 23 31 0d 16 62 15 41 44 | 44 47 45 20 78 2c 74 65 |#1..b.AD|DGE x,te|
|000037d0| 6d 70 2c 74 65 6d 70 0d | 16 6c 05 5d 0d 16 76 07 |mp,temp.|.l.]..v.|
|000037e0| c9 20 36 0d 16 80 0e 5b | 4f 50 54 20 70 61 73 73 |. 6....[|OPT pass|
|000037f0| 25 0d 16 8a 19 53 55 42 | 47 45 20 78 2c 66 6f 75 |%....SUB|GE x,fou|
|00003800| 72 2c 78 2c 41 53 4c 20 | 23 31 0d 16 94 0f 41 44 |r,x,ASL |#1....AD|
|00003810| 44 47 45 20 79 2c 79 2c | 79 0d 16 9e 05 5d 0d 16 |DGE y,y,|y....]..|
|00003820| a8 07 c9 20 37 0d 16 b2 | 0e 5b 4f 50 54 20 70 61 |... 7...|.[OPT pa|
|00003830| 73 73 25 0d 16 bc 12 41 | 44 44 47 45 20 74 65 6d |ss%....A|DDGE tem|
|00003840| 70 2c 79 2c 79 0d 16 c6 | 19 41 44 44 47 45 20 79 |p,y,y...|.ADDGE y|
|00003850| 2c 6d 74 77 6f 2c 78 2c | 41 53 4c 20 23 31 0d 16 |,mtwo,x,|ASL #1..|
|00003860| d0 10 4d 4f 56 47 45 20 | 78 2c 74 65 6d 70 0d 16 |..MOVGE |x,temp..|
|00003870| da 05 5d 0d 16 e4 05 cb | 0d 16 ee 06 3d 30 0d 16 |..].....|....=0..|
|00003880| f8 05 3a 0d 17 02 17 dd | 20 a4 72 6f 75 6e 64 6d |..:.....| .roundm|
|00003890| 61 67 64 6f 77 6e 28 6e | 25 29 0d 17 0c 0b ea 20 |agdown(n|%)..... |
|000038a0| 6d 25 2c 66 25 0d 17 16 | 16 e7 20 6e 25 3c 30 20 |m%,f%...|.. n%<0 |
|000038b0| 66 25 3d b9 3a 6e 25 3d | 2d 6e 25 0d 17 20 1d c8 |f%=.:n%=|-n%.. ..|
|000038c0| 95 20 6e 25 3e 32 35 35 | 20 6e 25 3d 6e 25 81 34 |. n%>255| n%=n%.4|
|000038d0| 3a 6d 25 2b 3d 31 3a ce | 0d 17 2a 23 6e 25 3d 6e |:m%+=1:.|..*#n%=n|
|000038e0| 25 3c 3c 28 6d 25 2a 32 | 29 3a e7 20 66 25 3d b9 |%<<(m%*2|):. f%=.|
|000038f0| 20 3d 2d 6e 25 20 8b 20 | 3d 6e 25 0d 17 34 15 dd | =-n% . |=n%..4..|
|00003900| 20 a4 72 6f 75 6e 64 6d | 61 67 75 70 28 6e 25 29 | .roundm|agup(n%)|
|00003910| 0d 17 3e 0e ea 20 6d 25 | 2c 66 25 2c 63 25 0d 17 |..>.. m%|,f%,c%..|
|00003920| 48 16 e7 20 6e 25 3c 30 | 20 66 25 3d b9 3a 6e 25 |H.. n%<0| f%=.:n%|
|00003930| 3d 2d 6e 25 0d 17 52 0d | c8 95 20 6e 25 3e 32 35 |=-n%..R.|.. n%>25|
|00003940| 35 0d 17 5c 12 e7 20 6e | 25 83 34 3c 3e 30 20 63 |5..\.. n|%.4<>0 c|
|00003950| 25 3d 31 0d 17 66 13 6e | 25 3d 6e 25 81 34 3a 6d |%=1..f.n|%=n%.4:m|
|00003960| 25 2b 3d 31 3a ce 0d 17 | 70 28 6e 25 3d 28 6e 25 |%+=1:...|p(n%=(n%|
|00003970| 2b 63 25 29 3c 3c 28 6d | 25 2a 32 29 3a e7 20 66 |+c%)<<(m|%*2):. f|
|00003980| 25 3d b9 20 3d 2d 6e 25 | 20 8b 20 3d 6e 25 0d 17 |%=. =-n%| . =n%..|
|00003990| 7a 05 3a 0d 17 84 46 dd | 20 a4 6c 63 6f 6c 28 63 |z.:...F.| .lcol(c|
|000039a0| 25 29 20 3d 20 28 28 63 | 25 80 33 33 29 3c 3c 32 |%) = ((c|%.33)<<2|
|000039b0| 29 2b 28 28 63 25 80 31 | 34 29 3c 3c 33 29 2b 28 |)+((c%.1|4)<<3)+(|
|000039c0| 28 63 25 80 31 36 29 3e | 3e 31 29 2b 28 28 63 25 |(c%.16)>|>1)+((c%|
|000039d0| 80 31 39 32 29 3e 3e 36 | 29 0d ff |.192)>>6|).. |
+--------+-------------------------+-------------------------+--------+--------+