home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Basic / bb_exa.dms / in.adf / tools / shapesmaker.bb < prev    next >
Unknown  |  1995-10-19  |  4.1 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
100% TrID OMF - Relocatable Object Module Format default (weak)


hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 80 c3 00 3b 00 3b 4d 61 | 72 6b 73 20 73 68 61 70 |...;.;Ma|rks shap|
|00000010| 65 20 67 61 74 68 65 72 | 65 72 20 70 72 6f 67 2e |e gather|er prog.|
|00000020| 00 3b 00 80 08 20 65 72 | 72 6f 72 7b 74 24 7d 00 |.;... er|ror{t$}.|
|00000030| 20 20 c5 01 20 31 2c 30 | 2c 35 30 2c 33 32 30 2c |  .. 1,0|,50,320,|
|00000040| 31 30 30 2c 24 31 30 30 | 66 2c 22 45 52 52 4f 52 |100,$100|f,"ERROR|
|00000050| 21 22 2c 31 2c 32 00 20 | 20 dd 82 20 74 24 00 20 |!",1,2. | .. t$. |
|00000060| 20 dd 82 20 22 43 6c 69 | 63 6b 20 6d 6f 75 73 65 | .. "Cli|ck mouse|
|00000070| 20 74 6f 20 63 6f 6e 74 | 69 6e 75 65 2e 2e 2e 22 | to cont|inue..."|
|00000080| 00 20 20 80 0a 00 20 20 | 80 2b 20 c5 01 20 31 3a |.  ...  |.+ .. 1:|
|00000090| 80 2c 20 c5 01 20 30 00 | 80 02 20 80 08 00 00 80 |., .. 0.|.. .....|
|000000a0| 08 20 72 6f 77 7b 79 2c | 6c 2c 72 7d 00 bb 85 20 |. row{y,|l,r}... |
|000000b0| 6c 2c 79 2b 32 34 2c 72 | 2c 79 2b 32 34 2c 2d 31 |l,y+24,r|,y+24,-1|
|000000c0| 00 80 02 20 80 08 00 00 | 80 09 20 63 68 6b 72 6f |... ....|.. chkro|
|000000d0| 77 7b 79 2c 6c 2c 72 7d | 20 20 3b 72 65 74 75 72 |w{y,l,r}|  ;retur|
|000000e0| 6e 20 31 20 69 66 20 61 | 6e 79 20 67 72 61 70 68 |n 1 if a|ny graph|
|000000f0| 69 63 73 20 6f 6e 20 6c | 69 6e 65 2e 00 80 15 20 |ics on l|ine.... |
|00000100| 66 63 00 72 6f 77 7b 79 | 2c 6c 2c 72 7d 00 61 3d |fc.row{y|,l,r}.a=|
|00000110| 30 3a 80 16 20 78 3d 6c | 20 80 18 20 72 00 80 0b |0:.. x=l| .. r...|
|00000120| 20 b2 04 28 78 2c 79 2b | 32 34 29 3c 3e 66 63 20 | ..(x,y+|24)<>fc |
|00000130| 80 21 20 61 3d 2d 31 00 | 80 17 00 72 6f 77 7b 79 |.! a=-1.|...row{y|
|00000140| 2c 6c 2c 72 7d 00 80 09 | 20 80 07 20 61 00 80 02 |,l,r}...| .. a...|
|00000150| 20 80 09 00 00 80 08 20 | 63 6f 6c 7b 78 2c 74 2c | ...... |col{x,t,|
|00000160| 62 7d 00 bb 85 20 78 2c | 74 2b 32 34 2c 78 2c 62 |b}... x,|t+24,x,b|
|00000170| 2b 32 34 2c 2d 31 00 80 | 02 20 80 08 00 00 80 09 |+24,-1..|. ......|
|00000180| 20 63 68 6b 63 6f 6c 7b | 78 2c 74 2c 62 7d 20 20 | chkcol{|x,t,b}  |
|00000190| 3b 63 68 65 63 6b 20 61 | 20 63 6f 6c 75 6d 6e 00 |;check a| column.|
|000001a0| 80 15 20 66 63 00 63 6f | 6c 7b 78 2c 74 2c 62 7d |.. fc.co|l{x,t,b}|
|000001b0| 00 61 3d 30 3a 80 16 20 | 79 3d 74 20 80 18 20 62 |.a=0:.. |y=t .. b|
|000001c0| 00 80 0b 20 b2 04 28 78 | 2c 79 2b 32 34 29 3c 3e |... ..(x|,y+24)<>|
|000001d0| 66 63 20 80 21 20 61 3d | 2d 31 00 80 17 00 63 6f |fc .! a=|-1....co|
|000001e0| 6c 7b 78 2c 74 2c 62 7d | 00 80 09 20 80 07 20 61 |l{x,t,b}|... .. a|
|000001f0| 00 80 02 20 80 09 00 00 | 80 32 20 70 61 24 3d 31 |... ....|.2 pa$=1|
|00000200| 39 32 00 80 32 20 66 69 | 24 3d 31 39 32 20 20 3b |92..2 fi|$=192  ;|
|00000210| 69 6e 70 75 74 20 66 69 | 6c 65 2c 00 80 32 20 66 |input fi|le,..2 f|
|00000220| 6f 24 3d 31 39 32 20 20 | 3b 6f 75 74 70 75 74 20 |o$=192  |;output |
|00000230| 66 69 6c 65 00 00 c4 01 | 20 30 2c 30 2c 22 50 52 |file....| 0,0,"PR|
|00000240| 4f 4a 45 43 54 22 00 c4 | 03 20 30 2c 30 2c 30 2c |OJECT"..|. 0,0,0,|
|00000250| 30 2c 22 4c 4f 41 44 20 | 20 20 20 20 20 20 20 20 |0,"LOAD |        |
|00000260| 20 22 2c 22 4c 22 00 c4 | 03 20 30 2c 30 2c 30 2c | ","L"..|. 0,0,0,|
|00000270| 31 2c 22 43 4f 4e 56 45 | 52 54 20 20 20 20 20 20 |1,"CONVE|RT      |
|00000280| 20 22 2c 22 58 22 00 c4 | 03 20 30 2c 30 2c 30 2c | ","X"..|. 0,0,0,|
|00000290| 32 2c 22 51 55 49 54 20 | 20 20 20 20 20 20 20 20 |2,"QUIT |        |
|000002a0| 20 22 2c 22 51 22 00 00 | c4 01 20 30 2c 31 2c 22 | ","Q"..|.. 0,1,"|
|000002b0| 4f 50 54 49 4f 4e 53 22 | 00 c4 03 20 30 2c 33 2c |OPTIONS"|... 0,3,|
|000002c0| 31 2c 30 2c 22 20 20 4d | 41 4b 45 20 53 48 41 50 |1,0,"  M|AKE SHAP|
|000002d0| 45 53 3f 22 00 c4 03 20 | 30 2c 31 2c 31 2c 31 2c |ES?"... |0,1,1,1,|
|000002e0| 22 20 20 4d 41 4b 45 20 | 53 50 52 49 54 45 53 3f |"  MAKE |SPRITES?|
|000002f0| 22 00 c4 03 20 30 2c 31 | 2c 31 2c 32 2c 22 20 20 |"... 0,1|,1,2,"  |
|00000300| 41 55 54 4f 20 43 45 4e | 54 52 45 3f 22 00 00 c4 |AUTO CEN|TRE?"...|
|00000310| 01 20 30 2c 32 2c 22 43 | 4f 4c 4f 55 52 22 00 c4 |. 0,2,"C|OLOUR"..|
|00000320| 03 20 30 2c 31 2c 32 2c | 30 2c 22 20 20 52 45 4d |. 0,1,2,|0,"  REM|
|00000330| 4f 56 45 20 43 4f 4c 4f | 55 52 3f 22 00 00 dd 84 |OVE COLO|UR?"....|
|00000340| 20 22 23 23 23 22 00 00 | c6 11 20 80 c5 3a c6 18 | "###"..|.. ..:..|
|00000350| 20 31 2c 32 3a c6 11 20 | 34 2c 32 00 c6 02 20 31 | 1,2:.. |4,2... 1|
|00000360| 2c 31 34 33 2c 31 39 2c | 30 2c 31 2c 34 30 2c 35 |,143,19,|0,1,40,5|
|00000370| 31 00 c6 19 20 30 3a c6 | 17 20 31 2c 30 00 c6 01 |1... 0:.|. 1,0...|
|00000380| 20 31 2c 38 2c 35 31 2c | 30 2c 32 2c 22 20 4f 4b | 1,8,51,|0,2," OK|
|00000390| 20 22 00 c6 01 20 31 2c | 31 33 30 2c 35 31 2c 30 | "... 1,|130,51,0|
|000003a0| 2c 33 2c 22 20 43 41 4e | 43 45 4c 20 22 00 00 00 |,3," CAN|CEL "...|
|000003b0| cf 01 20 30 2c 30 2c 30 | 2c 33 32 30 2c 32 30 30 |.. 0,0,0|,320,200|
|000003c0| 2c 32 2c 30 2c 22 49 66 | 66 20 47 72 61 62 62 65 |,2,0,"If|f Grabbe|
|000003d0| 72 22 2c 31 2c 32 00 ce | 05 20 30 2c 30 2c 30 2c |r",1,2..|. 0,0,0,|
|000003e0| 30 3a ce 05 20 31 2c 31 | 35 2c 31 35 2c 31 35 00 |0:.. 1,1|5,15,15.|
|000003f0| ce 05 20 32 2c 38 2c 30 | 2c 31 35 3a ce 05 20 33 |.. 2,8,0|,15:.. 3|
|00000400| 2c 30 2c 30 2c 38 00 c5 | 01 20 30 2c 30 2c 30 2c |,0,0,8..|. 0,0,0,|
|00000410| 33 32 30 2c 32 30 30 2c | 24 31 39 30 30 2c 22 22 |320,200,|$1900,""|
|00000420| 2c 31 2c 32 00 c4 02 20 | 30 00 00 68 65 72 65 32 |,1,2... |0..here2|
|00000430| 00 61 2e 6c 3d c5 02 00 | 80 0b 20 61 3d 32 35 36 |.a.l=...|.. a=256|
|00000440| 20 20 3b 6d 65 6e 75 20 | 70 69 63 6b 65 64 00 20 |  ;menu |picked. |
|00000450| 20 80 0e 20 c5 07 00 20 | 20 80 0f 20 30 20 20 3b | .. ... | .. 0  ;|
|00000460| 70 72 6f 6a 65 63 74 00 | 20 20 20 20 80 0e 20 c5 |project.|    .. .|
|00000470| 08 00 20 20 20 20 80 0f | 20 30 20 20 3b 6c 6f 61 |..    ..| 0  ;loa|
|00000480| 64 00 20 20 20 20 20 20 | 66 24 3d cc 01 28 22 49 |d.      |f$=..("I|
|00000490| 4c 42 4d 20 46 69 6c 65 | 3f 22 2c 70 61 24 2c 66 |LBM File|?",pa$,f|
|000004a0| 69 24 29 00 20 20 20 20 | 20 20 80 0b 20 66 24 00 |i$).    |  .. f$.|
|000004b0| 20 20 20 20 20 20 20 20 | 3b 00 20 20 20 20 20 20 |        |;.      |
|000004c0| 20 20 80 b4 00 20 20 20 | 20 20 20 20 20 20 20 65 |  ...   |       e|
|000004d0| 72 72 6f 72 7b 22 43 61 | 6e 27 74 20 73 75 73 73 |rror{"Ca|n't suss|
|000004e0| 20 49 46 46 20 66 69 6c | 65 21 22 7d 00 20 20 20 | IFF fil|e!"}.   |
|000004f0| 20 20 20 20 20 20 20 80 | 05 20 68 65 72 65 32 00 |       .|. here2.|
|00000500| 20 20 20 20 20 20 20 20 | 80 02 20 80 b4 00 20 20 |        |.. ...  |
|00000510| 20 20 20 20 20 20 3b 00 | 20 20 20 20 20 20 20 20 |      ;.|        |
|00000520| d0 84 20 66 24 00 20 20 | 20 20 20 20 20 20 66 77 |.. f$.  |      fw|
|00000530| 3d d0 85 3a 66 68 3d d0 | 86 3a 66 64 3d d0 87 00 |=..:fh=.|.:fd=...|
|00000540| 20 20 20 20 20 20 20 20 | 66 63 3d 28 31 20 80 7c |        |fc=(1 .||
|00000550| 20 66 64 29 2d 31 00 20 | 20 20 20 20 20 20 20 3b | fd)-1. |       ;|
|00000560| 00 20 20 20 20 20 20 20 | 20 80 2b 20 c5 01 20 30 |.       | .+ .. 0|
|00000570| 00 20 20 20 20 20 20 20 | 20 3b 00 20 20 20 20 20 |.       | ;.     |
|00000580| 20 20 20 62 66 77 3d 66 | 77 3a 80 0b 20 66 77 3c |   bfw=f|w:.. fw<|
|00000590| 33 32 30 20 80 21 20 62 | 66 77 3d 33 32 30 00 20 |320 .! b|fw=320. |
|000005a0| 20 20 20 20 20 20 20 62 | 66 68 3d 66 68 3a 80 0b |       b|fh=fh:..|
|000005b0| 20 66 68 3c 32 30 30 20 | 80 21 20 62 66 68 3d 32 | fh<200 |.! bfh=2|
|000005c0| 30 30 00 20 20 20 20 20 | 20 20 20 d0 01 20 30 2c |00.     |   .. 0,|
|000005d0| 62 66 77 2c 62 66 68 2b | 32 34 2c 66 64 00 20 20 |bfw,bfh+|24,fd.  |
|000005e0| 20 20 20 20 20 20 cf 01 | 20 30 2c 30 2c 30 2c 33 |      ..| 0,0,0,3|
|000005f0| 32 30 2c 32 30 30 2c 66 | 64 2c 30 2c 22 22 2c 31 |20,200,f|d,0,"",1|
|00000600| 2c 32 2c 30 00 20 20 20 | 20 20 20 20 20 c5 01 20 |,2,0.   |     .. |
|00000610| 30 2c 30 2c 30 2c 33 32 | 30 2c 32 30 30 2c 24 31 |0,0,0,32|0,200,$1|
|00000620| 39 30 30 2c 22 22 2c 31 | 2c 32 00 20 20 20 20 20 |900,"",1|,2.     |
|00000630| 20 20 20 c5 28 00 20 20 | 20 20 20 20 20 20 3b 00 |   .(.  |      ;.|
|00000640| 20 20 20 20 20 20 20 20 | d0 02 20 30 2c 66 24 2c |        |.. 0,f$,|
|00000650| 30 00 20 20 20 20 20 20 | 20 20 3b 00 20 20 20 20 |0.      |  ;.    |
|00000660| 20 20 20 20 b2 01 20 30 | 2c 30 2c 66 77 2c 66 68 |    .. 0|,0,fw,fh|
|00000670| 2c 30 2c 32 34 00 20 20 | 20 20 20 20 20 20 3b 00 |,0,24.  |      ;.|
|00000680| 20 20 20 20 20 20 20 20 | bb 84 20 30 2c 30 2c 33 |        |.. 0,0,3|
|00000690| 31 39 2c 32 33 2c 30 00 | 20 20 20 20 20 20 20 20 |19,23,0.|        |
|000006a0| 3b 00 20 20 20 20 20 20 | 20 20 80 2c 20 ce 09 20 |;.      |  ., .. |
|000006b0| 30 3a c4 02 20 30 00 20 | 20 20 20 20 20 20 20 3b |0:.. 0. |       ;|
|000006c0| 00 20 20 20 20 20 20 20 | 20 c5 27 00 20 20 20 20 |.       | .'.    |
|000006d0| 20 20 80 02 20 80 0b 00 | 20 20 20 20 80 0f 20 31 |  .. ...|    .. 1|
|000006e0| 20 20 3b 63 6f 6e 76 65 | 72 74 00 20 20 20 20 20 |  ;conve|rt.     |
|000006f0| 20 80 0b 20 66 24 20 3b | 73 6f 6d 65 74 68 69 6e | .. f$ ;|somethin|
|00000700| 67 20 74 6f 20 63 6f 6e | 76 65 72 74 3f 3f 3f 00 |g to con|vert???.|
|00000710| 20 20 20 20 20 20 20 20 | 6f 24 3d cc 01 28 22 4f |        |o$=..("O|
|00000720| 75 74 70 75 74 20 46 69 | 6c 65 6e 61 6d 65 3f 22 |utput Fi|lename?"|
|00000730| 2c 70 61 24 2c 66 6f 24 | 29 00 20 20 20 20 20 20 |,pa$,fo$|).      |
|00000740| 20 20 80 0b 20 6f 24 00 | 20 20 20 20 20 20 20 20 |  .. o$.|        |
|00000750| 20 20 6d 73 68 3d c4 0c | 28 30 2c 31 2c 30 29 00 |  msh=..|(0,1,0).|
|00000760| 20 20 20 20 20 20 20 20 | 20 20 6d 73 70 3d c4 0c |        |  msp=..|
|00000770| 28 30 2c 31 2c 31 29 00 | 20 20 20 20 20 20 20 20 |(0,1,1).|        |
|00000780| 20 20 61 75 63 3d c4 0c | 28 30 2c 31 2c 32 29 00 |  auc=..|(0,1,2).|
|00000790| 20 20 20 20 20 20 20 20 | 20 20 c5 28 00 20 20 20 |        |  .(.   |
|000007a0| 20 20 20 20 20 20 20 80 | 06 20 64 6f 63 6f 6e 76 |       .|. doconv|
|000007b0| 65 72 74 00 20 20 20 20 | 20 20 20 20 20 20 c5 27 |ert.    |      .'|
|000007c0| 00 20 20 20 20 20 20 20 | 20 20 20 80 0b 20 6e 73 |.       |   .. ns|
|000007d0| 68 3e 3d 30 00 20 20 20 | 20 20 20 20 20 20 20 20 |h>=0.   |        |
|000007e0| 20 80 0b 20 6d 73 68 00 | 20 20 20 20 20 20 20 20 | .. msh.|        |
|000007f0| 20 20 20 20 20 20 80 b4 | 00 20 20 20 20 20 20 20 |      ..|.       |
|00000800| 20 20 20 20 20 20 20 20 | 20 65 72 72 6f 72 7b 22 |        | error{"|
|00000810| 43 61 6e 27 74 20 73 61 | 76 65 20 73 68 61 70 65 |Can't sa|ve shape|
|00000820| 73 21 22 7d 00 20 20 20 | 20 20 20 20 20 20 20 20 |s!"}.   |        |
|00000830| 20 20 20 20 20 80 05 20 | 68 65 72 65 32 00 20 20 |     .. |here2.  |
|00000840| 20 20 20 20 20 20 20 20 | 20 20 20 20 80 02 20 80 |        |    .. .|
|00000850| b4 00 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..      |        |
|00000860| cd 09 20 30 2c 6e 73 68 | 2c 6f 24 00 20 20 20 20 |.. 0,nsh|,o$.    |
|00000870| 20 20 20 20 20 20 20 20 | 80 02 20 80 0b 00 20 20 |        |.. ...  |
|00000880| 20 20 20 20 20 20 20 20 | 20 20 80 0b 20 6d 73 70 |        |  .. msp|
|00000890| 00 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 80 |.       |       .|
|000008a0| b4 00 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..      |        |
|000008b0| 20 20 65 72 72 6f 72 7b | 22 43 61 6e 27 74 20 73 |  error{|"Can't s|
|000008c0| 61 76 65 20 73 70 72 69 | 74 65 73 21 22 7d 00 20 |ave spri|tes!"}. |
|000008d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 80 |        |       .|
|000008e0| 05 20 68 65 72 65 32 00 | 20 20 20 20 20 20 20 20 |. here2.|        |
|000008f0| 20 20 20 20 20 20 80 02 | 20 80 b4 00 20 20 20 20 |      ..| ...    |
|00000900| 20 20 20 20 20 20 20 20 | 20 20 b8 06 20 30 2c 6e |        |  .. 0,n|
|00000910| 73 68 2c 6f 24 00 20 20 | 20 20 20 20 20 20 20 20 |sh,o$.  |        |
|00000920| 20 20 80 02 20 80 0b 00 | 20 20 20 20 20 20 20 20 |  .. ...|        |
|00000930| 20 20 80 02 20 80 0b 00 | 20 20 20 20 20 20 20 20 |  .. ...|        |
|00000940| 80 02 20 80 0b 00 20 20 | 20 20 20 20 80 22 00 20 |.. ...  |    .". |
|00000950| 20 20 20 20 20 20 20 ff | 8c 20 30 00 20 20 20 20 |       .|. 0.    |
|00000960| 20 20 80 02 20 80 0b 00 | 20 20 20 20 80 0f 20 32 |  .. ...|    .. 2|
|00000970| 20 20 3b 71 75 69 74 00 | 20 20 20 20 20 20 80 02 |  ;quit.|      ..|
|00000980| 00 20 20 20 20 80 02 20 | 80 0e 00 20 20 80 0f 20 |.    .. |...  .. |
|00000990| 31 20 20 3b 6f 70 74 69 | 6f 6e 73 00 20 20 80 0f |1  ;opti|ons.  ..|
|000009a0| 20 32 20 20 3b 63 6f 6c | 6f 75 72 20 64 65 74 65 | 2  ;col|our dete|
|000009b0| 63 74 00 20 20 20 20 63 | 64 32 3d 63 64 00 20 20 |ct.    c|d2=cd.  |
|000009c0| 20 20 63 64 3d c4 0c 28 | 30 2c 32 2c 30 29 00 20 |  cd=..(|0,2,0). |
|000009d0| 20 20 20 80 0b 20 63 64 | 20 3b 63 6f 6c 6f 75 72 |   .. cd| ;colour|
|000009e0| 20 64 65 74 65 63 74 20 | 74 75 72 6e 65 64 20 6f | detect |turned o|
|000009f0| 6e 21 00 20 20 20 20 20 | 20 6f 73 24 3d c6 14 28 |n!.     | os$=..(|
|00000a00| 31 2c 31 29 00 20 20 20 | 20 20 20 c5 01 20 31 2c |1,1).   |   .. 1,|
|00000a10| 35 34 2c 36 36 2c 32 31 | 30 2c 36 39 2c 24 31 30 |54,66,21|0,69,$10|
|00000a20| 30 36 2c 22 43 6f 6c 6f | 75 72 20 64 65 74 65 63 |06,"Colo|ur detec|
|00000a30| 74 22 2c 31 2c 32 2c 31 | 00 20 20 20 20 20 20 c5 |t",1,2,1|.      .|
|00000a40| 10 20 33 2c 31 30 3a c5 | 1d 20 30 3a c5 1c 20 31 |. 3,10:.|. 0:.. 1|
|00000a50| 2c 30 00 20 20 20 20 20 | 20 dd 81 20 22 43 6f 6c |,0.     | .. "Col|
|00000a60| 6f 75 72 20 74 6f 20 72 | 65 6d 6f 76 65 3a 22 00 |our to r|emove:".|
|00000a70| 20 20 20 20 20 20 c6 12 | 20 31 2c 31 00 20 20 20 |      ..| 1,1.   |
|00000a80| 20 20 20 65 78 3d 30 00 | 20 20 20 20 20 20 80 bb |   ex=0.|      ..|
|00000a90| 00 20 20 20 20 20 20 20 | 20 80 bb 00 20 20 20 20 |.       | ...    |
|00000aa0| 20 20 20 20 20 20 61 3d | c5 02 00 20 20 20 20 20 |      a=|...     |
|00000ab0| 20 20 20 80 bc 20 c5 05 | 3d 31 00 20 20 20 20 20 |   .. ..|=1.     |
|00000ac0| 20 20 20 80 0b 20 61 3d | 36 34 00 20 20 20 20 20 |   .. a=|64.     |
|00000ad0| 20 20 20 20 20 80 0b 20 | c5 04 3d 33 20 20 3b 63 |     .. |..=3  ;c|
|00000ae0| 61 6e 63 65 6c 00 20 20 | 20 20 20 20 20 20 20 20 |ancel.  |        |
|00000af0| 20 20 c6 1b 20 31 2c 31 | 2c 6f 73 24 00 20 20 20 |  .. 1,1|,os$.   |
|00000b00| 20 20 20 20 20 20 20 80 | 22 00 20 20 20 20 20 20 |       .|".      |
|00000b10| 20 20 20 20 20 20 63 64 | 63 3d bc 01 28 c6 14 28 |      cd|c=..(..(|
|00000b20| 31 2c 31 29 29 00 20 20 | 20 20 20 20 20 20 20 20 |1,1)).  |        |
|00000b30| 80 c0 00 20 20 20 20 20 | 20 20 20 20 20 65 78 3d |...     |     ex=|
|00000b40| 2d 31 00 20 20 20 20 20 | 20 20 20 80 c0 00 20 20 |-1.     |   ...  |
|00000b50| 20 20 20 20 80 bc 20 65 | 78 00 20 20 20 20 20 20 |    .. e|x.      |
|00000b60| 80 2b 20 c5 01 20 31 3a | 80 2c 20 c5 01 20 30 00 |.+ .. 1:|., .. 0.|
|00000b70| 20 20 20 20 80 c0 00 20 | 20 80 02 20 80 0e 00 80 |    ... | .. ....|
|00000b80| 02 20 80 0b 00 80 05 20 | 68 65 72 65 32 00 00 64 |. ..... |here2..d|
|00000b90| 6f 63 6f 6e 76 65 72 74 | 00 3b 00 c7 02 20 30 3a |oconvert|.;... 0:|
|00000ba0| c7 04 20 30 2c 31 2e 35 | 3a dd 81 20 22 53 68 61 |.. 0,1.5|:.. "Sha|
|00000bb0| 70 65 3a 20 20 20 22 00 | 80 16 20 6b 3d 30 20 80 |pe:   ".|.. k=0 .|
|00000bc0| 18 20 80 c4 20 cd 0c 2d | 31 00 80 2b 20 cd 0c 20 |. .. ..-|1..+ .. |
|00000bd0| 6b 00 80 17 00 80 16 20 | 6b 3d 30 20 80 18 20 80 |k...... |k=0 .. .|
|00000be0| c4 20 b8 08 2d 31 00 80 | 2b 20 b8 08 20 6b 00 80 |. ..-1..|+ .. k..|
|00000bf0| 17 00 3b 00 79 3d 30 3a | 6e 73 68 3d 2d 31 20 3b |..;.y=0:|nsh=-1 ;|
|00000c00| 73 68 61 70 65 20 6e 75 | 6d 62 65 72 20 74 6f 20 |shape nu|mber to |
|00000c10| 64 6f 21 00 3b 00 3b 4f | 4b 2c 20 70 72 6f 63 65 |do!.;.;O|K, proce|
|00000c20| 73 73 20 62 69 74 6d 61 | 70 21 00 3b 00 6d 61 69 |ss bitma|p!.;.mai|
|00000c30| 6e 00 80 0c 20 79 3c 66 | 68 20 80 42 20 63 68 6b |n... y<f|h .B chk|
|00000c40| 72 6f 77 7b 79 2c 30 2c | 66 77 2d 31 7d 3d 30 20 |row{y,0,|fw-1}=0 |
|00000c50| 80 42 20 df 04 28 30 29 | 3d 30 20 80 21 20 79 2b |.B ..(0)|=0 .! y+|
|00000c60| 31 00 3b 00 80 0b 20 79 | 3c 66 68 20 80 42 20 df |1.;... y|<fh .B .|
|00000c70| 04 28 30 29 3d 30 00 20 | 20 79 74 3d 79 3a 72 6f |.(0)=0. | yt=y:ro|
|00000c80| 77 7b 79 74 2c 30 2c 66 | 77 2d 31 7d 3a 79 2b 31 |w{yt,0,f|w-1}:y+1|
|00000c90| 00 20 20 80 0c 20 79 3c | 66 68 20 80 42 20 63 68 |.  .. y<|fh .B ch|
|00000ca0| 6b 72 6f 77 7b 79 2c 30 | 2c 66 77 2d 31 7d 20 80 |krow{y,0|,fw-1} .|
|00000cb0| 21 20 79 2b 31 00 20 20 | 79 62 3d 79 2d 31 3a 72 |! y+1.  |yb=y-1:r|
|00000cc0| 6f 77 7b 79 74 2c 30 2c | 66 77 2d 31 7d 3a 78 3d |ow{yt,0,|fw-1}:x=|
|00000cd0| 30 00 20 20 6d 61 69 6e | 32 00 20 20 80 0c 20 78 |0.  main|2.  .. x|
|00000ce0| 3c 66 77 20 80 42 20 63 | 68 6b 63 6f 6c 7b 78 2c |<fw .B c|hkcol{x,|
|00000cf0| 79 74 2c 79 62 7d 3d 30 | 20 80 21 20 78 2b 31 00 |yt,yb}=0| .! x+1.|
|00000d00| 20 20 80 0b 20 78 3c 66 | 77 20 20 3b 73 6f 6d 65 |  .. x<f|w  ;some|
|00000d10| 74 68 69 6e 67 20 68 65 | 72 65 20 74 6f 6f 21 00 |thing he|re too!.|
|00000d20| 20 20 20 20 6c 78 3d 78 | 3a 63 6f 6c 7b 6c 78 2c |    lx=x|:col{lx,|
|00000d30| 79 74 2c 79 62 7d 3a 78 | 2b 31 00 20 20 20 20 80 |yt,yb}:x|+1.    .|
|00000d40| 0c 20 78 3c 66 77 20 80 | 42 20 63 68 6b 63 6f 6c |. x<fw .|B chkcol|
|00000d50| 7b 78 2c 79 74 2c 79 62 | 7d 20 80 21 20 78 2b 31 |{x,yt,yb|} .! x+1|
|00000d60| 00 20 20 20 20 72 78 3d | 78 2d 31 3a 63 6f 6c 7b |.    rx=|x-1:col{|
|00000d70| 6c 78 2c 79 74 2c 79 62 | 7d 00 20 20 20 20 3b 00 |lx,yt,yb|}.    ;.|
|00000d80| 20 20 20 20 3b 6f 6b 2c | 20 77 65 20 6e 6f 77 20 |    ;ok,| we now |
|00000d90| 68 61 76 65 20 6c 65 66 | 74 20 61 6e 64 20 72 69 |have lef|t and ri|
|00000da0| 67 68 74 20 65 64 67 65 | 20 6f 66 20 74 6f 70 20 |ght edge| of top |
|00000db0| 6c 65 66 74 20 73 68 61 | 70 65 2e 00 20 20 20 20 |left sha|pe..    |
|00000dc0| 3b 00 20 20 20 20 3b 77 | 65 20 6e 6f 77 20 68 61 |;.    ;w|e now ha|
|00000dd0| 76 65 20 74 6f 20 7a 6f | 6f 6d 20 69 6e 20 74 68 |ve to zo|om in th|
|00000de0| 65 20 79 27 73 00 20 20 | 20 20 3b 00 20 20 20 20 |e y's.  |  ;.    |
|00000df0| 79 74 32 3d 79 74 3a 79 | 62 32 3d 79 62 00 20 20 |yt2=yt:y|b2=yb.  |
|00000e00| 20 20 3b 00 20 20 20 20 | 80 0c 20 63 68 6b 72 6f |  ;.    |.. chkro|
|00000e10| 77 7b 79 74 2c 6c 78 2c | 72 78 7d 3d 30 20 80 21 |w{yt,lx,|rx}=0 .!|
|00000e20| 20 79 74 2b 31 00 20 20 | 20 20 72 6f 77 7b 79 74 | yt+1.  |  row{yt|
|00000e30| 2c 6c 78 2c 72 78 7d 00 | 20 20 20 20 80 0c 20 63 |,lx,rx}.|    .. c|
|00000e40| 68 6b 72 6f 77 7b 79 62 | 2c 6c 78 2c 72 78 7d 3d |hkrow{yb|,lx,rx}=|
|00000e50| 30 20 80 21 20 79 62 2d | 31 00 20 20 20 20 72 6f |0 .! yb-|1.    ro|
|00000e60| 77 7b 79 74 2c 6c 78 2c | 72 78 7d 00 20 20 20 20 |w{yt,lx,|rx}.    |
|00000e70| 3b 00 20 20 20 20 6e 73 | 68 2b 31 00 20 20 20 20 |;.    ns|h+1.    |
|00000e80| 3b 00 20 20 20 20 c7 04 | 20 36 2c 31 2e 35 3a dd |;.    ..| 6,1.5:.|
|00000e90| 81 20 6e 73 68 00 20 20 | 20 20 3b 00 20 20 20 20 |. nsh.  |  ;.    |
|00000ea0| 80 0b 20 63 64 20 20 3b | 63 6f 6c 6f 75 72 20 64 |.. cd  ;|colour d|
|00000eb0| 65 74 65 63 74 3f 00 20 | 20 20 20 20 20 80 16 20 |etect?. |     .. |
|00000ec0| 7a 78 3d 6c 78 20 80 18 | 20 72 78 00 20 20 20 20 |zx=lx ..| rx.    |
|00000ed0| 20 20 80 16 20 7a 79 3d | 79 74 2b 32 34 20 80 18 |  .. zy=|yt+24 ..|
|00000ee0| 20 79 62 2b 32 34 00 20 | 20 20 20 20 20 80 0b 20 | yb+24. |     .. |
|00000ef0| b2 04 28 7a 78 2c 7a 79 | 29 3d 63 64 63 00 20 20 |..(zx,zy|)=cdc.  |
|00000f00| 20 20 20 20 20 20 b2 03 | 20 7a 78 2c 7a 79 2c 30 |      ..| zx,zy,0|
|00000f10| 00 20 20 20 20 20 20 80 | c0 00 20 20 20 20 20 20 |.      .|..      |
|00000f20| 80 17 00 20 20 20 20 20 | 20 80 17 00 20 20 20 20 |...     | ...    |
|00000f30| 80 c0 00 20 20 20 20 3b | 00 20 20 20 20 cd 08 20 |...    ;|.    .. |
|00000f40| 6e 73 68 2c 6c 78 2c 79 | 74 2b 32 34 2c 72 78 2d |nsh,lx,y|t+24,rx-|
|00000f50| 6c 78 2b 31 2c 79 62 2d | 79 74 2b 31 00 20 20 20 |lx+1,yb-|yt+1.   |
|00000f60| 20 80 0b 20 61 75 63 20 | 80 21 20 cd 0d 20 6e 73 | .. auc |.! .. ns|
|00000f70| 68 00 20 20 20 20 3b 00 | 20 20 20 20 80 0b 20 6d |h.    ;.|    .. m|
|00000f80| 73 70 00 20 20 20 20 20 | 20 b8 01 20 6e 73 68 2c |sp.     | .. nsh,|
|00000f90| 6e 73 68 00 20 20 20 20 | 20 20 80 0b 20 6d 73 68 |nsh.    |  .. msh|
|00000fa0| 3d 30 20 80 21 20 80 2b | 20 cd 0c 20 6e 73 68 00 |=0 .! .+| .. nsh.|
|00000fb0| 20 20 20 20 80 02 20 80 | 0b 00 20 20 20 20 3b 00 |    .. .|..    ;.|
|00000fc0| 20 20 20 20 bb 84 20 6c | 78 2c 79 74 2b 32 34 2c |    .. l|x,yt+24,|
|00000fd0| 72 78 2c 79 62 2b 32 34 | 2c 2d 31 3a 80 37 20 32 |rx,yb+24|,-1:.7 2|
|00000fe0| 00 20 20 20 20 bb 84 20 | 6c 78 2c 79 74 2b 32 34 |.    .. |lx,yt+24|
|00000ff0| 2c 72 78 2c 79 62 2b 32 | 34 2c 30 00 20 20 20 20 |,rx,yb+2|4,0.    |
|00001000| 3b 00 20 20 20 20 79 74 | 3d 79 74 32 3a 79 62 3d |;.    yt|=yt2:yb=|
|00001010| 79 62 32 3a 80 05 20 6d | 61 69 6e 32 00 20 20 20 |yb2:.. m|ain2.   |
|00001020| 20 3b 00 20 20 80 02 20 | 80 0b 00 20 20 80 05 20 | ;.  .. |...  .. |
|00001030| 6d 61 69 6e 00 80 02 20 | 80 0b 00 3b 00 80 07 00 |main... |...;....|
+--------+-------------------------+-------------------------+--------+--------+