home *** CD-ROM | disk | FTP | other *** search
| Unknown | 2019-04-13 | 2.0 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.
| 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
| 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
| data
| default
| |
| 100%
| detectItEasy
| Format: plain text[LF]
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 30 20 52 45 4d 20 2d 2d | 20 46 49 4c 45 4e 41 4d |0 REM --| FILENAM|
|00000010| 45 3a 20 22 44 45 56 49 | 43 45 20 43 48 41 4e 47 |E: "DEVI|CE CHANG|
|00000020| 45 52 22 2e 0a 32 20 52 | 45 4d 20 2d 2d 20 43 4f |ER"..2 R|EM -- CO|
|00000030| 50 59 52 49 47 48 54 20 | 28 43 29 20 47 4c 45 4e |PYRIGHT |(C) GLEN|
|00000040| 4e 20 50 2e 20 31 39 38 | 37 2e 20 20 20 20 20 4e |N P. 198|7. N|
|00000050| 4f 4e 2d 50 52 4f 46 49 | 54 20 44 55 50 4c 49 43 |ON-PROFI|T DUPLIC|
|00000060| 41 54 49 4f 4e 20 41 4c | 4c 4f 57 45 44 2e 0a 34 |ATION AL|LOWED..4|
|00000070| 20 52 45 4d 20 2d 2d 20 | 41 4c 4c 20 4f 54 48 45 | REM -- |ALL OTHE|
|00000080| 52 20 52 49 47 48 54 53 | 20 52 45 53 45 52 56 45 |R RIGHTS| RESERVE|
|00000090| 44 2e 0a 35 20 43 4c 52 | 3a 53 59 53 35 38 37 39 |D..5 CLR|:SYS5879|
|000000a0| 32 3a 47 4f 53 55 42 32 | 30 30 0a 31 30 20 50 52 |2:GOSUB2|00.10 PR|
|000000b0| 49 4e 54 22 93 9a 22 3b | 3a 50 4f 4b 45 31 35 37 |INT"..";|:POKE157|
|000000c0| 2c 31 39 32 3a 56 45 52 | 49 46 59 22 30 3a 44 45 |,192:VER|IFY"0:DE|
|000000d0| 56 49 43 45 20 43 48 41 | 4e 47 45 52 22 2c 43 44 |VICE CHA|NGER",CD|
|000000e0| 2c 31 0a 32 30 20 50 52 | 49 4e 54 3a 50 52 49 4e |,1.20 PR|INT:PRIN|
|000000f0| 54 22 54 48 45 20 50 52 | 4f 47 52 41 4d 20 49 53 |T"THE PR|OGRAM IS|
|00000100| 20 43 4f 52 52 45 43 54 | 2e 22 0a 33 30 20 50 4f | CORRECT|.".30 PO|
|00000110| 4b 45 31 35 37 2c 30 3a | 50 4f 4b 45 31 36 32 2c |KE157,0:|POKE162,|
|00000120| 30 3a 57 41 49 54 31 36 | 32 2c 31 32 38 0a 34 30 |0:WAIT16|2,128.40|
|00000130| 20 43 4c 52 3a 47 4f 53 | 55 42 32 30 30 3a 50 52 | CLR:GOS|UB200:PR|
|00000140| 49 4e 54 22 93 11 9f 44 | 20 45 20 56 20 49 20 43 |INT"...D| E V I C|
|00000150| 20 45 20 20 20 43 20 48 | 20 41 20 4e 20 47 20 45 | E C H| A N G E|
|00000160| 20 52 2e 9a 22 0a 34 32 | 20 50 52 49 4e 54 22 c3 | R..".42| PRINT".|
|00000170| c3 c3 c3 c3 c3 c3 c3 c3 | c3 c3 c3 c3 c3 c3 c3 c3 |........|........|
|00000180| c3 c3 c3 c3 c3 c3 c3 c3 | c3 c3 c3 c3 c3 c3 c3 22 |........|......."|
|00000190| 0a 34 34 20 50 52 49 4e | 54 22 43 4f 50 59 52 49 |.44 PRIN|T"COPYRI|
|000001a0| 47 48 54 20 28 43 29 20 | 31 39 38 37 20 42 59 20 |GHT (C) |1987 BY |
|000001b0| 47 4c 45 4e 4e 20 50 2e | 22 3a 50 52 49 4e 54 22 |GLENN P.|":PRINT"|
|000001c0| 4e 4f 4e 2d 50 52 4f 46 | 49 54 20 44 55 50 4c 49 |NON-PROF|IT DUPLI|
|000001d0| 43 41 54 49 4f 4e 20 41 | 4c 4c 4f 57 45 44 2e 22 |CATION A|LLOWED."|
|000001e0| 0a 34 36 20 50 52 49 4e | 54 22 41 4c 4c 20 4f 54 |.46 PRIN|T"ALL OT|
|000001f0| 48 45 52 20 52 49 47 48 | 54 53 20 52 45 53 45 52 |HER RIGH|TS RESER|
|00000200| 56 45 44 2e 22 0a 34 38 | 20 50 52 49 4e 54 22 c3 |VED.".48| PRINT".|
|00000210| c3 c3 c3 c3 c3 c3 c3 c3 | c3 c3 c3 c3 c3 c3 c3 c3 |........|........|
|00000220| c3 c3 c3 c3 c3 c3 c3 c3 | c3 c3 c3 c3 c3 c3 c3 22 |........|......."|
|00000230| 3a 50 52 49 4e 54 3a 50 | 4f 4b 45 31 39 38 2c 30 |:PRINT:P|OKE198,0|
|00000240| 0a 35 30 20 50 52 49 4e | 54 22 12 20 2a 2a 2a 2a |.50 PRIN|T". ****|
|00000250| 20 44 49 53 4b 20 44 52 | 49 56 45 20 44 45 56 49 | DISK DR|IVE DEVI|
|00000260| 43 45 20 4e 55 4d 42 45 | 52 20 2a 2a 2a 2a 20 92 |CE NUMBE|R **** .|
|00000270| 22 3a 50 52 49 4e 54 0a | 35 32 20 50 52 49 4e 54 |":PRINT.|52 PRINT|
|00000280| 22 43 55 52 52 45 4e 54 | 20 56 41 4c 55 45 20 3d |"CURRENT| VALUE =|
|00000290| 22 3b 43 44 3b 22 9d 2e | 22 0a 35 34 20 50 52 49 |";CD;"..|".54 PRI|
|000002a0| 4e 54 22 41 4c 4c 4f 57 | 45 44 20 56 41 4c 55 45 |NT"ALLOW|ED VALUE|
|000002b0| 53 3a 20 38 2c 20 39 2c | 20 31 30 2c 20 31 31 2e |S: 8, 9,| 10, 11.|
|000002c0| 9a 22 3a 50 52 49 4e 54 | 0a 36 30 20 50 52 49 4e |.":PRINT|.60 PRIN|
|000002d0| 54 22 45 4e 54 45 52 20 | 44 45 53 49 52 45 44 20 |T"ENTER |DESIRED |
|000002e0| 44 49 53 4b 20 44 52 49 | 56 45 22 3a 50 52 49 4e |DISK DRI|VE":PRIN|
|000002f0| 54 22 44 45 56 49 43 45 | 20 4e 55 4d 42 45 52 22 |T"DEVICE| NUMBER"|
|00000300| 3b 3a 4e 44 3d 43 44 3a | 49 4e 50 55 54 4e 44 3a |;:ND=CD:|INPUTND:|
|00000310| 50 52 49 4e 54 0a 36 35 | 20 4e 44 3d 49 4e 54 28 |PRINT.65| ND=INT(|
|00000320| 41 42 53 28 4e 44 29 29 | 3a 49 46 4e 44 3c 38 4f |ABS(ND))|:IFND<8O|
|00000330| 52 4e 44 3e 31 31 54 48 | 45 4e 50 52 49 4e 54 22 |RND>11TH|ENPRINT"|
|00000340| 96 2a 2a 20 22 3b 3a 47 | 4f 54 4f 35 34 0a 37 30 |.** ";:G|OTO54.70|
|00000350| 20 49 46 4e 44 3d 43 44 | 54 48 45 4e 50 52 49 4e | IFND=CD|THENPRIN|
|00000360| 54 22 4c 45 41 56 45 20 | 44 52 49 56 45 20 44 45 |T"LEAVE |DRIVE DE|
|00000370| 56 49 43 45 20 4e 55 4d | 42 45 52 20 55 4e 43 48 |VICE NUM|BER UNCH|
|00000380| 41 4e 47 45 44 20 2e 2e | 2e 22 3a 47 4f 54 4f 38 |ANGED ..|.":GOTO8|
|00000390| 30 0a 37 35 20 50 52 49 | 4e 54 22 43 48 41 4e 47 |0.75 PRI|NT"CHANG|
|000003a0| 45 20 44 52 49 56 45 20 | 44 45 56 49 43 45 20 4e |E DRIVE |DEVICE N|
|000003b0| 55 4d 42 45 52 20 54 4f | 22 3b 4e 44 3b 22 2e 2e |UMBER TO|";ND;"..|
|000003c0| 2e 22 0a 38 30 20 50 4f | 4b 45 31 36 32 2c 30 3a |.".80 PO|KE162,0:|
|000003d0| 57 41 49 54 31 36 32 2c | 36 34 3a 50 4f 4b 45 31 |WAIT162,|64:POKE1|
|000003e0| 39 38 2c 30 0a 39 30 20 | 59 4e 24 3d 22 22 3a 49 |98,0.90 |YN$="":I|
|000003f0| 4e 50 55 54 22 41 52 45 | 20 59 4f 55 20 53 55 52 |NPUT"ARE| YOU SUR|
|00000400| 45 20 28 59 2f 4e 29 22 | 3b 59 4e 24 3a 59 4e 24 |E (Y/N)"|;YN$:YN$|
|00000410| 3d 4c 45 46 54 24 28 59 | 4e 24 2c 31 29 3a 50 52 |=LEFT$(Y|N$,1):PR|
|00000420| 49 4e 54 0a 31 30 30 20 | 49 46 59 4e 24 3c 3e 22 |INT.100 |IFYN$<>"|
|00000430| 59 22 54 48 45 4e 34 30 | 0a 31 31 30 20 49 46 4e |Y"THEN40|.110 IFN|
|00000440| 44 3d 43 44 54 48 45 4e | 31 34 30 0a 31 31 35 20 |D=CDTHEN|140.115 |
|00000450| 46 4c 3d 30 3a 47 4f 53 | 55 42 32 30 30 3a 49 46 |FL=0:GOS|UB200:IF|
|00000460| 46 4c 54 48 45 4e 43 4c | 52 3a 47 4f 54 4f 34 30 |FLTHENCL|R:GOTO40|
|00000470| 0a 31 32 30 20 43 24 3d | 22 4d 2d 57 22 2b 43 48 |.120 C$=|"M-W"+CH|
|00000480| 52 24 28 31 31 39 29 2b | 43 48 52 24 28 30 29 2b |R$(119)+|CHR$(0)+|
|00000490| 43 48 52 24 28 32 29 2b | 43 48 52 24 28 4e 44 2b |CHR$(2)+|CHR$(ND+|
|000004a0| 33 32 29 2b 43 48 52 24 | 28 4e 44 2b 36 34 29 0a |32)+CHR$|(ND+64).|
|000004b0| 31 33 30 20 43 4c 4f 53 | 45 31 3a 4f 50 45 4e 31 |130 CLOS|E1:OPEN1|
|000004c0| 2c 43 44 2c 31 35 2c 43 | 24 3a 43 4c 4f 53 45 31 |,CD,15,C|$:CLOSE1|
|000004d0| 0a 31 34 30 20 47 4f 53 | 55 42 32 30 30 3a 49 46 |.140 GOS|UB200:IF|
|000004e0| 4e 44 3d 43 44 54 48 45 | 4e 50 52 49 4e 54 22 44 |ND=CDTHE|NPRINT"D|
|000004f0| 52 49 56 45 20 4e 4f 57 | 20 52 45 53 50 4f 4e 44 |RIVE NOW| RESPOND|
|00000500| 53 20 41 53 20 44 45 56 | 49 43 45 22 3b 53 54 52 |S AS DEV|ICE";STR|
|00000510| 24 28 43 44 29 3b 22 2e | 22 3a 50 52 49 4e 54 0a |$(CD);".|":PRINT.|
|00000520| 31 34 35 20 49 46 4e 44 | 3c 3e 43 44 54 48 45 4e |145 IFND|<>CDTHEN|
|00000530| 50 52 49 4e 54 22 96 45 | 52 52 4f 52 20 43 4f 4e |PRINT".E|RROR CON|
|00000540| 44 49 54 49 4f 4e 3a 9a | 22 3a 50 52 49 4e 54 22 |DITION:.|":PRINT"|
|00000550| 44 45 56 49 43 45 20 4e | 55 09 00 45 52 20 49 53 |DEVICE N|U..ER IS|
|00000560| 22 3b 43 44 3b 22 9d 2e | 22 0a 31 34 37 20 49 46 |";CD;"..|".147 IF|
|00000570| 43 44 3c 3e 4e 44 4f 52 | 46 4c 3d 31 54 48 45 4e |CD<>NDOR|FL=1THEN|
|00000580| 50 4f 4b 45 31 36 32 2c | 30 3a 57 41 49 54 31 36 |POKE162,|0:WAIT16|
|00000590| 32 2c 31 32 38 3a 50 4f | 4b 45 31 36 32 2c 30 3a |2,128:PO|KE162,0:|
|000005a0| 57 41 49 54 31 36 32 2c | 31 32 38 3a 43 4c 52 3a |WAIT162,|128:CLR:|
|000005b0| 47 4f 54 4f 34 30 0a 31 | 35 30 20 43 4c 4f 53 45 |GOTO40.1|50 CLOSE|
|000005c0| 31 3a 4f 50 45 4e 31 2c | 43 44 2c 31 35 2c 22 49 |1:OPEN1,|CD,15,"I|
|000005d0| 30 22 3a 43 4c 4f 53 45 | 31 3a 50 52 49 4e 54 22 |0":CLOSE|1:PRINT"|
|000005e0| 50 52 45 53 53 20 12 52 | 45 54 55 52 4e 92 20 54 |PRESS .R|ETURN. T|
|000005f0| 4f 20 52 45 2d 45 4e 54 | 45 52 20 42 41 53 49 43 |O RE-ENT|ER BASIC|
|00000600| 2e 22 0a 31 36 30 20 50 | 4f 4b 45 31 39 38 2c 30 |.".160 P|OKE198,0|
|00000610| 3a 57 41 49 54 31 39 38 | 2c 31 3a 47 45 54 58 24 |:WAIT198|,1:GETX$|
|00000620| 3a 50 4f 4b 45 31 39 38 | 2c 30 0a 31 37 30 20 49 |:POKE198|,0.170 I|
|00000630| 46 58 24 3c 3e 43 48 52 | 24 28 31 33 29 54 48 45 |FX$<>CHR|$(13)THE|
|00000640| 4e 31 36 30 0a 31 38 30 | 20 43 4c 52 3a 50 52 49 |N160.180| CLR:PRI|
|00000650| 4e 54 22 93 22 3a 50 4f | 4b 45 35 33 32 38 31 2c |NT".":PO|KE53281,|
|00000660| 31 34 3a 53 59 53 36 34 | 37 33 38 0a 31 39 30 20 |14:SYS64|738.190 |
|00000670| 53 54 4f 50 0a 32 30 30 | 20 46 4f 52 58 3d 38 54 |STOP.200| FORX=8T|
|00000680| 4f 31 31 3a 43 4c 4f 53 | 45 31 3a 4f 50 45 4e 31 |O11:CLOS|E1:OPEN1|
|00000690| 2c 58 2c 31 35 3a 43 4c | 4f 53 45 31 3a 53 3d 53 |,X,15:CL|OSE1:S=S|
|000006a0| 54 3a 49 46 53 3d 30 54 | 48 45 4e 43 44 3d 58 3a |T:IFS=0T|HENCD=X:|
|000006b0| 58 3d 31 35 0a 32 31 30 | 20 4e 45 58 54 58 3a 49 |X=15.210| NEXTX:I|
|000006c0| 46 58 3e 31 32 54 48 45 | 4e 52 45 54 55 52 4e 0a |FX>12THE|NRETURN.|
|000006d0| 32 32 30 20 50 52 49 4e | 54 3a 50 52 49 4e 54 22 |220 PRIN|T:PRINT"|
|000006e0| 43 4f 4e 4e 45 43 54 2f | 54 55 52 4e 20 4f 4e 20 |CONNECT/|TURN ON |
|000006f0| 44 52 49 56 45 2e 20 50 | 52 45 53 53 20 12 52 45 |DRIVE. P|RESS .RE|
|00000700| 54 55 52 4e 92 2e 22 3a | 46 4c 3d 31 0a 32 33 30 |TURN..":|FL=1.230|
|00000710| 20 50 4f 4b 45 31 39 38 | 2c 30 3a 57 41 49 54 31 | POKE198|,0:WAIT1|
|00000720| 39 38 2c 31 3a 47 45 54 | 58 24 3a 50 4f 4b 45 31 |98,1:GET|X$:POKE1|
|00000730| 39 38 2c 30 0a 32 34 30 | 20 49 46 58 24 3c 3e 43 |98,0.240| IFX$<>C|
|00000740| 48 52 24 28 31 33 29 54 | 48 45 4e 32 33 30 0a 32 |HR$(13)T|HEN230.2|
|00000750| 35 30 20 47 4f 54 4f 32 | 30 30 0a 32 36 30 20 53 |50 GOTO2|00.260 S|
|00000760| 54 4f 50 0a 32 37 30 20 | 52 45 4d 20 2d 2d 20 43 |TOP.270 |REM -- C|
|00000770| 4f 50 59 52 49 47 48 54 | 20 28 43 29 20 47 4c 45 |OPYRIGHT| (C) GLE|
|00000780| 4e 4e 20 50 2e 20 31 39 | 38 37 2e 20 20 20 20 20 |NN P. 19|87. |
|00000790| 4e 4f 4e 2d 50 52 4f 46 | 49 54 20 44 55 50 4c 49 |NON-PROF|IT DUPLI|
|000007a0| 43 41 54 49 4f 4e 20 41 | 4c 4c 4f 57 45 44 2e 0a |CATION A|LLOWED..|
|000007b0| 32 38 30 20 52 45 4d 20 | 2d 2d 20 41 4c 4c 20 4f |280 REM |-- ALL O|
|000007c0| 54 48 45 52 20 52 49 47 | 48 54 53 20 52 45 53 45 |THER RIG|HTS RESE|
|000007d0| 52 56 45 44 2e 0a 32 39 | 30 20 53 54 4f 50 0a 33 |RVED..29|0 STOP.3|
|000007e0| 30 30 20 09 0a | |00 .. | |
+--------+-------------------------+-------------------------+--------+--------+
