CREEN AKER 64
FILE INFORMATION
FILENAME(S): CREEN AKER 64
FILE TYPE(S): PRG
FILE SIZE: 5.6K
FIRST SEEN: 2025-11-30 21:11:21
APPEARS ON: 1 disk(s)
FILE HASH
fc826049f226d71f0f7880c477d4ea63ea8097dd055f5a8fef099dffcb572b21
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| P IME 1 7 | CREEN AKER 64 | PRG | DuncanTwain | 7 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 00 10 20 20 20 20 20 20 20 20 20 20 20 73 43 52 |.. sCR|
00000010: 45 45 4E 20 6D 41 4B 45 52 20 36 34 0D 0D 20 20 |EEN mAKER 64.. |
00000020: 20 20 20 20 20 20 20 20 20 20 20 69 4E 53 54 55 | iNSTU|
00000030: 4B 54 49 45 20 66 49 4C 45 0D 0D 0D 0D 20 20 20 |KTIE fILE.... |
00000040: 20 20 20 20 28 43 29 20 31 39 38 37 20 62 41 52 | (C) 1987 bAR|
00000050: 42 41 52 41 20 73 43 48 55 4C 41 4B 0D 20 20 20 |BARA sCHULAK. |
00000060: 20 20 20 20 61 4C 4C 45 20 52 45 43 48 54 45 4E | aLLE RECHTEN|
00000070: 20 56 4F 4F 52 42 45 48 4F 55 44 45 4E 0D 0D 0D | VOORBEHOUDEN...|
00000080: 20 20 20 20 20 20 20 20 20 20 20 67 45 50 55 42 | gEPUB|
00000090: 4C 49 43 45 45 52 44 20 44 4F 4F 52 0D 20 20 20 |LICEERD DOOR. |
000000A0: 20 20 20 20 20 76 49 4B 49 4E 47 20 74 45 43 48 | vIKING tECH|
000000B0: 4E 4F 4C 4F 47 49 45 53 20 69 4E 43 2E 00 20 20 |NOLOGIES iNC.. |
000000C0: 73 63 72 65 65 6E 20 6D 61 6B 65 72 20 36 34 20 |screen maker 64 |
000000D0: 49 53 20 47 45 53 43 48 52 45 56 45 4E 20 41 4C |IS GESCHREVEN AL|
000000E0: 53 20 48 55 4C 50 4D 49 44 44 45 4C 20 56 4F 4F |S HULPMIDDEL VOO|
000000F0: 52 20 50 52 4F 47 52 41 4D 45 55 52 53 20 4F 4D |R PROGRAMEURS OM|
00000100: 20 4C 41 47 45 20 52 45 53 4F 4C 55 54 49 45 20 | LAGE RESOLUTIE |
00000110: 53 43 48 45 52 4D 45 4E 20 41 41 4E 20 54 45 20 |SCHERMEN AAN TE |
00000120: 4D 41 4B 45 4E 20 2D 20 5A 4F 57 45 4C 20 54 45 |MAKEN - ZOWEL TE|
00000130: 4B 53 54 20 41 4C 53 20 47 52 41 46 49 53 43 48 |KST ALS GRAFISCH|
00000140: 20 56 4F 4F 52 20 48 45 54 20 47 45 42 52 55 49 | VOOR HET GEBRUI|
00000150: 4B 20 49 4E 20 55 57 20 45 49 47 45 4E 20 50 52 |K IN UW EIGEN PR|
00000160: 4F 47 52 41 4D 4D 41 2E 0D 6F 4D 20 44 49 54 20 |OGRAMMA..oM DIT |
00000170: 54 45 20 4B 55 4E 4E 45 4E 20 44 4F 45 4E 2C 20 |TE KUNNEN DOEN, |
00000180: 56 49 4E 54 20 55 20 4F 4F 4B 20 49 4E 53 54 52 |VINT U OOK INSTR|
00000190: 55 4B 54 49 45 53 20 4F 56 45 52 20 48 4F 45 20 |UKTIES OVER HOE |
000001A0: 55 20 44 45 5A 45 20 53 43 48 45 52 4D 45 4E 20 |U DEZE SCHERMEN |
000001B0: 56 41 4E 55 49 54 20 55 57 20 45 49 47 45 4E 20 |VANUIT UW EIGEN |
000001C0: 62 61 73 69 63 20 50 52 4F 47 52 41 4D 4D 41 20 |basic PROGRAMMA |
000001D0: 4B 41 4E 20 4F 50 52 4F 45 50 45 4E 2E 20 72 4F |KAN OPROEPEN. rO|
000001E0: 55 54 49 4E 45 53 20 56 4F 4F 52 20 5A 4F 57 45 |UTINES VOOR ZOWE|
000001F0: 4C 20 44 45 20 63 36 34 20 41 4C 53 20 44 45 20 |L DE c64 ALS DE |
00000200: 63 31 32 38 20 5A 49 4A 4E 20 42 49 4A 47 45 53 |c128 ZIJN BIJGES|
00000210: 4C 4F 54 45 4E 2E 20 6F 46 20 55 20 4B 55 4E 54 |LOTEN. oF U KUNT|
00000220: 20 47 45 42 52 55 49 4B 20 4D 41 4B 45 4E 20 56 | GEBRUIK MAKEN V|
00000230: 41 4E 20 48 45 54 20 50 52 4F 47 52 41 4D 4D 41 |AN HET PROGRAMMA|
00000240: 20 64 61 74 61 20 6D 61 6B 65 72 2C 20 4F 4D 20 | data maker, OM |
00000250: 70 72 69 6E 74 20 53 54 41 54 45 4D 45 4E 54 53 |print STATEMENTS|
00000260: 20 41 41 4E 20 54 45 20 4D 41 4B 45 4E 2E 20 68 | AAN TE MAKEN. h|
00000270: 49 45 52 20 56 4F 4C 47 45 4E 20 44 45 20 43 4F |IER VOLGEN DE CO|
00000280: 4D 4D 41 4E 44 4F 27 53 3A 00 10 6C 4F 41 44 20 |MMANDO'S:..lOAD |
00000290: 45 4E 20 73 41 56 45 3A 0D 0D 20 20 20 20 65 4C |EN sAVE:.. eL|
000002A0: 4B 20 53 43 48 45 52 4D 20 57 4F 52 44 54 20 57 |K SCHERM WORDT W|
000002B0: 45 47 47 45 53 43 48 52 45 56 45 4E 20 49 4E 20 |EGGESCHREVEN IN |
000002C0: 54 57 45 45 20 42 45 53 54 41 4E 44 45 4E 20 2D |TWEE BESTANDEN -|
000002D0: 20 45 45 4E 20 56 4F 4F 52 20 44 45 20 53 43 48 | EEN VOOR DE SCH|
000002E0: 45 52 4D 2D 20 4B 41 52 41 4B 54 45 52 53 20 28 |ERM- KARAKTERS (|
000002F0: 31 30 36 34 2D 32 30 32 33 29 2C 20 45 4E 20 45 |1064-2023), EN E|
00000300: 45 4E 20 56 4F 4F 52 20 44 45 20 4B 4C 45 55 52 |EN VOOR DE KLEUR|
00000310: 45 4E 20 28 35 35 33 33 36 2D 35 36 32 39 35 29 |EN (55336-56295)|
00000320: 2E 20 68 45 54 20 45 45 52 53 54 45 20 42 45 53 |. hET EERSTE BES|
00000330: 54 41 4E 44 20 42 45 47 49 4E 54 20 4D 45 54 20 |TAND BEGINT MET |
00000340: 48 45 54 20 22 4B 4C 45 49 4E 45 52 20 44 41 4E |HET "KLEINER DAN|
00000350: 22 20 54 45 4B 45 4E 20 28 3C 29 2C 20 45 4E 20 |" TEKEN (<), EN |
00000360: 48 45 54 20 54 57 45 45 44 45 20 4D 45 54 20 48 |HET TWEEDE MET H|
00000370: 45 54 20 22 47 52 4F 54 45 52 20 44 41 4E 22 20 |ET "GROTER DAN" |
00000380: 54 45 4B 45 4E 20 28 3E 29 2E 20 68 4F 55 20 49 |TEKEN (>). hOU I|
00000390: 4E 20 44 45 20 47 41 54 45 4E 20 44 41 54 20 44 |N DE GATEN DAT D|
000003A0: 45 20 53 54 41 54 55 53 20 52 45 47 45 4C 20 4E |E STATUS REGEL N|
000003B0: 49 45 54 20 57 4F 52 44 54 20 42 45 57 41 41 52 |IET WORDT BEWAAR|
000003C0: 44 2C 20 44 55 53 20 55 20 5A 55 4C 54 20 48 45 |D, DUS U ZULT HE|
000003D0: 54 20 53 43 48 45 52 4D 20 4D 4F 45 54 45 4E 20 |T SCHERM MOETEN |
000003E0: 57 49 53 53 45 4E 2E 20 75 20 4D 4F 45 54 20 4F |WISSEN. u MOET O|
000003F0: 4F 4B 20 56 4F 4F 52 5A 49 45 4E 20 49 4E 20 44 |OK VOORZIEN IN D|
00000400: 45 20 4B 4C 45 55 52 45 4E 20 56 41 4E 20 48 45 |E KLEUREN VAN HE|
00000410: 54 20 53 43 48 45 52 4D 20 45 4E 20 44 45 20 52 |T SCHERM EN DE R|
00000420: 41 4E 44 3B 20 44 45 5A 45 20 57 4F 52 44 45 4E |AND; DEZE WORDEN|
00000430: 20 4F 4F 4B 20 4E 49 45 54 20 42 45 57 41 41 52 | OOK NIET BEWAAR|
00000440: 44 2E 0D 20 20 20 20 6F 4D 20 54 4F 45 47 41 4E |D.. oM TOEGAN|
00000450: 47 20 54 45 20 4B 52 49 4A 47 45 4E 20 54 4F 54 |G TE KRIJGEN TOT|
00000460: 20 44 45 20 6C 4F 41 44 20 45 4E 20 73 41 56 45 | DE lOAD EN sAVE|
00000470: 20 52 4F 55 54 49 4E 45 53 20 56 41 4E 55 49 54 | ROUTINES VANUIT|
00000480: 20 73 63 72 65 65 6E 20 6D 61 6B 65 72 20 36 34 | screen maker 64|
00000490: 20 44 52 55 4B 54 20 55 20 4F 50 20 22 66 32 22 | DRUKT U OP "f2"|
000004A0: 20 56 4F 4F 52 20 6C 4F 41 44 2C 20 45 4E 20 4F | VOOR lOAD, EN O|
000004B0: 50 20 22 66 34 22 20 56 4F 4F 52 20 73 41 56 45 |P "f4" VOOR sAVE|
000004C0: 2E 20 74 59 50 45 20 48 45 54 20 47 45 57 45 4E |. tYPE HET GEWEN|
000004D0: 53 54 45 20 42 45 53 54 41 4E 44 53 4E 41 41 4D |STE BESTANDSNAAM|
000004E0: 20 49 4E 20 45 4E 20 47 45 45 46 20 3C 72 65 74 | IN EN GEEF <ret|
000004F0: 75 72 6E 3E 2E 20 75 57 20 53 43 48 45 52 4D 20 |urn>. uW SCHERM |
00000500: 57 4F 52 44 54 20 44 41 4E 20 52 45 53 50 2E 20 |WORDT DAN RESP. |
00000510: 47 45 4C 41 44 45 4E 20 4F 46 20 57 45 47 47 45 |GELADEN OF WEGGE|
00000520: 53 43 48 52 45 56 45 4E 2C 20 54 45 52 57 49 4A |SCHREVEN, TERWIJ|
00000530: 4C 20 44 45 20 44 49 53 4B 2D 53 54 41 54 55 53 |L DE DISK-STATUS|
00000540: 20 4F 50 20 44 45 20 53 54 41 54 55 53 52 45 47 | OP DE STATUSREG|
00000550: 45 4C 20 56 45 52 53 43 48 49 4A 4E 54 2E 20 6F |EL VERSCHIJNT. o|
00000560: 4D 20 45 45 4E 20 41 41 4E 47 45 50 41 53 54 20 |M EEN AANGEPAST |
00000570: 42 45 53 54 41 4E 44 20 4F 56 45 52 20 48 45 54 |BESTAND OVER HET|
00000580: 20 56 4F 52 49 47 45 20 48 45 45 4E 20 54 45 20 | VORIGE HEEN TE |
00000590: 53 43 48 52 49 4A 56 45 4E 2C 20 5A 45 54 20 44 |SCHRIJVEN, ZET D|
000005A0: 41 4E 20 22 40 30 3A 22 20 56 4F 4F 52 20 48 45 |AN "@0:" VOOR HE|
000005B0: 54 20 42 45 53 54 41 4E 44 53 4E 41 41 4D 2E 20 |T BESTANDSNAAM. |
000005C0: 62 49 4A 56 4F 4F 52 42 45 45 4C 44 2C 20 4F 4D |bIJVOORBEELD, OM|
000005D0: 20 48 45 54 20 42 45 53 54 41 4E 44 20 22 53 43 | HET BESTAND "SC|
000005E0: 48 45 52 4D 20 4E 41 41 4D 22 20 54 45 20 4F 56 |HERM NAAM" TE OV|
000005F0: 45 52 53 43 48 52 49 4A 56 45 4E 2C 20 54 59 50 |ERSCHRIJVEN, TYP|
00000600: 45 4E 20 57 45 20 49 4E 0D 0D 20 20 20 40 30 3A |EN WE IN.. @0:|
00000610: 53 43 48 45 52 4D 20 4E 41 41 4D 00 10 10 70 52 |SCHERM NAAM...pR|
00000620: 49 4E 54 3A 0D 0D 20 20 20 20 75 20 4B 55 4E 54 |INT:.. u KUNT|
00000630: 20 55 57 20 53 43 48 45 52 4D 45 4E 20 5A 4F 57 | UW SCHERMEN ZOW|
00000640: 45 4C 20 41 4C 53 20 54 45 4B 53 54 20 4F 46 20 |EL ALS TEKST OF |
00000650: 47 52 41 46 49 53 43 48 20 55 49 54 20 50 54 49 |GRAFISCH UIT PTI|
00000660: 4E 54 45 4E 2E 20 67 52 41 46 49 53 43 48 45 20 |NTEN. gRAFISCHE |
00000670: 53 43 48 45 52 4D 45 4E 20 48 45 42 42 45 4E 20 |SCHERMEN HEBBEN |
00000680: 47 45 45 4E 20 52 55 49 4D 54 45 20 54 55 53 53 |GEEN RUIMTE TUSS|
00000690: 45 4E 20 44 45 20 52 45 47 45 4C 53 2E 20 64 45 |EN DE REGELS. dE|
000006A0: 20 50 52 49 4E 54 45 52 20 52 4F 55 54 49 4E 45 | PRINTER ROUTINE|
000006B0: 20 49 53 20 47 45 53 43 48 52 45 56 45 4E 20 56 | IS GESCHREVEN V|
000006C0: 4F 4F 52 20 44 45 20 63 4F 4D 4D 4F 44 4F 52 45 |OOR DE cOMMODORE|
000006D0: 20 31 35 32 35 20 50 52 49 4E 54 45 52 2C 20 4F | 1525 PRINTER, O|
000006E0: 46 20 45 4C 4B 45 20 44 4F 54 20 4D 41 54 52 55 |F ELKE DOT MATRU|
000006F0: 58 20 50 52 49 4E 54 45 52 20 44 49 45 20 44 45 |X PRINTER DIE DE|
00000700: 20 31 35 32 35 20 45 4D 55 4C 45 45 52 54 2E 20 | 1525 EMULEERT. |
00000710: 68 45 54 20 4B 41 4E 20 5A 49 4A 4E 20 44 41 54 |hET KAN ZIJN DAT|
00000720: 20 55 57 20 50 52 49 4E 54 45 52 20 44 45 20 43 | UW PRINTER DE C|
00000730: 4F 44 45 20 63 68 72 24 28 38 29 20 56 4F 4F 52 |ODE chr$(8) VOOR|
00000740: 20 47 52 41 46 49 53 43 48 45 20 57 45 45 52 47 | GRAFISCHE WEERG|
00000750: 41 56 45 2C 20 4F 46 20 63 68 72 24 28 31 38 29 |AVE, OF chr$(18)|
00000760: 20 56 4F 4F 52 20 47 45 49 4E 56 45 52 54 45 45 | VOOR GEINVERTEE|
00000770: 52 44 45 20 57 45 45 52 47 41 56 45 20 4E 49 45 |RDE WEERGAVE NIE|
00000780: 54 20 4B 45 4E 54 2E 0D 0D 20 20 20 20 61 41 4E |T KENT... aAN|
00000790: 48 41 4C 49 4E 47 53 54 45 4B 45 4E 53 20 57 4F |HALINGSTEKENS WO|
000007A0: 52 44 45 4E 20 47 45 50 52 49 4E 54 20 41 4C 53 |RDEN GEPRINT ALS|
000007B0: 20 41 50 48 4F 53 54 52 4F 46 45 27 53 20 28 27 | APHOSTROFE'S ('|
000007C0: 29 2E 20 6F 4D 20 54 45 20 50 52 49 4E 54 45 4E |). oM TE PRINTEN|
000007D0: 2C 20 44 49 45 4E 54 20 55 20 44 45 20 54 4F 45 |, DIENT U DE TOE|
000007E0: 54 53 20 22 66 36 22 20 49 4E 20 54 45 20 44 52 |TS "f6" IN TE DR|
000007F0: 55 4B 4B 45 4E 2E 20 6B 49 45 53 20 55 49 54 20 |UKKEN. kIES UIT |
00000800: 47 52 41 46 49 53 43 48 45 20 4F 46 20 54 45 4B |GRAFISCHE OF TEK|
00000810: 53 54 20 42 45 57 45 52 4B 49 4E 47 2C 20 45 4E |ST BEWERKING, EN|
00000820: 20 47 45 45 46 20 41 41 4E 20 44 41 54 20 44 45 | GEEF AAN DAT DE|
00000830: 20 50 52 49 4E 54 45 4E 20 47 45 52 45 45 44 20 | PRINTEN GEREED |
00000840: 53 54 41 41 54 2E 20 75 57 20 53 43 48 45 52 4D |STAAT. uW SCHERM|
00000850: 20 5A 41 4C 20 44 41 4E 20 57 4F 52 44 45 4E 20 | ZAL DAN WORDEN |
00000860: 47 45 50 52 49 4E 54 2E 00 10 74 4F 45 54 53 45 |GEPRINT...tOETSE|
00000870: 4E 3A 0D 0D 6B 55 52 53 4F 52 20 54 4F 45 54 53 |N:..kURSOR TOETS|
00000880: 45 4E 3D 4E 4F 52 4D 41 4C 45 20 4B 55 52 53 4F |EN=NORMALE KURSO|
00000890: 52 20 42 45 57 45 47 49 4E 47 0D 68 4F 4D 45 20 |R BEWEGING.hOME |
000008A0: 20 20 20 20 20 20 20 20 20 3D 47 41 20 4E 41 41 | =GA NAA|
000008B0: 52 20 4C 49 4E 4B 45 52 20 42 4F 56 45 4E 48 4F |R LINKER BOVENHO|
000008C0: 45 4B 0D 63 4C 52 2F 68 4F 4D 45 20 20 20 20 20 |EK.cLR/hOME |
000008D0: 20 3D 4D 41 41 4B 20 48 45 54 20 53 43 48 45 52 | =MAAK HET SCHER|
000008E0: 4D 20 53 43 48 4F 4F 4E 20 26 0D 20 20 20 20 20 |M SCHOON &. |
000008F0: 20 20 20 20 20 20 20 20 20 20 47 41 20 4E 41 41 | GA NAA|
00000900: 52 20 4C 49 4E 4B 45 52 20 42 4F 56 45 4E 48 4F |R LINKER BOVENHO|
00000910: 45 4B 0D 69 4E 53 45 52 54 20 20 20 20 20 20 20 |EK.iNSERT |
00000920: 20 3D 56 4F 45 47 20 45 45 4E 20 53 50 41 54 49 | =VOEG EEN SPATI|
00000930: 45 20 49 4E 0D 64 45 4C 45 54 45 20 20 20 20 20 |E IN.dELETE |
00000940: 20 20 20 3D 77 49 53 20 4B 41 52 41 4B 54 45 52 | =wIS KARAKTER|
00000950: 0D 72 45 54 55 52 4E 20 20 20 20 20 20 20 20 3D |.rETURN =|
00000960: 4B 55 52 53 4F 52 20 4C 49 4E 4B 53 20 26 20 4F |KURSOR LINKS & O|
00000970: 4D 4C 41 41 47 0D 0D 64 45 5A 45 20 54 4F 45 54 |MLAAG..dEZE TOET|
00000980: 53 45 4E 20 57 45 52 4B 45 4E 20 41 4C 53 42 45 |SEN WERKEN ALSBE|
00000990: 4B 45 4E 44 2E 00 10 66 55 4E 4B 54 49 45 54 4F |KEND...fUNKTIETO|
000009A0: 45 54 53 45 4E 3A 0D 0D 66 31 20 3D 20 56 45 52 |ETSEN:..f1 = VER|
000009B0: 41 4E 44 45 52 20 4B 4C 45 55 52 20 53 43 48 45 |ANDER KLEUR SCHE|
000009C0: 52 4D 0D 66 33 20 3D 20 56 45 52 41 4E 44 45 52 |RM.f3 = VERANDER|
000009D0: 20 4B 4C 55 45 52 20 52 41 4E 44 0D 66 35 20 3D | KLUER RAND.f5 =|
000009E0: 20 56 45 52 41 4E 44 45 52 20 4B 4C 45 55 52 20 | VERANDER KLEUR |
000009F0: 54 45 4B 53 54 0D 66 37 20 3D 20 4F 56 45 52 5A |TEKST.f7 = OVERZ|
00000A00: 49 43 48 54 20 46 55 4E 4B 54 49 45 20 54 4F 45 |ICHT FUNKTIE TOE|
00000A10: 54 53 45 4E 0D 66 32 20 3D 20 6C 4F 41 44 20 53 |TSEN.f2 = lOAD S|
00000A20: 43 48 45 52 4D 0D 66 34 20 3D 20 73 41 56 45 20 |CHERM.f4 = sAVE |
00000A30: 53 43 48 45 52 4D 0D 66 36 20 3D 20 70 52 49 4E |SCHERM.f6 = pRIN|
00000A40: 54 20 53 43 48 45 52 4D 0D 66 38 20 3D 20 45 49 |T SCHERM.f8 = EI|
00000A50: 4E 44 45 20 50 52 4F 47 52 41 4D 4D 41 0D 0D 44 |NDE PROGRAMMA..D|
00000A60: 45 20 4B 4C 45 55 52 20 56 41 4E 20 44 45 20 53 |E KLEUR VAN DE S|
00000A70: 54 41 54 55 53 20 52 45 47 45 4C 20 49 53 20 54 |TATUS REGEL IS T|
00000A80: 45 56 45 4E 53 20 44 45 20 47 45 4B 4F 5A 45 4E |EVENS DE GEKOZEN|
00000A90: 20 4B 4C 45 55 52 20 56 41 4E 20 44 45 20 54 45 | KLEUR VAN DE TE|
00000AA0: 4B 53 54 2E 00 10 63 4F 4E 54 52 4F 4C 20 54 4F |KST...cONTROL TO|
00000AB0: 45 54 53 20 2B 0D 0D 69 20 3D 20 56 4F 45 47 20 |ETS +..i = VOEG |
00000AC0: 52 45 47 45 4C 20 49 4E 0D 64 20 3D 20 56 45 45 |REGEL IN.d = VEE|
00000AD0: 47 20 52 45 47 45 4C 20 55 49 54 0D 71 20 3D 20 |G REGEL UIT.q = |
00000AE0: 56 45 45 47 20 54 4F 54 20 45 49 4E 44 45 20 56 |VEEG TOT EINDE V|
00000AF0: 41 4E 20 52 45 47 45 4C 0D 70 20 3D 20 56 45 45 |AN REGEL.p = VEE|
00000B00: 47 20 54 4F 54 20 42 45 47 49 4E 20 56 41 4E 20 |G TOT BEGIN VAN |
00000B10: 52 45 47 45 4C 0D 6D 20 3D 20 42 45 57 45 45 47 |REGEL.m = BEWEEG|
00000B20: 20 53 43 48 45 52 4D 28 4C 49 4E 4B 53 2C 20 52 | SCHERM(LINKS, R|
00000B30: 45 43 48 54 53 2C 45 54 43 2E 29 0D 78 20 3D 20 |ECHTS,ETC.).x = |
00000B40: 56 45 52 57 49 53 53 45 4C 20 54 57 45 45 20 4B |VERWISSEL TWEE K|
00000B50: 4C 45 55 52 45 4E 0D 61 20 3D 20 53 43 48 41 4B |LEUREN.a = SCHAK|
00000B60: 45 4C 54 20 4B 55 52 53 4F 52 20 42 45 57 45 47 |ELT KURSOR BEWEG|
00000B70: 49 4E 47 20 41 41 4E 2F 55 49 54 0D 72 20 3D 20 |ING AAN/UIT.r = |
00000B80: 53 43 48 41 4B 45 4C 54 20 52 45 56 45 52 53 45 |SCHAKELT REVERSE|
00000B90: 20 41 41 4E 2F 55 49 54 0D 63 20 3D 20 53 43 48 | AAN/UIT.c = SCH|
00000BA0: 41 4B 45 4C 54 20 48 4F 4F 46 44 4C 45 54 54 45 |AKELT HOOFDLETTE|
00000BB0: 52 53 2F 0D 20 20 20 20 20 20 20 20 20 20 20 20 |RS/. |
00000BC0: 20 20 20 20 20 20 20 20 4B 4C 45 49 4E 45 20 4C | KLEINE L|
00000BD0: 45 54 54 45 52 53 0D 73 20 3D 20 56 45 52 41 4E |ETTERS.s = VERAN|
00000BE0: 44 45 52 20 4B 55 52 53 4F 52 20 53 4E 45 4C 48 |DER KURSOR SNELH|
00000BF0: 45 49 44 2E 0D 0D 64 45 5A 45 20 46 55 4E 4B 54 |EID...dEZE FUNKT|
00000C00: 49 45 53 20 4B 55 4E 4E 45 4E 20 57 4F 52 44 45 |IES KUNNEN WORDE|
00000C10: 4E 20 47 45 42 52 55 49 4B 54 20 44 4F 4F 52 20 |N GEBRUIKT DOOR |
00000C20: 44 45 20 54 4F 45 54 53 20 22 63 6F 6E 74 72 6F |DE TOETS "contro|
00000C30: 6C 22 20 49 4E 47 45 44 52 55 4B 54 20 54 45 20 |l" INGEDRUKT TE |
00000C40: 48 4F 55 44 45 4E 2C 20 4D 45 54 20 44 41 41 52 |HOUDEN, MET DAAR|
00000C50: 4E 41 20 44 45 20 47 45 57 45 4E 53 54 45 20 54 |NA DE GEWENSTE T|
00000C60: 4F 45 54 53 20 49 4E 20 54 45 20 44 52 55 4B 4B |OETS IN TE DRUKK|
00000C70: 45 4E 2E 00 10 10 20 20 20 20 6F 4D 20 44 45 20 |EN.... oM DE |
00000C80: 4B 4C 45 55 52 45 4E 20 54 45 20 57 49 53 53 45 |KLEUREN TE WISSE|
00000C90: 4C 45 4E 20 28 78 29 2C 20 4B 55 4E 54 20 55 20 |LEN (x), KUNT U |
00000CA0: 66 33 20 47 45 42 52 55 49 4B 45 4E 20 4F 4D 20 |f3 GEBRUIKEN OM |
00000CB0: 44 4F 4F 52 20 44 45 4B 4C 45 55 52 45 4E 20 48 |DOOR DEKLEUREN H|
00000CC0: 45 45 4E 20 54 45 20 4C 4F 50 45 4E 2C 20 45 4E |EEN TE LOPEN, EN|
00000CD0: 20 3C 72 65 74 75 72 6E 3E 20 4F 4D 20 44 45 20 | <return> OM DE |
00000CE0: 47 45 57 45 4E 53 54 45 20 4B 4C 45 55 52 20 56 |GEWENSTE KLEUR V|
00000CF0: 41 53 54 20 54 45 20 5A 45 54 54 45 4E 2E 20 68 |AST TE ZETTEN. h|
00000D00: 4F 55 20 45 52 20 52 45 4B 45 4E 49 4E 47 20 4D |OU ER REKENING M|
00000D10: 45 45 2C 20 44 41 54 20 48 45 54 20 47 45 48 45 |EE, DAT HET GEHE|
00000D20: 4C 45 20 53 43 48 45 52 4D 20 56 41 4E 20 4B 4C |LE SCHERM VAN KL|
00000D30: 45 55 52 20 56 45 52 57 49 53 53 45 4C 54 2E 20 |EUR VERWISSELT. |
00000D40: 6E 41 44 41 54 20 55 20 48 45 54 20 56 45 52 50 |nADAT U HET VERP|
00000D50: 4C 41 41 54 53 20 53 43 48 45 52 4D 20 46 55 4E |LAATS SCHERM FUN|
00000D60: 4B 54 49 45 20 28 6D 29 20 41 41 4E 47 45 52 4F |KTIE (m) AANGERO|
00000D70: 45 50 45 4E 20 48 45 45 46 54 2C 20 47 45 42 52 |EPEN HEEFT, GEBR|
00000D80: 55 49 4B 54 20 55 20 44 45 20 4B 55 52 53 4F 52 |UIKT U DE KURSOR|
00000D90: 20 54 4F 45 54 53 45 4E 20 4F 4D 20 48 45 54 20 | TOETSEN OM HET |
00000DA0: 53 43 48 45 52 4D 20 4F 4D 48 4F 4F 47 2C 20 4C |SCHERM OMHOOG, L|
00000DB0: 49 4E 4B 53 2C 20 52 45 43 48 54 53 20 4F 47 20 |INKS, RECHTS OG |
00000DC0: 4F 4D 4C 41 41 47 20 54 45 20 42 45 57 45 47 45 |OMLAAG TE BEWEGE|
00000DD0: 4E 2E 20 65 52 20 49 53 20 47 45 45 4E 20 22 57 |N. eR IS GEEN "W|
00000DE0: 52 41 50 2D 41 52 4F 55 4E 44 22 2C 20 44 55 53 |RAP-AROUND", DUS|
00000DF0: 20 57 45 45 53 20 56 4F 4F 52 5A 49 43 48 54 49 | WEES VOORZICHTI|
00000E00: 47 20 45 4E 20 4C 41 54 20 55 57 20 53 43 48 45 |G EN LAT UW SCHE|
00000E10: 52 4D 20 4E 49 45 54 20 56 41 4E 20 48 45 54 20 |RM NIET VAN HET |
00000E20: 42 45 45 4C 44 20 41 46 20 4C 4F 50 45 4E 2E 20 |BEELD AF LOPEN. |
00000E30: 64 52 55 4B 20 4F 50 20 3C 72 65 74 75 72 6E 3E |dRUK OP <return>|
00000E40: 20 4F 4D 20 55 49 54 20 44 45 5A 45 20 46 55 4E | OM UIT DEZE FUN|
00000E50: 4B 54 49 45 20 54 45 20 4B 4F 4D 45 4E 2E 00 10 |KTIE TE KOMEN...|
00000E60: 6F 56 45 52 49 47 45 4E 3A 0D 0D 20 20 65 4C 4B |oVERIGEN:.. eLK|
00000E70: 45 20 4C 45 54 54 45 52 20 4F 46 20 47 52 41 46 |E LETTER OF GRAF|
00000E80: 49 53 43 48 20 54 45 4B 45 4E 20 4F 50 20 55 57 |ISCH TEKEN OP UW|
00000E90: 20 54 4F 45 54 53 45 4E 42 4F 52 44 20 53 54 41 | TOETSENBORD STA|
00000EA0: 41 54 20 54 45 52 20 55 57 20 42 45 53 43 48 49 |AT TER UW BESCHI|
00000EB0: 4B 4B 49 4E 47 2E 20 65 4C 4B 45 20 46 55 4E 4B |KKING. eLKE FUNK|
00000EC0: 54 49 45 20 4B 41 4E 20 4F 4E 44 45 52 42 52 4F |TIE KAN ONDERBRO|
00000ED0: 4B 45 4E 20 57 4F 52 44 45 4E 20 20 44 4F 4F 52 |KEN WORDEN DOOR|
00000EE0: 20 48 45 54 20 49 4E 44 52 55 4B 4B 45 4E 20 56 | HET INDRUKKEN V|
00000EF0: 41 4E 20 44 45 20 3C 72 65 74 75 72 6E 3E 20 54 |AN DE <return> T|
00000F00: 4F 45 54 53 20 42 49 4A 20 44 45 20 50 52 4F 4D |OETS BIJ DE PROM|
00000F10: 50 54 2C 20 4F 46 20 44 4F 4F 52 20 44 45 20 49 |PT, OF DOOR DE I|
00000F20: 4E 53 54 52 55 4B 54 49 45 53 20 54 45 20 56 4F |NSTRUKTIES TE VO|
00000F30: 4C 47 45 4E 2E 20 61 4C 48 4F 45 57 45 4C 20 44 |LGEN. aLHOEWEL D|
00000F40: 49 54 20 50 52 4F 47 52 41 4D 4D 41 20 49 4E 20 |IT PROGRAMMA IN |
00000F50: 6D 41 43 48 49 4E 45 20 63 4F 44 45 20 49 53 20 |mACHINE cODE IS |
00000F60: 47 45 53 43 48 52 45 56 45 4E 2C 20 4B 55 4E 54 |GESCHREVEN, KUNT|
00000F70: 20 55 20 48 45 54 20 4C 41 44 45 4E 20 45 4E 20 | U HET LADEN EN |
00000F80: 44 52 41 41 49 45 4E 20 41 4C 53 20 45 45 4E 20 |DRAAIEN ALS EEN |
00000F90: 62 61 73 69 63 20 50 52 4F 47 52 41 4D 4D 41 2E |basic PROGRAMMA.|
00000FA0: 20 6F 4D 20 45 45 4E 20 4B 41 52 41 4B 54 45 52 | oM EEN KARAKTER|
00000FB0: 20 55 49 54 20 54 45 20 56 45 47 45 4E 20 47 45 | UIT TE VEGEN GE|
00000FC0: 42 52 55 49 4B 54 20 55 20 44 45 20 53 50 41 54 |BRUIKT U DE SPAT|
00000FD0: 49 45 42 41 4C 4B 2E 00 20 64 61 74 61 20 6D 61 |IEBALK.. data ma|
00000FE0: 6B 65 72 3A 0D 0D 20 20 20 20 6F 50 20 44 45 20 |ker:.. oP DE |
00000FF0: 44 49 53 4B 20 53 54 41 41 54 20 45 45 4E 20 50 |DISK STAAT EEN P|
00001000: 52 4F 47 52 41 4D 4D 41 20 4D 45 54 20 44 45 20 |ROGRAMMA MET DE |
00001010: 4E 41 41 4D 20 64 61 74 61 20 6D 61 6B 65 72 2C |NAAM data maker,|
00001020: 20 57 41 54 20 55 57 20 53 43 48 45 52 4D 45 4E | WAT UW SCHERMEN|
00001030: 20 4B 4F 4E 56 45 52 54 45 45 52 54 20 4E 41 41 | KONVERTEERT NAA|
00001040: 52 20 62 61 73 69 63 20 70 72 69 6E 74 20 4F 50 |R basic print OP|
00001050: 44 52 41 43 48 54 45 4E 2E 20 64 49 54 20 50 52 |DRACHTEN. dIT PR|
00001060: 4F 47 52 41 4D 4D 41 20 49 53 20 47 45 53 43 48 |OGRAMMA IS GESCH|
00001070: 52 45 56 45 4E 20 49 4E 20 6D 63 2C 20 45 4E 20 |REVEN IN mc, EN |
00001080: 55 20 44 49 45 4E 54 20 48 45 54 20 41 4C 53 56 |U DIENT HET ALSV|
00001090: 4F 4C 47 54 20 54 45 20 4C 41 44 45 4E 3A 0D 0D |OLGT TE LADEN:..|
000010A0: 6C 6F 61 64 20 22 64 61 74 61 6D 61 6B 65 72 22 |load "datamaker"|
000010B0: 2C 38 2C 31 3C 52 45 54 55 52 4E 2E 3E 20 0D 6E |,8,1<RETURN.> .n|
000010C0: 65 77 3A 73 79 73 20 34 39 31 35 32 3C 72 65 74 |ew:sys 49152<ret|
000010D0: 75 72 6E 3E 0D 0D 20 20 20 20 6F 4D 20 48 45 54 |urn>.. oM HET|
000010E0: 20 50 52 4F 47 52 41 4D 4D 41 20 54 45 20 47 45 | PROGRAMMA TE GE|
000010F0: 42 52 55 49 4B 45 4E 2C 20 44 52 55 4B 54 55 20 |BRUIKEN, DRUKTU |
00001100: 45 45 52 53 54 20 4F 50 20 44 45 20 6C 2D 54 4F |EERST OP DE l-TO|
00001110: 45 54 53 20 4F 4D 20 45 45 4E 20 53 43 48 45 52 |ETS OM EEN SCHER|
00001120: 4D 20 54 45 20 4C 41 44 45 4E 2C 20 44 41 4E 20 |M TE LADEN, DAN |
00001130: 4F 50 20 44 45 20 6D 2D 54 4F 45 54 53 20 4F 4D |OP DE m-TOETS OM|
00001140: 20 48 45 54 20 53 43 48 45 52 4D 20 54 45 20 4B | HET SCHERM TE K|
00001150: 4F 4E 56 45 52 54 45 52 45 4E 20 49 4E 20 70 72 |ONVERTEREN IN pr|
00001160: 69 6E 74 20 4F 50 44 52 41 43 48 54 45 4E 2E 20 |int OPDRACHTEN. |
00001170: 67 45 42 52 55 49 4B 20 44 45 20 65 2D 54 4F 45 |gEBRUIK DE e-TOE|
00001180: 54 53 20 49 4E 44 49 45 4E 20 55 20 48 45 54 20 |TS INDIEN U HET |
00001190: 50 52 4F 47 52 41 4D 4D 41 20 57 49 4C 54 20 42 |PROGRAMMA WILT B|
000011A0: 45 2D 45 49 4E 44 49 47 45 4E 2E 0D 0D 20 20 20 |E-EINDIGEN... |
000011B0: 20 64 61 74 61 20 6D 61 6B 65 72 20 50 52 4F 44 | data maker PROD|
000011C0: 55 43 45 45 52 54 20 70 72 69 6E 74 20 4F 50 44 |UCEERT print OPD|
000011D0: 52 41 43 48 54 45 4E 20 44 41 54 2C 20 41 4C 53 |RACHTEN DAT, ALS|
000011E0: 20 55 20 44 45 5A 45 20 52 55 4E 54 2C 20 55 57 | U DEZE RUNT, UW|
000011F0: 20 53 43 48 45 52 4D 20 4E 45 54 4A 45 53 20 55 | SCHERM NETJES U|
00001200: 49 54 50 52 49 4E 54 2E 20 72 45 47 45 4C 4E 55 |ITPRINT. rEGELNU|
00001210: 4D 4D 45 52 49 4E 47 20 42 45 47 49 4E 54 20 42 |MMERING BEGINT B|
00001220: 49 4A 20 35 20 4D 45 54 20 53 54 41 50 50 45 4E |IJ 5 MET STAPPEN|
00001230: 20 56 41 4E 20 35 2E 20 64 49 54 20 47 45 45 46 | VAN 5. dIT GEEF|
00001240: 54 20 55 20 44 45 20 4D 4F 47 45 4C 49 4A 4B 48 |T U DE MOGELIJKH|
00001250: 45 49 44 20 4F 4D 20 52 45 47 45 4C 53 20 54 55 |EID OM REGELS TU|
00001260: 53 53 45 4E 20 54 45 20 56 4F 45 47 45 4E 20 4E |SSEN TE VOEGEN N|
00001270: 41 41 52 20 42 45 48 4F 45 46 54 45 2E 20 55 20 |AAR BEHOEFTE. U |
00001280: 4B 55 4E 54 20 4D 45 45 52 44 45 52 45 20 53 43 |KUNT MEERDERE SC|
00001290: 48 45 52 4D 45 4E 20 4B 4F 4E 56 45 52 54 45 52 |HERMEN KONVERTER|
000012A0: 45 4E 2E 20 68 45 54 20 45 45 52 53 54 45 20 53 |EN. hET EERSTE S|
000012B0: 43 48 45 52 4D 20 48 45 45 46 54 20 44 45 20 52 |CHERM HEEFT DE R|
000012C0: 45 47 45 4C 4E 55 4D 4D 45 52 53 20 35 20 2D 20 |EGELNUMMERS 5 - |
000012D0: 31 34 30 2C 20 48 45 54 20 54 57 45 45 44 45 20 |140, HET TWEEDE |
000012E0: 44 45 20 52 45 47 45 4C 53 20 32 34 35 20 2D 20 |DE REGELS 245 - |
000012F0: 32 38 30 2C 20 45 4E 5A 4F 56 4F 4F 52 54 2E 20 |280, ENZOVOORT. |
00001300: 20 61 4C 53 20 55 20 4B 4C 41 41 52 20 42 45 4E | aLS U KLAAR BEN|
00001310: 54 20 4D 45 54 20 4B 4F 4E 56 45 52 54 45 52 45 |T MET KONVERTERE|
00001320: 4E 2C 20 47 41 20 44 41 4E 20 4D 45 54 20 44 45 |N, GA DAN MET DE|
00001330: 20 65 2D 54 4F 45 54 53 20 4E 41 41 52 20 42 41 | e-TOETS NAAR BA|
00001340: 53 49 43 20 45 4E 20 54 59 50 45 20 6C 69 73 74 |SIC EN TYPE list|
00001350: 3C 72 65 74 75 72 6E 3E 20 4F 4D 20 44 45 20 50 |<return> OM DE P|
00001360: 52 49 4E 54 20 4F 50 44 52 41 43 48 54 45 4E 20 |RINT OPDRACHTEN |
00001370: 54 45 20 5A 49 45 4E 2E 20 6D 41 41 4B 20 56 4F |TE ZIEN. mAAK VO|
00001380: 4F 52 20 44 45 20 5A 45 4B 45 52 48 45 49 44 20 |OR DE ZEKERHEID |
00001390: 45 45 4E 20 4B 4F 50 49 45 2E 00 29 6C 6F 61 64 |EEN KOPIE..)load|
000013A0: 73 63 72 65 65 6E 20 56 4F 4F 52 20 44 45 20 63 |screen VOOR DE c|
000013B0: 4F 4D 4D 4F 44 4F 52 45 20 36 34 0D 0D 31 30 20 |OMMODORE 64..10 |
000013C0: 50 4F 4B 45 35 33 32 38 30 2C 31 31 3A 52 45 4D |POKE53280,11:REM|
000013D0: 20 42 4F 52 44 45 52 20 43 4F 4C 4F 52 0D 32 30 | BORDER COLOR.20|
000013E0: 20 50 4F 4B 45 35 33 32 38 31 2C 30 3A 52 45 4D | POKE53281,0:REM|
000013F0: 20 53 43 52 45 45 4E 20 43 4F 4C 4F 52 0D 33 30 | SCREEN COLOR.30|
00001400: 20 50 52 49 4E 54 43 48 52 24 28 31 34 29 3B 3A | PRINTCHR$(14);:|
00001410: 52 45 4D 20 4C 4F 57 45 52 20 43 41 53 45 0D 34 |REM LOWER CASE.4|
00001420: 30 20 50 52 49 4E 54 43 48 52 24 28 31 34 37 29 |0 PRINTCHR$(147)|
00001430: 3B 3A 52 45 4D 20 43 4C 45 41 52 20 53 43 52 45 |;:REM CLEAR SCRE|
00001440: 45 4E 0D 35 30 20 46 24 3D 27 53 43 52 45 45 4E |EN.50 F$='SCREEN|
00001450: 20 4E 41 4D 45 27 3A 52 45 4D 20 46 49 4C 45 4E | NAME':REM FILEN|
00001460: 41 4D 45 0D 36 30 20 47 4F 53 55 42 39 30 30 3A |AME.60 GOSUB900:|
00001470: 52 45 4D 20 4C 4F 41 44 20 53 43 52 45 45 4E 0D |REM LOAD SCREEN.|
00001480: 37 30 20 3A 0D 38 30 20 52 45 4D 20 52 45 53 54 |70 :.80 REM REST|
00001490: 20 56 41 4E 20 50 52 4F 47 52 41 4D 4D 41 20 48 | VAN PROGRAMMA H|
000014A0: 49 45 52 0D 39 30 20 3A 0D 39 30 30 20 46 31 24 |IER.90 :.900 F1$|
000014B0: 3D 46 24 2B 27 3C 27 3A 46 32 24 3D 46 24 2B 27 |=F$+'<':F2$=F$+'|
000014C0: 3E 27 0D 39 31 30 20 50 4F 4B 45 31 34 37 2C 30 |>'.910 POKE147,0|
000014D0: 0D 39 32 30 20 53 59 53 35 37 38 31 32 20 46 31 |.920 SYS57812 F1|
000014E0: 24 2C 38 2C 31 3A 53 59 53 36 32 36 33 31 0D 39 |$,8,1:SYS62631.9|
000014F0: 33 30 20 53 59 53 35 37 38 31 32 20 46 32 24 2C |30 SYS57812 F2$,|
00001500: 38 2C 31 3A 53 59 53 36 32 36 33 31 0D 39 34 30 |8,1:SYS62631.940|
00001510: 20 52 45 54 55 52 4E 00 20 6C 6F 61 64 73 63 72 | RETURN. loadscr|
00001520: 65 65 6E 20 56 4F 4F 52 20 63 4F 4D 4D 4F 44 4F |een VOOR cOMMODO|
00001530: 52 45 20 31 32 38 20 28 34 30 4B 4F 4C 29 0D 0D |RE 128 (40KOL)..|
00001540: 31 30 20 43 4F 4C 4F 52 20 34 2C 31 32 3A 52 45 |10 COLOR 4,12:RE|
00001550: 4D 20 42 4F 52 44 45 52 20 43 4F 4C 4F 52 0D 32 |M BORDER COLOR.2|
00001560: 30 20 43 4F 4C 4F 52 20 30 2C 31 3A 52 45 4D 20 |0 COLOR 0,1:REM |
00001570: 53 43 52 45 45 4E 20 43 4F 4C 4F 52 0D 33 30 20 |SCREEN COLOR.30 |
00001580: 50 52 49 4E 54 43 48 52 24 28 31 34 29 3B 3A 52 |PRINTCHR$(14);:R|
00001590: 45 4D 20 4C 4F 57 45 52 20 43 41 53 45 0D 34 30 |EM LOWER CASE.40|
000015A0: 20 50 52 49 4E 54 43 48 52 24 28 31 34 37 29 3B | PRINTCHR$(147);|
000015B0: 3A 52 45 4D 20 43 4C 45 41 52 20 53 43 52 45 45 |:REM CLEAR SCREE|
000015C0: 4E 0D 35 30 20 46 24 3D 27 46 49 4C 45 20 4E 41 |N.50 F$='FILE NA|
000015D0: 4D 45 27 3A 52 45 4D 20 46 49 4C 45 20 4E 41 4D |ME':REM FILE NAM|
000015E0: 45 0D 36 30 20 47 4F 53 55 42 39 30 30 3A 52 45 |E.60 GOSUB900:RE|
000015F0: 4D 20 4C 4F 41 44 20 53 43 52 45 45 4E 0D 37 30 |M LOAD SCREEN.70|
00001600: 20 3A 0D 38 30 20 52 45 4D 20 52 45 53 54 20 56 | :.80 REM REST V|
00001610: 41 4E 20 50 52 4F 47 52 41 4D 4D 41 20 48 49 45 |AN PROGRAMMA HIE|
00001620: 52 0D 39 30 20 3A 0D 39 30 30 46 31 24 3D 46 24 |R.90 :.900F1$=F$|
00001630: 2B 27 3C 27 3A 46 32 24 3D 46 24 2B 27 3E 27 0D |+'<':F2$=F$+'>'.|
00001640: 39 31 30 20 42 4C 4F 41 44 20 28 46 31 24 29 0D |910 BLOAD (F1$).|
00001650: 39 32 30 20 42 4C 4F 41 44 20 28 46 32 24 29 0D |920 BLOAD (F2$).|
00001660: 39 33 30 20 52 45 54 55 52 4E 10 0D |930 RETURN.. |
.. SCREEN MAKER 64..
INSTUKTIE FILE.... (C) 1987 BAR
BARA SCHULAK. ALLE RECHTEN VOORBEH
OUDEN... GEPUBLICEERD DOOR.
VIKING TECHNOLOGIES INC.. SCREEN M
AKER 64 IS GESCHREVEN ALS HULPMIDDEL VOO
R PROGRAMEURS OM LAGE RESOLUTIE SCHERMEN
AAN TE MAKEN - ZOWEL TEKST ALS GRAFISCH
VOOR HET GEBRUIK IN UW EIGEN PROGRAMMA.
.OM DIT TE KUNNEN DOEN, VINT U OOK INSTR
UKTIES OVER HOE U DEZE SCHERMEN VANUIT U
W EIGEN BASIC PROGRAMMA KAN OPROEPEN. RO
UTINES VOOR ZOWEL DE C64 ALS DE C128 ZIJ
N BIJGESLOTEN. OF U KUNT GEBRUIK MAKEN V
AN HET PROGRAMMA DATA MAKER, OM PRINT ST
ATEMENTS AAN TE MAKEN. HIER VOLGEN DE CO
MMANDO'S:..LOAD EN SAVE:.. ELK SCHERM
WORDT WEGGESCHREVEN IN TWEE BESTANDEN -
EEN VOOR DE SCHERM- KARAKTERS (1064-202
3), EN EEN VOOR DE KLEUREN (55336-56295)
. HET EERSTE BESTAND BEGINT MET HET "KLE
INER DAN" TEKEN (<), EN HET TWEEDE MET H
ET "GROTER DAN" TEKEN (>). HOU IN DE GAT
EN DAT DE STATUS REGEL NIET WORDT BEWAAR
D, DUS U ZULT HET SCHERM MOETEN WISSEN.
U MOET OOK VOORZIEN IN DE KLEUREN VAN HE
T SCHERM EN DE RAND; DEZE WORDEN OOK NIE
T BEWAARD.. OM TOEGANG TE KRIJGEN TOT
DE LOAD EN SAVE ROUTINES VANUIT SCREEN
MAKER 64 DRUKT U OP "F2" VOOR LOAD, EN O
P "F4" VOOR SAVE. TYPE HET GEWENSTE BEST
ANDSNAAM IN EN GEEF <RETURN>. UW SCHERM
WORDT DAN RESP. GELADEN OF WEGGESCHREVEN
, TERWIJL DE DISK-STATUS OP DE STATUSREG
EL VERSCHIJNT. OM EEN AANGEPAST BESTAND
OVER HET VORIGE HEEN TE SCHRIJVEN, ZET D
AN "@0:" VOOR HET BESTANDSNAAM. BIJVOORB
EELD, OM HET BESTAND "SCHERM NAAM" TE OV
ERSCHRIJVEN, TYPEN WE IN.. @0:SCHERM N
AAM...PRINT:.. U KUNT UW SCHERMEN ZOW
EL ALS TEKST OF GRAFISCH UIT PTINTEN. GR
AFISCHE SCHERMEN HEBBEN GEEN RUIMTE TUSS
EN DE REGELS. DE PRINTER ROUTINE IS GESC
HREVEN VOOR DE COMMODORE 1525 PRINTER, O
F ELKE DOT MATRUX PRINTER DIE DE 1525 EM
ULEERT. HET KAN ZIJN DAT UW PRINTER DE C
ODE CHR$(8) VOOR GRAFISCHE WEERGAVE, OF
CHR$(18) VOOR GEINVERTEERDE WEERGAVE NIE
T KENT... AANHALINGSTEKENS WORDEN GEP
RINT ALS APHOSTROFE'S ('). OM TE PRINTEN
, DIENT U DE TOETS "F6" IN TE DRUKKEN. K
IES UIT GRAFISCHE OF TEKST BEWERKING, EN
GEEF AAN DAT DE PRINTEN GEREED STAAT. U
W SCHERM ZAL DAN WORDEN GEPRINT...TOETSE
N:..KURSOR TOETSEN=NORMALE KURSOR BEWEGI
NG.HOME =GA NAAR LINKER BOVENHO
EK.CLR/HOME =MAAK HET SCHERM SCHOON
&. GA NAAR LINKER BOVENHO
EK.INSERT =VOEG EEN SPATIE IN.DEL
ETE =WIS KARAKTER.RETURN =
KURSOR LINKS & OMLAAG..DEZE TOETSEN WERK
EN ALSBEKEND...FUNKTIETOETSEN:..F1 = VER
ANDER KLEUR SCHERM.F3 = VERANDER KLUER R
AND.F5 = VERANDER KLEUR TEKST.F7 = OVERZ
ICHT FUNKTIE TOETSEN.F2 = LOAD SCHERM.F4
= SAVE SCHERM.F6 = PRINT SCHERM.F8 = EI
NDE PROGRAMMA..DE KLEUR VAN DE STATUS RE
GEL IS TEVENS DE GEKOZEN KLEUR VAN DE TE
KST...CONTROL TOETS +..I = VOEG REGEL IN
.D = VEEG REGEL UIT.Q = VEEG TOT EINDE V
AN REGEL.P = VEEG TOT BEGIN VAN REGEL.M
= BEWEEG SCHERM(LINKS, RECHTS,ETC.).X =
VERWISSEL TWEE KLEUREN.A = SCHAKELT KURS
OR BEWEGING AAN/UIT.R = SCHAKELT REVERSE
AAN/UIT.C = SCHAKELT HOOFDLETTERS/.
KLEINE LETTERS.S = VERAN
DER KURSOR SNELHEID...DEZE FUNKTIES KUNN
EN WORDEN GEBRUIKT DOOR DE TOETS "CONTRO
L" INGEDRUKT TE HOUDEN, MET DAARNA DE GE
WENSTE TOETS IN TE DRUKKEN.... OM DE
KLEUREN TE WISSELEN (X), KUNT U F3 GEBRU
IKEN OM DOOR DEKLEUREN HEEN TE LOPEN, EN
<RETURN> OM DE GEWENSTE KLEUR VAST TE Z
ETTEN. HOU ER REKENING MEE, DAT HET GEHE
LE SCHERM VAN KLEUR VERWISSELT. NADAT U
HET VERPLAATS SCHERM FUNKTIE (M) AANGERO
EPEN HEEFT, GEBRUIKT U DE KURSOR TOETSEN
OM HET SCHERM OMHOOG, LINKS, RECHTS OG
OMLAAG TE BEWEGEN. ER IS GEEN "WRAP-AROU
ND", DUS WEES VOORZICHTIG EN LAT UW SCHE
RM NIET VAN HET BEELD AF LOPEN. DRUK OP
<RETURN> OM UIT DEZE FUNKTIE TE KOMEN...
OVERIGEN:.. ELKE LETTER OF GRAFISCH TEK
EN OP UW TOETSENBORD STAAT TER UW BESCHI
KKING. ELKE FUNKTIE KAN ONDERBROKEN WORD
EN DOOR HET INDRUKKEN VAN DE <RETURN> T
OETS BIJ DE PROMPT, OF DOOR DE INSTRUKTI
ES TE VOLGEN. ALHOEWEL DIT PROGRAMMA IN
MACHINE CODE IS GESCHREVEN, KUNT U HET L
ADEN EN DRAAIEN ALS EEN BASIC PROGRAMMA.
OM EEN KARAKTER UIT TE VEGEN GEBRUIKT U
DE SPATIEBALK.. DATA MAKER:.. OP DE
DISK STAAT EEN PROGRAMMA MET DE NAAM DAT
A MAKER, WAT UW SCHERMEN KONVERTEERT NAA
R BASIC PRINT OPDRACHTEN. DIT PROGRAMMA
IS GESCHREVEN IN MC, EN U DIENT HET ALSV
OLGT TE LADEN:..LOAD "DATAMAKER",8,1<RET
URN.> .NEW:SYS 49152<RETURN>.. OM HET
PROGRAMMA TE GEBRUIKEN, DRUKTU EERST OP
DE L-TOETS OM EEN SCHERM TE LADEN, DAN
OP DE M-TOETS OM HET SCHERM TE KONVERTER
EN IN PRINT OPDRACHTEN. GEBRUIK DE E-TOE
TS INDIEN U HET PROGRAMMA WILT BE-EINDIG
EN... DATA MAKER PRODUCEERT PRINT OPD
RACHTEN DAT, ALS U DEZE RUNT, UW SCHERM
NETJES UITPRINT. REGELNUMMERING BEGINT B
IJ 5 MET STAPPEN VAN 5. DIT GEEFT U DE M
OGELIJKHEID OM REGELS TUSSEN TE VOEGEN N
AAR BEHOEFTE. U KUNT MEERDERE SCHERMEN K
ONVERTEREN. HET EERSTE SCHERM HEEFT DE R
EGELNUMMERS 5 - 140, HET TWEEDE DE REGEL
S 245 - 280, ENZOVOORT. ALS U KLAAR BEN
T MET KONVERTEREN, GA DAN MET DE E-TOETS
NAAR BASIC EN TYPE LIST<RETURN> OM DE P
RINT OPDRACHTEN TE ZIEN. MAAK VOOR DE ZE
KERHEID EEN KOPIE..)LOADSCREEN VOOR DE C
OMMODORE 64..10 POKE53280,11:REM BORDER
COLOR.20 POKE53281,0:REM SCREEN COLOR.30
PRINTCHR$(14);:REM LOWER CASE.40 PRINTC
HR$(147);:REM CLEAR SCREEN.50 F$='SCREEN
NAME':REM FILENAME.60 GOSUB900:REM LOAD
SCREEN.70 :.80 REM REST VAN PROGRAMMA H
IER.90 :.900 F1$=F$+'<':F2$=F$+'>'.910 P
OKE147,0.920 SYS57812 F1$,8,1:SYS62631.9
30 SYS57812 F2$,8,1:SYS62631.940 RETURN.
LOADSCREEN VOOR COMMODORE 128 (40KOL)..
10 COLOR 4,12:REM BORDER COLOR.20 COLOR
0,1:REM SCREEN COLOR.30 PRINTCHR$(14);:R
EM LOWER CASE.40 PRINTCHR$(147);:REM CLE
AR SCREEN.50 F$='FILE NAME':REM FILE NAM
E.60 GOSUB900:REM LOAD SCREEN.70 :.80 RE
M REST VAN PROGRAMMA HIER.90 :.900F1$=F$
+'<':F2$=F$+'>'.910 BLOAD (F1$).920 BLOA
D (F2$).930 RETURN..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL