PIC09
FILE INFORMATION
FILENAME(S): PIC09
FILE TYPE(S): DEL
FILE SIZE: 489b
FIRST SEEN: 2025-11-30 21:27:35
APPEARS ON: 1 disk(s)
FILE HASH
13935f7a25c1c982c92ab34a10edf4606eab658ada987a05eb7f8e0c4f9ce2d1
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HOLLYWOOD II | PIC09 | DEL | DuncanTwain | 35 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 8A 75 8F 20 43 4F 4D 41 53 54 2D 42 41 53 49 43 |.u. COMAST-BASIC| 00000010: 20 53 50 2D 35 30 32 35 2F 36 30 31 35 00 DA 3A | SP-5025/6015..:| 00000020: 94 75 8F 20 30 35 2E 31 39 38 33 20 42 41 53 49 |.u. 05.1983 BASI| 00000030: 43 4F 44 45 2D 32 20 56 45 52 53 49 4F 4E 20 31 |CODE-2 VERSION 1| 00000040: 00 FD 3A 99 75 8F 20 30 35 2E 31 39 38 34 20 42 |..:.u. 05.1984 B| 00000050: 41 53 49 43 4F 44 45 2D 32 20 56 45 52 53 49 4F |ASICODE-2 VERSIO| 00000060: 4E 20 32 00 1A 3B 9E 75 8F 20 52 45 46 45 52 45 |N 2..;.u. REFERE| 00000070: 4E 43 45 20 22 48 45 52 45 27 53 20 48 4F 57 22 |NCE "HERE'S HOW"| 00000080: 00 36 3B A8 75 8F 20 20 20 20 20 20 20 20 20 20 |.6;.u. | 00000090: 20 20 42 59 20 44 41 4E 20 46 4F 58 00 53 3B E4 | BY DAN FOX.S;.| 000000A0: 75 8F 20 42 41 53 49 43 4F 44 45 2D 32 20 53 55 |u. BASICODE-2 SU| 000000B0: 42 52 4F 55 54 49 4E 45 53 00 70 3B EE 75 8F 20 |BROUTINES.p;.u. | 000000C0: 55 53 45 44 20 49 4E 20 54 48 49 53 20 50 52 4F |USED IN THIS PRO| 000000D0: 47 52 41 4D 20 3A 00 92 3B F8 75 8F 20 31 30 30 |GRAM :..;.u. 100| 000000E0: 20 43 4C 45 41 52 20 53 43 52 45 45 4E 20 43 55 | CLEAR SCREEN CU| 000000F0: 52 53 4F 52 20 30 2C 30 00 B4 3B 02 76 8F 20 31 |RSOR 0,0..;.v. 1| 00000100: 31 30 20 43 55 52 53 4F 52 20 41 54 20 48 4F 3D |10 CURSOR AT HO=| 00000110: 48 4F 52 49 5A 4F 4E 54 41 4C 00 D4 3B 0C 76 8F |HORIZONTAL..;.v.| 00000120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 | V| 00000130: 45 3D 56 45 52 54 49 43 41 4C 00 F6 3B 16 76 8F |E=VERTICAL..;.v.| 00000140: 20 32 31 30 20 47 45 54 49 4E 24 3A 49 46 20 49 | 210 GETIN$:IF I| 00000150: 4E 24 3D 22 22 54 48 45 4E 32 31 30 00 05 3C 20 |N$=""THEN210..< | 00000160: 76 8F 20 32 35 30 20 42 45 4C 4C 00 1C 3C 2A 76 |v. 250 BELL..<*v| 00000170: 8F 20 33 30 30 20 53 52 24 3D 53 54 52 24 28 53 |. 300 SR$=STR$(S| 00000180: 52 29 00 3C 3C 34 76 8F 20 33 35 30 20 50 52 49 |R).<<4v. 350 PRI| 00000190: 4E 54 20 53 52 24 3B 20 54 4F 20 50 52 49 4E 54 |NT SR$; TO PRINT| 000001A0: 45 52 00 5B 3C 3E 76 8F 20 33 36 30 20 4C 49 4E |ER.[<>v. 360 LIN| 000001B0: 45 20 46 45 45 44 20 4F 4E 20 50 52 49 4E 54 45 |E FEED ON PRINTE| 000001C0: 52 00 61 3C 48 76 8F 00 80 3C 52 76 8F 20 43 4F |R.a<Hv...<Rv. CO| 000001D0: 50 59 52 49 47 48 54 20 20 4E 4F 53 20 48 49 4C |PYRIGHT NOS HIL| 000001E0: 56 45 52 53 55 4D 00 00 00 |VERSUM... |
.U. COMAST-BASIC SP-5025/6015.Z:.U. 05.1 983 BASICODE-2 VERSION 1..:.U. 05.1984 B ASICODE-2 VERSION 2..;.U. REFERENCE "HER E'S HOW".6;.U. BY DAN FOX.S;. U. BASICODE-2 SUBROUTINES.P;.U. USED IN THIS PROGRAM :..;.U. 100 CLEAR SCREEN CU RSOR 0,0..;.V. 110 CURSOR AT HO=HORIZONT AL.T;.V. VE=VERTICAL..;.V. 210 GETIN$:IF IN$=""THEN210..< V. 250 B ELL..<*V. 300 SR$=STR$(SR).<<4V. 350 PRI NT SR$; TO PRINTER.[<>V. 360 LINE FEED O N PRINTER.A<HV...<RV. COPYRIGHT NOS HIL VERSUM...
> CLICK IMAGE PREVIEW FOR FULL MODAL