WINDOWS ON C64
FILE INFORMATION
FILENAME(S): WINDOWS ON C64
FILE TYPE(S): PRG
FILE SIZE: 3K
FIRST SEEN: 2025-11-30 18:06:37
APPEARS ON: 1 disk(s)
FILE HASH
01c0401973e1724e60b5c6e41ccf406268e5d4b4e71f26d981883abd16e888e4
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PUBLICATION 9 | WINDOWS ON C64 | PRG | Xii | 17 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 24 08 0A 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |..$....*********| 00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000020: 2A 2A 2A 2A 00 47 08 14 00 8F 2A 20 20 20 20 20 |****.G....* | 00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000040: 20 20 20 20 20 20 2A 00 6A 08 1E 00 8F 2A 20 20 | *.j....* | 00000050: 20 57 49 4E 44 4F 57 53 20 44 45 4D 4F 4E 53 54 | WINDOWS DEMONST| 00000060: 52 41 54 49 4F 4E 20 20 20 2A 00 8D 08 28 00 8F |RATION *...(..| 00000070: 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |* | 00000080: 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 B0 08 | *...| 00000090: 32 00 8F 2A 20 20 20 45 52 49 43 20 52 41 4E 44 |2..* ERIC RAND| 000000A0: 41 4C 4C 20 20 20 20 20 31 39 38 38 20 20 20 2A |ALL 1988 *| 000000B0: 00 D3 08 3C 00 8F 2A 20 20 20 20 20 20 20 20 20 |...<..* | 000000C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000D0: 20 20 2A 00 F6 08 46 00 8F 2A 2A 2A 2A 2A 2A 2A | *...F..*******| 000000E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000000F0: 2A 2A 2A 2A 2A 2A 00 FC 08 50 00 8F 00 14 09 5A |******...P.....Z| 00000100: 00 8F 20 20 20 20 49 4E 49 54 49 41 4C 49 53 41 |.. INITIALISA| 00000110: 54 49 4F 4E 00 1A 09 64 00 8F 00 62 09 69 00 97 |TION...d...b.i..| 00000120: 35 33 32 38 30 2C 31 34 3A 97 36 34 36 2C 31 34 |53280,14:.646,14| 00000130: 3A 97 35 33 32 38 31 2C 36 3A 99 22 93 11 11 11 |:.53281,6:."....| 00000140: 11 11 20 20 20 20 20 20 20 20 4C 4F 41 44 49 4E |.. LOADIN| 00000150: 47 3A 05 20 4D 41 43 48 49 4E 45 20 43 4F 44 45 |G:. MACHINE CODE| 00000160: 9A 22 00 86 09 6E 00 8B C2 28 34 39 31 35 32 29 |."...n...(49152)| 00000170: B3 B1 37 32 A7 93 22 57 49 4E 44 4F 57 53 20 4D |..72.."WINDOWS M| 00000180: 43 22 2C 38 2C 31 00 9A 09 78 00 97 35 32 2C 31 |C",8,1...x..52,1| 00000190: 30 30 3A 97 35 36 2C 31 30 30 00 E8 09 82 00 49 |00:.56,100.....I| 000001A0: 4E 49 54 B2 35 30 31 37 36 3A 53 45 54 B2 35 30 |NIT.50176:SET.50| 000001B0: 31 37 39 3A 50 55 4C 4C B2 35 30 31 38 32 3A 42 |179:PULL.50182:B| 000001C0: 41 43 4B B2 35 30 31 38 35 3A 44 4F 57 4E B2 35 |ACK.50185:DOWN.5| 000001D0: 30 31 38 38 3A 55 50 B2 35 30 31 39 31 3A 4C 45 |0188:UP.50191:LE| 000001E0: 46 54 B2 35 30 31 39 34 00 F8 09 8C 00 52 49 47 |FT.50194.....RIG| 000001F0: 48 54 B2 35 30 31 39 37 00 10 0A 96 00 97 35 33 |HT.50197......53| 00000200: 32 36 35 2C C2 28 35 33 32 36 35 29 AF 32 33 39 |265,.(53265).239| 00000210: 00 4C 0A A0 00 9E 49 4E 49 54 3A 9E 53 45 54 2C |.L....INIT:.SET,| 00000220: 31 2C 33 2C 35 2C 31 39 2C 33 30 3A 9E 53 45 54 |1,3,5,19,30:.SET| 00000230: 2C 32 2C 32 2C 32 2C 31 34 2C 33 30 3A 9E 53 45 |,2,2,2,14,30:.SE| 00000240: 54 2C 34 2C 35 2C 38 2C 38 2C 32 33 00 58 0A AA |T,4,5,8,8,23.X..| 00000250: 00 9E 50 55 4C 4C 2C 31 00 95 0A B4 00 99 22 93 |..PULL,1......".| 00000260: 20 20 20 20 20 20 12 49 4E 53 54 52 55 43 54 49 | .INSTRUCTI| 00000270: 4F 4E 53 92 22 3A 99 22 11 49 4E 49 54 49 41 4C |ONS.":.".INITIAL| 00000280: 49 53 45 20 53 59 53 54 45 4D 20 2D 20 53 59 53 |ISE SYSTEM - SYS| 00000290: 35 30 31 37 36 00 E4 0A BE 00 99 22 11 44 45 46 |50176......".DEF| 000002A0: 49 4E 45 20 57 49 4E 44 4F 57 20 2D 20 53 59 53 |INE WINDOW - SYS| 000002B0: 35 30 31 37 39 2C 41 2C 42 2C 43 2C 44 2C 45 20 |50179,A,B,C,D,E | 000002C0: 20 57 48 45 52 45 3A 22 3A 99 22 20 41 3D 57 49 | WHERE:":." A=WI| 000002D0: 4E 44 4F 57 20 4E 55 4D 42 45 52 20 28 31 20 54 |NDOW NUMBER (1 T| 000002E0: 4F 20 34 29 00 1B 0B C8 00 99 22 20 42 3D 53 54 |O 4)......" B=ST| 000002F0: 41 52 54 20 4C 49 4E 45 20 20 43 3D 53 54 41 52 |ART LINE C=STAR| 00000300: 54 20 52 4F 57 22 3A 99 22 20 44 3D 4E 55 4D 42 |T ROW":." D=NUMB| 00000310: 45 52 20 4F 46 20 4C 49 4E 45 53 00 6B 0B D2 00 |ER OF LINES.k...| 00000320: 99 22 20 45 3D 4E 55 4D 42 45 52 20 4F 46 20 52 |." E=NUMBER OF R| 00000330: 4F 57 53 22 3A 99 22 11 50 55 4C 4C 20 44 4F 57 |OWS":.".PULL DOW| 00000340: 4E 20 57 49 4E 44 4F 57 20 2D 20 53 59 53 35 30 |N WINDOW - SYS50| 00000350: 31 38 32 2C 41 20 57 48 45 52 45 20 41 3D 57 49 |182,A WHERE A=WI| 00000360: 4E 44 4F 57 20 4E 55 4D 42 45 52 00 9B 0B DC 00 |NDOW NUMBER.....| 00000370: 99 22 11 50 55 53 48 20 42 41 43 4B 20 43 55 52 |.".PUSH BACK CUR| 00000380: 52 45 4E 54 20 57 49 4E 44 4F 57 20 2D 20 20 20 |RENT WINDOW - | 00000390: 20 53 59 53 35 30 31 38 35 11 22 00 B4 0B E6 00 | SYS50185.".....| 000003A0: 99 22 50 52 45 53 53 20 41 20 4B 45 59 22 3A 9E |."PRESS A KEY":.| 000003B0: 42 41 43 4B 00 D7 0B F0 00 9E 50 55 4C 4C 2C 34 |BACK......PULL,4| 000003C0: 3A 99 22 93 11 54 4F 20 44 52 41 47 20 57 49 4E |:."..TO DRAG WIN| 000003D0: 44 4F 57 53 20 3A 2D 00 10 0C FA 00 99 22 11 20 |DOWS :-......". | 000003E0: 44 4F 57 4E 20 20 2D 20 53 59 53 35 30 31 38 38 |DOWN - SYS50188| 000003F0: 20 12 46 33 92 22 3A 99 22 20 55 50 20 20 20 20 | .F3.":." UP | 00000400: 2D 20 53 59 53 35 30 31 39 31 20 12 46 34 92 22 |- SYS50191 .F4."| 00000410: 00 48 0C 04 01 99 22 20 4C 45 46 54 20 20 2D 20 |.H...." LEFT - | 00000420: 53 59 53 35 30 31 39 34 20 12 46 36 92 22 3A 99 |SYS50194 .F6.":.| 00000430: 22 20 52 49 47 48 54 20 2D 20 53 59 53 35 30 31 |" RIGHT - SYS501| 00000440: 39 37 20 12 46 35 92 22 00 65 0C 0E 01 9E 42 41 |97 .F5.".e....BA| 00000450: 43 4B 3A 97 35 33 32 36 35 2C C2 28 35 33 32 36 |CK:.53265,.(5326| 00000460: 35 29 AA 31 36 00 6B 0C 18 01 8F 00 7E 0C 22 01 |5).16.k.....~.".| 00000470: 8F 20 20 20 20 4D 41 49 4E 20 4D 45 4E 55 00 84 |. MAIN MENU..| 00000480: 0C 2C 01 8F 00 B8 0C 36 01 99 22 93 11 12 20 20 |.,.....6.."... | 00000490: 20 20 20 20 20 20 20 20 57 49 4E 44 4F 57 53 20 | WINDOWS | 000004A0: 44 45 4D 4F 4E 53 54 52 41 54 49 4F 4E 20 20 20 |DEMONSTRATION | 000004B0: 20 20 20 20 20 20 92 22 00 D8 0C 40 01 99 22 11 | ."...@..".| 000004C0: 11 11 20 20 12 31 92 20 20 2D 20 20 49 4E 53 54 |.. .1. - INST| 000004D0: 52 55 43 54 49 4F 4E 53 00 00 0D 4A 01 99 22 11 |RUCTIONS...J..".| 000004E0: 20 20 12 32 92 20 20 2D 20 20 44 49 53 4B 20 44 | .2. - DISK D| 000004F0: 49 52 45 43 54 4F 52 59 20 4C 49 53 54 49 4E 47 |IRECTORY LISTING| 00000500: 00 28 0D 54 01 99 22 11 20 20 12 33 92 20 20 2D |.(.T..". .3. -| 00000510: 20 20 44 45 46 49 4E 45 20 59 4F 55 52 20 4F 57 | DEFINE YOUR OW| 00000520: 4E 20 57 49 4E 44 4F 57 00 4C 0D 5E 01 99 22 11 |N WINDOW.L.^..".| 00000530: 20 20 12 34 92 20 20 2D 20 20 50 55 4C 4C 20 44 | .4. - PULL D| 00000540: 4F 57 4E 20 41 20 57 49 4E 44 4F 57 00 62 0D 68 |OWN A WINDOW.b.h| 00000550: 01 99 22 11 20 20 12 35 92 20 20 2D 20 20 45 58 |..". .5. - EX| 00000560: 49 54 00 9F 0D 72 01 99 22 11 41 46 54 45 52 20 |IT...r..".AFTER | 00000570: 45 41 43 48 20 45 58 45 52 43 49 53 45 2C 20 50 |EACH EXERCISE, P| 00000580: 52 45 53 53 20 46 31 20 54 4F 20 45 58 49 54 20 |RESS F1 TO EXIT | 00000590: 20 20 46 52 4F 4D 20 41 20 57 49 4E 44 4F 57 00 | FROM A WINDOW.| 000005A0: BD 0D 7C 01 99 22 11 11 20 20 20 20 20 20 12 53 |..|..".. .S| 000005B0: 45 4C 45 43 54 20 4F 50 54 49 4F 4E 92 00 D8 0D |ELECT OPTION....| 000005C0: 86 01 A1 41 24 3A 8B 41 24 B3 22 31 22 B0 41 24 |...A$:.A$."1".A$| 000005D0: B1 22 35 22 A7 33 39 30 00 F7 0D 90 01 91 C5 28 |."5".390.......(| 000005E0: 41 24 29 89 34 31 30 2C 34 39 30 2C 35 36 30 2C |A$).410,490,560,| 000005F0: 36 36 30 2C 34 38 30 00 FD 0D 9A 01 8F 00 1E 0E |660,480.........| 00000600: A4 01 8F 20 20 20 20 50 55 4C 4C 20 49 4E 53 54 |... PULL INST| 00000610: 52 55 43 54 49 4F 4E 20 57 49 4E 44 4F 57 00 24 |RUCTION WINDOW.$| 00000620: 0E AE 01 8F 00 35 0E B8 01 9E 50 55 4C 4C 2C 31 |.....5....PULL,1| 00000630: 3A 8D 37 34 30 00 46 0E C2 01 9E 50 55 4C 4C 2C |:.740.F....PULL,| 00000640: 34 3A 8D 37 34 30 00 56 0E CC 01 9E 42 41 43 4B |4:.740.V....BACK| 00000650: 3A 9E 42 41 43 4B 00 5F 0E D6 01 89 33 39 30 00 |:.BACK._....390.| 00000660: 65 0E E0 01 80 00 6B 0E EA 01 8F 00 86 0E F4 01 |e.....k.........| 00000670: 8F 20 20 20 20 44 49 53 50 4C 41 59 20 44 49 52 |. DISPLAY DIR| 00000680: 45 43 54 4F 52 59 00 8C 0E FE 01 8F 00 98 0E 08 |ECTORY..........| 00000690: 02 9E 50 55 4C 4C 2C 32 00 D2 0E 12 02 99 22 93 |..PULL,2......".| 000006A0: 20 20 20 20 12 44 49 53 4B 20 4C 49 53 54 49 4E | .DISK LISTIN| 000006B0: 47 92 22 3A 99 22 49 4E 53 45 52 54 20 44 49 53 |G.":."INSERT DIS| 000006C0: 4B 20 41 4E 44 20 50 52 45 53 53 20 41 20 4B 45 |K AND PRESS A KE| 000006D0: 59 22 00 E5 0E 1C 02 A1 41 24 3A 8B 41 24 B2 22 |Y"......A$:.A$."| 000006E0: 22 A7 35 34 30 00 FE 0E 26 02 8D 38 35 30 3A 8D |".540...&..850:.| 000006F0: 37 34 30 3A 9E 42 41 43 4B 3A 89 33 39 30 00 04 |740:.BACK:.390..| 00000700: 0F 30 02 8F 00 1D 0F 3A 02 8F 20 20 20 20 44 45 |.0.....:.. DE| 00000710: 46 49 4E 45 20 41 20 57 49 4E 44 4F 57 00 23 0F |FINE A WINDOW.#.| 00000720: 44 02 8F 00 68 0F 4E 02 9E 50 55 4C 4C 2C 31 3A |D...h.N..PULL,1:| 00000730: 99 22 93 20 20 20 20 12 44 45 46 49 4E 45 20 57 |.". .DEFINE W| 00000740: 49 4E 44 4F 57 92 22 3A 99 22 11 11 59 4F 55 52 |INDOW.":."..YOUR| 00000750: 20 57 49 4E 44 4F 57 20 57 49 4C 4C 20 42 45 20 | WINDOW WILL BE | 00000760: 4E 55 4D 42 45 52 20 33 00 95 0F 58 02 41 B2 33 |NUMBER 3...X.A.3| 00000770: 3A 99 22 11 20 53 54 41 52 54 20 4C 49 4E 45 22 |:.". START LINE"| 00000780: 3B 3A 85 42 3A 99 22 53 54 41 52 54 20 52 4F 57 |;:.B:."START ROW| 00000790: 22 3B 3A 85 43 00 C6 0F 62 02 99 22 4E 55 4D 42 |";:.C...b.."NUMB| 000007A0: 45 52 20 4F 46 20 4C 49 4E 45 53 22 3B 3A 85 44 |ER OF LINES";:.D| 000007B0: 3A 99 22 4E 55 4D 42 45 52 20 4F 46 20 52 4F 57 |:."NUMBER OF ROW| 000007C0: 53 22 3B 3A 85 45 00 E1 0F 6C 02 9E 53 45 54 2C |S";:.E...l..SET,| 000007D0: 41 2C 42 2C 43 2C 44 2C 45 3A 9E 50 55 4C 4C 2C |A,B,C,D,E:.PULL,| 000007E0: 41 00 2B 10 76 02 99 22 93 54 48 49 53 20 49 53 |A.+.v..".THIS IS| 000007F0: 20 59 4F 55 52 20 57 49 4E 44 4F 57 2E 20 20 55 | YOUR WINDOW. U| 00000800: 53 45 20 54 48 45 20 43 55 52 53 45 52 20 41 4E |SE THE CURSER AN| 00000810: 44 20 48 4F 4D 45 20 43 4F 4E 54 52 4F 4C 53 20 |D HOME CONTROLS | 00000820: 54 4F 20 53 45 54 20 55 50 22 3B 00 5E 10 80 02 |TO SET UP";.^...| 00000830: 99 22 54 48 45 20 44 49 53 50 4C 41 59 20 49 4E |."THE DISPLAY IN| 00000840: 20 54 48 49 53 20 57 49 4E 44 4F 57 20 54 48 45 | THIS WINDOW THE| 00000850: 4E 20 50 52 45 53 53 20 52 45 54 55 52 4E 00 77 |N PRESS RETURN.w| 00000860: 10 8A 02 85 41 24 3A 9E 42 41 43 4B 3A 9E 42 41 |....A$:.BACK:.BA| 00000870: 43 4B 3A 89 33 39 30 00 7D 10 94 02 8F 00 99 10 |CK:.390.}.......| 00000880: 9E 02 8F 20 20 20 20 50 55 4C 4C 20 44 4F 57 4E |... PULL DOWN| 00000890: 20 41 20 57 49 4E 44 4F 57 00 9F 10 A8 02 8F 00 | A WINDOW.......| 000008A0: C6 10 B2 02 9E 50 55 4C 4C 2C 32 3A 99 22 93 20 |.....PULL,2:.". | 000008B0: 20 20 12 50 55 4C 4C 20 44 4F 57 4E 20 41 20 57 | .PULL DOWN A W| 000008C0: 49 4E 44 4F 57 92 00 EB 10 BC 02 99 22 11 11 57 |INDOW......."..W| 000008D0: 48 49 43 48 20 57 49 4E 44 4F 57 20 28 31 2C 20 |HICH WINDOW (1, | 000008E0: 33 20 4F 52 20 34 29 22 3A 85 41 00 00 11 C1 02 |3 OR 4)":.A.....| 000008F0: 8B 41 B3 31 B0 41 B1 34 B0 41 B2 32 A7 37 30 30 |.A.1.A.4.A.2.700| 00000900: 00 0C 11 C6 02 9E 50 55 4C 4C 2C 41 00 15 11 D0 |......PULL,A....| 00000910: 02 8D 37 34 30 00 2A 11 DA 02 9E 42 41 43 4B 3A |..740.*....BACK:| 00000920: 9E 42 41 43 4B 3A 89 33 39 30 00 30 11 E4 02 8F |.BACK:.390.0....| 00000930: 00 50 11 EE 02 8F 20 20 20 43 48 45 43 4B 20 57 |.P.... CHECK W| 00000940: 48 49 43 48 20 4B 45 59 20 50 52 45 53 53 45 44 |HICH KEY PRESSED| 00000950: 00 68 11 F8 02 8F 20 20 20 41 4E 44 20 4D 4F 56 |.h.... AND MOV| 00000960: 45 20 57 49 4E 44 4F 57 00 6E 11 02 03 8F 00 81 |E WINDOW.n......| 00000970: 11 0C 03 A1 41 24 3A 8B 41 24 B2 22 22 A7 37 38 |....A$:.A$."".78| 00000980: 30 00 8D 11 16 03 41 B2 C6 28 41 24 29 00 A1 11 |0.....A..(A$)...| 00000990: 20 03 8B 41 B2 31 33 38 A7 9E 55 50 3A 89 37 34 | ..A.138..UP:.74| 000009A0: 30 00 B7 11 2A 03 8B 41 B2 31 33 34 A7 9E 44 4F |0...*..A.134..DO| 000009B0: 57 4E 3A 89 37 34 30 00 CD 11 34 03 8B 41 B2 31 |WN:.740...4..A.1| 000009C0: 33 39 A7 9E 4C 45 46 54 3A 89 37 34 30 00 E4 11 |39..LEFT:.740...| 000009D0: 3E 03 8B 41 B2 31 33 35 A7 9E 52 49 47 48 54 3A |>..A.135..RIGHT:| 000009E0: 89 37 34 30 00 EA 11 48 03 8E 00 F0 11 52 03 8F |.740...H.....R..| 000009F0: 00 0E 12 5C 03 8F 20 20 20 20 50 52 49 4E 54 20 |...\.. PRINT | 00000A00: 44 49 53 4B 20 44 49 52 45 43 54 4F 52 59 00 14 |DISK DIRECTORY..| 00000A10: 12 66 03 8F 00 2E 12 70 03 9F 32 2C 38 2C 31 35 |.f.....p..2,8,15| 00000A20: 3A 5A B2 30 3A 50 B2 31 3A 98 32 2C 22 49 00 3E |:Z.0:P.1:.2,"I.>| 00000A30: 12 7A 03 9F 31 2C 38 2C 30 2C 22 24 30 22 00 4C |.z..1,8,0,"$0".L| 00000A40: 12 84 03 A1 23 31 2C 41 24 2C 42 24 00 5A 12 8E |....#1,A$,B$.Z..| 00000A50: 03 A1 23 31 2C 41 24 2C 42 24 00 68 12 98 03 A1 |..#1,A$,B$.h....| 00000A60: 23 31 2C 41 24 2C 42 24 00 70 12 A2 03 43 B2 30 |#1,A$,B$.p...C.0| 00000A70: 00 87 12 AC 03 8B 20 41 24 B3 B1 22 22 20 A7 20 |...... A$.."" . | 00000A80: 43 B2 C6 28 41 24 29 00 A4 12 B6 03 8B 20 42 24 |C..(A$)...... B$| 00000A90: B3 B1 22 22 20 A7 20 43 B2 43 AA C6 28 42 24 29 |.."" . C.C..(B$)| 00000AA0: AC 32 35 36 00 B8 12 C0 03 44 B2 33 AB C3 28 C4 |.256.....D.3..(.| 00000AB0: 28 43 29 29 3A 44 B2 45 00 D5 12 CA 03 99 22 12 |(C)):D.E......".| 00000AC0: 22 CA 28 C4 28 43 29 2C 32 29 3B A3 33 AA 45 29 |".(.(C),2);.3.E)| 00000AD0: 3B 22 92 22 3B 00 E8 12 D4 03 81 4A B2 30 A4 44 |;".";......J.0.D| 00000AE0: 3A 99 22 20 22 3B 3A 82 00 02 13 DE 03 A1 23 31 |:." ";:.......#1| 00000AF0: 2C 42 24 3A 8B 20 53 54 B3 B1 30 20 A7 20 31 30 |,B$:. ST..0 . 10| 00000B00: 39 30 00 18 13 E8 03 8B 20 42 24 B3 B1 C7 28 33 |90...... B$...(3| 00000B10: 34 29 20 A7 20 39 39 30 00 3B 13 F2 03 A1 23 31 |4) . 990.;....#1| 00000B20: 2C 42 24 3A 8B 20 42 24 B3 B1 C7 28 33 34 29 A7 |,B$:. B$...(34).| 00000B30: 20 99 42 24 3B 3A 89 31 30 31 30 00 58 13 FC 03 | .B$;:.1010.X...| 00000B40: A1 23 31 2C 42 24 3A 8B 20 42 24 B2 C7 28 33 32 |.#1,B$:. B$..(32| 00000B50: 29 20 A7 20 31 30 32 30 00 6C 13 06 04 99 20 A3 |) . 1020.l.... .| 00000B60: 32 31 AA 45 29 3B 3A 43 24 B2 22 22 00 91 13 10 |21.E);:C$.""....| 00000B70: 04 43 24 B2 43 24 AA 42 24 3A A1 23 31 2C 42 24 |.C$.C$.B$:.#1,B$| 00000B80: 3A 8B 20 42 24 B3 B1 22 22 20 20 A7 20 31 30 34 |:. B$.."" . 104| 00000B90: 30 00 A1 13 1A 04 99 22 12 22 C8 28 43 24 2C 33 |0......".".(C$,3| 00000BA0: 29 00 B2 13 24 04 8B 5A B2 30 A7 99 3A 5A B2 5A |)...$..Z.0..:Z.Z| 00000BB0: AA 31 00 C7 13 2E 04 50 B2 50 AA 31 3A 8B 50 B2 |.1.....P.P.1:.P.| 00000BC0: 31 30 A7 31 31 31 30 00 D8 13 38 04 8B 20 53 54 |10.1110...8.. ST| 00000BD0: B2 30 20 A7 20 39 31 30 00 EC 13 42 04 99 22 20 |.0 . 910...B.." | 00000BE0: 42 4C 4F 43 4B 53 20 46 52 45 45 22 00 F8 13 4C |BLOCKS FREE"...L| 00000BF0: 04 A0 31 3A A0 32 3A 8E 00 0D 14 56 04 99 22 12 |..1:.2:....V..".| 00000C00: 50 52 45 53 53 20 41 20 4B 45 59 92 22 00 21 14 |PRESS A KEY.".!.| 00000C10: 60 04 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 31 32 |`..A$:.A$."".112| 00000C20: 30 00 2F 14 6A 04 50 B2 30 3A 89 31 30 38 30 00 |0./.j.P.0:.1080.| 00000C30: 00 00 |.. |
..$....*****************************.G..
..* *.J....*
WINDOWS DEMONSTRATION *...(..*
*...2..* ERIC RAND
ALL 1988 *.S.<..*
*...F..***********************
******...P.....Z.. INITIALISATION...D
...B.I..53280,14:.646,14:.53281,6:."....
.. LOADING:. MACHINE CODE."...N..
B(49152)..72.."WINDOWS MC",8,1...X..52,1
00:.56,100.....INIT.50176:SET.50179:PULL
.50182:BACK.50185:DOWN.50188:UP.50191:LE
FT.50194.....RIGHT.50197......53265,B(53
265).239.L. ..INIT:.SET,1,3,5,19,30:.SET
,2,2,2,14,30:.SET,4,5,8,8,23.X....PULL,1
......". .INSTRUCTIONS.":.".INITIAL
ISE SYSTEM - SYS50176......".DEFINE WIND
OW - SYS50179,A,B,C,D,E WHERE:":." A=WI
NDOW NUMBER (1 TO 4)...H.." B=START LINE
C=START ROW":." D=NUMBER OF LINES.K.R.
." E=NUMBER OF ROWS":.".PULL DOWN WINDOW
- SYS50182,A WHERE A=WINDOW NUMBER.....
.".PUSH BACK CURRENT WINDOW - SYS5018
5."......"PRESS A KEY":.BACK.W....PULL,4
:."..TO DRAG WINDOWS :-......". DOWN -
SYS50188 .F3.":." UP - SYS50191 .F4."
.H...." LEFT - SYS50194 .F6.":." RIGHT
- SYS50197 .F5.".E....BACK:.53265,B(5326
5).16.K.....~.".. MAIN MENU...,.....6
.."... WINDOWS DEMONSTRATION
.".X.@.."... .1. - INSTRUCTIONS
...J..". .2. - DISK DIRECTORY LISTING
.(.T..". .3. - DEFINE YOUR OWN WINDOW
.L.^..". .4. - PULL DOWN A WINDOW.B.H
..". .5. - EXIT...R..".AFTER EACH EXE
RCISE, PRESS F1 TO EXIT FROM A WINDOW.
..|..".. .SELECT OPTION..X....A$:.A
$."1".A$."5".390......E(A$).410,490,560,
660,480............ PULL INSTRUCTION
WINDOW.$.....5....PULL,1:.740.F.B..PULL,
4:.740.V.L..BACK:.BACK._.V..390.E.....K.
......... DISPLAY DIRECTORY..........
..PULL,2.R....". .DISK LISTING.":."IN
SERT DISK AND PRESS A KEY"......A$:.A$."
".540...&..850:.740:.BACK:.390...0.....:
.. DEFINE A WINDOW.#.D...H.N..PULL,1:
.". .DEFINE WINDOW.":."..YOUR WINDOW
WILL BE NUMBER 3...X.A.3:.". START LINE"
;:.B:."START ROW";:.C.F.B.."NUMBER OF LI
NES";:.D:."NUMBER OF ROWS";:.E...L..SET,
A,B,C,D,E:.PULL,A.+.V..".THIS IS YOUR WI
NDOW. USE THE CURSER AND HOME CONTROLS
TO SET UP";.^...."THE DISPLAY IN THIS WI
NDOW THEN PRESS RETURN.W....A$:.BACK:.BA
CK:.390.}.......... PULL DOWN A WINDO
W.......F....PULL,2:.". .PULL DOWN A W
INDOW......."..WHICH WINDOW (1, 3 OR 4)"
:.A...A..A.1.A.4.A.2.700...F..PULL,A...P
..740.*.Z..BACK:.BACK:.390.0.....P....
CHECK WHICH KEY PRESSED.H.... AND MOV
E WINDOW.N..........A$:.A$."".780.....A.
F(A$)... ..A.138..UP:.740...*..A.134..DO
WN:.740.M.4..A.139..LEFT:.740...>..A.135
..RIGHT:.740...H.....R.....\.. PRINT
DISK DIRECTORY...F.....P..2,8,15:Z.0:P.1
:.2,"I.>.Z..1,8,0,"$0".L....#1,A$,B$.Z..
..#1,A$,B$.H....#1,A$,B$.P...C.0...... A
$.."" . C.F(A$)...... B$.."" . C.C.F(B$)
.256.....D.3.C(D(C)):D.E.U.J.."."J(D(C),
2);.3.E);".";...T..J.0.D:." ";:.......#1
,B$:. ST..0 . 1090...... B$..G(34) . 990
.;....#1,B$:. B$..G(34). .B$;:.1010.X...
.#1,B$:. B$.G(32) . 1020.L.... .21.E);:C
$."".....C$.C$.B$:.#1,B$:. B$.."" . 104
0......"."H(C$,3)...$..Z.0..:Z.Z.1.G...P
.P.1:.P.10.1110.X.8.. ST.0 . 910...B.."
BLOCKS FREE"...L. 1: 2:....V..".PRESS A
KEY.".!.`..A$:.A$."".1120./.J.P.0:.1080.
..
> CLICK IMAGE PREVIEW FOR FULL MODAL