/ Loadstar 52 / 052.d81 / bytes.s

< prev

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0a 20 6c 73 74 20 6f | 66 66 0d 0d 2a a0 a0 64 |.. lst o|ff..*..d|
|00000010| 69 73 70 6c 61 79 a0 68 | 69 2d 72 65 73 a0 61 6e |isplay.h|i-res.an|
|00000020| 64 a0 62 6f 6f 74 0d 2a | a0 a0 a0 a0 a0 62 79 a0 |d.boot.*|.....by.|
|00000030| 6d 69 6b 65 a0 6d 61 79 | 6e 61 72 64 0d 2a 0d 2a |mike.may|nard.*.*|
|00000040| 62 6f 6f 74 65 72 2e 73 | a0 a0 a0 a0 a0 a0 a0 a0 |booter.s|........|
|00000050| a0 a0 a0 33 2f 31 35 2f | 38 38 0d 0d 20 6f 72 67 |...3/15/|88.. org|
|00000060| 20 34 39 31 35 32 0d 0d | 63 68 72 6f 75 74 20 65 | 49152..|chrout e|
|00000070| 71 75 20 36 35 34 39 30 | 0d 62 6f 72 64 65 72 20 |qu 65490|.border |
|00000080| 65 71 75 20 35 33 32 38 | 30 0d 62 63 6b 67 6e 64 |equ 5328|0.bckgnd|
|00000090| 20 65 71 75 20 35 33 32 | 38 31 0d 0d 73 65 74 6d | equ 532|81..setm|
|000000a0| 73 67 20 65 71 75 20 36 | 35 34 32 34 0d 73 65 74 |sg equ 6|5424.set|
|000000b0| 6c 66 73 20 65 71 75 20 | 36 35 34 36 36 0d 73 65 |lfs equ |65466.se|
|000000c0| 74 6e 61 6d 20 65 71 75 | 20 36 35 34 36 39 0d 6c |tnam equ| 65469.l|
|000000d0| 6f 61 64 20 65 71 75 20 | 36 35 34 39 33 0d 0d 63 |oad equ |65493..c|
|000000e0| 68 6b 63 6f 6d 20 65 71 | 75 20 34 34 37 39 37 0d |hkcom eq|u 44797.|
|000000f0| 66 72 6d 65 76 6c 20 65 | 71 75 20 34 34 34 34 36 |frmevl e|qu 44446|
|00000100| 0d 66 72 65 73 74 72 20 | 65 71 75 20 34 36 37 35 |.frestr |equ 4675|
|00000110| 35 0d 69 6e 64 65 78 20 | 65 71 75 20 33 34 0d 0d |5.index |equ 34..|
|00000120| 69 6e 62 75 66 66 20 65 | 71 75 20 34 32 31 31 38 |inbuff e|qu 42118|
|00000130| 0d 66 72 6d 6e 75 6d 20 | 65 71 75 20 34 34 34 32 |.frmnum |equ 4442|
|00000140| 36 0d 67 65 74 61 64 72 | 20 65 71 75 20 34 37 30 |6.getadr| equ 470|
|00000150| 39 35 0d 0d 75 6e 70 61 | 63 6b 20 65 71 75 20 35 |95..unpa|ck equ 5|
|00000160| 31 34 35 36 0d 64 69 73 | 70 6c 61 79 20 65 71 75 |1456.dis|play equ|
|00000170| 20 35 31 34 35 39 0d 0d | 2a a0 a0 a0 a0 73 65 74 | 51459..|*....set|
|00000180| a0 73 63 72 65 65 6e a0 | 61 6e 64 a0 62 6f 72 64 |.screen.|and.bord|
|00000190| 65 72 0d 20 6c 64 61 20 | 23 30 30 0d 20 73 74 61 |er. lda |#00. sta|
|000001a0| 20 62 6f 72 64 65 72 0d | 20 73 74 61 20 62 63 6b | border.| sta bck|
|000001b0| 67 6e 64 0d 0d 2a a0 a0 | a0 a0 64 69 73 70 6c 61 |gnd..*..|..displa|
|000001c0| 79 a0 62 6f 6f 74 69 6e | 67 a0 6d 65 73 73 61 67 |y.bootin|g.messag|
|000001d0| 65 0d 20 6c 64 78 20 23 | 30 30 0d 5d 6c 6f 6f 70 |e. ldx #|00.]loop|
|000001e0| 20 6c 64 61 20 6d 73 67 | 2c 78 0d 20 62 65 71 20 | lda msg|,x. beq |
|000001f0| 65 6e 64 6d 73 67 0d 20 | 6a 73 72 20 63 68 72 6f |endmsg. |jsr chro|
|00000200| 75 74 0d 20 69 6e 78 0d | 20 6a 6d 70 20 5d 6c 6f |ut. inx.| jmp ]lo|
|00000210| 6f 70 0d 65 6e 64 6d 73 | 67 0d 0d 2a a0 a0 a0 a0 |op.endms|g..*....|
|00000220| 74 75 72 6e a0 6f 66 66 | a0 69 2f 6f a0 6d 65 73 |turn.off|.i/o.mes|
|00000230| 73 61 67 65 73 0d 20 6c | 64 61 20 23 30 30 0d 20 |sages. l|da #00. |
|00000240| 6a 73 72 20 73 65 74 6d | 73 67 0d 0d 2a a0 a0 a0 |jsr setm|sg..*...|
|00000250| a0 a0 a0 a0 6c 6f 61 64 | a0 22 75 6e 70 61 63 6b |....load|."unpack|
|00000260| 65 72 22 0d 2a 0d 2a a0 | a0 a0 a0 a0 a0 73 65 74 |er".*.*.|.....set|
|00000270| a0 6c 6f 67 69 63 61 6c | a0 66 69 6c 65 0d 20 6c |.logical|.file. l|
|00000280| 64 61 20 23 30 33 0d 20 | 6c 64 78 20 23 30 38 0d |da #03. |ldx #08.|
|00000290| 20 6c 64 79 20 23 30 30 | 0d 20 6a 73 72 20 73 65 | ldy #00|. jsr se|
|000002a0| 74 6c 66 73 0d 0d 2a a0 | a0 a0 a0 a0 73 65 74 a0 |tlfs..*.|....set.|
|000002b0| 66 69 6c 65 6e 61 6d 65 | a0 70 61 72 61 6d 73 0d |filename|.params.|
|000002c0| 20 6c 64 61 20 23 30 38 | 0d 20 6c 64 78 20 23 3c | lda #08|. ldx #<|
|000002d0| 75 6e 70 63 6b 72 0d 20 | 6c 64 79 20 23 3e 75 6e |unpckr. |ldy #>un|
|000002e0| 70 63 6b 72 0d 20 6a 73 | 72 20 73 65 74 6e 61 6d |pckr. js|r setnam|
|000002f0| 0d 0d 2a a0 a0 a0 a0 a0 | a0 a0 6c 6f 61 64 a0 74 |..*.....|..load.t|
|00000300| 68 65 a0 66 69 6c 65 0d | 20 6c 64 61 20 23 30 30 |he.file.| lda #00|
|00000310| 0d 20 6c 64 78 20 23 30 | 30 0d 20 6c 64 79 20 23 |. ldx #0|0. ldy #|
|00000320| 32 30 31 0d 20 6a 73 72 | 20 6c 6f 61 64 0d 0d 2a |201. jsr| load..*|
|00000330| a0 a0 a0 a0 73 65 74 75 | 70 a0 62 69 74 6d 61 70 |....setu|p.bitmap|
|00000340| a0 6c 6f 63 61 74 69 6f | 6e 0d 20 6a 73 72 20 63 |.locatio|n. jsr c|
|00000350| 68 6b 63 6f 6d 0d 20 6a | 73 72 20 66 72 6d 6e 75 |hkcom. j|sr frmnu|
|00000360| 6d 0d 20 6a 73 72 20 67 | 65 74 61 64 72 0d 20 73 |m. jsr g|etadr. s|
|00000370| 74 61 20 32 34 39 0d 0d | 2a a0 a0 a0 a0 73 65 74 |ta 249..|*....set|
|00000380| 75 70 a0 63 6f 6c 6f 72 | a0 70 6f 69 6e 74 65 72 |up.color|.pointer|
|00000390| 0d 20 6a 73 72 20 63 68 | 6b 63 6f 6d 0d 20 6a 73 |. jsr ch|kcom. js|
|000003a0| 72 20 66 72 6d 6e 75 6d | 0d 20 6a 73 72 20 67 65 |r frmnum|. jsr ge|
|000003b0| 74 61 64 72 0d 20 73 74 | 61 20 32 35 30 0d 0d 2a |tadr. st|a 250..*|
|000003c0| a0 a0 a0 a0 a0 a0 6c 6f | 61 64 a0 74 68 65 a0 73 |......lo|ad.the.s|
|000003d0| 68 61 70 65 0d 2a 0d 2a | a0 a0 a0 a0 73 65 74 a0 |hape.*.*|....set.|
|000003e0| 6c 6f 67 69 63 61 6c a0 | 66 69 6c 65 a0 70 61 72 |logical.|file.par|
|000003f0| 61 6d 73 0d 20 6c 64 61 | 20 23 30 33 0d 20 6c 64 |ams. lda| #03. ld|
|00000400| 78 20 23 30 38 0d 20 6c | 64 79 20 23 30 30 0d 20 |x #08. l|dy #00. |
|00000410| 6a 73 72 20 73 65 74 6c | 66 73 0d 0d 2a a0 a0 a0 |jsr setl|fs..*...|
|00000420| a0 67 65 74 a0 74 68 65 | a0 73 68 61 70 65 a0 66 |.get.the|.shape.f|
|00000430| 69 6c 65 6e 61 6d 65 0d | 20 6a 73 72 20 63 68 6b |ilename.| jsr chk|
|00000440| 63 6f 6d 0d 20 6a 73 72 | 20 66 72 6d 65 76 6c 0d |com. jsr| frmevl.|
|00000450| 20 6a 73 72 20 66 72 65 | 73 74 72 0d 20 6a 73 72 | jsr fre|str. jsr|
|00000460| 20 73 65 74 6e 61 6d 0d | 0d 2a a0 a0 67 65 74 a0 | setnam.|.*..get.|
|00000470| 74 68 65 a0 73 68 61 70 | 65 27 73 a0 6c 6f 61 64 |the.shap|e's.load|
|00000480| a0 61 64 64 72 65 73 73 | 0d 20 6a 73 72 20 63 68 |.address|. jsr ch|
|00000490| 6b 63 6f 6d 0d 20 6a 73 | 72 20 66 72 6d 6e 75 6d |kcom. js|r frmnum|
|000004a0| 0d 20 6a 73 72 20 67 65 | 74 61 64 72 0d 20 73 74 |. jsr ge|tadr. st|
|000004b0| 79 20 32 35 31 0d 20 73 | 74 61 20 32 35 32 0d 0d |y 251. s|ta 252..|
|000004c0| 2a a0 a0 a0 a0 73 65 74 | 75 70 a0 78 a0 61 6e 64 |*....set|up.x.and|
|000004d0| a0 79 a0 66 6f 72 a0 6c | 6f 61 64 0d 20 70 68 61 |.y.for.l|oad. pha|
|000004e0| 0d 20 74 79 61 0d 20 74 | 61 78 0d 20 70 6c 61 0d |. tya. t|ax. pla.|
|000004f0| 20 74 61 79 0d 0d 2a a0 | a0 a0 a0 a0 a0 a0 6c 6f | tay..*.|......lo|
|00000500| 61 64 a0 74 68 65 a0 66 | 69 6c 65 0d 20 6c 64 61 |ad.the.f|ile. lda|
|00000510| 20 23 30 30 0d 20 6a 73 | 72 20 6c 6f 61 64 0d 0d | #00. js|r load..|
|00000520| 2a a0 a0 a0 a0 a0 73 65 | 74 75 70 a0 6f 74 68 65 |*.....se|tup.othe|
|00000530| 72 a0 73 74 75 66 66 0d | 20 6c 64 61 20 23 30 30 |r.stuff.| lda #00|
|00000540| 0d 20 73 74 61 20 32 35 | 33 0d 20 73 74 61 20 32 |. sta 25|3. sta 2|
|00000550| 35 34 0d 0d 2a a0 a0 a0 | a0 73 68 6f 77 a0 74 68 |54..*...|.show.th|
|00000560| 61 74 a0 68 69 2d 72 65 | 73 a0 70 69 63 0d 20 6c |at.hi-re|s.pic. l|
|00000570| 64 61 20 23 31 34 37 0d | 20 6a 73 72 20 63 68 72 |da #147.| jsr chr|
|00000580| 6f 75 74 0d 20 6a 73 72 | 20 75 6e 70 61 63 6b 0d |out. jsr| unpack.|
|00000590| 20 6a 73 72 20 64 69 73 | 70 6c 61 79 0d 0d 2a a0 | jsr dis|play..*.|
|000005a0| a0 a0 a0 a0 64 65 6c 61 | 79 a0 75 6e 74 69 6c a0 |....dela|y.until.|
|000005b0| 32 a0 69 73 a0 7a 65 72 | 6f 0d 6c 6f 6f 70 31 20 |2.is.zer|o.loop1 |
|000005c0| 6c 64 78 20 23 30 30 0d | 6c 6f 6f 70 32 20 64 65 |ldx #00.|loop2 de|
|000005d0| 78 0d 20 62 6e 65 20 6c | 6f 6f 70 32 0d 20 64 65 |x. bne l|oop2. de|
|000005e0| 63 20 32 0d 20 62 6e 65 | 20 6c 6f 6f 70 31 0d 0d |c 2. bne| loop1..|
|000005f0| 2a a0 a0 a0 a0 a0 6c 6f | 61 64 a0 74 68 65 a0 62 |*.....lo|ad.the.b|
|00000600| 6f 6f 74 a0 66 69 6c 65 | 0d 2a 0d 2a a0 a0 73 65 |oot.file|.*.*..se|
|00000610| 74 a0 74 68 65 a0 6c 6f | 67 69 63 61 6c a0 66 69 |t.the.lo|gical.fi|
|00000620| 6c 65 a0 70 61 72 61 6d | 73 0d 20 6c 64 61 20 23 |le.param|s. lda #|
|00000630| 30 33 0d 20 6c 64 78 20 | 23 30 38 0d 20 6c 64 79 |03. ldx |#08. ldy|
|00000640| 20 23 30 30 0d 20 6a 73 | 72 20 73 65 74 6c 66 73 | #00. js|r setlfs|
|00000650| 0d 0d 2a a0 a0 a0 a0 67 | 65 74 a0 74 68 65 a0 62 |..*....g|et.the.b|
|00000660| 6f 6f 74 a0 66 69 6c 65 | 6e 61 6d 65 0d 20 6a 73 |oot.file|name. js|
|00000670| 72 20 63 68 6b 63 6f 6d | 0d 20 6a 73 72 20 66 72 |r chkcom|. jsr fr|
|00000680| 6d 65 76 6c 0d 20 6a 73 | 72 20 66 72 65 73 74 72 |mevl. js|r frestr|
|00000690| 0d 20 6a 73 72 20 73 65 | 74 6e 61 6d 0d 0d 2a a0 |. jsr se|tnam..*.|
|000006a0| a0 a0 a0 a0 a0 6c 6f 61 | 64 a0 74 68 65 a0 66 69 |.....loa|d.the.fi|
|000006b0| 6c 65 0d 20 6c 64 61 20 | 23 30 30 0d 20 6c 64 78 |le. lda |#00. ldx|
|000006c0| 20 34 33 0d 20 6c 64 79 | 20 34 34 0d 20 6a 73 72 | 43. ldy| 44. jsr|
|000006d0| 20 6c 6f 61 64 0d 20 73 | 74 78 20 34 35 0d 20 73 | load. s|tx 45. s|
|000006e0| 74 79 20 34 36 0d 0d 2a | a0 a0 a0 a0 a0 72 65 74 |ty 46..*|.....ret|
|000006f0| 75 72 6e a0 74 6f a0 74 | 65 78 74 a0 6d 6f 64 65 |urn.to.t|ext.mode|
|00000700| 0d 20 6a 73 72 20 64 69 | 73 70 6c 61 79 0d 20 6c |. jsr di|splay. l|
|00000710| 64 61 20 62 63 6b 67 6e | 64 0d 20 73 74 61 20 62 |da bckgn|d. sta b|
|00000720| 6f 72 64 65 72 0d 0d 2a | a0 a0 a0 70 6f 6b 65 a0 |order..*|...poke.|
|00000730| 22 72 75 6e 22 a0 69 6e | a0 69 6e 70 75 74 a0 62 |"run".in|.input.b|
|00000740| 75 66 66 65 72 0d 20 6c | 64 61 20 23 27 52 27 0d |uffer. l|da #'R'.|
|00000750| 20 73 74 61 20 35 31 32 | 0d 20 6c 64 61 20 23 27 | sta 512|. lda #'|
|00000760| 55 27 0d 20 73 74 61 20 | 35 31 33 0d 20 6c 64 61 |U'. sta |513. lda|
|00000770| 20 23 27 4e 27 0d 20 73 | 74 61 20 35 31 34 0d 20 | #'N'. s|ta 514. |
|00000780| 6c 64 61 20 23 30 30 0d | 20 73 74 61 20 35 31 35 |lda #00.| sta 515|
|00000790| 0d 0d 2a a0 a0 a0 a0 73 | 65 74 75 70 a0 78 a0 61 |..*....s|etup.x.a|
|000007a0| 6e 64 a0 79 a0 72 65 67 | 69 73 74 65 72 73 0d 2a |nd.y.reg|isters.*|
|000007b0| a0 61 6e 64 a0 6a 75 6d | 70 a0 74 6f a0 69 6e 70 |.and.jum|p.to.inp|
|000007c0| 75 74 a0 62 75 66 66 65 | 72 a0 64 65 63 6f 64 65 |ut.buffe|r.decode|
|000007d0| 0d 20 6c 64 78 20 23 32 | 35 35 0d 20 6c 64 79 20 |. ldx #2|55. ldy |
|000007e0| 23 30 31 0d 20 6a 6d 70 | 20 69 6e 62 75 66 66 0d |#01. jmp| inbuff.|
|000007f0| 0d 6d 73 67 20 64 66 62 | 20 31 34 37 2c 31 34 32 |.msg dfb| 147,142|
|00000800| 2c 38 2c 31 37 2c 31 37 | 2c 31 37 0d 20 64 66 62 |,8,17,17|,17. dfb|
|00000810| 20 31 37 2c 31 37 2c 31 | 37 2c 31 37 2c 31 37 2c | 17,17,1|7,17,17,|
|00000820| 31 37 0d 20 64 66 62 20 | 31 37 2c 31 37 2c 31 37 |17. dfb |17,17,17|
|00000830| 2c 31 35 38 0d 20 74 78 | 74 20 27 a0 a0 a0 a0 a0 |,158. tx|t '.....|
|00000840| a0 a0 a0 a0 a0 a0 a0 a0 | 50 4c 45 41 53 45 a0 57 |........|PLEASE.W|
|00000850| 41 49 54 2e 2e 2e 27 0d | 20 64 66 62 20 30 30 0d |AIT...'.| dfb 00.|
|00000860| 0d 75 6e 70 63 6b 72 20 | 74 78 74 20 27 55 4e 50 |.unpckr |txt 'UNP|
|00000870| 41 43 4b 45 52 27 0d    |                         |ACKER'. |        |
+--------+-------------------------+-------------------------+--------+--------+