/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Basic / bb_exa.dms / in.adf / andrewsdemos / parjoy.bb

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| da 01 2e 62 20 24 62 66 | 65 33 30 31 2c 30 20 3b |...b $bf|e301,0 ;|
|00000010| 32 35 35 00 00 80 0c 20 | df 04 28 30 29 3d 30 00 |255.... |..(0)=0.|
|00000020| 20 20 dd 81 20 dc 82 28 | dc 85 28 da 02 2e 62 28 |  .. ..(|..(...b(|
|00000030| 24 62 66 65 31 30 31 29 | 29 2c 38 29 2c 22 20 20 |$bfe101)|),8),"  |
|00000040| 22 00 20 20 6d 61 72 6b | 31 2e 77 3d da 02 2e 62 |".  mark|1.w=...b|
|00000050| 28 24 62 66 65 31 30 31 | 29 00 20 20 6d 61 72 6b |($bfe101|).  mark|
|00000060| 32 2e 77 3d da 02 2e 62 | 28 24 62 66 64 30 30 30 |2.w=...b|($bfd000|
|00000070| 29 00 20 20 dd 81 20 dc | 82 28 dc 85 28 da 02 2e |).  .. .|.(..(...|
|00000080| 62 28 24 62 66 64 30 30 | 30 29 29 2c 38 29 2c 22 |b($bfd00|0)),8),"|
|00000090| 20 20 22 00 00 20 20 6a | 6f 78 3d 28 6d 61 72 6b |  "..  j|ox=(mark|
|000000a0| 31 26 34 20 2d 20 28 6d | 61 72 6b 31 26 38 29 20 |1&4 - (m|ark1&8) |
|000000b0| 80 45 20 31 29 80 45 20 | 32 20 2b 20 31 00 20 20 |.E 1).E |2 + 1.  |
|000000c0| 6a 6f 79 3d 6d 61 72 6b | 31 26 31 20 2d 20 28 6d |joy=mark|1&1 - (m|
|000000d0| 61 72 6b 31 26 32 29 20 | 80 45 20 31 20 2b 20 28 |ark1&2) |.E 1 + (|
|000000e0| 6d 61 72 6b 32 26 34 29 | 20 80 45 20 32 00 20 20 |mark2&4)| .E 2.  |
|000000f0| dd 81 20 22 20 22 2c 6a | 6f 78 2c 6a 6f 79 2c 22 |.. " ",j|ox,joy,"|
|00000100| 20 22 00 00 20 20 6a 6f | 78 3d 28 6d 61 72 6b 31 | "..  jo|x=(mark1|
|00000110| 26 36 34 20 2d 20 28 6d | 61 72 6b 31 26 31 32 38 |&64 - (m|ark1&128|
|00000120| 29 20 80 45 20 31 29 80 | 45 20 36 20 2b 20 31 00 |) .E 1).|E 6 + 1.|
|00000130| 20 20 6a 6f 79 3d 28 6d | 61 72 6b 31 26 31 36 20 |  joy=(m|ark1&16 |
|00000140| 2d 20 28 6d 61 72 6b 31 | 26 33 32 29 20 80 45 20 |- (mark1|&32) .E |
|00000150| 31 29 80 45 20 34 20 2b | 20 28 6d 61 72 6b 32 26 |1).E 4 +| (mark2&|
|00000160| 31 29 00 00 20 20 dd 81 | 20 22 20 22 2c 6a 6f 78 |1)..  ..| " ",jox|
|00000170| 2c 6a 6f 79 2c 22 20 22 | 00 00 20 20 dd 81 20 22 |,joy," "|..  .. "|
|00000180| 20 22 2c df 01 28 31 29 | 2b 31 2c df 02 28 31 29 | ",..(1)|+1,..(1)|
|00000190| 2b 31 2c 22 20 22 00 00 | 20 20 dd 82 20 22 22 00 |+1," "..|  .. "".|
|000001a0| 80 c1 00 00 80 02 00 00 | 3b 73 6f 72 72 79 20 61 |........|;sorry a|
|000001b0| 20 62 69 74 20 6f 66 20 | 63 72 65 61 74 69 76 65 | bit of |creative|
|000001c0| 20 6c 69 63 65 6e 73 65 | 20 61 62 6f 76 65 2e 2e | license| above..|
|000001d0| 00 3b 6a 6f 79 73 74 69 | 63 6b 20 33 00 3b 20 20 |.;joysti|ck 3.;  |
|000001e0| 6a 6f 78 3d 28 6d 61 72 | 6b 31 26 34 20 2d 20 28 |jox=(mar|k1&4 - (|
|000001f0| 6d 61 72 6b 31 26 38 29 | 20 41 53 52 20 31 29 41 |mark1&8)| ASR 1)A|
|00000200| 53 52 20 32 20 2b 20 31 | 00 3b 20 20 6a 6f 79 3d |SR 2 + 1|.;  joy=|
|00000210| 6d 61 72 6b 31 26 31 20 | 2d 20 28 6d 61 72 6b 31 |mark1&1 |- (mark1|
|00000220| 26 32 29 20 41 53 52 20 | 31 00 3b 20 20 66 69 72 |&2) ASR |1.;  fir|
|00000230| 65 3d 20 28 6d 61 72 6b | 32 26 34 29 20 41 53 52 |e= (mark|2&4) ASR|
|00000240| 20 32 00 3b 00 3b 6a 6f | 79 73 74 69 63 6b 20 34 | 2.;.;jo|ystick 4|
|00000250| 00 3b 20 20 6a 6f 78 3d | 28 6d 61 72 6b 31 26 36 |.;  jox=|(mark1&6|
|00000260| 34 20 2d 20 28 6d 61 72 | 6b 31 26 31 32 38 29 20 |4 - (mar|k1&128) |
|00000270| 41 53 52 20 31 29 41 53 | 52 20 36 20 2b 20 31 00 |ASR 1)AS|R 6 + 1.|
|00000280| 3b 20 20 6a 6f 79 3d 28 | 6d 61 72 6b 31 26 31 36 |;  joy=(|mark1&16|
|00000290| 20 2d 20 28 6d 61 72 6b | 31 26 33 32 29 20 41 53 | - (mark|1&32) AS|
|000002a0| 52 20 31 29 41 53 52 20 | 34 00 3b 20 20 66 69 72 |R 1)ASR |4.;  fir|
|000002b0| 65 3d 20 28 6d 61 72 6b | 32 26 31 29 00 00       |e= (mark|2&1)..  |
+--------+-------------------------+-------------------------+--------+--------+