_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

HIRES4.BAS

FILE INFORMATION

FILENAME(S): HIRES4.BAS

FILE TYPE(S): PRG

FILE SIZE: 3.5K

FIRST SEEN: 2025-11-30 01:12:57

APPEARS ON: 2 disk(s)

FILE HASH

af7f25b30c2d72f040f5584634d0e32da608d3e98597d6009b0534ddbbc395fb

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
15945 SEITE A HIRES4.BAS PRG C64er 15 9 DOWNLOAD FILE
15945 SEITE A HIRES4.BAS PRG BrainSkull, Sammlung 15 9 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 28 08 0A 00 8F 20  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 2A 2A 2A 2A  00 4F 08 14 00 8F 20 2A  |********.O.... *|
00000030: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000040: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 2A 00  |              *.|
00000050: 76 08 1E 00 8F 20 2A 20  20 20 20 20 48 20 49 20  |v.... *     H I |
00000060: 52 20 45 20 53 20 34 20  2E 20 42 20 41 20 53 20  |R E S 4 . B A S |
00000070: 20 20 20 20 20 2A 00 9D  08 28 00 8F 20 2A 20 20  |     *...(.. *  |
00000080: 42 41 53 49 43 56 45 52  53 49 4F 4E 20 45 49 4E  |BASICVERSION EIN|
00000090: 45 53 20 47 52 41 46 49  4B 2D 20 20 2A 00 C4 08  |ES GRAFIK-  *...|
000000A0: 32 00 8F 20 2A 20 20 50  52 4F 47 52 41 4D 4D 45  |2.. *  PROGRAMME|
000000B0: 53 20 46 55 45 52 20 44  45 4E 20 43 36 34 20 20  |S FUER DEN C64  |
000000C0: 20 20 20 2A 00 EB 08 3C  00 8F 20 2A 20 20 20 48  |   *...<.. *   H|
000000D0: 45 49 4D 4F 20 50 4F 4E  4E 41 54 48 20 20 48 41  |EIMO PONNATH  HA|
000000E0: 4D 42 55 52 47 20 20 20  20 20 2A 00 12 09 46 00  |MBURG     *...F.|
000000F0: 8F 20 2A 20 20 20 20 20  20 20 20 20 20 20 20 20  |. *             |
00000100: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000110: 20 2A 00 39 09 50 00 8F  20 2A 2A 2A 2A 2A 2A 2A  | *.9.P.. *******|
00000120: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000130: 2A 2A 2A 2A 2A 2A 2A 2A  2A 00 3F 09 5A 00 8F 00  |*********.?.Z...|
00000140: 65 09 64 00 8F 20 2D 2D  2D 2D 2D 2D 2D 20 48 41  |e.d.. ------- HA|
00000150: 55 50 54 50 52 4F 47 52  41 4D 4D 20 2D 2D 2D 2D  |UPTPROGRAMM ----|
00000160: 2D 2D 2D 2D 2D 00 71 09  6E 00 99 C7 28 31 34 37  |-----.q.n...(147|
00000170: 29 00 B1 09 78 00 99 3A  99 3A 99 22 44 49 45 53  |)...x..:.:."DIES|
00000180: 45 53 20 50 52 4F 47 52  41 4D 4D 20 54 45 53 54  |ES PROGRAMM TEST|
00000190: 45 54 20 41 4C 4C 45 20  4D 4F 44 55 4C 45 22 3A  |ET ALLE MODULE":|
000001A0: 99 22 56 4F 4E 20 48 49  52 45 53 34 2E 42 41 53  |."VON HIRES4.BAS|
000001B0: 22 00 DF 09 82 00 5A 46  B2 35 3A 48 46 B2 30 3A  |".....ZF.5:HF.0:|
000001C0: 8F 20 5A 45 49 43 48 45  4E 2D 20 55 4E 44 20 48  |. ZEICHEN- UND H|
000001D0: 49 4E 54 45 52 47 52 55  4E 44 46 41 52 42 45 00  |INTERGRUNDFARBE.|
000001E0: FF 09 8C 00 8D 20 32 30  30 30 3A 8F 20 47 52 41  |..... 2000:. GRA|
000001F0: 46 49 4B 20 45 49 4E 53  43 48 41 4C 54 45 4E 00  |FIK EINSCHALTEN.|
00000200: 1C 0A 96 00 8D 20 33 30  30 30 3A 8F 20 42 49 54  |..... 3000:. BIT|
00000210: 4D 41 50 20 4C 4F 45 53  43 48 45 4E 00 34 0A A0  |MAP LOESCHEN.4..|
00000220: 00 8D 20 34 30 30 30 3A  8F 20 46 41 52 42 47 45  |.. 4000:. FARBGE|
00000230: 42 55 4E 47 00 63 0A AA  00 4C B2 30 3A 8F 20 4C  |BUNG.c...L.0:. L|
00000240: 4F 45 53 43 48 4D 41 52  4B 45 20 41 55 46 20 50  |OESCHMARKE AUF P|
00000250: 55 4E 4B 54 20 53 45 54  5A 45 4E 20 53 54 45 4C  |UNKT SETZEN STEL|
00000260: 4C 45 4E 00 73 0A B4 00  81 20 58 B2 30 20 A4 20  |LEN.s.... X.0 . |
00000270: 33 31 39 00 89 0A BE 00  3A 59 B2 35 30 AC BF 28  |319.....:Y.50..(|
00000280: 58 AD 32 30 29 AA 31 30  30 00 A5 0A C8 00 3A 8D  |X.20).100.....:.|
00000290: 20 36 30 30 30 3A 8F 20  50 55 4E 4B 54 45 20 53  | 6000:. PUNKTE S|
000002A0: 45 54 5A 45 4E 00 AD 0A  D2 00 82 20 58 00 DE 0A  |ETZEN...... X...|
000002B0: DC 00 4C B2 31 3A 8F 20  4C 4F 45 53 43 48 4D 41  |..L.1:. LOESCHMA|
000002C0: 52 4B 45 20 41 55 46 20  50 55 4E 4B 54 20 4C 4F  |RKE AUF PUNKT LO|
000002D0: 45 53 43 48 45 4E 20 53  54 45 4C 4C 45 4E 00 F0  |ESCHEN STELLEN..|
000002E0: 0A E6 00 81 20 58 B2 31  30 30 20 A4 20 32 30 30  |.... X.100 . 200|
000002F0: 00 06 0B F0 00 3A 59 B2  35 30 AC BF 28 58 AD 32  |.....:Y.50..(X.2|
00000300: 30 29 AA 31 30 30 00 24  0B FA 00 3A 8D 20 36 30  |0).100.$...:. 60|
00000310: 30 30 3A 8F 20 50 55 4E  4B 54 45 20 4C 4F 45 53  |00:. PUNKTE LOES|
00000320: 43 48 45 4E 00 2C 0B 04  01 82 20 58 00 4F 0B 0E  |CHEN.,.... X.O..|
00000330: 01 8D 20 35 30 30 30 3A  8F 20 54 45 58 54 4D 4F  |.. 5000:. TEXTMO|
00000340: 44 55 53 20 45 49 4E 53  43 48 41 4C 54 45 4E 00  |DUS EINSCHALTEN.|
00000350: 73 0B 18 01 99 3A 99 22  44 49 45 20 4D 4F 44 55  |s....:."DIE MODU|
00000360: 4C 45 20 32 20 42 49 53  20 36 20 53 49 4E 44 20  |LE 2 BIS 6 SIND |
00000370: 4F 4B 22 00 88 0B 22 01  81 20 49 B2 30 20 A4 20  |OK"...".. I.0 . |
00000380: 31 30 30 30 3A 82 20 49  00 AF 0B 2C 01 8D 20 32  |1000:. I...,.. 2|
00000390: 30 30 30 3A 8F 20 47 52  41 46 49 4B 20 57 49 45  |000:. GRAFIK WIE|
000003A0: 44 45 52 20 45 49 4E 53  43 48 41 4C 54 45 4E 00  |DER EINSCHALTEN.|
000003B0: CB 0B 36 01 58 31 B2 31  36 30 3A 59 31 B2 31 30  |..6.X1.160:Y1.10|
000003C0: 30 3A 52 25 B2 39 30 3A  4C B2 30 00 E2 0B 40 01  |0:R%.90:L.0...@.|
000003D0: 81 20 41 B2 30 20 A4 20  36 2E 32 38 20 A9 20 2E  |. A.0 . 6.28 . .|
000003E0: 30 35 00 F6 0B 4A 01 3A  58 32 B2 52 25 AC BE 28  |05...J.:X2.R%..(|
000003F0: 41 29 AA 31 36 30 00 0A  0C 54 01 3A 59 32 B2 52  |A).160...T.:Y2.R|
00000400: 25 AC BF 28 41 29 AA 31  30 30 00 28 0C 5E 01 3A  |%..(A).100.(.^.:|
00000410: 8D 20 37 30 30 30 3A 8F  20 4C 49 4E 49 45 4E 20  |. 7000:. LINIEN |
00000420: 5A 45 49 43 48 4E 45 4E  00 30 0C 68 01 82 20 41  |ZEICHNEN.0.h.. A|
00000430: 00 53 0C 72 01 8D 20 35  30 30 30 3A 8F 20 54 45  |.S.r.. 5000:. TE|
00000440: 58 54 4D 4F 44 55 53 20  45 49 4E 53 43 48 41 4C  |XTMODUS EINSCHAL|
00000450: 54 45 4E 00 76 0C 7C 01  99 3A 99 22 41 55 43 48  |TEN.v.|..:."AUCH|
00000460: 20 44 41 53 20 4D 4F 44  55 4C 20 37 20 41 52 42  | DAS MODUL 7 ARB|
00000470: 45 49 54 45 54 22 00 8B  0C 86 01 81 20 49 B2 30  |EITET"...... I.0|
00000480: 20 A4 20 31 30 30 30 3A  82 20 49 00 AB 0C 90 01  | . 1000:. I.....|
00000490: 8D 20 32 30 30 30 3A 8F  20 47 52 41 46 49 4B 20  |. 2000:. GRAFIK |
000004A0: 45 49 4E 53 43 48 41 4C  54 45 4E 00 C6 0C 9A 01  |EINSCHALTEN.....|
000004B0: 58 4D B2 31 36 30 3A 59  4D B2 31 30 30 3A 52 B2  |XM.160:YM.100:R.|
000004C0: 39 35 3A 4C B2 30 00 E2  0C A4 01 8D 20 38 30 30  |95:L.0...... 800|
000004D0: 30 3A 8F 20 4B 52 45 49  53 20 5A 45 49 43 48 4E  |0:. KREIS ZEICHN|
000004E0: 45 4E 00 F7 0C AE 01 81  20 49 B2 30 20 A4 20 31  |EN...... I.0 . 1|
000004F0: 30 30 30 3A 82 20 49 00  0E 0D B8 01 8D 20 35 30  |000:. I...... 50|
00000500: 30 30 3A 8F 20 54 45 58  54 4D 4F 44 55 53 00 36  |00:. TEXTMODUS.6|
00000510: 0D C2 01 99 3A 99 22 41  55 43 48 20 44 41 53 20  |....:."AUCH DAS |
00000520: 4D 4F 44 55 4C 20 38 20  46 55 4E 4B 54 49 4F 4E  |MODUL 8 FUNKTION|
00000530: 49 45 52 54 2E 22 00 68  0D CC 01 97 20 35 32 2C  |IERT.".h.... 52,|
00000540: 31 36 30 3A 97 35 36 2C  31 36 30 3A 8F 20 42 41  |160:.56,160:. BA|
00000550: 53 49 43 5A 45 49 47 45  52 20 5A 55 52 55 45 43  |SICZEIGER ZURUEC|
00000560: 4B 53 54 45 4C 4C 45 4E  00 6E 0D D6 01 9C 00 74  |KSTELLEN.n.....t|
00000570: 0D E0 01 80 00 99 0D D0  07 8F 20 2D 20 4D 4F 44  |.......... - MOD|
00000580: 55 4C 20 32 3A 47 52 41  46 49 4B 20 45 49 4E 53  |UL 2:GRAFIK EINS|
00000590: 43 48 41 4C 54 45 4E 20  2D 00 C4 0D DA 07 97 20  |CHALTEN -...... |
000005A0: 35 36 35 37 36 2C 31 39  38 20 3A 20 8F 20 41 42  |56576,198 : . AB|
000005B0: 53 43 48 4E 49 54 54 20  31 20 45 49 4E 53 54 45  |SCHNITT 1 EINSTE|
000005C0: 4C 4C 45 4E 00 FD 0D E4  07 97 20 35 33 32 37 32  |LLEN...... 53272|
000005D0: 2C 31 32 35 20 3A 20 8F  20 42 49 4C 44 53 43 48  |,125 : . BILDSCH|
000005E0: 49 52 4D 20 55 4E 44 20  42 49 54 4D 41 50 53 54  |IRM UND BITMAPST|
000005F0: 41 52 54 20 46 45 53 54  4C 45 47 45 4E 00 35 0E  |ART FESTLEGEN.5.|
00000600: EE 07 97 20 36 34 38 2C  39 32 20 20 20 20 3A 20  |... 648,92    : |
00000610: 8F 20 42 49 4C 44 53 43  48 49 52 4D 20 41 4E 20  |. BILDSCHIRM AN |
00000620: 42 45 54 52 49 45 42 53  53 59 53 54 45 4D 20 4D  |BETRIEBSSYSTEM M|
00000630: 45 4C 44 45 4E 00 61 0E  F8 07 97 20 35 32 2C 39  |ELDEN.a.... 52,9|
00000640: 32 20 20 20 20 20 3A 20  8F 20 42 41 53 49 43 53  |2     : . BASICS|
00000650: 50 45 49 43 48 45 52 20  42 45 47 52 45 4E 5A 45  |PEICHER BEGRENZE|
00000660: 4E 00 6D 0E 02 08 97 20  35 36 2C 39 32 00 A1 0E  |N.m.... 56,92...|
00000670: 0C 08 97 20 35 33 32 36  35 2C C2 28 35 33 32 36  |... 53265,.(5326|
00000680: 35 29 20 B0 20 33 32 3A  8F 20 42 49 54 4D 41 50  |5) . 32:. BITMAP|
00000690: 4D 4F 44 55 53 20 45 49  4E 53 43 48 41 4C 54 45  |MODUS EINSCHALTE|
000006A0: 4E 00 A7 0E 16 08 8E 00  CC 0E B8 0B 8F 20 2D 20  |N............ - |
000006B0: 4D 4F 44 55 4C 20 33 3A  20 42 49 54 4D 41 50 20  |MODUL 3: BITMAP |
000006C0: 4C 4F 45 53 43 48 45 4E  20 2D 2D 2D 00 F0 0E C2  |LOESCHEN ---....|
000006D0: 0B 42 41 B2 32 34 35 37  36 20 3A 20 8F 20 42 49  |.BA.24576 : . BI|
000006E0: 54 4D 41 50 53 54 41 52  54 41 44 52 45 53 53 45  |TMAPSTARTADRESSE|
000006F0: 00 1C 0F CC 0B 81 20 49  B2 42 41 20 A4 20 42 41  |...... I.BA . BA|
00000700: AA 37 39 39 39 20 3A 20  8F 20 44 49 45 20 4C 4F  |.7999 : . DIE LO|
00000710: 45 53 43 48 53 43 48 4C  45 49 46 45 00 27 0F D6  |ESCHSCHLEIFE.'..|
00000720: 0B 3A 97 20 49 2C 30 00  2F 0F E0 0B 82 20 49 00  |.:. I,0./.... I.|
00000730: 35 0F EA 0B 8E 00 5A 0F  A0 0F 8F 20 2D 20 4D 4F  |5.....Z.... - MO|
00000740: 44 55 4C 20 34 3A 20 46  41 52 42 47 45 42 55 4E  |DUL 4: FARBGEBUN|
00000750: 47 20 2D 2D 2D 2D 2D 2D  2D 2D 00 82 0F AA 0F 42  |G --------.....B|
00000760: 53 B2 32 33 35 35 32 20  3A 20 8F 20 42 49 4C 44  |S.23552 : . BILD|
00000770: 53 43 48 49 52 4D 53 54  41 52 54 41 44 52 45 53  |SCHIRMSTARTADRES|
00000780: 53 45 00 AC 0F B4 0F 46  B2 31 36 AC 5A 46 AA 48  |SE.....F.16.ZF.H|
00000790: 46 3A 8F 20 42 45 52 45  43 48 4E 55 4E 47 20 44  |F:. BERECHNUNG D|
000007A0: 45 53 20 46 41 52 42 43  4F 44 45 53 00 D5 0F BE  |ES FARBCODES....|
000007B0: 0F 81 20 49 B2 42 53 20  A4 20 42 53 AA 39 39 39  |.. I.BS . BS.999|
000007C0: 20 3A 20 8F 20 44 49 45  20 46 41 52 42 53 43 48  | : . DIE FARBSCH|
000007D0: 4C 45 49 46 45 00 E0 0F  C8 0F 3A 97 20 49 2C 46  |LEIFE.....:. I,F|
000007E0: 00 E8 0F D2 0F 82 20 49  00 EE 0F DC 0F 8E 00 13  |...... I........|
000007F0: 10 88 13 8F 20 2D 20 4D  4F 44 55 4C 20 35 3A 20  |.... - MODUL 5: |
00000800: 54 45 58 54 4D 4F 44 55  53 20 45 49 4E 20 2D 2D  |TEXTMODUS EIN --|
00000810: 2D 2D 2D 00 40 10 92 13  97 20 35 33 32 37 32 2C  |---.@.... 53272,|
00000820: 32 31 20 3A 20 8F 20 41  4C 54 45 4E 20 49 4E 48  |21 : . ALTEN INH|
00000830: 41 4C 54 20 52 45 53 54  41 55 52 49 45 52 45 4E  |ALT RESTAURIEREN|
00000840: 00 6E 10 9C 13 97 20 35  36 35 37 36 2C 31 39 39  |.n.... 56576,199|
00000850: 3A 20 8F 20 56 49 43 20  57 49 45 44 45 52 20 41  |: . VIC WIEDER A|
00000860: 55 46 20 41 42 53 43 48  4E 49 54 54 20 30 00 A7  |UF ABSCHNITT 0..|
00000870: 10 A6 13 97 20 36 34 38  2C 34 20 3A 8F 20 41 4C  |.... 648,4 :. AL|
00000880: 54 45 4E 20 42 49 4C 44  53 43 48 49 52 4D 20 41  |TEN BILDSCHIRM A|
00000890: 4E 20 42 45 54 52 49 45  42 53 53 59 53 54 45 4D  |N BETRIEBSSYSTEM|
000008A0: 20 4D 45 4C 44 45 4E 00  DA 10 B0 13 97 20 35 33  | MELDEN...... 53|
000008B0: 32 36 35 2C C2 28 35 33  32 36 35 29 20 AF 20 32  |265,.(53265) . 2|
000008C0: 32 33 3A 8F 20 54 45 58  54 4D 4F 44 55 53 20 45  |23:. TEXTMODUS E|
000008D0: 49 4E 53 43 48 41 4C 54  45 4E 00 E0 10 BA 13 8E  |INSCHALTEN......|
000008E0: 00 06 11 70 17 8F 20 2D  20 4D 4F 44 55 4C 20 36  |...p.. - MODUL 6|
000008F0: 3A 50 55 4E 4B 54 20 53  45 54 5A 45 4E 2F 4C 4F  |:PUNKT SETZEN/LO|
00000900: 45 53 43 48 45 4E 00 2D  11 7A 17 8B 20 58 B3 30  |ESCHEN.-.z.. X.0|
00000910: 20 B0 20 58 B1 33 31 39  20 B0 20 59 B3 30 20 B0  | . X.319 . Y.0 .|
00000920: 20 59 B1 31 39 39 20 A7  20 36 30 36 30 00 53 11  | Y.199 . 6060.S.|
00000930: 84 17 42 59 B2 28 58 20  AF 20 35 30 34 29 AA 34  |..BY.(X . 504).4|
00000940: 30 AC 28 59 20 AF 20 32  34 38 29 AA 28 59 20 AF  |0.(Y . 248).(Y .|
00000950: 20 37 29 00 66 11 8E 17  42 49 B2 37 20 AB 20 28  | 7).f...BI.7 . (|
00000960: 58 20 AF 20 37 29 00 95  11 98 17 8B 20 4C B2 31  |X . 7)...... L.1|
00000970: 20 A7 20 97 20 42 59 AA  42 41 2C C2 28 42 59 AA  | . . BY.BA,.(BY.|
00000980: 42 41 29 20 AF 20 A8 20  28 32 AE 42 49 29 3A 89  |BA) . . (2.BI):.|
00000990: 20 36 30 36 30 00 B3 11  A2 17 97 20 42 59 AA 42  | 6060...... BY.B|
000009A0: 41 2C C2 28 42 59 AA 42  41 29 20 B0 20 28 32 AE  |A,.(BY.BA) . (2.|
000009B0: 42 49 29 00 B9 11 AC 17  8E 00 E5 11 58 1B 8F 20  |BI).........X.. |
000009C0: 2D 20 4D 4F 44 55 4C 20  37 3A 20 4C 49 4E 49 45  |- MODUL 7: LINIE|
000009D0: 4E 20 5A 45 49 43 48 4E  45 4E 2F 4C 4F 45 53 43  |N ZEICHNEN/LOESC|
000009E0: 48 45 4E 20 2D 00 09 12  62 1B 58 25 B2 58 31 3A  |HEN -...b.X%.X1:|
000009F0: 59 25 B2 59 31 3A 8F 20  41 4C 4C 45 53 20 49 4E  |Y%.Y1:. ALLES IN|
00000A00: 20 49 4E 54 45 47 45 52  53 00 37 12 6C 1B 44 58  | INTEGERS.7.l.DX|
00000A10: 25 B2 B6 28 58 32 AB 58  31 29 3A 8F 20 42 45 52  |%..(X2.X1):. BER|
00000A20: 45 43 48 4E 55 4E 47 20  44 45 52 20 44 49 46 46  |ECHNUNG DER DIFF|
00000A30: 45 52 45 4E 5A 45 4E 00  48 12 76 1B 44 59 25 B2  |ERENZEN.H.v.DY%.|
00000A40: B6 28 59 32 AB 59 31 29  00 73 12 80 1B 53 31 25  |.(Y2.Y1).s...S1%|
00000A50: B2 B4 28 58 32 AB 58 31  29 3A 8F 20 42 45 53 54  |..(X2.X1):. BEST|
00000A60: 49 4D 4D 55 4E 47 20 44  45 52 20 4F 4B 54 41 4E  |IMMUNG DER OKTAN|
00000A70: 54 45 4E 00 84 12 8A 1B  53 32 25 B2 B4 28 59 32  |TEN.....S2%..(Y2|
00000A80: AB 59 31 29 00 B6 12 94  1B 8B 20 44 58 25 B3 44  |.Y1)...... DX%.D|
00000A90: 59 25 20 A7 20 44 25 B2  44 58 25 3A 44 58 25 B2  |Y% . D%.DX%:DX%.|
00000AA0: 44 59 25 3A 44 59 25 B2  44 25 3A 54 25 B2 31 3A  |DY%:DY%.D%:T%.1:|
00000AB0: 89 20 37 30 38 30 00 EA  12 9E 1B 54 25 B2 30 20  |. 7080.....T%.0 |
00000AC0: 3A 20 8F 20 55 4D 44 52  45 48 45 4E 20 57 45 4E  |: . UMDREHEN WEN|
00000AD0: 4E 20 44 58 20 3C 20 44  59 20 55 4E 44 20 4D 41  |N DX < DY UND MA|
00000AE0: 52 4B 45 20 53 45 54 5A  45 4E 00 18 13 A8 1B 44  |RKE SETZEN.....D|
00000AF0: 25 B2 32 AC 44 59 25 20  AB 20 44 58 25 3A 8F 20  |%.2.DY% . DX%:. |
00000B00: 53 54 41 52 54 57 45 52  54 20 44 28 31 29 20 45  |STARTWERT D(1) E|
00000B10: 52 4D 49 54 54 45 4C 4E  00 3F 13 B2 1B 49 31 25  |RMITTELN.?...I1%|
00000B20: B2 32 AC 44 59 25 20 3A  20 8F 20 49 4E 4B 52 45  |.2.DY% : . INKRE|
00000B30: 4D 45 4E 54 45 20 42 45  52 45 43 48 4E 45 4E 00  |MENTE BERECHNEN.|
00000B40: 4D 13 BC 1B 49 32 25 B2  32 AC 44 58 25 00 6F 13  |M...I2%.2.DX%.o.|
00000B50: C6 1B 81 20 49 B2 31 20  A4 20 44 58 25 20 3A 20  |... I.1 . DX% : |
00000B60: 8F 20 48 41 55 50 54 53  43 48 4C 45 49 46 45 00  |. HAUPTSCHLEIFE.|
00000B70: 96 13 D0 1B 3A 58 B2 58  25 3A 59 B2 59 25 3A 8D  |....:X.X%:Y.Y%:.|
00000B80: 20 36 30 30 30 3A 8F 20  50 55 4E 4B 54 20 5A 45  | 6000:. PUNKT ZE|
00000B90: 49 43 48 4E 45 4E 00 AB  13 DA 1B 3A 8B 20 44 25  |ICHNEN.....:. D%|
00000BA0: B3 30 20 A7 20 89 20 37  31 37 30 00 CA 13 E4 1B  |.0 . . 7170.....|
00000BB0: 3A 8B 20 54 25 B2 31 20  A7 20 58 25 B2 58 25 AA  |:. T%.1 . X%.X%.|
00000BC0: 53 31 25 3A 89 20 37 31  36 30 00 D9 13 EE 1B 3A  |S1%:. 7160.....:|
00000BD0: 59 25 B2 59 25 AA 53 32  25 00 E8 13 F8 1B 3A 44  |Y%.Y%.S2%.....:D|
00000BE0: 25 B2 44 25 AB 49 32 25  00 07 14 02 1C 3A 8B 20  |%.D%.I2%.....:. |
00000BF0: 54 25 B2 31 20 A7 20 59  25 B2 59 25 AA 53 32 25  |T%.1 . Y%.Y%.S2%|
00000C00: 3A 89 20 37 31 39 30 00  16 14 0C 1C 3A 58 25 B2  |:. 7190.....:X%.|
00000C10: 58 25 AA 53 31 25 00 25  14 16 1C 3A 44 25 B2 44  |X%.S1%.%...:D%.D|
00000C20: 25 AA 49 31 25 00 2D 14  20 1C 82 20 49 00 33 14  |%.I1%.-. .. I.3.|
00000C30: 2A 1C 8E 00 5E 14 40 1F  8F 20 2D 20 4D 4F 44 55  |*...^.@.. - MODU|
00000C40: 4C 20 38 3A 20 4B 52 45  49 53 20 5A 45 49 43 48  |L 8: KREIS ZEICH|
00000C50: 4E 45 4E 2F 4C 4F 45 53  43 48 45 4E 20 2D 00 79  |NEN/LOESCHEN -.y|
00000C60: 14 4A 1F 58 25 B2 30 3A  59 25 B2 52 3A 8F 20 53  |.J.X%.0:Y%.R:. S|
00000C70: 54 41 52 54 57 45 52 54  45 00 9B 14 54 1F 44 25  |TARTWERTE...T.D%|
00000C80: B2 52 AB 31 3A 8F 20 45  4E 54 53 43 48 45 49 44  |.R.1:. ENTSCHEID|
00000C90: 55 4E 47 53 47 52 4F 45  53 53 45 00 BC 14 5E 1F  |UNGSGROESSE...^.|
00000CA0: 8B 20 44 25 B3 30 20 A7  20 59 25 B2 59 25 AB 31  |. D%.0 . Y%.Y%.1|
00000CB0: 3A 44 25 B2 44 25 AA 59  25 AA 59 25 00 E5 14 68  |:D%.D%.Y%.Y%...h|
00000CC0: 1F 8D 20 38 31 30 30 3A  8F 20 5A 45 49 43 48 4E  |.. 8100:. ZEICHN|
00000CD0: 45 4E 20 56 4F 4E 20 38  20 4B 52 45 49 53 50 55  |EN VON 8 KREISPU|
00000CE0: 4E 4B 54 45 4E 00 F7 14  72 1F 44 25 B2 44 25 AB  |NKTEN...r.D%.D%.|
00000CF0: 58 25 AB 58 25 AB 31 00  03 15 7C 1F 58 25 B2 58  |X%.X%.1...|.X%.X|
00000D00: 25 AA 31 00 17 15 86 1F  8B 20 58 25 B3 B2 59 25  |%.1...... X%..Y%|
00000D10: 20 A7 20 38 30 33 30 00  1D 15 90 1F 8E 00 41 15  | . 8030.......A.|
00000D20: A4 1F 8F 20 2D 20 55 50  20 38 20 4B 52 45 49 53  |... - UP 8 KREIS|
00000D30: 50 55 4E 4B 54 45 20 5A  45 49 43 48 4E 45 4E 20  |PUNKTE ZEICHNEN |
00000D40: 2D 00 5C 15 AE 1F 58 B2  58 4D AA 58 25 3A 59 B2  |-.\...X.XM.X%:Y.|
00000D50: 59 4D AA 59 25 3A 8D 20  36 30 30 30 00 77 15 B8  |YM.Y%:. 6000.w..|
00000D60: 1F 58 B2 58 4D AB 58 25  3A 59 B2 59 4D AA 59 25  |.X.XM.X%:Y.YM.Y%|
00000D70: 3A 8D 20 36 30 30 30 00  92 15 C2 1F 58 B2 58 4D  |:. 6000.....X.XM|
00000D80: AA 58 25 3A 59 B2 59 4D  AB 59 25 3A 8D 20 36 30  |.X%:Y.YM.Y%:. 60|
00000D90: 30 30 00 AD 15 CC 1F 58  B2 58 4D AB 58 25 3A 59  |00.....X.XM.X%:Y|
00000DA0: B2 59 4D AB 59 25 3A 8D  20 36 30 30 30 00 C8 15  |.YM.Y%:. 6000...|
00000DB0: D6 1F 58 B2 58 4D AA 59  25 3A 59 B2 59 4D AA 58  |..X.XM.Y%:Y.YM.X|
00000DC0: 25 3A 8D 20 36 30 30 30  00 E3 15 E0 1F 58 B2 58  |%:. 6000.....X.X|
00000DD0: 4D AB 59 25 3A 59 B2 59  4D AA 58 25 3A 8D 20 36  |M.Y%:Y.YM.X%:. 6|
00000DE0: 30 30 30 00 FE 15 EA 1F  58 B2 58 4D AA 59 25 3A  |000.....X.XM.Y%:|
00000DF0: 59 B2 59 4D AB 58 25 3A  8D 20 36 30 30 30 00 19  |Y.YM.X%:. 6000..|
00000E00: 16 F4 1F 58 B2 58 4D AB  59 25 3A 59 B2 59 4D AB  |...X.XM.Y%:Y.YM.|
00000E10: 58 25 3A 8D 20 36 30 30  30 00 1F 16 FE 1F 8E 00  |X%:. 6000.......|
00000E20: 00 00 20 38                                       |.. 8            |
..(.... ********************************
.O.... *                              *.
V.... *     H I R E S 4 . B A S      *..
.(.. *  BASICVERSION EINES GRAFIK-  *.D.
2.. *  PROGRAMMES FUER DEN C64     *...<
.. *   HEIMO PONNATH  HAMBURG     *...F.
. *                              *.9.P..
 ********************************.?.Z...
E.D.. ------- HAUPTPROGRAMM ---------.Q.
N..G(147)...X..:.:."DIESES PROGRAMM TEST
ET ALLE MODULE":."VON HIRES4.BAS".....ZF
.5:HF.0:. ZEICHEN- UND HINTERGRUNDFARBE.
..... 2000:. GRAFIK EINSCHALTEN...... 30
00:. BITMAP LOESCHEN.4. .. 4000:. FARBGE
BUNG.C...L.0:. LOESCHMARKE AUF PUNKT SET
ZEN STELLEN.S.... X.0 . 319.....:Y.50..(
X.20).100...H.:. 6000:. PUNKTE SETZEN...
R.. X.....L.1:. LOESCHMARKE AUF PUNKT LO
ESCHEN STELLEN...... X.100 . 200.....:Y.
50..(X.20).100.$...:. 6000:. PUNKTE LOES
CHEN.,.... X.O.... 5000:. TEXTMODUS EINS
CHALTEN.S....:."DIE MODULE 2 BIS 6 SIND 
OK"...".. I.0 . 1000:. I...,.. 2000:. GR
AFIK WIEDER EINSCHALTEN.K.6.X1.160:Y1.10
0:R%.90:L.0...@.. A.0 . 6.28 . .05...J.:
X2.R%..(A).160...T.:Y2.R%..(A).100.(.^.:
. 7000:. LINIEN ZEICHNEN.0.H.. A.S.R.. 5
000:. TEXTMODUS EINSCHALTEN.V.|..:."AUCH
 DAS MODUL 7 ARBEITET"...... I.0 . 1000:
. I...... 2000:. GRAFIK EINSCHALTEN.F...
XM.160:YM.100:R.95:L.0...... 8000:. KREI
S ZEICHNEN...... I.0 . 1000:. I...... 50
00:. TEXTMODUS.6.B..:."AUCH DAS MODUL 8 
FUNKTIONIERT.".H.L.. 52,160:.56,160:. BA
SICZEIGER ZURUECKSTELLEN.N.V...T.......P
.. - MODUL 2:GRAFIK EINSCHALTEN -.D.Z.. 
56576,198 : . ABSCHNITT 1 EINSTELLEN....
.. 53272,125 : . BILDSCHIRM UND BITMAPST
ART FESTLEGEN.5.... 648,92    : . BILDSC
HIRM AN BETRIEBSSYSTEM MELDEN.A.... 52,9
2     : . BASICSPEICHER BEGRENZEN.M.... 
56,92...... 53265,B(53265) . 32:. BITMAP
MODUS EINSCHALTEN.......L.... - MODUL 3:
 BITMAP LOESCHEN ---...B.BA.24576 : . BI
TMAPSTARTADRESSE...L.. I.BA . BA.7999 : 
. DIE LOESCHSCHLEIFE.'.V.:. I,0./.... I.
5.....Z. .. - MODUL 4: FARBGEBUNG ------
--.....BS.23552 : . BILDSCHIRMSTARTADRES
SE.....F.16.ZF.HF:. BERECHNUNG DES FARBC
ODES.U.... I.BS . BS.999 : . DIE FARBSCH
LEIFE...H.:. I,F...R.. I............ - M
ODUL 5: TEXTMODUS EIN -----.@.... 53272,
21 : . ALTEN INHALT RESTAURIEREN.N.... 5
6576,199: . VIC WIEDER AUF ABSCHNITT 0..
.... 648,4 :. ALTEN BILDSCHIRM AN BETRIE
BSSYSTEM MELDEN.Z.... 53265,B(53265) . 2
23:. TEXTMODUS EINSCHALTEN.........P.. -
 MODUL 6:PUNKT SETZEN/LOESCHEN.-.Z.. X.0
 . X.319 . Y.0 . Y.199 . 6060.S...BY.(X 
. 504).40.(Y . 248).(Y . 7).F...BI.7 . (
X . 7)...... L.1 . . BY.BA,B(BY.BA) . . 
(2.BI):. 6060...... BY.BA,B(BY.BA) . (2.
BI).........X.. - MODUL 7: LINIEN ZEICHN
EN/LOESCHEN -...B.X%.X1:Y%.Y1:. ALLES IN
 INTEGERS.7.L.DX%..(X2.X1):. BERECHNUNG 
DER DIFFERENZEN.H.V.DY%..(Y2.Y1).S...S1%
..(X2.X1):. BESTIMMUNG DER OKTANTEN.....
S2%..(Y2.Y1)...... DX%.DY% . D%.DX%:DX%.
DY%:DY%.D%:T%.1:. 7080.....T%.0 : . UMDR
EHEN WENN DX < DY UND MARKE SETZEN.....D
%.2.DY% . DX%:. STARTWERT D(1) ERMITTELN
.?...I1%.2.DY% : . INKREMENTE BERECHNEN.
M...I2%.2.DX%.O.F.. I.1 . DX% : . HAUPTS
CHLEIFE...P.:X.X%:Y.Y%:. 6000:. PUNKT ZE
ICHNEN...Z.:. D%.0 . . 7170.J...:. T%.1 
. X%.X%.S1%:. 7160.Y...:Y%.Y%.S2%.....:D
%.D%.I2%.....:. T%.1 . Y%.Y%.S2%:. 7190.
....:X%.X%.S1%.%...:D%.D%.I1%.-. .. I.3.
*...^.@.. - MODUL 8: KREIS ZEICHNEN/LOES
CHEN -.Y.J.X%.0:Y%.R:. STARTWERTE...T.D%
.R.1:. ENTSCHEIDUNGSGROESSE...^.. D%.0 .
 Y%.Y%.1:D%.D%.Y%.Y%...H.. 8100:. ZEICHN
EN VON 8 KREISPUNKTEN...R.D%.D%.X%.X%.1.
..|.X%.X%.1...... X%..Y% . 8030.......A.
... - UP 8 KREISPUNKTE ZEICHNEN -.\...X.
XM.X%:Y.YM.Y%:. 6000.W...X.XM.X%:Y.YM.Y%
:. 6000...B.X.XM.X%:Y.YM.Y%:. 6000...L.X
.XM.X%:Y.YM.Y%:. 6000.H.V.X.XM.Y%:Y.YM.X
%:. 6000.....X.XM.Y%:Y.YM.X%:. 6000.....
X.XM.Y%:Y.YM.X%:. 6000.....X.XM.Y%:Y.YM.
X%:. 6000......... 8
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL