8bitfiles.net/archives

home *** CD-ROM | disk | FTP | other *** search

/ 8bitfiles.net/archives / archives.tar / archives / canada-remote-systems / c128 / utils / ramdos.arc / POUND64.BAS < prev next >

Texas Instruments Calculator Program | 2019-04-13 | 2.1 KB

open in:

MacOS 8.1 |

Win98 |

DOS

view JSON data |

view as text

This file was processed as: Texas Instruments Calculator Program (executable/tiCalcProgram).
This format is not currently supported by dexvert.

Confidence	Program	Detection	Match Type	Support
`66%`	dexvert	GW-BASIC `(document/gwBasic)`	ext	Supported
`66%`	dexvert	GFA-BASIC Atari `(other/gfaBASICAtari)`	ext	Supported
`1%`	dexvert	Texas Instruments Calculator Program `(executable/tiCalcProgram)`	magic	Unsupported
`1%`	dexvert	Amiga BASIC Protected File `(other/amigaBASICProtectedFile)`	ext	Unsupported
`1%`	dexvert	BAS VBDOS Pro 1.0 Source `(other/basVBDOSPro10Source)`	ext	Unsupported
`1%`	dexvert	Visual Basic Tokenized Source `(other/visualBasicTokenizedSource)`	ext	Unsupported
`1%`	dexvert	ZBASIC `(other/zbasic)`	ext	Unsupported
`100%`	file	Commodore C128 BASIC program, offset 0x1c3c, line 10, token (0x8f) REM F$="POUND64.BAS":OPEN1,8,15,"S0:"+F$:CLOSE1:SAVEF$,8, offset 0x1c5b, line 20, token (0x8b)	default (weak)
`99%`	file	SVr3 curses screen image, big-endian	default (weak)
`98%`	file	data	default
`100%`	TrID	Commodore 128 BASIC V7.0 program	default (weak)

