/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Basic / BLZ_EXD.DMS / in.adf / bum6 / rollasex.bb2

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 00 3b 20 6d 79 20 6c | 69 74 74 6c 65 20 62 6c |;.; my l|ittle bl|
|00000010| 61 63 6b 20 62 6f 6f 6b | 20 76 30 2e 30 00 3b 00 |ack book| v0.0.;.|
|00000020| 00 80 01 20 2e 66 69 65 | 6e 64 00 20 20 74 24 5b |... .fie|nd.  t$[|
|00000030| 38 5d 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |8]      |        |
|00000040| 20 20 20 20 20 20 20 3b | 65 61 63 68 20 72 65 63 |       ;|each rec|
|00000050| 6f 72 64 20 63 61 6e 20 | 68 61 76 65 20 38 20 6c |ord can |have 8 l|
|00000060| 69 6e 65 73 20 28 30 2e | 2e 37 29 00 80 02 20 80 |ines (0.|.7)... .|
|00000070| 01 00 00 80 04 20 80 b3 | 20 75 2e 66 69 65 6e 64 |..... ..| u.fiend|
|00000080| 28 35 30 30 30 29 20 20 | 20 20 20 20 3b 35 30 30 |(5000)  |    ;500|
|00000090| 30 20 6d 61 78 20 65 6e | 74 72 69 65 73 00 00 80 |0 max en|tries...|
|000000a0| 04 20 2a 70 74 72 2e 66 | 69 65 6e 64 28 31 30 29 |. *ptr.f|iend(10)|
|000000b0| 20 20 20 20 20 20 20 20 | 20 20 3b 70 6f 69 6e 74 |        |  ;point|
|000000c0| 65 72 73 20 66 6f 72 20 | 6d 75 6c 74 69 20 63 6f |ers for |multi co|
|000000d0| 6c 75 6d 6e 20 70 72 69 | 6e 74 69 6e 67 00 00 80 |lumn pri|nting...|
|000000e0| 32 20 70 24 3d 31 36 30 | 3a 80 32 20 66 24 3d 36 |2 p$=160|:.2 f$=6|
|000000f0| 34 20 20 3b 66 69 6c 65 | 20 72 65 71 75 65 73 74 |4  ;file| request|
|00000100| 65 72 20 76 61 72 69 61 | 62 6c 65 73 00 00 cf 04 |er varia|bles....|
|00000110| 20 30 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | 0      |        |
|00000120| 20 20 3b 75 73 65 20 77 | 6f 72 6b 62 65 6e 63 68 |  ;use w|orkbench|
|00000130| 00 80 06 20 73 65 74 75 | 70 77 69 6e 64 6f 77 00 |... setu|pwindow.|
|00000140| 80 06 20 6e 65 77 66 69 | 65 6e 64 00 63 6f 6c 3d |.. newfi|end.col=|
|00000150| 32 3a 77 69 64 3d 34 32 | 3a 68 69 3d 39 3a 80 06 |2:wid=42|:hi=9:..|
|00000160| 20 70 72 69 6e 74 73 65 | 74 00 00 80 bb 00 20 20 | printse|t.....  |
|00000170| 65 76 2e 6c 3d c5 02 00 | 20 20 80 0b 20 65 76 3d |ev.l=...|  .. ev=|
|00000180| 24 34 30 20 80 21 20 67 | 68 3d c5 04 20 80 22 20 |$40 .! g|h=.. ." |
|00000190| 67 68 3d 2d 31 00 20 20 | 80 0e 20 67 68 00 20 20 |gh=-1.  |.. gh.  |
|000001a0| 20 20 80 0f 20 30 3a 80 | 06 20 6e 65 77 66 69 65 |  .. 0:.|. newfie|
|000001b0| 6e 64 00 20 20 20 20 80 | 0f 20 31 3a 80 06 20 64 |nd.    .|. 1:.. d|
|000001c0| 65 6c 65 74 65 66 69 65 | 6e 64 00 20 20 20 20 80 |eletefie|nd.    .|
|000001d0| 0f 20 32 3a 80 06 20 6c | 61 73 74 66 69 65 6e 64 |. 2:.. l|astfiend|
|000001e0| 00 20 20 20 20 80 0f 20 | 33 3a 80 06 20 6e 65 78 |.    .. |3:.. nex|
|000001f0| 74 66 69 65 6e 64 00 20 | 20 20 20 80 0f 20 34 3a |tfiend. |   .. 4:|
|00000200| 74 65 73 74 3d 30 3a 80 | 06 20 64 6f 70 72 69 6e |test=0:.|. doprin|
|00000210| 74 6f 75 74 00 20 20 20 | 20 80 0f 20 35 3a 80 06 |tout.   | .. 5:..|
|00000220| 20 64 6f 6c 6f 61 64 00 | 20 20 20 20 80 0f 20 36 | doload.|    .. 6|
|00000230| 3a 80 06 20 64 6f 73 61 | 76 65 00 20 20 20 20 80 |:.. dosa|ve.    .|
|00000240| 0f 20 32 30 3a 80 06 20 | 73 65 61 72 63 68 00 20 |. 20:.. |search. |
|00000250| 20 20 20 80 0f 20 32 31 | 3a 80 06 20 6e 78 73 65 |   .. 21|:.. nxse|
|00000260| 61 72 63 68 00 20 20 20 | 20 80 0f 20 33 30 3a 63 |arch.   | .. 30:c|
|00000270| 6f 6c 3d bc 01 28 c6 14 | 28 30 2c 33 30 29 29 3a |ol=..(..|(0,30)):|
|00000280| 80 06 20 70 72 69 6e 74 | 73 65 74 00 20 20 20 20 |.. print|set.    |
|00000290| 80 0f 20 33 31 3a 77 69 | 64 3d bc 01 28 c6 14 28 |.. 31:wi|d=..(..(|
|000002a0| 30 2c 33 31 29 29 3a 80 | 06 20 70 72 69 6e 74 73 |0,31)):.|. prints|
|000002b0| 65 74 00 20 20 20 20 80 | 0f 20 33 32 3a 68 69 3d |et.    .|. 32:hi=|
|000002c0| bc 01 28 c6 14 28 30 2c | 33 32 29 29 3a 80 06 20 |..(..(0,|32)):.. |
|000002d0| 70 72 69 6e 74 73 65 74 | 00 20 20 20 20 80 0f 20 |printset|.    .. |
|000002e0| 33 33 3a 74 65 73 74 3d | 31 3a 80 06 20 64 6f 70 |33:test=|1:.. dop|
|000002f0| 72 69 6e 74 6f 75 74 00 | 20 20 80 02 20 80 0e 00 |rintout.|  .. ...|
|00000300| 20 20 80 0b 20 67 68 3e | 39 20 80 42 20 67 68 3c |  .. gh>|9 .B gh<|
|00000310| 31 38 20 80 21 20 69 3d | 67 68 2d 31 30 3a 80 06 |18 .! i=|gh-10:..|
|00000320| 20 75 70 64 61 74 65 66 | 69 65 6c 64 00 80 bc 20 | updatef|ield... |
|00000330| 65 76 3d 24 32 30 30 00 | 80 02 00 00 2e 70 72 69 |ev=$200.|.....pri|
|00000340| 6e 74 73 65 74 00 20 20 | c6 1b 20 30 2c 33 30 2c |ntset.  |.. 0,30,|
|00000350| dd 83 28 63 6f 6c 29 3a | c6 0b 20 30 2c 33 30 20 |..(col):|.. 0,30 |
|00000360| 20 3b 75 70 64 61 74 65 | 20 73 74 72 69 6e 67 20 | ;update| string |
|00000370| 67 61 64 67 65 74 73 00 | 20 20 c6 1b 20 30 2c 33 |gadgets.|  .. 0,3|
|00000380| 31 2c dd 83 28 77 69 64 | 29 3a c6 0b 20 30 2c 33 |1,..(wid|):.. 0,3|
|00000390| 31 20 20 3b 66 6f 72 20 | 6c 61 62 65 6c 20 70 72 |1  ;for |label pr|
|000003a0| 69 6e 74 69 6e 67 00 20 | 20 c6 1b 20 30 2c 33 32 |inting. | .. 0,32|
|000003b0| 2c dd 83 28 68 69 29 3a | c6 0b 20 30 2c 33 32 20 |,..(hi):|.. 0,32 |
|000003c0| 20 20 3b 63 6f 6e 74 72 | 6f 6c 73 00 20 20 80 07 |  ;contr|ols.  ..|
|000003d0| 00 00 2e 73 65 61 72 63 | 68 00 20 20 73 72 63 68 |...searc|h.  srch|
|000003e0| 24 3d dc 98 28 c6 14 28 | 30 2c 32 30 29 29 20 20 |$=..(..(|0,20))  |
|000003f0| 20 20 20 20 20 3b 67 65 | 74 20 73 65 61 72 63 68 |     ;ge|t search|
|00000400| 20 73 74 72 69 6e 67 00 | 20 20 c0 04 20 75 28 29 | string.|  .. u()|
|00000410| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000420| 20 20 20 20 20 20 20 20 | 20 3b 73 74 61 72 74 20 |        | ;start |
|00000430| 66 72 6f 6d 20 73 63 72 | 61 74 63 68 00 2e 6e 78 |from scr|atch..nx|
|00000440| 73 65 61 72 63 68 00 20 | 20 80 0c 20 c0 03 28 75 |search. | .. ..(u|
|00000450| 28 29 29 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |())     |        |
|00000460| 20 20 20 20 20 20 3b 6c | 6f 6f 70 20 74 68 72 6f |      ;l|oop thro|
|00000470| 75 67 68 20 6c 6f 6f 6b | 69 6e 67 00 20 20 20 20 |ugh look|ing.    |
|00000480| 80 16 20 69 3d 30 20 80 | 18 20 37 00 20 20 20 20 |.. i=0 .|. 7.    |
|00000490| 20 20 80 0b 20 dc 89 28 | dc 98 28 75 28 29 5c 74 |  .. ..(|..(u()\t|
|000004a0| 5b 69 5d 29 2c 73 72 63 | 68 24 29 20 80 21 20 80 |[i]),src|h$) .! .|
|000004b0| be 20 80 16 3a 80 05 20 | 64 72 61 77 66 69 65 6e |. ..:.. |drawfien|
|000004c0| 64 00 20 20 20 20 80 17 | 00 20 20 80 c1 00 20 20 |d.    ..|.  ...  |
|000004d0| 80 07 00 00 2e 6e 65 78 | 74 66 69 65 6e 64 00 20 |.....nex|tfiend. |
|000004e0| 20 80 0b 20 80 89 20 c0 | 03 28 75 28 29 29 20 80 | .. .. .|.(u()) .|
|000004f0| 21 20 c0 01 20 75 28 29 | 20 20 3b 72 6f 6c 6c 20 |! .. u()|  ;roll |
|00000500| 61 72 6f 75 6e 64 00 20 | 20 80 06 20 64 72 61 77 |around. | .. draw|
|00000510| 66 69 65 6e 64 3a 80 07 | 00 00 2e 6c 61 73 74 66 |fiend:..|...lastf|
|00000520| 69 65 6e 64 00 20 20 80 | 0b 20 80 89 20 c0 0b 28 |iend.  .|. .. ..(|
|00000530| 75 28 29 29 20 80 21 20 | c0 0c 20 75 28 29 00 20 |u()) .! |.. u(). |
|00000540| 20 80 06 20 64 72 61 77 | 66 69 65 6e 64 3a 80 07 | .. draw|fiend:..|
|00000550| 00 00 2e 64 65 6c 65 74 | 65 66 69 65 6e 64 00 20 |...delet|efiend. |
|00000560| 20 c0 05 20 75 28 29 20 | 20 20 20 20 20 20 20 20 | .. u() |        |
|00000570| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000580| 20 20 20 20 3b 69 66 20 | 6c 61 73 74 20 69 74 65 |    ;if |last ite|
|00000590| 6d 00 20 20 80 0b 20 80 | 89 20 c0 03 28 75 28 29 |m.  .. .|. ..(u()|
|000005a0| 29 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |)       |        |
|000005b0| 20 20 20 20 20 20 3b 63 | 72 65 61 74 65 20 61 20 |      ;c|reate a |
|000005c0| 62 6c 61 6e 6b 20 6f 6e | 65 00 20 20 20 20 80 0b |blank on|e.    ..|
|000005d0| 20 80 89 20 c0 01 28 75 | 28 29 29 20 80 21 20 80 | .. ..(u|()) .! .|
|000005e0| 06 20 6e 65 77 66 69 65 | 6e 64 00 20 20 80 c0 00 |. newfie|nd.  ...|
|000005f0| 20 20 80 06 20 64 72 61 | 77 66 69 65 6e 64 3a 80 |  .. dra|wfiend:.|
|00000600| 07 00 00 2e 6e 65 77 66 | 69 65 6e 64 00 20 20 80 |....newf|iend.  .|
|00000610| 0b 20 c0 02 28 75 28 29 | 29 00 20 20 20 20 75 28 |. ..(u()|).    u(|
|00000620| 29 5c 74 5b 30 5d 3d 22 | 2a 2a 4e 45 57 2a 2a 22 |)\t[0]="|**NEW**"|
|00000630| 3a 80 06 20 64 72 61 77 | 66 69 65 6e 64 00 20 20 |:.. draw|fiend.  |
|00000640| 80 c0 00 20 20 80 07 00 | 00 2e 75 70 64 61 74 65 |...  ...|..update|
|00000650| 66 69 65 6c 64 00 20 20 | 75 28 29 5c 74 5b 69 5d |field.  |u()\t[i]|
|00000660| 3d c6 14 28 30 2c 31 30 | 2b 69 29 00 20 20 80 0b |=..(0,10|+i).  ..|
|00000670| 20 69 3c 37 20 80 21 20 | c6 12 20 30 2c 31 30 2b | i<7 .! |.. 0,10+|
|00000680| 69 2b 31 00 20 20 80 07 | 00 00 2e 64 72 61 77 66 |i+1.  ..|...drawf|
|00000690| 69 65 6e 64 00 20 20 80 | 16 20 69 3d 30 20 80 18 |iend.  .|. i=0 ..|
|000006a0| 20 37 3a c6 1b 20 30 2c | 31 30 2b 69 2c 75 28 29 | 7:.. 0,|10+i,u()|
|000006b0| 5c 74 5b 69 5d 3a c6 0b | 20 30 2c 31 30 2b 69 3a |\t[i]:..| 0,10+i:|
|000006c0| 80 17 00 20 20 c6 13 20 | 30 2c 31 30 3a c6 12 20 |...  .. |0,10:.. |
|000006d0| 30 2c 31 30 3a 80 07 00 | 00 2e 64 6f 6c 6f 61 64 |0,10:...|..doload|
|000006e0| 00 20 20 66 24 3d cc 01 | 28 22 4c 4f 41 44 20 46 |.  f$=..|("LOAD F|
|000006f0| 49 4c 45 22 2c 70 24 2c | 66 24 29 20 20 3b 72 65 |ILE",p$,|f$)  ;re|
|00000700| 61 64 20 66 69 6c 65 20 | 66 72 6f 6d 20 64 69 73 |ad file |from dis|
|00000710| 6b 00 20 20 80 0b 20 be | 11 28 30 2c 66 24 29 20 |k.  .. .|.(0,f$) |
|00000720| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000730| 20 20 3b 77 6f 72 6b 73 | 20 77 69 74 68 20 61 6e |  ;works| with an|
|00000740| 79 20 74 65 78 74 20 66 | 69 6c 65 00 20 20 20 20 |y text f|ile.    |
|00000750| c0 07 20 75 28 29 3a be | 08 20 30 3a 69 3d 30 20 |.. u():.|. 0:i=0 |
|00000760| 20 20 20 20 3b 73 65 70 | 61 72 61 74 65 64 20 62 |    ;sep|arated b|
|00000770| 79 20 62 6c 61 6e 6b 20 | 6c 69 6e 65 73 00 20 20 |y blank |lines.  |
|00000780| 20 20 80 0c 20 80 89 20 | be 0d 28 30 29 00 20 20 |  .. .. |..(0).  |
|00000790| 20 20 20 20 61 24 3d dd | 01 28 31 32 38 29 00 20 |    a$=.|.(128). |
|000007a0| 20 20 20 20 20 80 0b 20 | 69 3d 30 20 80 42 20 61 |     .. |i=0 .B a|
|000007b0| 24 3c 3e 22 22 20 80 21 | 20 c0 02 20 75 28 29 00 |$<>"" .!| .. u().|
|000007c0| 20 20 20 20 20 20 80 0b | 20 61 24 3c 3e 22 22 00 |      ..| a$<>"".|
|000007d0| 20 20 20 20 20 20 20 20 | 75 28 29 5c 74 5b 69 5d |        |u()\t[i]|
|000007e0| 3d 61 24 3a 80 0b 20 69 | 3c 37 20 80 21 20 69 2b |=a$:.. i|<7 .! i+|
|000007f0| 31 20 80 22 20 69 3d 30 | 00 20 20 20 20 20 20 80 |1 ." i=0|.      .|
|00000800| 22 00 20 20 20 20 20 20 | 20 20 69 3d 30 00 20 20 |".      |  i=0.  |
|00000810| 20 20 20 20 80 c0 00 20 | 20 20 20 80 c1 00 20 20 |    ... |   ...  |
|00000820| 20 20 be 02 20 30 00 20 | 20 80 c0 00 20 20 80 06 |  .. 0. | ...  ..|
|00000830| 20 64 72 61 77 66 69 65 | 6e 64 3a 80 07 00 00 2e | drawfie|nd:.....|
|00000840| 64 6f 73 61 76 65 00 20 | 20 66 24 3d cc 01 28 22 |dosave. | f$=..("|
|00000850| 53 41 56 45 20 46 49 4c | 45 22 2c 70 24 2c 66 24 |SAVE FIL|E",p$,f$|
|00000860| 29 20 20 20 20 20 20 20 | 20 20 20 3b 77 72 69 74 |)       |   ;writ|
|00000870| 65 20 64 61 74 61 20 74 | 6f 20 64 69 73 6b 00 20 |e data t|o disk. |
|00000880| 20 80 0b 20 be 12 28 30 | 2c 66 24 29 00 20 20 20 | .. ..(0|,f$).   |
|00000890| 20 be 07 20 30 00 20 20 | 20 20 c0 04 20 75 28 29 | .. 0.  |  .. u()|
|000008a0| 00 20 20 20 20 80 0c 20 | c0 03 28 75 28 29 29 00 |.    .. |..(u()).|
|000008b0| 20 20 20 20 20 20 80 16 | 20 69 3d 30 20 80 18 20 |      ..| i=0 .. |
|000008c0| 37 3a dd 82 20 75 28 29 | 5c 74 5b 69 5d 3a 80 17 |7:.. u()|\t[i]:..|
|000008d0| 00 20 20 20 20 80 c1 00 | 20 20 20 20 be 02 20 30 |.    ...|    .. 0|
|000008e0| 00 20 20 80 c0 00 20 20 | 80 07 00 00 2e 73 65 74 |.  ...  |.....set|
|000008f0| 75 70 77 69 6e 64 6f 77 | 00 20 20 80 c8 20 67 61 |upwindow|.  .. ga|
|00000900| 64 73 00 20 20 80 16 20 | 69 3d 30 20 80 18 20 36 |ds.  .. |i=0 .. 6|
|00000910| 00 20 20 20 20 80 1b 20 | 61 24 3a 61 24 3d dc 96 |.    .. |a$:a$=..|
|00000920| 28 61 24 2c 36 29 3a c6 | 01 20 30 2c 38 2b 69 2a |(a$,6):.|. 0,8+i*|
|00000930| 35 38 2c 31 36 2c 30 2c | 69 2c 61 24 00 20 20 80 |58,16,0,|i,a$.  .|
|00000940| 17 00 20 20 80 16 20 69 | 3d 30 20 80 18 20 37 3a |..  .. i|=0 .. 7:|
|00000950| c6 02 20 30 2c 36 2c 33 | 32 2b 69 2a 31 31 2c 30 |.. 0,6,3|2+i*11,0|
|00000960| 2c 31 30 2b 69 2c 31 32 | 38 2c 34 30 30 3a 80 17 |,10+i,12|8,400:..|
|00000970| 00 20 20 c6 02 20 30 2c | 31 34 30 2c 31 33 30 2c |.  .. 0,|140,130,|
|00000980| 30 2c 32 30 2c 33 32 2c | 32 30 30 00 20 20 c6 01 |0,20,32,|200.  ..|
|00000990| 20 30 2c 33 36 30 2c 31 | 33 30 2c 30 2c 32 31 2c | 0,360,1|30,0,21,|
|000009a0| 22 4e 45 58 54 22 00 20 | 20 80 16 20 69 3d 30 20 |"NEXT". | .. i=0 |
|000009b0| 80 18 20 32 00 20 20 20 | 20 c6 02 20 30 2c 31 30 |.. 2.   | .. 0,10|
|000009c0| 30 2c 31 35 34 2b 69 2a | 31 34 2c 30 2c 33 30 2b |0,154+i*|14,0,30+|
|000009d0| 69 2c 36 34 2c 31 30 30 | 00 20 20 80 17 00 20 20 |i,64,100|.  ...  |
|000009e0| c6 01 20 30 2c 32 34 30 | 2c 31 37 30 2c 30 2c 33 |.. 0,240|,170,0,3|
|000009f0| 33 2c 22 54 45 53 54 20 | 50 52 49 4e 54 20 20 58 |3,"TEST |PRINT  X|
|00000a00| 58 58 58 58 58 58 22 00 | 20 20 c5 01 20 30 2c 35 |XXXXXX".|  .. 0,5|
|00000a10| 30 2c 30 2c 34 32 30 2c | 32 30 30 2c 24 31 30 30 |0,0,420,|200,$100|
|00000a20| 65 2c 22 4d 59 20 4c 49 | 54 54 4c 45 20 42 4c 55 |e,"MY LI|TTLE BLU|
|00000a30| 45 20 42 4f 4f 4b 22 2c | 31 2c 32 2c 30 00 20 20 |E BOOK",|1,2,0.  |
|00000a40| c5 10 20 31 36 2c 31 32 | 31 3a dd 81 20 22 53 45 |.. 16,12|1:.. "SE|
|00000a50| 41 52 43 48 20 53 54 52 | 49 4e 47 3a 22 00 20 20 |ARCH STR|ING:".  |
|00000a60| c6 10 20 31 30 2c 31 32 | 38 2c 34 30 30 2c 31 36 |.. 10,12|8,400,16|
|00000a70| 00 20 20 c5 10 20 31 36 | 2c 31 34 35 3a dd 81 20 |.  .. 16|,145:.. |
|00000a80| 22 43 4f 4c 55 4d 4e 53 | 3a 22 00 20 20 c5 10 20 |"COLUMNS|:".  .. |
|00000a90| 31 36 2c 31 35 39 3a dd | 81 20 22 20 20 57 49 44 |16,159:.|. "  WID|
|00000aa0| 54 48 3a 22 00 20 20 c5 | 10 20 31 36 2c 31 37 33 |TH:".  .|. 16,173|
|00000ab0| 3a dd 81 20 22 20 48 45 | 49 47 48 54 3a 22 00 20 |:.. " HE|IGHT:". |
|00000ac0| 20 c6 10 20 31 30 2c 31 | 35 32 2c 34 30 30 2c 34 | .. 10,1|52,400,4|
|00000ad0| 34 00 20 20 80 07 00 00 | 67 61 64 73 3a 80 1a 24 |4.  ....|gads:..$|
|00000ae0| 20 22 41 44 44 22 2c 44 | 45 4c 45 54 45 2c 3c 3d | "ADD",D|ELETE,<=|
|00000af0| 2c 3d 3e 2c 22 50 52 49 | 4e 54 22 2c 4c 4f 41 44 |,=>,"PRI|NT",LOAD|
|00000b00| 2c 53 41 56 45 00 00 2e | 64 6f 70 72 69 6e 74 6f |,SAVE...|doprinto|
|00000b10| 75 74 00 20 20 80 0b 20 | be 12 28 30 2c 22 70 72 |ut.  .. |..(0,"pr|
|00000b20| 74 3a 22 29 20 20 20 3b | 6f 75 74 70 75 74 20 74 |t:")   ;|output t|
|00000b30| 6f 20 70 72 69 6e 74 65 | 72 00 20 20 20 20 be 07 |o printe|r.    ..|
|00000b40| 20 30 00 20 20 20 20 80 | 0b 20 74 65 73 74 3d 30 | 0.    .|. test=0|
|00000b50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 69 |        |      ;i|
|00000b60| 66 20 6e 6f 74 20 74 65 | 73 74 20 6d 6f 64 65 00 |f not te|st mode.|
|00000b70| 20 20 20 20 20 20 c0 04 | 20 75 28 29 00 20 20 20 |      ..| u().   |
|00000b80| 20 20 20 80 0c 20 c0 03 | 28 75 28 29 29 20 20 3b |   .. ..|(u())  ;|
|00000b90| 73 65 74 20 75 70 20 70 | 6f 69 6e 74 65 72 73 20 |set up p|ointers |
|00000ba0| 66 6f 72 20 6e 65 78 74 | 20 6e 20 66 69 65 6c 64 |for next| n field|
|00000bb0| 73 00 20 20 20 20 20 20 | 20 20 2a 70 74 72 28 31 |s.      |  *ptr(1|
|00000bc0| 29 3d 75 28 29 00 20 20 | 20 20 20 20 20 20 80 16 |)=u().  |      ..|
|00000bd0| 20 69 3d 32 20 80 18 20 | 63 6f 6c 00 20 20 20 20 | i=2 .. |col.    |
|00000be0| 20 20 20 20 20 20 80 0b | 20 c0 03 28 75 28 29 29 |      ..| ..(u())|
|00000bf0| 20 80 21 20 2a 70 74 72 | 28 69 29 3d 75 28 29 00 | .! *ptr|(i)=u().|
|00000c00| 20 20 20 20 20 20 20 20 | 80 17 00 20 20 20 20 20 |        |...     |
|00000c10| 20 20 20 80 16 20 6a 3d | 30 20 80 18 20 68 69 2d |   .. j=|0 .. hi-|
|00000c20| 31 20 20 20 20 3b 74 68 | 65 6e 20 75 73 69 6e 67 |1    ;th|en using|
|00000c30| 20 70 6f 69 6e 74 65 72 | 73 20 70 72 69 6e 74 20 | pointer|s print |
|00000c40| 6f 75 74 20 73 74 69 63 | 6b 65 72 73 00 20 20 20 |out stic|kers.   |
|00000c50| 20 20 20 20 20 20 20 80 | 0b 20 6a 3c 38 00 20 20 |       .|. j<8.  |
|00000c60| 20 20 20 20 20 20 20 20 | 20 20 80 16 20 69 3d 31 |        |  .. i=1|
|00000c70| 20 80 18 20 63 6f 6c 3a | dd 81 20 dc 94 28 2a 70 | .. col:|.. ..(*p|
|00000c80| 74 72 28 69 29 5c 74 5b | 6a 5d 2c 77 69 64 29 3a |tr(i)\t[|j],wid):|
|00000c90| 80 17 00 20 20 20 20 20 | 20 20 20 20 20 80 c0 00 |...     |     ...|
|00000ca0| 20 20 20 20 20 20 20 20 | 20 20 dd 82 20 22 22 00 |        |  .. "".|
|00000cb0| 20 20 20 20 20 20 20 20 | 80 17 00 20 20 20 20 20 |        |...     |
|00000cc0| 20 80 c1 00 20 20 20 20 | 80 22 00 20 20 20 20 20 | ...    |.".     |
|00000cd0| 20 80 16 20 6b 3d 31 20 | 80 18 20 32 20 20 20 20 | .. k=1 |.. 2    |
|00000ce0| 20 20 20 20 20 20 3b 74 | 65 73 74 20 72 75 6e 20 |      ;t|est run |
|00000cf0| 6f 66 20 63 6f 6c 78 32 | 20 73 74 69 63 6b 65 72 |of colx2| sticker|
|00000d00| 73 00 20 20 20 20 20 20 | 20 20 80 16 20 6a 3d 30 |s.      |  .. j=0|
|00000d10| 20 80 18 20 68 69 2d 31 | 00 20 20 20 20 20 20 20 | .. hi-1|.       |
|00000d20| 20 20 20 80 0b 20 6a 3c | 38 00 20 20 20 20 20 20 |   .. j<|8.      |
|00000d30| 20 20 20 20 20 20 80 16 | 20 69 3d 31 20 80 18 20 |      ..| i=1 .. |
|00000d40| 63 6f 6c 3a dd 81 20 dc | 88 28 22 58 22 2c 77 69 |col:.. .|.("X",wi|
|00000d50| 64 2d 32 29 2c 22 2e 2e | 22 3a 80 17 00 20 20 20 |d-2),"..|":...   |
|00000d60| 20 20 20 20 20 20 20 80 | c0 00 20 20 20 20 20 20 |       .|..      |
|00000d70| 20 20 20 20 dd 82 20 22 | 22 00 20 20 20 20 20 20 |    .. "|".      |
|00000d80| 20 20 80 17 00 20 20 20 | 20 20 20 80 17 00 20 20 |  ...   |   ...  |
|00000d90| 20 20 80 c0 00 20 20 20 | 20 be 02 20 30 00 20 20 |  ...   | .. 0.  |
|00000da0| 80 c0 00 20 20 80 07 00 | 00                      |...  ...|.       |
+--------+-------------------------+-------------------------+--------+--------+