00000000: 01 1C 29 1C 01 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 2A 00 51 1C 02 00 8F 20 |*********.Q.... |
00000030: 2A 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 20 20 | |
00000050: 2A 00 79 1C 03 00 8F 20 2A 20 20 20 20 56 45 52 |*.y.... * VER|
00000060: 53 43 48 4C 55 4E 47 45 4E 45 20 53 50 49 52 41 |SCHLUNGENE SPIRA|
00000070: 4C 45 4E 20 20 20 20 20 2A 00 A1 1C 04 00 8F 20 |LEN *...... |
00000080: 2A 20 20 20 20 56 45 52 53 49 4F 4E 20 46 55 45 |* VERSION FUE|
00000090: 52 20 44 45 4E 20 50 43 31 32 38 20 20 20 20 20 |R DEN PC128 |
000000A0: 2A 00 C9 1C 05 00 8F 20 2A 20 20 20 20 20 20 20 |*...... * |
000000B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000C0: 20 20 20 20 20 20 20 20 2A 00 F1 1C 06 00 8F 20 | *...... |
000000D0: 2A 20 20 48 45 49 4D 4F 20 50 4F 4E 4E 41 54 48 |* HEIMO PONNATH|
000000E0: 20 20 48 41 4D 42 55 52 47 20 31 39 38 35 20 20 | HAMBURG 1985 |
000000F0: 2A 00 19 1D 07 00 8F 20 2A 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 20 20 20 20 20 20 20 2A 00 41 1D 08 00 8F 20 | *.A.... |
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 2A 2A 2A 2A 2A 2A 2A |****************|
00000140: 2A 00 64 1D 09 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |*.d.... ********|
00000150: 20 45 49 4E 47 41 42 45 4E 20 2A 2A 2A 2A 2A 2A | EINGABEN ******|
00000160: 2A 2A 2A 2A 00 79 1D 0A 00 E7 30 2C 31 3A E7 34 |****.y....0,1:.4|
00000170: 2C 31 3A E7 35 2C 36 3A E8 00 AB 1D 0F 00 85 22 |,1:.5,6:......."|
00000180: 41 4E 5A 41 48 4C 20 53 50 49 52 41 4C 45 4E 22 |ANZAHL SPIRALEN"|
00000190: 3B 4E 3A 85 22 54 45 58 54 53 54 41 52 54 20 58 |;N:."TEXTSTART X|
000001A0: 54 2C 59 54 22 3B 58 54 2C 59 54 00 C9 1D 14 00 |T,YT";XT,YT.....|
000001B0: 85 22 52 41 44 49 55 53 2C 53 54 41 52 54 57 49 |."RADIUS,STARTWI|
000001C0: 4E 4B 45 4C 22 3B 52 2C 41 00 EB 1D 16 00 8F 20 |NKEL";R,A...... |
000001D0: 2A 2A 2A 2A 2A 2A 2A 20 49 4E 49 54 20 2A 2A 2A |******* INIT ***|
000001E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 04 1E 17 00 |***********.....|
000001F0: E7 30 2C 31 36 3A E7 31 2C 37 3A E7 34 2C 31 3A |.0,16:.1,7:.4,1:|
00000200: DE 31 2C 31 00 26 1E 19 00 8F 20 2A 2A 2A 2A 2A |.1,1.&.... *****|
00000210: 2A 2A 20 53 54 41 52 54 2F 4D 49 54 54 45 20 2A |** START/MITTE *|
00000220: 2A 2A 2A 2A 2A 2A 00 48 1E 1E 00 58 55 B2 AB 31 |******.H...XU..1|
00000230: 36 30 3A 58 4F B2 31 36 30 3A 59 55 B2 AB 31 30 |60:XO.160:YU..10|
00000240: 30 3A 59 4F B2 31 30 30 00 54 1E 20 00 FE 25 3A |0:YO.100.T. ..%:|
00000250: 8D 31 30 30 00 76 1E 21 00 8F 20 2A 2A 2A 2A 2A |.100.v.!.. *****|
00000260: 2A 2A 20 4B 52 45 49 53 20 2A 2A 2A 2A 2A 2A 2A |** KREIS *******|
00000270: 2A 2A 2A 2A 2A 2A 00 B6 1E 23 00 58 B2 30 3A 59 |******...#.X.0:Y|
00000280: B2 30 3A 8D 31 30 32 30 3A 58 35 B2 58 58 3A 59 |.0:.1020:X5.XX:Y|
00000290: 35 B2 59 59 3A 52 58 B2 52 AC 33 31 39 AD 28 58 |5.YY:RX.R.319.(X|
000002A0: 4F AB 58 55 29 3A 52 59 B2 52 AC 31 39 39 AD 28 |O.XU):RY.R.199.(|
000002B0: 59 4F AB 59 55 29 00 CC 1E 25 00 FE 26 3A E2 31 |YO.YU)...%..&:.1|
000002C0: 2C 58 35 2C 59 35 2C 52 58 2C 52 59 00 EC 1E 28 |,X5,Y5,RX,RY...(|
000002D0: 00 41 24 B2 22 56 45 52 53 43 48 4C 55 4E 47 45 |.A$."VERSCHLUNGE|
000002E0: 4E 45 20 53 50 49 52 41 4C 45 4E 22 00 0E 1F 2A |NE SPIRALEN"...*|
000002F0: 00 8F 20 2A 2A 2A 2A 2A 2A 2A 20 54 45 58 54 20 |.. ******* TEXT |
00000300: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 1E |**************..|
00000310: 1F 2D 00 E0 31 2C 58 54 2C 59 54 2C 41 24 00 44 |.-..1,XT,YT,A$.D|
00000320: 1F 32 00 8F 20 2A 2A 2A 2A 2A 2A 2A 20 53 48 4F |.2.. ******* SHO|
00000330: 57 20 28 48 49 45 52 20 55 4E 4E 4F 45 54 49 47 |W (HIER UNNOETIG|
00000340: 29 20 2A 2A 00 4D 1F 37 00 A1 F9 42 24 00 6F 1F |) **.M.7...B$.o.|
00000350: 3C 00 8F 20 2A 2A 2A 2A 2A 2A 2A 20 4E 4F 52 4D |<.. ******* NORM|
00000360: 41 4C 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |AL ************.|
00000370: 7B 1F 3E 00 DE 30 3A E7 30 2C 31 00 9D 1F 41 00 |{.>..0:.0,1...A.|
00000380: 8F 20 2A 2A 2A 2A 2A 2A 2A 20 47 52 45 53 45 54 |. ******* GRESET|
00000390: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 A6 1F | ************...|
000003A0: 43 00 E8 28 31 29 00 AC 1F 46 00 80 00 CD 1F 64 |C..(1)...F.....d|
000003B0: 00 8F 20 2A 2A 2A 2A 2A 2A 20 55 50 20 5A 45 49 |.. ****** UP ZEI|
000003C0: 43 48 4E 45 4E 20 2A 2A 2A 2A 2A 2A 2A 00 E9 1F |CHNEN *******...|
000003D0: 66 00 4E 4E B2 4E AC 31 30 30 3A 52 41 B2 52 AD |f.NN.N.100:RA.R.|
000003E0: 4E 4E 3A 86 54 28 4E 4E 29 00 FE 1F 69 00 81 4A |NN:.T(NN)...i..J|
000003F0: B2 31 A4 4E 3A 41 B2 41 AA 32 AC FF AD 4E 00 18 |.1.N:A.A.2...N..|
00000400: 20 6E 00 54 B2 41 3A 54 48 B2 32 AC FF AD 31 30 | n.T.A:TH.2...10|
00000410: 30 3A 54 28 30 29 B2 54 00 3B 20 73 00 81 49 B2 |0:T(0).T.; s..I.|
00000420: 31 A4 4E 4E 3A 54 28 49 29 B2 54 28 49 AB 31 29 |1.NN:T(I).T(I.1)|
00000430: AA 54 48 3A 52 52 B2 52 41 AC 49 00 79 20 75 00 |.TH:RR.RA.I.y u.|
00000440: 58 B2 28 52 52 AB 52 41 29 AC BE 28 54 28 49 AB |X.(RR.RA)..(T(I.|
00000450: 31 29 29 3A 59 B2 28 52 52 AB 52 41 29 AC BF 28 |1)):Y.(RR.RA)..(|
00000460: 54 28 49 AB 31 29 29 3A 8D 31 30 32 30 3A 58 41 |T(I.1)):.1020:XA|
00000470: B2 58 58 3A 59 41 B2 59 59 00 A9 20 77 00 58 B2 |.XX:YA.YY.. w.X.|
00000480: 52 52 AC BE 28 54 28 49 29 29 3A 59 B2 52 52 AC |RR..(T(I)):Y.RR.|
00000490: BF 28 54 28 49 29 29 3A 8D 31 30 32 30 3A 58 42 |.(T(I)):.1020:XB|
000004A0: B2 58 58 3A 59 42 B2 59 59 00 BC 20 78 00 E5 31 |.XX:YB.YY.. x..1|
000004B0: 2C 58 41 2C 59 41 A4 58 42 2C 59 42 00 C3 20 7D |,XA,YA.XB,YB.. }|
000004C0: 00 82 49 00 CA 20 82 00 82 4A 00 D0 20 87 00 8E |..I.. ...J.. ...|
000004D0: 00 F5 20 E8 03 8F 20 2A 2A 2A 20 55 50 20 54 52 |.. ... *** UP TR|
000004E0: 41 4E 53 46 4F 52 4D 41 54 49 4F 4E 20 2A 2A 2A |ANSFORMATION ***|
000004F0: 2A 2A 2A 2A 2A 00 16 21 E9 03 8F 20 45 49 4E 4D |*****..!... EINM|
00000500: 41 4C 20 5A 55 20 44 45 46 49 4E 49 45 52 45 4E |AL ZU DEFINIEREN|
00000510: 20 53 49 4E 44 3A 00 3B 21 EA 03 8F 20 20 58 55 | SIND:.;!... XU|
00000520: 2C 58 4F 20 3D 20 4E 49 45 44 52 49 47 53 54 45 |,XO = NIEDRIGSTE|
00000530: 52 2C 48 4F 45 43 48 53 54 45 52 00 51 21 EB 03 |R,HOECHSTER.Q!..|
00000540: 8F 20 20 20 20 20 20 20 20 20 20 58 2D 57 45 52 |. X-WER|
00000550: 54 00 76 21 EC 03 8F 20 20 59 55 2C 59 4F 20 3D |T.v!... YU,YO =|
00000560: 20 4E 49 45 44 52 49 47 53 54 45 52 2C 48 4F 45 | NIEDRIGSTER,HOE|
00000570: 43 48 53 54 45 52 00 8C 21 ED 03 8F 20 20 20 20 |CHSTER..!... |
00000580: 20 20 20 20 20 20 59 2D 57 45 52 54 00 B1 21 EE | Y-WERT..!.|
00000590: 03 8F 20 46 55 45 52 20 4A 45 44 45 4E 20 50 55 |.. FUER JEDEN PU|
000005A0: 4E 4B 54 20 5A 55 20 55 45 42 45 52 47 45 42 45 |NKT ZU UEBERGEBE|
000005B0: 4E 00 D3 21 EF 03 8F 20 20 58 2C 59 20 3D 20 50 |N..!... X,Y = P|
000005C0: 55 4E 4B 54 4B 4F 4F 52 44 49 4E 41 54 45 4E 20 |UNKTKOORDINATEN |
000005D0: 41 55 53 00 F8 21 F0 03 8F 20 20 20 20 20 20 20 |AUS..!... |
000005E0: 20 42 45 4C 49 45 42 49 47 45 4E 20 43 41 52 54 | BELIEBIGEN CART|
000005F0: 45 53 49 53 43 48 45 4E 00 17 22 F1 03 8F 20 20 |ESISCHEN.."... |
00000600: 20 20 20 20 20 20 4B 4F 4F 52 44 49 4E 41 54 45 | KOORDINATE|
00000610: 4E 53 59 53 54 45 4D 00 35 22 F2 03 8F 20 41 55 |NSYSTEM.5"... AU|
00000620: 53 47 45 47 45 42 45 4E 20 57 45 52 44 45 4E 20 |SGEGEBEN WERDEN |
00000630: 44 41 4E 4E 3A 00 5A 22 F3 03 8F 20 20 58 58 2C |DANN:.Z"... XX,|
00000640: 59 59 20 3D 20 42 49 4C 44 53 43 48 49 52 4D 4B |YY = BILDSCHIRMK|
00000650: 4F 4F 52 44 49 4E 41 54 45 4E 00 7D 22 F4 03 8F |OORDINATEN.}"...|
00000660: 20 20 20 20 20 20 20 20 20 20 44 45 53 20 33 32 | DES 32|
00000670: 30 2F 32 30 30 2D 53 59 53 54 45 4D 53 00 A2 22 |0/200-SYSTEMS.."|
00000680: F5 03 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************|
00000690: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000006A0: 2A 2A 00 BC 22 FC 03 58 58 B2 33 31 39 AC 28 58 |**.."..XX.319.(X|
000006B0: AB 58 55 29 AD 28 58 4F AB 58 55 29 00 D6 22 06 |.XU).(XO.XU)..".|
000006C0: 04 59 59 B2 31 39 39 AC 28 59 4F AB 59 29 AD 28 |.YY.199.(YO.Y).(|
000006D0: 59 4F AB 59 55 29 00 DC 22 10 04 8E 00 00 00 |YO.YU).."...... |
..).... ********************************
*.Q.... *
*.Y.... * VERSCHLUNGENE SPIRALEN
*...... * VERSION FUER DEN PC128
*.I.... *
*...... * HEIMO PONNATH HAMBURG 1985
*...... *
*.A.... ********************************
*.D.... ******** EINGABEN **********.Y..
..0,1:.4,1:.5,6:......."ANZAHL SPIRALEN"
;N:."TEXTSTART XT,YT";XT,YT.I...."RADIUS
,STARTWINKEL";R,A...... ******* INIT ***
***********......0,16:.1,7:.4,1:.1,1.&..
.. ******* START/MITTE *******.H...XU..1
60:XO.160:YU..100:YO.100.T. ..%:.100.V.!
.. ******* KREIS *************...#.X.0:Y
.0:.1020:X5.XX:Y5.YY:RX.R.319.(XO.XU):RY
.R.199.(YO.YU).L.%..&:.1,X5,Y5,RX,RY...(
.A$."VERSCHLUNGENE SPIRALEN"...*.. *****
** TEXT **************...-..1,XT,YT,A$.D
.2.. ******* SHOW (HIER UNNOETIG) **.M.7
...B$.O.<.. ******* NORMAL ************.
{.>..0:.0,1...A.. ******* GRESET *******
*****...C..(1)...F...M.D.. ****** UP ZEI
CHNEN *******...F.NN.N.100:RA.R.NN:.T(NN
)...I..J.1.N:A.A.2...N.. N.T.A:TH.2...10
0:T(0).T.; S..I.1.NN:T(I).T(I.1).TH:RR.R
A.I.Y U.X.(RR.RA)..(T(I.1)):Y.(RR.RA)..(
T(I.1)):.1020:XA.XX:YA.YY.. W.X.RR..(T(I
)):Y.RR..(T(I)):.1020:XB.XX:YB.YY.. X..1
,XA,YA.XB,YB.C }..I.J ...J.P ..... ... *
** UP TRANSFORMATION ********..!... EINM
AL ZU DEFINIEREN SIND:.;!... XU,XO = NI
EDRIGSTER,HOECHSTER.Q!... X-WER
T.V!... YU,YO = NIEDRIGSTER,HOECHSTER..
!... Y-WERT..!... FUER JEDEN PU
NKT ZU UEBERGEBEN.S!... X,Y = PUNKTKOOR
DINATEN AUS..!... BELIEBIGEN CART
ESISCHEN.."... KOORDINATENSYSTEM.
5"... AUSGEGEBEN WERDEN DANN:.Z"... XX,
YY = BILDSCHIRMKOORDINATEN.}"...
DES 320/200-SYSTEMS.."... ************
******************.."..XX.319.(X.XU).(XO
.XU).V"..YY.199.(YO.Y).(YO.YU).."......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL