home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Basic / bb_ext.dms / in.adf / NewDebugger.lha / examples / Test_CopperTrace.bb2 < prev    next >
Unknown  |  1995-10-21  |  2.3 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% gt2 Kopftext: ';LES Debugger v2.1 Test program' default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 4c 45 53 20 44 65 62 | 75 67 67 65 72 20 76 32 |;LES Deb|ugger v2|
|00000010| 2e 31 20 54 65 73 74 20 | 70 72 6f 67 72 61 6d 00 |.1 Test |program.|
|00000020| 3b 54 65 73 74 69 6e 67 | 20 63 6f 70 70 65 72 20 |;Testing| copper |
|00000030| 64 69 73 61 73 73 65 6d | 62 6c 79 00 00 3b 41 47 |disassem|bly..;AG|
|00000040| 41 20 63 6f 6c 6f 75 72 | 20 73 70 6c 69 74 20 72 |A colour| split r|
|00000050| 6f 75 74 69 6e 65 00 3b | 44 6f 6e 27 74 20 6c 6f |outine.;|Don't lo|
|00000060| 6f 6b 20 61 74 20 74 68 | 65 20 63 6f 64 65 20 68 |ok at th|e code h|
|00000070| 65 72 65 20 2d 20 6a 75 | 73 74 20 63 6f 6d 70 69 |ere - ju|st compi|
|00000080| 6c 65 20 61 6e 64 20 72 | 75 6e 20 69 74 2c 20 74 |le and r|un it, t|
|00000090| 68 65 6e 20 6c 6f 6f 6b | 20 61 72 6f 75 6e 64 00 |hen look| around.|
|000000a0| 3b 74 68 65 20 63 6f 70 | 70 65 72 20 77 69 6e 64 |;the cop|per wind|
|000000b0| 6f 77 20 69 6e 20 74 68 | 65 20 64 65 62 75 67 67 |ow in th|e debugg|
|000000c0| 65 72 20 2d 20 6c 6f 74 | 20 65 61 73 69 65 72 20 |er - lot| easier |
|000000d0| 74 6f 20 66 6f 6c 6c 6f | 77 20 74 68 61 6e 20 74 |to follo|w than t|
|000000e0| 68 65 20 62 6c 69 74 7a | 00 3b 73 74 75 66 66 20 |he blitz|.;stuff |
|000000f0| 68 65 72 65 20 3a 29 00 | 00 3b 53 6f 6d 65 20 68 |here :).|.;Some h|
|00000100| 61 72 64 77 61 72 65 20 | 72 65 67 69 73 74 65 72 |ardware |register|
|00000110| 20 76 61 6c 75 65 73 20 | 66 6f 72 20 6f 75 72 20 | values |for our |
|00000120| 75 73 65 00 23 62 70 6c | 6d 6f 64 31 3d 24 31 30 |use.#bpl|mod1=$10|
|00000130| 38 00 23 62 70 6c 6d 6f | 64 32 3d 24 31 30 61 00 |8.#bplmo|d2=$10a.|
|00000140| 23 62 70 6c 63 6f 6e 33 | 3d 24 31 30 36 00 23 63 |#bplcon3|=$106.#c|
|00000150| 6f 6c 6f 72 30 30 3d 24 | 31 38 30 00 23 63 6f 6c |olor00=$|180.#col|
|00000160| 6f 72 30 31 3d 24 31 38 | 32 00 23 63 6f 6c 6f 72 |or01=$18|2.#color|
|00000170| 30 32 3d 24 31 38 34 00 | 23 63 6f 6c 6f 72 30 33 |02=$184.|#color03|
|00000180| 3d 24 31 38 36 00 00 3b | 4f 75 72 20 63 6f 70 70 |=$186..;|Our copp|
|00000190| 65 72 20 6c 69 73 74 00 | c7 82 20 30 2c 34 34 2c |er list.|.. 0,44,|
|000001a0| 32 35 36 2c 24 31 30 30 | 30 34 2c 38 2c 31 36 2c |256,$100|04,8,16,|
|000001b0| 37 2a 32 30 30 20 20 20 | 20 20 20 20 20 20 20 20 |7*200 | |
|000001c0| 20 20 3b 20 37 20 69 6e | 73 74 72 75 63 74 69 6f | ; 7 in|structio|
|000001d0| 6e 73 20 6f 6e 20 32 30 | 30 20 6c 69 6e 65 73 00 |ns on 20|0 lines.|
|000001e0| d0 01 20 30 2c 33 32 30 | 2c 32 35 36 2c 34 00 00 |.. 0,320|,256,4..|
|000001f0| c7 84 20 30 2c 30 00 6f | 66 66 73 65 74 2e 77 3d |.. 0,0.o|ffset.w=|
|00000200| 34 34 00 00 61 64 2e 6c | 3d da 02 2e 6c 28 80 b8 |44..ad.l|=...l(..|
|00000210| 20 c7 81 28 30 29 2b 32 | 38 29 20 20 20 20 20 20 | ..(0)+2|8) |
|00000220| 20 20 20 20 20 20 20 3b | 20 47 65 74 20 74 68 65 | ;| Get the|
|00000230| 20 63 75 73 74 6f 6d 20 | 61 72 65 61 20 61 64 64 | custom |area add|
|00000240| 72 65 73 73 00 00 3b 54 | 6f 70 20 68 61 6c 66 20 |ress..;T|op half |
|00000250| 6f 66 20 74 68 65 20 64 | 69 73 70 6c 61 79 00 80 |of the d|isplay..|
|00000260| 16 20 68 2e 77 3d 30 20 | 80 18 20 39 39 00 20 20 |. h.w=0 |.. 99. |
|00000270| da 01 2e 77 20 61 64 2c | 28 28 68 2b 6f 66 66 73 |...w ad,|((h+offs|
|00000280| 65 74 29 20 80 7c 20 38 | 29 2b 31 20 20 20 20 20 |et) .| 8|)+1 |
|00000290| 20 20 20 20 20 20 20 3b | 20 57 61 69 74 21 00 20 | ;| Wait!. |
|000002a0| 20 da 01 2e 77 20 61 64 | 2b 32 2c 24 66 66 66 65 | ...w ad|+2,$fffe|
|000002b0| 00 20 20 61 64 2b 34 00 | 20 20 da 01 2e 77 20 61 |. ad+4.| ...w a|
|000002c0| 64 2c 23 62 70 6c 63 6f | 6e 33 20 20 20 20 20 20 |d,#bplco|n3 |
|000002d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000002e0| 20 20 3b 20 48 69 67 68 | 20 6e 69 62 62 6c 65 73 | ; High| nibbles|
|000002f0| 00 20 20 da 01 2e 77 20 | 61 64 2b 32 2c 24 30 63 |. ...w |ad+2,$0c|
|00000300| 30 30 00 20 20 61 64 2b | 34 00 00 20 20 6e 2e 77 |00. ad+|4.. n.w|
|00000310| 3d 28 28 68 2a 32 29 20 | 80 42 20 24 66 30 29 20 |=((h*2) |.B $f0) |
|00000320| 80 45 20 34 00 20 20 76 | 6c 2e 77 3d 6e 20 20 20 |.E 4. v|l.w=n |
|00000330| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000340| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000350| 20 3b 20 43 6f 6c 6f 75 | 72 20 76 61 6c 75 65 73 | ; Colou|r values|
|00000360| 00 20 20 76 6c 3d 28 76 | 6c 20 80 44 20 34 29 2b |. vl=(v|l .D 4)+|
|00000370| 6e 00 20 20 76 6c 3d 28 | 76 6c 20 80 44 20 34 29 |n. vl=(|vl .D 4)|
|00000380| 2b 6e 00 20 20 da 01 2e | 77 20 61 64 2c 23 63 6f |+n. ...|w ad,#co|
|00000390| 6c 6f 72 30 30 00 20 20 | da 01 2e 77 20 61 64 2b |lor00. |...w ad+|
|000003a0| 32 2c 76 6c 00 20 20 61 | 64 2b 34 00 20 20 da 01 |2,vl. a|d+4. ..|
|000003b0| 2e 77 20 61 64 2c 23 63 | 6f 6c 6f 72 30 31 00 20 |.w ad,#c|olor01. |
|000003c0| 20 da 01 2e 77 20 61 64 | 2b 32 2c 28 76 6c 20 80 | ...w ad|+2,(vl .|
|000003d0| 42 20 24 66 30 30 29 00 | 20 20 61 64 2b 34 00 00 |B $f00).| ad+4..|
|000003e0| 20 20 da 01 2e 77 20 61 | 64 2c 23 62 70 6c 63 6f | ...w a|d,#bplco|
|000003f0| 6e 33 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |n3 | |
|00000400| 20 20 20 20 20 20 20 20 | 20 20 3b 20 4c 6f 77 20 | | ; Low |
|00000410| 6e 69 62 62 6c 65 73 00 | 20 20 da 01 2e 77 20 61 |nibbles.| ...w a|
|00000420| 64 2b 32 2c 24 30 65 30 | 30 00 20 20 61 64 2b 34 |d+2,$0e0|0. ad+4|
|00000430| 00 00 20 20 6e 3d 28 28 | 68 2a 32 29 20 80 42 20 |.. n=((|h*2) .B |
|00000440| 24 66 29 00 20 20 76 6c | 2e 77 3d 6e 20 20 20 20 |$f). vl|.w=n |
|00000450| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000460| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000470| 3b 20 43 6f 6c 6f 75 72 | 20 76 61 6c 75 65 73 00 |; Colour| values.|
|00000480| 20 20 76 6c 3d 28 76 6c | 20 80 44 20 34 29 2b 6e | vl=(vl| .D 4)+n|
|00000490| 00 20 20 76 6c 3d 28 76 | 6c 20 80 44 20 34 29 2b |. vl=(v|l .D 4)+|
|000004a0| 6e 00 20 20 da 01 2e 77 | 20 61 64 2c 23 63 6f 6c |n. ...w| ad,#col|
|000004b0| 6f 72 30 30 00 20 20 da | 01 2e 77 20 61 64 2b 32 |or00. .|..w ad+2|
|000004c0| 2c 76 6c 00 20 20 61 64 | 2b 34 00 20 20 da 01 2e |,vl. ad|+4. ...|
|000004d0| 77 20 61 64 2c 23 63 6f | 6c 6f 72 30 31 00 20 20 |w ad,#co|lor01. |
|000004e0| da 01 2e 77 20 61 64 2b | 32 2c 28 76 6c 20 80 42 |...w ad+|2,(vl .B|
|000004f0| 20 24 66 30 30 29 00 20 | 20 61 64 2b 34 00 80 17 | $f00). | ad+4...|
|00000500| 20 68 00 00 3b 42 6f 74 | 74 6f 6d 20 68 61 6c 66 | h..;Bot|tom half|
|00000510| 20 6f 66 20 74 68 65 20 | 64 69 73 70 6c 61 79 00 | of the |display.|
|00000520| 80 16 20 68 2e 77 3d 39 | 39 20 80 18 20 30 20 80 |.. h.w=9|9 .. 0 .|
|00000530| 19 20 2d 31 00 20 20 da | 01 2e 77 20 61 64 2c 28 |. -1. .|..w ad,(|
|00000540| 28 6f 66 66 73 65 74 2b | 31 39 38 2d 68 29 20 80 |(offset+|198-h) .|
|00000550| 7c 20 38 29 2b 31 20 20 | 20 20 20 20 20 20 3b 20 || 8)+1 | ; |
|00000560| 57 61 69 74 21 00 20 20 | da 01 2e 77 20 61 64 2b |Wait!. |...w ad+|
|00000570| 32 2c 24 66 66 66 65 00 | 20 20 61 64 2b 34 00 20 |2,$fffe.| ad+4. |
|00000580| 20 da 01 2e 77 20 61 64 | 2c 23 62 70 6c 63 6f 6e | ...w ad|,#bplcon|
|00000590| 33 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |3 | |
|000005a0| 20 20 20 20 20 20 20 20 | 20 3b 20 48 69 67 68 20 | | ; High |
|000005b0| 6e 69 62 62 6c 65 73 00 | 20 20 da 01 2e 77 20 61 |nibbles.| ...w a|
|000005c0| 64 2b 32 2c 24 30 63 30 | 30 00 20 20 61 64 2b 34 |d+2,$0c0|0. ad+4|
|000005d0| 00 00 20 20 6e 2e 77 3d | 28 28 68 2a 32 29 20 80 |.. n.w=|((h*2) .|
|000005e0| 42 20 24 66 30 29 20 80 | 45 20 34 00 20 20 76 6c |B $f0) .|E 4. vl|
|000005f0| 2e 77 3d 6e 20 20 20 20 | 20 20 20 20 20 20 20 20 |.w=n | |
|00000600| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000610| 20 20 20 20 20 20 20 20 | 3b 20 43 6f 6c 6f 75 72 | |; Colour|
|00000620| 20 76 61 6c 75 65 73 00 | 20 20 76 6c 3d 28 76 6c | values.| vl=(vl|
|00000630| 20 80 44 20 34 29 2b 6e | 00 20 20 76 6c 3d 28 76 | .D 4)+n|. vl=(v|
|00000640| 6c 20 80 44 20 34 29 2b | 6e 00 20 20 da 01 2e 77 |l .D 4)+|n. ...w|
|00000650| 20 61 64 2c 23 63 6f 6c | 6f 72 30 30 00 20 20 da | ad,#col|or00. .|
|00000660| 01 2e 77 20 61 64 2b 32 | 2c 76 6c 00 20 20 61 64 |..w ad+2|,vl. ad|
|00000670| 2b 34 00 20 20 da 01 2e | 77 20 61 64 2c 23 63 6f |+4. ...|w ad,#co|
|00000680| 6c 6f 72 30 31 00 20 20 | da 01 2e 77 20 61 64 2b |lor01. |...w ad+|
|00000690| 32 2c 28 76 6c 20 80 42 | 20 24 66 29 00 20 20 61 |2,(vl .B| $f). a|
|000006a0| 64 2b 34 00 00 20 20 da | 01 2e 77 20 61 64 2c 23 |d+4.. .|..w ad,#|
|000006b0| 62 70 6c 63 6f 6e 33 20 | 20 20 20 20 20 20 20 20 |bplcon3 | |
|000006c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3b | | ;|
|000006d0| 20 4c 6f 77 20 6e 69 62 | 62 6c 65 73 00 20 20 da | Low nib|bles. .|
|000006e0| 01 2e 77 20 61 64 2b 32 | 2c 24 30 65 30 30 00 20 |..w ad+2|,$0e00. |
|000006f0| 20 61 64 2b 34 00 00 20 | 20 6e 3d 28 28 68 2a 32 | ad+4.. | n=((h*2|
|00000700| 29 20 80 42 20 24 66 29 | 00 20 20 76 6c 2e 77 3d |) .B $f)|. vl.w=|
|00000710| 6e 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |n | |
|00000720| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000730| 20 20 20 20 20 3b 20 43 | 6f 6c 6f 75 72 20 76 61 | ; C|olour va|
|00000740| 6c 75 65 73 00 20 20 76 | 6c 3d 28 76 6c 20 80 44 |lues. v|l=(vl .D|
|00000750| 20 34 29 2b 6e 00 20 20 | 76 6c 3d 28 76 6c 20 80 | 4)+n. |vl=(vl .|
|00000760| 44 20 34 29 2b 6e 00 20 | 20 da 01 2e 77 20 61 64 |D 4)+n. | ...w ad|
|00000770| 2c 23 63 6f 6c 6f 72 30 | 30 00 20 20 da 01 2e 77 |,#color0|0. ...w|
|00000780| 20 61 64 2b 32 2c 76 6c | 00 20 20 61 64 2b 34 00 | ad+2,vl|. ad+4.|
|00000790| 20 20 da 01 2e 77 20 61 | 64 2c 23 63 6f 6c 6f 72 | ...w a|d,#color|
|000007a0| 30 31 00 20 20 da 01 2e | 77 20 61 64 2b 32 2c 28 |01. ...|w ad+2,(|
|000007b0| 76 6c 20 80 42 20 24 66 | 29 00 20 20 61 64 2b 34 |vl .B $f|). ad+4|
|000007c0| 00 80 17 20 68 00 00 3b | 4f 70 65 6e 20 74 68 65 |... h..;|Open the|
|000007d0| 20 63 6f 70 70 65 72 20 | 74 72 61 63 65 20 77 69 | copper |trace wi|
|000007e0| 6e 64 6f 77 20 61 74 20 | 74 68 65 20 63 75 73 74 |ndow at |the cust|
|000007f0| 6f 6d 20 61 72 65 61 20 | 6f 66 20 63 6f 70 70 65 |om area |of coppe|
|00000800| 72 20 6c 69 73 74 20 30 | 00 99 85 20 80 b8 20 c7 |r list 0|... .. .|
|00000810| 81 28 30 29 2c 32 38 00 | 00 3b 53 74 6f 70 20 74 |.(0),28.|.;Stop t|
|00000820| 68 65 20 70 72 6f 67 72 | 61 6d 20 74 6f 20 6c 65 |he progr|am to le|
|00000830| 74 20 79 6f 75 20 6c 6f | 6f 6b 20 61 74 20 74 68 |t you lo|ok at th|
|00000840| 65 20 77 69 6e 64 6f 77 | 00 80 2d 00 00 3b 53 74 |e window|..-..;St|
|00000850| 65 70 20 74 68 65 20 66 | 6f 6c 6c 6f 77 69 6e 67 |ep the f|ollowing|
|00000860| 20 63 6f 6d 6d 61 6e 64 | 73 20 74 6f 20 63 72 65 | command|s to cre|
|00000870| 61 74 65 20 61 6e 64 20 | 76 69 65 77 20 74 68 65 |ate and |view the|
|00000880| 20 6e 69 63 65 20 64 69 | 73 70 6c 61 79 20 3a 29 | nice di|splay :)|
|00000890| 00 80 34 00 c7 83 20 30 | 00 00 3b 44 72 61 77 20 |..4... 0|..;Draw |
|000008a0| 73 6f 6d 65 20 63 75 74 | 65 20 70 6f 6c 79 67 6f |some cut|e polygo|
|000008b0| 6e 73 00 bb 8b 20 33 2c | 3f 63 6f 6f 72 64 73 2c |ns... 3,|?coords,|
|000008c0| 31 00 bb 8b 20 33 2c 3f | 63 6f 6f 72 64 73 32 2c |1... 3,?|coords2,|
|000008d0| 31 00 00 3b 4a 75 73 74 | 20 77 61 69 74 20 66 6f |1..;Just| wait fo|
|000008e0| 72 20 79 6f 75 20 74 6f | 20 71 75 69 74 00 80 0a |r you to| quit...|
|000008f0| 00 80 02 00 00 63 6f 6f | 72 64 73 3a 20 80 25 2e |.....coo|rds: .%.|
|00000900| 77 20 30 2c 30 2c 33 31 | 39 2c 30 2c 31 35 39 2c |w 0,0,31|9,0,159,|
|00000910| 39 39 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |99 | |
|00000920| 3b 20 50 6f 6c 79 67 6f | 6e 20 63 6f 6f 72 64 69 |; Polygo|n coordi|
|00000930| 6e 61 74 65 73 00 63 6f | 6f 72 64 73 32 3a 80 25 |nates.co|ords2:.%|
|00000940| 2e 77 20 30 2c 31 39 39 | 2c 31 35 39 2c 39 39 2c |.w 0,199|,159,99,|
|00000950| 33 31 39 2c 31 39 39 00 | 00 |319,199.|. |
+--------+-------------------------+-------------------------+--------+--------+