home *** CD-ROM | disk | FTP | other *** search
/ Nibble Magazine / nib28b.dsk / PRINTER.DEMO.bas < prev    next >
BASIC Source File  |  1990-01-01  |  1.1 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was processed as: BASIC Source File (text/bas).

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert BASIC Source File (text/bas) magic Supported
66% dexvert GW-BASIC (document/gwBasic) ext Supported
66% dexvert GFA-BASIC Atari (other/gfaBASICAtari) ext Supported
1% dexvert Memotech MTX BASIC source (document/memotechMTXBASICSource) ext 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
1% dexvert Text File (text/txt) fallback Supported
100% file ASCII text default
100% checkBytes Printable ASCII default
100% perlTextCheck Likely Text (Perl) default
100% detectItEasy Format: plain text[LF] default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 31 30 20 20 52 45 4d 20 | 20 2a 2a 2a 2a 2a 2a 2a |10 REM | *******|
|00000010| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 0a |********|*******.|
|00000020| 32 30 20 20 52 45 4d 20 | 20 2a 20 50 52 49 4e 54 |20 REM | * PRINT|
|00000030| 45 52 2e 44 45 4d 4f 20 | 20 20 20 20 20 20 2a 0a |ER.DEMO | *.|
|00000040| 33 30 20 20 52 45 4d 20 | 20 2a 20 42 59 20 4b 45 |30 REM | * BY KE|
|00000050| 56 49 4e 20 4b 4e 4f 58 | 20 20 20 20 20 20 2a 0a |VIN KNOX| *.|
|00000060| 34 30 20 20 52 45 4d 20 | 20 2a 20 20 20 20 20 20 |40 REM | * |
|00000070| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 2a 0a | | *.|
|00000080| 35 30 20 20 52 45 4d 20 | 20 2a 20 43 4f 50 59 52 |50 REM | * COPYR|
|00000090| 49 47 48 54 20 31 39 38 | 36 20 42 59 20 20 2a 0a |IGHT 198|6 BY *.|
|000000a0| 36 30 20 20 52 45 4d 20 | 20 2a 20 4d 49 43 52 4f |60 REM | * MICRO|
|000000b0| 53 50 41 52 43 2c 20 49 | 4e 43 2e 20 20 20 2a 0a |SPARC, I|NC. *.|
|000000c0| 37 30 20 20 52 45 4d 20 | 20 2a 20 43 4f 4e 43 4f |70 REM | * CONCO|
|000000d0| 52 44 2c 20 4d 41 20 20 | 30 31 37 34 32 20 2a 0a |RD, MA |01742 *.|
|000000e0| 38 30 20 20 52 45 4d 20 | 20 2a 2a 2a 2a 2a 2a 2a |80 REM | *******|
|000000f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 0a |********|*******.|
|00000100| 39 30 20 20 49 46 20 20 | 50 45 45 4b 28 31 30 34 |90 IF |PEEK(104|
|00000110| 29 20 3c 20 3e 36 34 20 | 20 54 48 45 4e 20 20 50 |) < >64 | THEN P|
|00000120| 4f 4b 45 20 31 30 34 2c | 36 34 3a 20 50 4f 4b 45 |OKE 104,|64: POKE|
|00000130| 20 31 30 33 2c 31 3a 20 | 50 4f 4b 45 20 31 36 33 | 103,1: |POKE 163|
|00000140| 38 34 2c 30 3a 20 50 52 | 49 4e 54 20 20 43 48 52 |84,0: PR|INT CHR|
|00000150| 24 28 34 29 22 52 55 4e | 20 50 52 49 4e 54 45 52 |$(4)"RUN| PRINTER|
|00000160| 2e 44 45 4d 4f 22 0a 31 | 30 30 20 20 50 52 49 4e |.DEMO".1|00 PRIN|
|00000170| 54 20 20 43 48 52 24 28 | 34 29 22 42 4c 4f 41 44 |T CHR$(|4)"BLOAD|
|00000180| 20 50 52 49 4e 54 45 52 | 22 3a 20 50 52 49 4e 54 | PRINTER|": PRINT|
|00000190| 20 20 43 48 52 24 28 34 | 29 22 42 4c 4f 41 44 20 | CHR$(4|)"BLOAD |
|000001a0| 50 54 41 42 4c 45 22 3a | 20 49 46 20 20 50 45 45 |PTABLE":| IF PEE|
|000001b0| 4b 28 34 38 38 39 36 29 | 20 3d 20 37 36 20 20 54 |K(48896)| = 76 T|
|000001c0| 48 45 4e 20 20 50 4f 4b | 45 20 32 30 35 30 2c 32 |HEN POK|E 2050,2|
|000001d0| 31 36 3a 20 50 52 49 4e | 54 20 20 43 48 52 24 28 |16: PRIN|T CHR$(|
|000001e0| 34 29 22 50 52 23 20 41 | 24 38 30 32 22 3a 20 47 |4)"PR# A|$802": G|
|000001f0| 4f 54 4f 20 31 32 30 0a | 31 31 30 20 20 50 4f 4b |OTO 120.|110 POK|
|00000200| 45 20 35 34 2c 33 3a 20 | 50 4f 4b 45 20 35 35 2c |E 54,3: |POKE 55,|
|00000210| 38 0a 31 32 30 20 20 48 | 47 52 20 3a 20 48 4f 4d |8.120 H|GR : HOM|
|00000220| 45 20 0a 31 33 30 20 20 | 50 52 49 4e 54 20 22 54 |E .130 |PRINT "T|
|00000230| 48 45 20 50 52 49 4e 54 | 45 52 20 52 4f 55 54 49 |HE PRINT|ER ROUTI|
|00000240| 4e 45 53 20 57 49 4c 4c | 2d 2d 2d 22 0a 31 34 30 |NES WILL|---".140|
|00000250| 20 20 56 54 41 42 20 33 | 3a 20 50 52 49 4e 54 20 | VTAB 3|: PRINT |
|00000260| 22 50 52 49 4e 54 20 49 | 4e 20 43 41 50 49 54 41 |"PRINT I|N CAPITA|
|00000270| 4c 53 22 0a 31 35 30 20 | 20 50 4f 4b 45 20 38 2c |LS".150 | POKE 8,|
|00000280| 31 3a 20 50 52 49 4e 54 | 20 22 50 52 49 4e 54 20 |1: PRINT| "PRINT |
|00000290| 49 4e 20 4c 4f 57 45 52 | 43 41 53 45 22 0a 31 36 |IN LOWER|CASE".16|
|000002a0| 30 20 20 50 4f 4b 45 20 | 38 2c 30 3a 20 49 4e 56 |0 POKE |8,0: INV|
|000002b0| 45 52 53 45 20 3a 20 56 | 54 41 42 20 37 3a 20 50 |ERSE : V|TAB 7: P|
|000002c0| 52 49 4e 54 20 22 20 50 | 52 49 4e 54 20 49 4e 20 |RINT " P|RINT IN |
|000002d0| 49 4e 56 45 52 53 45 22 | 3a 20 4e 4f 52 4d 41 4c |INVERSE"|: NORMAL|
|000002e0| 20 0a 31 37 30 20 20 50 | 4f 4b 45 20 37 2c 31 3a | .170 P|OKE 7,1:|
|000002f0| 20 56 54 41 42 20 39 3a | 20 50 52 49 4e 54 20 22 | VTAB 9:| PRINT "|
|00000300| 50 52 49 4e 54 20 4e 55 | 4d 42 45 52 53 20 41 53 |PRINT NU|MBERS AS|
|00000310| 20 53 55 42 53 43 52 49 | 50 54 53 20 2d 2d 3e 41 | SUBSCRI|PTS -->A|
|00000320| 35 22 0a 31 38 30 20 20 | 50 4f 4b 45 20 37 2c 32 |5".180 |POKE 7,2|
|00000330| 3a 20 56 54 41 42 20 31 | 31 3a 20 50 52 49 4e 54 |: VTAB 1|1: PRINT|
|00000340| 20 22 50 52 49 4e 54 20 | 4e 55 4d 42 45 52 53 20 | "PRINT |NUMBERS |
|00000350| 41 53 20 53 55 50 45 52 | 53 43 52 49 50 54 53 20 |AS SUPER|SCRIPTS |
|00000360| 2d 2d 3e 41 36 22 0a 31 | 39 30 20 20 50 4f 4b 45 |-->A6".1|90 POKE|
|00000370| 20 37 2c 30 3a 20 56 54 | 41 42 20 31 33 3a 20 50 | 7,0: VT|AB 13: P|
|00000380| 52 49 4e 54 20 22 55 53 | 45 20 43 48 52 24 20 2d |RINT "US|E CHR$ -|
|00000390| 2d 3e 20 43 48 52 24 28 | 39 31 29 20 3d 20 22 3b |-> CHR$(|91) = ";|
|000003a0| 20 43 48 52 24 28 39 31 | 29 0a 32 30 30 20 50 24 | CHR$(91|).200 P$|
|000003b0| 20 3d 20 22 41 20 43 48 | 41 52 41 43 54 45 52 20 | = "A CH|ARACTER |
|000003c0| 53 54 52 49 4e 47 22 3a | 56 20 3d 20 31 30 0a 32 |STRING":|V = 10.2|
|000003d0| 31 30 20 20 56 54 41 42 | 20 31 35 3a 20 50 52 49 |10 VTAB| 15: PRI|
|000003e0| 4e 54 20 22 41 4e 44 20 | 50 52 49 4e 54 20 56 41 |NT "AND |PRINT VA|
|000003f0| 52 49 41 42 4c 45 53 3a | 22 0a 32 32 30 20 20 56 |RIABLES:|".220 V|
|00000400| 54 41 42 20 31 37 3a 20 | 50 52 49 4e 54 20 22 50 |TAB 17: |PRINT "P|
|00000410| 24 20 3d 20 22 3b 50 24 | 3a 20 50 52 49 4e 54 20 |$ = ";P$|: PRINT |
|00000420| 22 41 4e 44 20 56 20 3d | 20 22 56 0a 32 33 30 20 |"AND V =| "V.230 |
|00000430| 20 50 52 49 4e 54 20 0a | 32 34 30 20 20 50 52 49 | PRINT .|240 PRI|
|00000440| 4e 54 20 22 50 52 45 53 | 53 20 3c 52 45 54 55 52 |NT "PRES|S <RETUR|
|00000450| 4e 3e 20 46 4f 52 20 54 | 45 58 54 20 53 43 52 45 |N> FOR T|EXT SCRE|
|00000460| 45 4e 22 3b 3a 20 47 45 | 54 20 5a 24 3a 20 50 52 |EN";: GE|T Z$: PR|
|00000470| 49 4e 54 20 3a 20 54 45 | 58 54 20 |INT : TE|XT |
+--------+-------------------------+-------------------------+--------+--------+