hex view

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 01 1c 3c 1c 0a 00 8f 20 | 46 24 3d 22 50 4f 55 4e |..<.... |F$="POUN|
|00000010| 44 36 34 2e 42 41 53 22 | 3a 4f 50 45 4e 31 2c 38 |D64.BAS"|:OPEN1,8|
|00000020| 2c 31 35 2c 22 53 30 3a | 22 2b 46 24 3a 43 4c 4f |,15,"S0:|"+F$:CLO|
|00000030| 53 45 31 3a 53 41 56 45 | 46 24 2c 38 00 5b 1c 14 |SE1:SAVE|F$,8.[..|
|00000040| 00 8b 20 41 b2 30 20 a7 | 20 41 b2 31 3a 20 93 22 |.. A.0 .| A.1: ."|
|00000050| 53 4e 49 46 46 2a 22 2c | 38 2c 31 00 6c 1c 19 00 |SNIFF*",|8,1.l...|
|00000060| 8b 20 41 b1 31 20 a7 20 | 89 32 30 30 00 a6 1c 1e |. A.1 . |.200....|
|00000070| 00 8d 20 39 30 30 30 3a | 20 20 20 20 20 20 20 20 |.. 9000:|        |
|00000080| 20 20 20 20 20 20 8f 20 | 56 45 52 49 46 59 20 45 |      . |VERIFY E|
|00000090| 58 50 41 4e 44 45 52 20 | 50 52 45 53 45 4e 54 20 |XPANDER |PRESENT |
|000000a0| 26 20 53 49 5a 45 00 d3 | 1c 28 00 97 35 32 2c 32 |& SIZE..|.(..52,2|
|000000b0| 38 3a 97 35 36 2c 32 38 | 3a 9c 3a 20 8f 20 4d 41 |8:.56,28|:.: . MA|
|000000c0| 4b 45 20 52 4f 4f 4d 20 | 46 4f 52 20 42 49 54 20 |KE ROOM |FOR BIT |
|000000d0| 4d 41 50 00 06 1d 32 00 | 8d 20 38 30 30 30 3a 4e |MAP...2.|. 8000:N|
|000000e0| 42 b2 c2 28 32 35 31 29 | 3a 20 8f 20 49 4e 49 54 |B..(251)|: . INIT|
|000000f0| 20 44 4d 41 20 43 54 4c | 52 20 26 20 50 49 43 20 | DMA CTL|R & PIC |
|00000100| 50 41 52 41 4d 53 00 0c | 1d 3c 00 3a 00 26 1d 64 |PARAMS..|.<.:.&.d|
|00000110| 00 85 20 22 4c 4f 41 44 | 20 52 41 4d 20 28 59 2f |.. "LOAD| RAM (Y/|
|00000120| 4e 29 22 3b 41 24 00 5c | 1d 6e 00 3a 20 8b 20 41 |N)";A$.\|.n.: . A|
|00000130| 24 b2 22 4e 22 20 a7 20 | 34 30 30 3a 20 20 20 8f |$."N" . |400:   .|
|00000140| 20 55 53 45 20 50 49 43 | 53 20 50 52 45 56 49 4f | USE PIC|S PREVIO|
|00000150| 55 53 4c 59 20 53 54 41 | 53 48 45 44 00 7a 1d 78 |USLY STA|SHED.z.x|
|00000160| 00 41 b2 32 3a 20 93 20 | 22 43 4f 4d 50 52 45 53 |.A.2: . |"COMPRES|
|00000170| 53 2e 42 49 4e 22 2c 38 | 2c 31 00 80 1d 82 00 3a |S.BIN",8|,1.....:|
|00000180| 00 a0 1d c8 00 8f 20 20 | 55 4e 43 4f 4d 50 52 45 |......  |UNCOMPRE|
|00000190| 53 53 20 50 49 43 20 41 | 4e 44 20 53 54 41 53 48 |SS PIC A|ND STASH|
|000001a0| 00 de 1d d2 00 8b 20 50 | 20 a7 20 9e 34 39 31 35 |...... P| . .4915|
|000001b0| 35 3a 97 52 aa 34 2c 4c | 28 4b 29 3a 97 52 aa 35 |5:.R.4,L|(K):.R.5|
|000001c0| 2c 48 28 4b 29 3a 97 52 | aa 36 2c 42 28 4b 29 3a |,H(K):.R|.6,B(K):|
|000001d0| 97 52 aa 31 2c 31 37 36 | 3a 4b b2 4b aa 31 00 e4 |.R.1,176|:K.K.1..|
|000001e0| 1d dc 00 3a 00 05 1e 2c | 01 8f 20 20 4c 4f 41 44 |...:...,|..  LOAD|
|000001f0| 20 41 20 43 4f 4d 50 52 | 45 53 53 45 44 20 50 49 | A COMPR|ESSED PI|
|00000200| 43 54 55 52 45 00 20 1e | 36 01 50 b2 50 aa 34 ad |CTURE. .|6.P.P.4.|
|00000210| 4e 42 3a 20 8b 20 50 b1 | 33 32 20 a7 20 34 30 30 |NB: . P.|32 . 400|
|00000220| 00 4f 1e 40 01 3a 20 99 | 20 22 93 11 11 11 11 1d |.O.@.: .| "......|
|00000230| 1d 1d 1d 1d 1d 1d 1d 4c | 4f 41 44 49 4e 47 20 49 |.......L|OADING I|
|00000240| 4d 41 47 45 22 3b 50 3b | 22 4f 46 20 33 32 22 00 |MAGE";P;|"OF 32".|
|00000250| 71 1e 4a 01 3a 20 93 20 | 22 50 4f 55 4e 44 22 aa |q.J.: . |"POUND".|
|00000260| c4 28 50 ab 31 29 aa 22 | 2e 43 4d 50 22 2c 38 2c |.(P.1)."|.CMP",8,|
|00000270| 31 00 77 1e 54 01 3a 00 | 93 1e 90 01 8f 20 20 49 |1.w.T.:.|.....  I|
|00000280| 4e 49 54 20 42 49 54 20 | 4d 41 50 20 26 20 43 4f |NIT BIT |MAP & CO|
|00000290| 4c 4f 52 00 c0 1e 9a 01 | 44 41 b2 33 33 3a 41 44 |LOR.....|DA.33:AD|
|000002a0| b2 31 30 32 34 20 3a 53 | 5a b2 31 30 30 30 3a 8d |.1024 :S|Z.1000:.|
|000002b0| 37 30 30 30 3a 20 8f 20 | 43 4c 45 41 52 20 56 4d |7000: . |CLEAR VM|
|000002c0| 00 f2 1e a4 01 44 41 b2 | 36 20 3a 41 44 b2 35 35 |.....DA.|6 :AD.55|
|000002d0| 32 39 36 3a 53 5a b2 31 | 30 30 30 3a 8d 37 30 30 |296:SZ.1|000:.700|
|000002e0| 30 3a 20 8f 20 43 4c 45 | 41 52 20 4e 59 42 42 4c |0: . CLE|AR NYBBL|
|000002f0| 45 53 00 21 1f ae 01 44 | 41 b2 30 20 3a 41 44 b2 |ES.!...D|A.0 :AD.|
|00000300| 38 31 39 32 20 3a 53 5a | b2 38 30 30 30 3a 8d 37 |8192 :SZ|.8000:.7|
|00000310| 30 30 30 3a 20 8f 20 43 | 4c 45 41 52 20 4d 43 42 |000: . C|LEAR MCB|
|00000320| 4d 00 43 1f b8 01 56 b2 | 31 33 ac 34 30 39 36 3a |M.C...V.|13.4096:|
|00000330| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 8f 20 |        |      . |
|00000340| 56 49 43 00 62 1f c2 01 | 97 56 aa 31 37 2c c2 28 |VIC.b...|.V.17,.(|
|00000350| 56 aa 31 37 29 b0 33 32 | 3a 8f 20 53 45 54 20 42 |V.17).32|:. SET B|
|00000360| 4d 4d 00 81 1f c7 01 97 | 56 aa 32 32 2c c2 28 56 |MM......|V.22,.(V|
|00000370| aa 32 32 29 b0 31 36 3a | 8f 20 53 45 54 20 4d 43 |.22).16:|. SET MC|
|00000380| 4d 00 af 1f cc 01 97 56 | aa 32 34 2c c2 28 56 aa |M......V|.24,.(V.|
|00000390| 32 34 29 b0 38 3a 20 8f | 20 42 4d 20 40 20 24 32 |24).8: .| BM @ $2|
|000003a0| 30 30 30 2c 20 56 4d 20 | 40 20 24 30 34 30 30 00 |000, VM |@ $0400.|
|000003b0| d7 1f d6 01 97 56 aa 33 | 32 2c 30 3a 97 56 aa 33 |.....V.3|2,0:.V.3|
|000003c0| 33 2c 30 3a 20 20 8f 20 | 42 47 20 26 20 42 52 44 |3,0:  . |BG & BRD|
|000003d0| 52 20 43 4f 4c 4f 52 00 | ff 1f e0 01 8d 38 30 37 |R COLOR.|.....807|
|000003e0| 30 3a 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |0:      |        |
|000003f0| 8f 20 49 4e 49 54 20 44 | 4d 41 20 43 54 4c 52 00 |. INIT D|MA CTLR.|
|00000400| 05 20 ea 01 3a 00 25 20 | f4 01 8f 20 43 59 43 4c |. ..:.% |... CYCL|
|00000410| 45 20 54 48 52 55 20 50 | 49 43 53 20 45 4e 44 4c |E THRU P|ICS ENDL|
|00000420| 45 53 53 4c 59 00 34 20 | fe 01 81 49 b2 30 a4 31 |ESSLY.4 |...I.0.1|
|00000430| 3a 49 b2 30 00 6d 20 08 | 02 81 50 b2 2e a4 4e 42 |:I.0.m .|..P...NB|
|00000440| ac 38 ab 31 3a 97 52 aa | 34 2c 4c 28 50 29 3a 97 |.8.1:.R.|4,L(P):.|
|00000450| 52 aa 35 2c 48 28 50 29 | 3a 97 52 aa 36 2c 42 28 |R.5,H(P)|:.R.6,B(|
|00000460| 50 29 3a 97 52 aa 31 2c | 31 37 37 3a 82 00 76 20 |P):.R.1,|177:..v |
|00000470| 12 02 82 3a 20 90 00 7c | 20 1c 02 3a 00 9a 20 58 |...: ..|| ..:.. X|
|00000480| 1b 8f 20 20 44 4d 41 20 | 42 4c 4f 43 4b 20 46 49 |..  DMA |BLOCK FI|
|00000490| 4c 4c 20 52 4f 55 54 49 | 4e 45 00 b6 20 62 1b 8f |LL ROUTI|NE.. b..|
|000004a0| 20 20 45 4e 54 45 52 20 | 57 49 54 48 20 20 44 41 |  ENTER |WITH  DA|
|000004b0| 3d 20 44 41 54 41 00 d5 | 20 6c 1b 8f 20 20 20 20 |= DATA..| l..    |
|000004c0| 20 20 20 20 20 20 20 20 | 20 20 41 44 3d 20 41 44 |        |  AD= AD|
|000004d0| 44 52 45 53 53 00 f3 20 | 76 1b 8f 20 20 20 20 20 |DRESS.. |v..     |
|000004e0| 20 20 20 20 20 20 20 20 | 20 53 5a 3d 20 23 42 59 |        | SZ= #BY|
|000004f0| 54 45 53 00 ff 20 80 1b | 97 32 35 31 2c 44 41 00 |TES.. ..|.251,DA.|
|00000500| 28 21 8a 1b 97 52 aa 32 | 2c 32 35 31 3a 97 52 aa |(!...R.2|,251:.R.|
|00000510| 33 2c 30 3a 97 52 aa 34 | 2c 30 3a 97 52 aa 35 2c |3,0:.R.4|,0:.R.5,|
|00000520| 30 3a 97 52 aa 36 2c 30 | 00 52 21 94 1b 97 52 aa |0:.R.6,0|.R!...R.|
|00000530| 37 2c 31 3a 97 52 aa 38 | 2c 30 3a 97 52 aa 39 2c |7,1:.R.8|,0:.R.9,|
|00000540| 30 3a 97 52 aa 31 30 2c | 30 3a 97 52 aa 31 2c 31 |0:.R.10,|0:.R.1,1|
|00000550| 37 36 00 7b 21 9e 1b 48 | b2 b5 28 41 44 ad 32 35 |76.{!..H|..(AD.25|
|00000560| 36 29 3a 4c b2 41 44 ab | 32 35 36 ac 48 3a 97 52 |6):L.AD.|256.H:.R|
|00000570| aa 32 2c 4c 3a 97 52 aa | 33 2c 48 00 97 21 a8 1b |.2,L:.R.|3,H..!..|
|00000580| 97 52 aa 37 2c 53 5a af | 32 35 35 3a 97 52 aa 38 |.R.7,SZ.|255:.R.8|
|00000590| 2c 53 5a ad 32 35 36 00 | b7 21 b2 1b 97 52 aa 39 |,SZ.256.|.!...R.9|
|000005a0| 2c 30 3a 97 52 aa 31 30 | 2c 36 34 3a 97 52 aa 31 |,0:.R.10|,64:.R.1|
|000005b0| 2c 31 37 37 3a 20 8e 00 | bd 21 bc 1b 3a 00 de 21 |,177: ..|.!..:..!|
|000005c0| 40 1f 8f 20 49 4e 49 54 | 20 44 4d 41 20 43 54 4c |@.. INIT| DMA CTL|
|000005d0| 52 20 26 20 50 49 43 20 | 50 41 52 41 4d 53 00 0c |R & PIC |PARAMS..|
|000005e0| 22 4a 1f 52 b2 35 37 30 | 38 38 3a 20 20 20 20 20 |"J.R.570|88:     |
|000005f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 8f 20 44 4d |        |    . DM|
|00000600| 41 20 43 4f 4e 54 52 4f | 4c 4c 45 52 00 42 22 54 |A CONTRO|LLER.B"T|
|00000610| 1f 42 53 b2 38 31 39 32 | 3a 44 b2 42 53 3a 20 20 |.BS.8192|:D.BS:  |
|00000620| 20 20 20 20 20 20 20 20 | 20 20 8f 20 50 4f 55 4e |        |  . POUN|
|00000630| 44 20 50 49 43 20 53 54 | 41 52 54 20 26 20 53 49 |D PIC ST|ART & SI|
|00000640| 5a 45 00 77 22 5e 1f 86 | 4c 28 33 31 29 2c 48 28 |ZE.w"^..|L(31),H(|
|00000650| 33 31 29 2c 42 28 33 31 | 29 3a 20 20 20 20 8f 20 |31),B(31|):    . |
|00000660| 50 4f 49 4e 54 45 52 53 | 20 54 4f 20 53 54 41 53 |POINTERS| TO STAS|
|00000670| 48 45 44 20 50 49 43 00 | 8a 22 68 1f 81 49 b2 30 |HED PIC.|."h..I.0|
|00000680| a4 33 31 3a 20 5a b2 49 | ac 44 00 c2 22 72 1f 42 |.31: Z.I|.D.."r.B|
|00000690| b2 b5 28 5a ad 36 35 35 | 33 36 29 3a 48 b2 b5 28 |..(Z.655|36):H..(|
|000006a0| 28 5a ab 42 ac 36 35 35 | 33 36 29 ad 32 35 36 29 |(Z.B.655|36).256)|
|000006b0| 3a 4c b2 5a ab 42 ac 36 | 35 35 33 36 ab 48 ac 32 |:L.Z.B.6|5536.H.2|
|000006c0| 35 36 00 de 22 7c 1f 4c | 28 49 29 b2 4c 3a 48 28 |56.."|.L|(I).L:H(|
|000006d0| 49 29 b2 48 3a 42 28 49 | 29 b2 42 3a 20 82 00 0b |I).H:B(I|).B: ...|
|000006e0| 23 86 1f 97 52 aa 32 2c | 42 53 af 32 35 35 3a 97 |#...R.2,|BS.255:.|
|000006f0| 52 aa 33 2c 42 53 ad 32 | 35 36 3a 20 8f 20 49 4e |R.3,BS.2|56: . IN|
|00000700| 49 54 20 44 4d 41 20 43 | 54 4c 52 00 24 23 90 1f |IT DMA C|TLR.$#..|
|00000710| 97 52 aa 34 2c 30 3a 97 | 52 aa 35 2c 30 3a 97 52 |.R.4,0:.|R.5,0:.R|
|00000720| aa 36 2c 30 00 4d 23 9a | 1f 97 52 aa 37 2c 44 af |.6,0.M#.|..R.7,D.|
|00000730| 32 35 35 3a 97 52 aa 38 | 2c 44 ad 32 35 36 3a 97 |255:.R.8|,D.256:.|
|00000740| 52 aa 39 2c 30 3a 97 52 | aa 31 30 2c 30 00 53 23 |R.9,0:.R|.10,0.S#|
|00000750| a4 1f 8e 00 59 23 ae 1f | 3a 00 8d 23 28 23 8f 20 |....Y#..|:..#(#. |
|00000760| 20 56 45 52 49 46 59 20 | 50 52 45 53 45 4e 43 45 | VERIFY |PRESENCE|
|00000770| 20 4f 46 20 52 41 4d 20 | 43 41 52 44 20 26 20 44 | OF RAM |CARD & D|
|00000780| 45 54 45 52 4d 49 4e 45 | 20 53 49 5a 45 00 99 23 |ETERMINE| SIZE..#|
|00000790| 32 23 52 b2 35 37 30 38 | 38 00 ad 23 3c 23 81 49 |2#R.5708|8..#<#.I|
|000007a0| b2 32 a4 35 3a 97 52 aa | 49 2c 49 3a 82 00 c8 23 |.2.5:.R.|I,I:...#|
|000007b0| 46 23 81 49 b2 32 a4 35 | 3a 8b c2 28 52 aa 49 29 |F#.I.2.5|:..(R.I)|
|000007c0| b3 b1 49 a7 39 30 35 30 | 00 d4 23 50 23 82 3a 89 |..I.9050|..#P#.:.|
|000007d0| 39 30 36 30 00 fb 23 5a | 23 99 20 22 12 20 52 41 |9060..#Z|#. ". RA|
|000007e0| 4d 20 45 58 50 41 4e 44 | 45 52 20 4e 4f 54 20 50 |M EXPAND|ER NOT P|
|000007f0| 52 45 53 45 4e 54 20 22 | 3a 20 80 00 27 24 64 23 |RESENT "|: ..'$d#|
|00000800| 9e 36 31 34 34 3a 20 4e | 42 b2 c2 28 32 35 31 29 |.6144: N|B..(251)|
|00000810| 3a 20 8b 20 4e 42 b1 34 | 20 a7 20 4e 42 b2 34 3a |: . NB.4| . NB.4:|
|00000820| 20 97 32 35 31 2c 34 00 | 2d 24 6e 23 8e 00 33 24 | .251,4.|-$n#..3$|
|00000830| 78 23 3a 00 7b 24 0f 27 | 8f 20 46 2e 42 4f 57 45 |x#:.{$.'|. F.BOWE|
|00000840| 4e 20 48 2e 44 41 56 49 | 53 20 20 43 4f 50 59 52 |N H.DAVI|S  COPYR|
|00000850| 49 47 48 54 20 31 39 38 | 37 20 43 4f 4d 4d 4f 44 |IGHT 198|7 COMMOD|
|00000860| 4f 52 45 20 42 55 53 49 | 4e 45 53 53 20 4d 41 43 |ORE BUSI|NESS MAC|
|00000870| 48 49 4e 45 53 2c 20 49 | 4e 43 2e 00 00 00       |HINES, I|NC....  |
+--------+-------------------------+-------------------------+--------+--------+