VEKTORRECHNUNG
FILE INFORMATION
FILENAME(S): VEKTORRECHNUNG
FILE TYPE(S): PRG
FILE SIZE: 3.8K
FIRST SEEN: 2025-11-30 01:07:57
APPEARS ON: 2 disk(s)
FILE HASH
bf1b01ef8aebff49d2341ac8e05a30e0fe8532d778224212da3e1788346d3e49
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FREESOFT DISK NR | VEKTORRECHNUNG | PRG | Treasure Chest - Wolfgang Rauprich | 3 | 2 | DOWNLOAD FILE |
| L EHRNEN | VEKTORRECHNUNG | PRG | Treasure Chest - Wolfgang Rauprich | 3 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 16 08 64 00 8F 20 56 45 4B 54 4F 52 52 45 |....d.. VEKTORRE|
00000010: 43 48 4E 55 4E 47 00 41 08 6E 00 8F 20 56 45 4B |CHNUNG.A.n.. VEK|
00000020: 54 4F 52 45 4E 20 49 4E 20 4B 41 52 54 45 53 49 |TOREN IN KARTESI|
00000030: 53 43 48 45 4E 20 4B 4F 4F 52 44 49 4E 41 54 45 |SCHEN KOORDINATE|
00000040: 4E 00 5E 08 78 00 8F 20 41 58 3A 20 58 2D 4B 4F |N.^.x.. AX: X-KO|
00000050: 4F 52 44 49 4E 41 54 45 20 56 4F 4E 20 41 00 79 |ORDINATE VON A.y|
00000060: 08 82 00 8F 20 28 42 58 2C 42 59 2C 42 5A 29 3A |.... (BX,BY,BZ):|
00000070: 20 56 45 4B 54 4F 52 20 42 00 9B 08 8C 00 8F 20 | VEKTOR B...... |
00000080: 28 41 42 29 3A 20 53 4B 41 4C 41 52 50 52 4F 44 |(AB): SKALARPROD|
00000090: 55 4B 54 20 41 20 4D 41 4C 20 42 00 BD 08 96 00 |UKT A MAL B.....|
000000A0: 8F 20 5B 42 43 5D 3A 20 56 45 4B 54 4F 52 50 52 |. [BC]: VEKTORPR|
000000B0: 4F 44 55 4B 54 20 42 20 4D 41 4C 20 43 00 E3 08 |ODUKT B MAL C...|
000000C0: A0 00 8F 20 3C 28 41 2C 43 29 3A 20 57 49 4E 4B |... <(A,C): WINK|
000000D0: 45 4C 20 5A 57 49 53 43 48 45 4E 20 41 20 55 4E |EL ZWISCHEN A UN|
000000E0: 44 20 43 00 06 09 AA 00 8F 20 42 45 49 20 50 52 |D C...... BEI PR|
000000F0: 4F 47 52 41 4D 4D 53 54 4F 50 3A 20 43 20 44 52 |OGRAMMSTOP: C DR|
00000100: 55 45 43 4B 45 4E 00 10 09 C8 00 99 20 22 93 22 |UECKEN...... "."|
00000110: 00 4D 09 D2 00 99 20 22 57 45 52 44 45 4E 20 45 |.M.... "WERDEN E|
00000120: 52 4B 4C 41 45 52 55 4E 47 45 4E 20 5A 55 4D 20 |RKLAERUNGEN ZUM |
00000130: 50 52 4F 47 52 41 4D 4D 20 20 20 20 20 20 20 20 |PROGRAMM |
00000140: 47 45 57 55 45 4E 53 43 48 54 20 3F 22 00 53 09 |GEWUENSCHT ?".S.|
00000150: DC 00 99 00 74 09 E6 00 99 20 22 4A 41 3A 20 20 |....t.... "JA: |
00000160: 20 20 20 54 41 53 54 45 20 4A 20 44 52 55 45 43 | TASTE J DRUEC|
00000170: 4B 45 4E 22 00 95 09 F0 00 99 20 22 4E 45 49 4E |KEN"...... "NEIN|
00000180: 3A 20 20 20 54 41 53 54 45 20 4E 20 44 52 55 45 |: TASTE N DRUE|
00000190: 43 4B 45 4E 22 00 BE 09 FA 00 A1 20 52 24 20 3A |CKEN"...... R$ :|
000001A0: 20 8B 20 52 24 20 B3 B1 20 22 4A 22 20 AF 20 52 | . R$ .. "J" . R|
000001B0: 24 20 B3 B1 20 22 4E 22 20 A7 20 32 35 30 00 D4 |$ .. "N" . 250..|
000001C0: 09 04 01 8B 20 52 24 20 B2 20 22 4E 22 20 A7 20 |.... R$ . "N" . |
000001D0: 31 30 38 30 00 DE 09 2C 01 99 20 22 93 22 00 0E |1080...,.. "."..|
000001E0: 0A 36 01 99 20 22 44 41 53 20 50 52 4F 47 52 41 |.6.. "DAS PROGRA|
000001F0: 4D 4D 20 42 45 52 45 43 48 4E 45 54 20 41 55 53 |MM BERECHNET AUS|
00000200: 20 44 52 45 49 20 49 4E 20 4B 41 52 2D 22 00 3E | DREI IN KAR-".>|
00000210: 0A 40 01 99 20 22 54 45 53 49 53 43 48 45 4E 20 |.@.. "TESISCHEN |
00000220: 4B 4F 4F 52 44 49 4E 41 54 45 4E 20 45 49 4E 47 |KOORDINATEN EING|
00000230: 45 47 45 42 45 4E 45 4E 20 56 45 4B 2D 22 00 81 |EGEBENEN VEK-"..|
00000240: 0A 4A 01 99 20 22 54 4F 52 45 4E 20 53 55 4D 4D |.J.. "TOREN SUMM|
00000250: 45 4E 2C 20 57 49 4E 4B 45 4C 2C 20 42 45 54 52 |EN, WINKEL, BETR|
00000260: 41 45 47 45 20 55 4E 44 20 56 45 52 2D 20 53 43 |AEGE UND VER- SC|
00000270: 48 49 45 44 45 4E 45 20 50 52 4F 44 55 4B 54 45 |HIEDENE PRODUKTE|
00000280: 22 00 8B 0A 54 01 99 20 3A 20 99 00 CF 0A 5E 01 |"...T.. : ....^.|
00000290: 99 20 22 41 4D 20 41 4E 46 41 4E 47 20 57 45 52 |. "AM ANFANG WER|
000002A0: 44 45 4E 20 44 49 45 20 4B 4F 4F 52 44 49 4E 41 |DEN DIE KOORDINA|
000002B0: 54 45 4E 20 44 45 52 20 20 20 20 56 45 4B 54 4F |TEN DER VEKTO|
000002C0: 52 45 4E 20 45 49 4E 47 45 47 45 42 45 4E 22 00 |REN EINGEGEBEN".|
000002D0: D9 0A 68 01 99 20 3A 20 99 00 1E 0B 72 01 99 20 |..h.. : ....r.. |
000002E0: 22 44 49 45 53 45 20 45 49 4E 47 41 42 45 4E 20 |"DIESE EINGABEN |
000002F0: 4D 55 45 53 53 45 4E 20 4D 49 54 20 27 52 45 54 |MUESSEN MIT 'RET|
00000300: 55 52 4E 27 20 20 20 20 20 41 42 47 45 53 43 48 |URN' ABGESCH|
00000310: 4C 4F 53 53 45 4E 20 57 45 52 44 45 4E 22 00 28 |LOSSEN WERDEN".(|
00000320: 0B 7C 01 99 20 3A 20 99 00 69 0B 86 01 99 20 22 |.|.. : ..i.... "|
00000330: 42 45 49 20 50 52 4F 47 52 41 4D 4D 53 54 4F 50 |BEI PROGRAMMSTOP|
00000340: 3A 20 5A 55 52 20 46 4F 52 54 53 45 54 5A 55 4E |: ZUR FORTSETZUN|
00000350: 47 20 44 49 45 20 20 20 54 41 53 54 45 20 43 20 |G DIE TASTE C |
00000360: 44 52 55 45 43 4B 45 4E 22 00 86 0B 90 01 A1 20 |DRUECKEN"...... |
00000370: 52 24 20 3A 20 8B 20 52 24 20 B3 B1 20 22 43 22 |R$ : . R$ .. "C"|
00000380: 20 A7 20 34 30 30 00 90 0B 9A 01 99 20 22 93 22 | . 400...... "."|
00000390: 00 B8 0B A4 01 99 20 22 42 45 49 53 50 49 45 4C |...... "BEISPIEL|
000003A0: 20 46 55 45 52 20 44 49 45 20 44 41 54 45 4E 45 | FUER DIE DATENE|
000003B0: 49 4E 47 41 42 45 3A 22 00 C9 0B AE 01 99 20 22 |INGABE:"...... "|
000003C0: 11 11 41 58 20 3D 20 32 22 00 DA 0B B8 01 99 20 |..AX = 2"...... |
000003D0: 22 41 59 20 3D 20 2D 31 2E 35 00 E9 0B C2 01 99 |"AY = -1.5......|
000003E0: 20 22 41 5A 20 3D 20 33 22 00 FA 0B CC 01 99 20 | "AZ = 3"...... |
000003F0: 22 11 42 58 20 3D 20 2D 31 22 00 0A 0C D6 01 99 |".BX = -1"......|
00000400: 20 22 42 59 20 3D 20 2D 32 22 00 19 0C E0 01 99 | "BY = -2"......|
00000410: 20 22 42 5A 20 3D 20 33 22 00 2B 0C EA 01 99 20 | "BZ = 3".+.... |
00000420: 22 11 43 58 20 3D 20 32 2E 35 22 00 3A 0C F4 01 |".CX = 2.5".:...|
00000430: 99 20 22 43 59 20 3D 20 30 22 00 4C 0C FE 01 99 |. "CY = 0".L....|
00000440: 20 22 43 5A 20 3D 20 2D 31 2E 35 22 00 8A 0C 08 | "CZ = -1.5"....|
00000450: 02 99 20 22 11 11 11 11 11 53 4F 4C 4C 45 4E 20 |.. ".....SOLLEN |
00000460: 44 49 45 20 45 52 4B 4C 41 45 52 55 4E 47 45 4E |DIE ERKLAERUNGEN|
00000470: 20 57 49 45 44 45 52 48 4F 4C 54 20 20 20 20 20 | WIEDERHOLT |
00000480: 20 57 45 52 44 45 4E 20 3F 22 00 AB 0C 12 02 99 | WERDEN ?"......|
00000490: 20 22 11 54 41 53 54 45 20 4A 20 42 5A 57 2E 20 | ".TASTE J BZW. |
000004A0: 4E 20 44 52 55 45 43 4B 45 4E 22 00 D4 0C 1C 02 |N DRUECKEN".....|
000004B0: A1 20 52 24 20 3A 20 8B 20 52 24 20 B3 B1 20 22 |. R$ : . R$ .. "|
000004C0: 4A 22 20 AF 20 52 24 20 B3 B1 20 22 4E 22 20 A7 |J" . R$ .. "N" .|
000004D0: 20 35 34 30 00 E9 0C 26 02 8B 20 52 24 20 B2 20 | 540...&.. R$ . |
000004E0: 22 4A 22 20 A7 20 33 30 30 00 F3 0C 38 04 99 20 |"J" . 300...8.. |
000004F0: 22 93 22 00 0E 0D 42 04 99 20 22 4B 4F 4F 52 44 |"."...B.. "KOORD|
00000500: 49 4E 41 54 45 4E 20 56 4F 4E 20 41 11 22 00 20 |INATEN VON A.". |
00000510: 0D 4C 04 85 20 22 41 58 20 3D 20 22 3B 20 41 58 |.L.. "AX = "; AX|
00000520: 00 32 0D 56 04 85 20 22 41 59 20 3D 20 22 3B 20 |.2.V.. "AY = "; |
00000530: 41 59 00 44 0D 60 04 85 20 22 41 5A 20 3D 20 22 |AY.D.`.. "AZ = "|
00000540: 3B 20 41 5A 00 60 0D 6A 04 99 20 22 11 4B 4F 4F |; AZ.`.j.. ".KOO|
00000550: 52 44 49 4E 41 54 45 4E 20 56 4F 4E 20 42 11 22 |RDINATEN VON B."|
00000560: 00 72 0D 74 04 85 20 22 42 58 20 3D 20 22 3B 20 |.r.t.. "BX = "; |
00000570: 42 58 00 84 0D 7E 04 85 20 22 42 59 20 3D 20 22 |BX...~.. "BY = "|
00000580: 3B 20 42 59 00 96 0D 88 04 85 20 22 42 5A 20 3D |; BY...... "BZ =|
00000590: 20 22 3B 20 42 5A 00 B2 0D 92 04 99 20 22 11 4B | "; BZ...... ".K|
000005A0: 4F 4F 52 44 49 4E 41 54 45 4E 20 56 4F 4E 20 43 |OORDINATEN VON C|
000005B0: 11 22 00 C4 0D 9C 04 85 20 22 43 58 20 3D 20 22 |."...... "CX = "|
000005C0: 3B 20 43 58 00 D6 0D A6 04 85 20 22 43 59 20 3D |; CX...... "CY =|
000005D0: 20 22 3B 20 43 59 00 E8 0D B0 04 85 20 22 43 5A | "; CY...... "CZ|
000005E0: 20 3D 20 22 3B 20 43 5A 00 05 0E BA 04 57 31 20 | = "; CZ.....W1 |
000005F0: B2 20 30 20 3A 20 57 32 20 B2 20 30 20 3A 20 57 |. 0 : W2 . 0 : W|
00000600: 33 20 B2 20 30 00 23 0E C4 04 42 41 20 B2 20 BA |3 . 0.#...BA . .|
00000610: 28 41 58 AC 41 58 AA 41 59 AC 41 59 AA 41 5A AC |(AX.AX.AY.AY.AZ.|
00000620: 41 5A 29 00 41 0E CE 04 42 42 20 B2 20 BA 28 42 |AZ).A...BB . .(B|
00000630: 58 AC 42 58 AA 42 59 AC 42 59 AA 42 5A AC 42 5A |X.BX.BY.BY.BZ.BZ|
00000640: 29 00 5F 0E D8 04 42 43 20 B2 20 BA 28 43 58 AC |)._...BC . .(CX.|
00000650: 43 58 AA 43 59 AC 43 59 AA 43 5A AC 43 5A 29 00 |CX.CY.CY.CZ.CZ).|
00000660: 7A 0E E2 04 53 31 20 B2 20 41 58 AC 42 58 AA 41 |z...S1 . AX.BX.A|
00000670: 59 AC 42 59 AA 41 5A AC 42 5A 00 95 0E EC 04 53 |Y.BY.AZ.BZ.....S|
00000680: 32 20 B2 20 42 58 AC 43 58 AA 42 59 AC 43 59 AA |2 . BX.CX.BY.CY.|
00000690: 42 5A AC 43 5A 00 B0 0E F6 04 53 33 20 B2 20 41 |BZ.CZ.....S3 . A|
000006A0: 58 AC 43 58 AA 41 59 AC 43 59 AA 41 5A AC 43 5A |X.CX.AY.CY.AZ.CZ|
000006B0: 00 CD 0E 00 05 8B 20 42 41 20 B2 20 30 20 B0 20 |...... BA . 0 . |
000006C0: 42 42 20 B2 20 30 20 A7 20 31 33 30 30 00 DF 0E |BB . 0 . 1300...|
000006D0: 0A 05 57 31 20 B2 20 53 31 AD 42 41 AD 42 42 00 |..W1 . S1.BA.BB.|
000006E0: FC 0E 14 05 8B 20 42 42 20 B2 20 30 20 B0 20 42 |..... BB . 0 . B|
000006F0: 43 20 B2 20 30 20 A7 20 31 33 32 30 00 0E 0F 1E |C . 0 . 1320....|
00000700: 05 57 32 20 B2 20 53 32 AD 42 42 AD 42 43 00 2B |.W2 . S2.BB.BC.+|
00000710: 0F 28 05 8B 20 42 41 20 B2 20 30 20 B0 20 42 43 |.(.. BA . 0 . BC|
00000720: 20 B2 20 30 20 A7 20 31 33 34 30 00 3D 0F 32 05 | . 0 . 1340.=.2.|
00000730: 57 33 20 B2 20 53 33 AD 42 41 AD 42 43 00 4E 0F |W3 . S3.BA.BC.N.|
00000740: 3C 05 58 20 B2 20 41 58 AA 42 58 AA 43 58 00 5F |<.X . AX.BX.CX._|
00000750: 0F 46 05 59 20 B2 20 41 59 AA 42 59 AA 43 59 00 |.F.Y . AY.BY.CY.|
00000760: 70 0F 50 05 5A 20 B2 20 41 5A AA 42 5A AA 43 5A |p.P.Z . AZ.BZ.CZ|
00000770: 00 7B 0F 5A 05 8D 20 31 38 33 30 00 8E 0F 64 05 |.{.Z.. 1830...d.|
00000780: 99 20 22 11 D9 41 D4 20 3D 22 3B 20 42 41 00 A1 |. "..A. ="; BA..|
00000790: 0F 6E 05 99 20 22 11 D9 42 D4 20 3D 22 3B 20 42 |.n.. "..B. ="; B|
000007A0: 42 00 B4 0F 78 05 99 20 22 11 D9 43 D4 20 3D 22 |B...x.. "..C. ="|
000007B0: 3B 20 42 43 00 EF 0F 82 05 8B 20 57 31 20 B2 20 |; BC...... W1 . |
000007C0: 30 20 AF 20 42 41 AC 42 42 20 B3 B1 20 30 20 A7 |0 . BA.BB .. 0 .|
000007D0: 20 99 20 22 11 3C 28 41 2C 42 29 20 3D 20 39 30 | . ".<(A,B) = 90|
000007E0: 20 47 52 41 44 22 20 3A 20 89 20 31 34 38 30 00 | GRAD" : . 1480.|
000007F0: 03 10 8C 05 8B 20 57 31 20 B2 20 30 20 A7 20 31 |..... W1 . 0 . 1|
00000800: 34 38 30 00 17 10 96 05 8B 20 57 31 20 B3 20 30 |480...... W1 . 0|
00000810: 20 A7 20 31 34 36 30 00 49 10 A0 05 8B 20 31 AB | . 1460.I.... 1.|
00000820: 57 31 20 B3 20 31 45 AB 39 20 A7 20 99 20 22 11 |W1 . 1E.9 . . ".|
00000830: 3C 28 41 2C 42 29 20 3D 20 30 20 47 52 41 44 22 |<(A,B) = 0 GRAD"|
00000840: 20 3A 20 89 20 31 34 38 30 00 84 10 AA 05 99 20 | : . 1480...... |
00000850: 22 11 3C 28 41 2C 42 29 20 3D 22 3B 20 C1 28 BA |".<(A,B) ="; .(.|
00000860: 28 31 AB 57 31 AC 57 31 29 AD 57 31 29 AC 31 38 |(1.W1.W1).W1).18|
00000870: 30 AD FF 3B 20 22 47 52 41 44 22 20 3A 20 89 20 |0..; "GRAD" : . |
00000880: 31 34 38 30 00 B8 10 B4 05 8B 20 31 AA 57 31 20 |1480...... 1.W1 |
00000890: B3 20 31 45 AB 39 20 A7 20 99 20 22 11 3C 28 41 |. 1E.9 . . ".<(A|
000008A0: 2C 42 29 20 3D 20 31 38 30 20 47 52 41 44 22 20 |,B) = 180 GRAD" |
000008B0: 3A 20 89 20 31 34 38 30 00 EE 10 BE 05 99 20 22 |: . 1480...... "|
000008C0: 11 3C 28 41 2C 42 29 20 3D 22 3B 20 31 38 30 AA |.<(A,B) ="; 180.|
000008D0: C1 28 BA 28 31 AB 57 31 AC 57 31 29 AD 57 31 29 |.(.(1.W1.W1).W1)|
000008E0: AC 31 38 30 AD FF 3B 20 22 47 52 41 44 22 00 29 |.180..; "GRAD".)|
000008F0: 11 C8 05 8B 20 57 32 20 B2 20 30 20 AF 20 42 42 |.... W2 . 0 . BB|
00000900: AC 42 43 20 B3 B1 20 30 20 A7 20 99 20 22 11 3C |.BC .. 0 . . ".<|
00000910: 28 42 2C 43 29 20 3D 20 39 30 20 47 52 41 44 22 |(B,C) = 90 GRAD"|
00000920: 20 3A 20 89 20 31 35 35 30 00 3D 11 D2 05 8B 20 | : . 1550.=.... |
00000930: 57 32 20 B2 20 30 20 A7 20 31 35 35 30 00 51 11 |W2 . 0 . 1550.Q.|
00000940: DC 05 8B 20 57 32 20 B3 20 30 20 A7 20 31 35 33 |... W2 . 0 . 153|
00000950: 30 00 83 11 E6 05 8B 20 31 AB 57 32 20 B3 20 31 |0...... 1.W2 . 1|
00000960: 45 AB 39 20 A7 20 99 20 22 11 3C 28 42 2C 43 29 |E.9 . . ".<(B,C)|
00000970: 20 3D 20 30 20 47 52 41 44 22 20 3A 20 89 20 31 | = 0 GRAD" : . 1|
00000980: 35 35 30 00 BE 11 F0 05 99 20 22 11 3C 28 42 2C |550...... ".<(B,|
00000990: 43 29 20 3D 22 3B 20 C1 28 BA 28 31 AB 57 32 AC |C) ="; .(.(1.W2.|
000009A0: 57 32 29 AD 57 32 29 AC 31 38 30 AD FF 3B 20 22 |W2).W2).180..; "|
000009B0: 47 52 41 44 22 20 3A 20 89 20 31 35 35 30 00 F2 |GRAD" : . 1550..|
000009C0: 11 FA 05 8B 20 31 AA 57 32 20 B3 20 31 45 AB 39 |.... 1.W2 . 1E.9|
000009D0: 20 A7 20 99 20 22 11 3C 28 42 2C 43 29 20 3D 20 | . . ".<(B,C) = |
000009E0: 31 38 30 20 47 52 41 44 22 20 3A 20 89 20 31 35 |180 GRAD" : . 15|
000009F0: 35 30 00 28 12 04 06 99 20 22 11 3C 28 42 2C 43 |50.(.... ".<(B,C|
00000A00: 29 20 3D 22 3B 20 31 38 30 AA C1 28 BA 28 31 AB |) ="; 180..(.(1.|
00000A10: 57 32 AC 57 32 29 AD 57 32 29 AC 31 38 30 AD FF |W2.W2).W2).180..|
00000A20: 3B 20 22 47 52 41 44 22 00 63 12 0E 06 8B 20 57 |; "GRAD".c.... W|
00000A30: 33 20 B2 20 30 20 AF 20 42 41 AC 42 43 20 B3 B1 |3 . 0 . BA.BC ..|
00000A40: 20 30 20 A7 20 99 20 22 11 3C 28 41 2C 43 29 20 | 0 . . ".<(A,C) |
00000A50: 3D 20 39 30 20 47 52 41 44 22 20 3A 20 89 20 31 |= 90 GRAD" : . 1|
00000A60: 36 32 30 00 77 12 18 06 8B 20 57 33 20 B2 20 30 |620.w.... W3 . 0|
00000A70: 20 A7 20 31 36 32 30 00 8B 12 22 06 8B 20 57 33 | . 1620...".. W3|
00000A80: 20 B3 20 30 20 A7 20 31 36 30 30 00 BD 12 2C 06 | . 0 . 1600...,.|
00000A90: 8B 20 31 AB 57 33 20 B3 20 31 45 AB 39 20 A7 20 |. 1.W3 . 1E.9 . |
00000AA0: 99 20 22 11 3C 28 41 2C 43 29 20 3D 20 30 20 47 |. ".<(A,C) = 0 G|
00000AB0: 52 41 44 22 20 3A 20 89 20 31 36 32 30 00 F8 12 |RAD" : . 1620...|
00000AC0: 36 06 99 20 22 11 3C 28 41 2C 43 29 20 3D 22 3B |6.. ".<(A,C) =";|
00000AD0: 20 C1 28 BA 28 31 AB 57 33 AC 57 33 29 AD 57 33 | .(.(1.W3.W3).W3|
00000AE0: 29 AC 31 38 30 AD FF 3B 20 22 47 52 41 44 22 20 |).180..; "GRAD" |
00000AF0: 3A 20 89 20 31 36 32 30 00 2C 13 40 06 8B 20 31 |: . 1620.,.@.. 1|
00000B00: AA 57 33 20 B3 20 31 45 AB 39 20 A7 20 99 20 22 |.W3 . 1E.9 . . "|
00000B10: 11 3C 28 41 2C 43 29 20 3D 20 31 38 30 20 47 52 |.<(A,C) = 180 GR|
00000B20: 41 44 22 20 3A 20 89 20 31 36 32 30 00 62 13 4A |AD" : . 1620.b.J|
00000B30: 06 99 20 22 11 3C 28 41 2C 43 29 20 3D 22 3B 20 |.. ".<(A,C) ="; |
00000B40: 31 38 30 AA C1 28 BA 28 31 AB 57 33 AC 57 33 29 |180..(.(1.W3.W3)|
00000B50: AD 57 33 29 AC 31 38 30 AD FF 3B 20 22 47 52 41 |.W3).180..; "GRA|
00000B60: 44 22 00 80 13 54 06 A1 20 52 24 20 3A 20 8B 20 |D"...T.. R$ : . |
00000B70: 52 24 20 B3 B1 20 22 43 22 20 A7 20 31 36 32 30 |R$ .. "C" . 1620|
00000B80: 00 8B 13 5E 06 8D 20 31 38 33 30 00 C0 13 68 06 |...^.. 1830...h.|
00000B90: 99 20 22 11 41 2B 42 20 3D 20 28 22 3B 20 41 58 |. ".A+B = ("; AX|
00000BA0: AA 42 58 3B 20 22 2C 22 3B 20 41 59 AA 42 59 3B |.BX; ","; AY.BY;|
00000BB0: 20 22 2C 22 3B 20 41 5A AA 42 5A 3B 20 22 29 22 | ","; AZ.BZ; ")"|
00000BC0: 00 F5 13 72 06 99 20 22 11 42 2B 43 20 3D 20 28 |...r.. ".B+C = (|
00000BD0: 22 3B 20 42 58 AA 43 58 3B 20 22 2C 22 3B 20 42 |"; BX.CX; ","; B|
00000BE0: 59 AA 43 59 3B 20 22 2C 22 3B 20 42 5A AA 43 5A |Y.CY; ","; BZ.CZ|
00000BF0: 3B 20 22 29 22 00 2A 14 7C 06 99 20 22 11 41 2B |; ")".*.|.. ".A+|
00000C00: 43 20 3D 20 28 22 3B 20 41 58 AA 43 58 3B 20 22 |C = ("; AX.CX; "|
00000C10: 2C 22 3B 20 41 59 AA 43 59 3B 20 22 2C 22 3B 20 |,"; AY.CY; ","; |
00000C20: 41 5A AA 43 5A 3B 20 22 29 22 00 55 14 86 06 99 |AZ.CZ; ")".U....|
00000C30: 20 22 11 41 2B 42 2B 43 20 3D 20 28 22 3B 20 58 | ".A+B+C = ("; X|
00000C40: 3B 20 22 2C 22 3B 20 59 3B 20 22 2C 22 3B 20 5A |; ","; Y; ","; Z|
00000C50: 3B 20 22 29 22 00 78 14 90 06 99 20 22 11 D9 41 |; ")".x.... "..A|
00000C60: 2B 42 2B 43 D4 20 3D 22 3B 20 BA 28 58 AC 58 AA |+B+C. ="; .(X.X.|
00000C70: 59 AC 59 AA 5A AC 5A 29 00 8C 14 9A 06 99 20 22 |Y.Y.Z.Z)...... "|
00000C80: 11 28 41 42 29 20 3D 22 3B 20 53 31 00 A0 14 A4 |.(AB) ="; S1....|
00000C90: 06 99 20 22 11 28 42 43 29 20 3D 22 3B 20 53 32 |.. ".(BC) ="; S2|
00000CA0: 00 B4 14 AE 06 99 20 22 11 28 41 43 29 20 3D 22 |...... ".(AC) ="|
00000CB0: 3B 20 53 33 00 D2 14 B8 06 A1 20 52 24 20 3A 20 |; S3...... R$ : |
00000CC0: 8B 20 52 24 20 B3 B1 20 22 43 22 20 A7 20 31 37 |. R$ .. "C" . 17|
00000CD0: 32 30 00 DD 14 C2 06 8D 20 31 38 33 30 00 25 15 |20...... 1830.%.|
00000CE0: CC 06 99 20 22 11 5B 41 42 5D 20 3D 20 28 22 3B |... ".[AB] = (";|
00000CF0: 20 41 59 AC 42 5A AB 41 5A AC 42 59 3B 20 22 2C | AY.BZ.AZ.BY; ",|
00000D00: 22 3B 20 41 5A AC 42 58 AB 41 58 AC 42 5A 3B 20 |"; AZ.BX.AX.BZ; |
00000D10: 22 2C 22 3B 20 41 58 AC 42 59 AB 41 59 AC 42 58 |","; AX.BY.AY.BX|
00000D20: 3B 20 22 29 22 00 6D 15 D6 06 99 20 22 11 5B 42 |; ")".m.... ".[B|
00000D30: 43 5D 20 3D 20 28 22 3B 20 42 59 AC 43 5A AB 42 |C] = ("; BY.CZ.B|
00000D40: 5A AC 43 59 3B 20 22 2C 22 3B 20 42 5A AC 43 58 |Z.CY; ","; BZ.CX|
00000D50: AB 42 58 AC 43 5A 3B 20 22 2C 22 3B 20 42 58 AC |.BX.CZ; ","; BX.|
00000D60: 43 59 AB 42 59 AC 43 58 3B 20 22 29 22 00 B5 15 |CY.BY.CX; ")"...|
00000D70: E0 06 99 20 22 11 5B 41 43 5D 20 3D 20 28 22 3B |... ".[AC] = (";|
00000D80: 20 41 59 AC 43 5A AB 41 5A AC 43 59 3B 20 22 2C | AY.CZ.AZ.CY; ",|
00000D90: 22 3B 20 41 5A AC 43 58 AB 41 58 AC 43 5A 3B 20 |"; AZ.CX.AX.CZ; |
00000DA0: 22 2C 22 3B 20 41 58 AC 43 59 AB 41 59 AC 43 58 |","; AX.CY.AY.CX|
00000DB0: 3B 20 22 29 22 00 FC 15 EA 06 99 20 22 11 28 5B |; ")"...... ".([|
00000DC0: 41 42 5D 43 29 20 3D 22 3B 20 28 41 59 AC 42 5A |AB]C) ="; (AY.BZ|
00000DD0: AB 41 5A AC 42 59 29 AC 43 58 AA 28 41 5A AC 42 |.AZ.BY).CX.(AZ.B|
00000DE0: 58 AB 41 58 AC 42 5A 29 AC 43 59 AA 28 41 58 AC |X.AX.BZ).CY.(AX.|
00000DF0: 42 59 AB 41 59 AC 42 58 29 AC 43 5A 00 14 16 F4 |BY.AY.BX).CZ....|
00000E00: 06 56 24 20 B2 20 22 11 5B 41 5B 42 43 5D 5D 20 |.V$ . ".[A[BC]] |
00000E10: 3D 20 28 22 00 53 16 FE 06 99 20 56 24 3B 20 42 |= (".S.... V$; B|
00000E20: 58 AC 53 33 AB 43 58 AC 53 31 3B 20 22 2C 22 3B |X.S3.CX.S1; ",";|
00000E30: 20 42 59 AC 53 33 AB 43 59 AC 53 31 3B 20 22 2C | BY.S3.CY.S1; ",|
00000E40: 22 3B 20 42 5A AC 53 33 AB 43 5A AC 53 31 3B 20 |"; BZ.S3.CZ.S1; |
00000E50: 22 29 22 00 75 16 08 07 99 20 22 11 11 11 11 11 |")".u.... ".....|
00000E60: 4E 45 55 53 54 41 52 54 3A 20 43 20 44 52 55 45 |NEUSTART: C DRUE|
00000E70: 43 4B 45 4E 22 00 93 16 12 07 A1 20 52 24 20 3A |CKEN"...... R$ :|
00000E80: 20 8B 20 52 24 20 B3 B1 20 22 43 22 20 A7 20 31 | . R$ .. "C" . 1|
00000E90: 38 31 30 00 9E 16 1C 07 89 20 31 30 38 30 00 A8 |810...... 1080..|
00000EA0: 16 26 07 99 20 22 93 22 00 D1 16 30 07 99 20 22 |.&.. "."...0.. "|
00000EB0: 41 20 3D 20 28 22 3B 20 41 58 3B 20 22 2C 22 3B |A = ("; AX; ",";|
00000EC0: 20 41 59 3B 20 22 2C 22 3B 20 41 5A 3B 20 22 29 | AY; ","; AZ; ")|
00000ED0: 22 00 FB 16 3A 07 99 20 22 11 42 20 3D 20 28 22 |"...:.. ".B = ("|
00000EE0: 3B 20 42 58 3B 20 22 2C 22 3B 20 42 59 3B 20 22 |; BX; ","; BY; "|
00000EF0: 2C 22 3B 20 42 5A 3B 20 22 29 22 00 25 17 44 07 |,"; BZ; ")".%.D.|
00000F00: 99 20 22 11 43 20 3D 20 28 22 3B 20 43 58 3B 20 |. ".C = ("; CX; |
00000F10: 22 2C 22 3B 20 43 59 3B 20 22 2C 22 3B 20 43 5A |","; CY; ","; CZ|
00000F20: 3B 20 22 29 22 00 2B 17 4E 07 99 00 31 17 58 07 |; ")".+.N...1.X.|
00000F30: 8E 00 00 00 20 |.... |
....D.. VEKTORRECHNUNG.A.N.. VEKTOREN IN
KARTESISCHEN KOORDINATEN.^.X.. AX: X-KO
ORDINATE VON A.Y.... (BX,BY,BZ): VEKTOR
B...... (AB): SKALARPRODUKT A MAL B.....
. [BC]: VEKTORPRODUKT B MAL C... .. <(A,
C): WINKEL ZWISCHEN A UND C...... BEI PR
OGRAMMSTOP: C DRUECKEN...H.. ".".M.R.. "
WERDEN ERKLAERUNGEN ZUM PROGRAMM
GEWUENSCHT ?".S.....T.... "JA: TASTE
J DRUECKEN"...... "NEIN: TASTE N DRUE
CKEN"...... R$ : . R$ .. "J" . R$ .. "N"
. 250.T.... R$ . "N" . 1080...,.. "."..
.6.. "DAS PROGRAMM BERECHNET AUS DREI IN
KAR-".>.@.. "TESISCHEN KOORDINATEN EING
EGEBENEN VEK-"...J.. "TOREN SUMMEN, WINK
EL, BETRAEGE UND VER- SCHIEDENE PRODUKTE
"...T.. : ..O.^.. "AM ANFANG WERDEN DIE
KOORDINATEN DER VEKTOREN EINGEGEBEN".
Y.H.. : ....R.. "DIESE EINGABEN MUESSEN
MIT 'RETURN' ABGESCHLOSSEN WERDEN".(
.|.. : ..I.... "BEI PROGRAMMSTOP: ZUR FO
RTSETZUNG DIE TASTE C DRUECKEN"......
R$ : . R$ .. "C" . 400...... "."...... "
BEISPIEL FUER DIE DATENEINGABE:".I.... "
..AX = 2".Z.... "AY = -1.5...B.. "AZ = 3
"...L.. ".BX = -1"...V.. "BY = -2"......
"BZ = 3".+.... ".CX = 2.5".:.... "CY =
0".L.... "CZ = -1.5"...... ".....SOLLEN
DIE ERKLAERUNGEN WIEDERHOLT WERDEN
?"...... ".TASTE J BZW. N DRUECKEN".T...
. R$ : . R$ .. "J" . R$ .. "N" . 540...&
.. R$ . "J" . 300...8.. "."...B.. "KOORD
INATEN VON A.". .L.. "AX = "; AX.2.V.. "
AY = "; AY.D.`.. "AZ = "; AZ.`.J.. ".KOO
RDINATEN VON B.".R.T.. "BX = "; BX...~..
"BY = "; BY...... "BZ = "; BZ...... ".K
OORDINATEN VON C.".D.... "CX = "; CX.V..
.. "CY = "; CY...... "CZ = "; CZ.....W1
. 0 : W2 . 0 : W3 . 0.#.D.BA . .(AX.AX.A
Y.AY.AZ.AZ).A.N.BB . .(BX.BX.BY.BY.BZ.BZ
)._.X.BC . .(CX.CX.CY.CY.CZ.CZ).Z...S1 .
AX.BX.AY.BY.AZ.BZ.....S2 . BX.CX.BY.CY.
BZ.CZ.....S3 . AX.CX.AY.CY.AZ.CZ.M.... B
A . 0 . BB . 0 . 1300.....W1 . S1.BA.BB.
..... BB . 0 . BC . 0 . 1320.....W2 . S2
.BB.BC.+.(.. BA . 0 . BC . 0 . 1340.=.2.
W3 . S3.BA.BC.N.<.X . AX.BX.CX._.F.Y . A
Y.BY.CY.P.P.Z . AZ.BZ.CZ.{.Z.. 1830...D.
. ".YAT ="; BA...N.. ".YBT ="; BB...X..
".YCT ="; BC...... W1 . 0 . BA.BB .. 0 .
. ".<(A,B) = 90 GRAD" : . 1480...... W1
. 0 . 1480...... W1 . 0 . 1460.I. .. 1.
W1 . 1E.9 . . ".<(A,B) = 0 GRAD" : . 148
0...... ".<(A,B) ="; A(.(1.W1.W1).W1).18
0..; "GRAD" : . 1480...... 1.W1 . 1E.9 .
. ".<(A,B) = 180 GRAD" : . 1480...... "
.<(A,B) ="; 180.A(.(1.W1.W1).W1).180..;
"GRAD".).H.. W2 . 0 . BB.BC .. 0 . . ".<
(B,C) = 90 GRAD" : . 1550.=.R.. W2 . 0 .
1550.Q.... W2 . 0 . 1530...... 1.W2 . 1
E.9 . . ".<(B,C) = 0 GRAD" : . 1550.....
. ".<(B,C) ="; A(.(1.W2.W2).W2).180..; "
GRAD" : . 1550...... 1.W2 . 1E.9 . . ".<
(B,C) = 180 GRAD" : . 1550.(.... ".<(B,C
) ="; 180.A(.(1.W2.W2).W2).180..; "GRAD"
.C.... W3 . 0 . BA.BC .. 0 . . ".<(A,C)
= 90 GRAD" : . 1620.W.... W3 . 0 . 1620.
..".. W3 . 0 . 1600...,.. 1.W3 . 1E.9 .
. ".<(A,C) = 0 GRAD" : . 1620...6.. ".<(
A,C) ="; A(.(1.W3.W3).W3).180..; "GRAD"
: . 1620.,.@.. 1.W3 . 1E.9 . . ".<(A,C)
= 180 GRAD" : . 1620.B.J.. ".<(A,C) =";
180.A(.(1.W3.W3).W3).180..; "GRAD"...T..
R$ : . R$ .. "C" . 1620...^.. 1830...H.
. ".A+B = ("; AX.BX; ","; AY.BY; ","; AZ
.BZ; ")"...R.. ".B+C = ("; BX.CX; ","; B
Y.CY; ","; BZ.CZ; ")".*.|.. ".A+C = (";
AX.CX; ","; AY.CY; ","; AZ.CZ; ")".U....
".A+B+C = ("; X; ","; Y; ","; Z; ")".X.
... ".YA+B+CT ="; .(X.X.Y.Y.Z.Z)...... "
.(AB) ="; S1. .... ".(BC) ="; S2...... "
.(AC) ="; S3.R.... R$ : . R$ .. "C" . 17
20...B.. 1830.%.L.. ".[AB] = ("; AY.BZ.A
Z.BY; ","; AZ.BX.AX.BZ; ","; AX.BY.AY.BX
; ")".M.V.. ".[BC] = ("; BY.CZ.BZ.CY; ",
"; BZ.CX.BX.CZ; ","; BX.CY.BY.CX; ")"...
... ".[AC] = ("; AY.CZ.AZ.CY; ","; AZ.CX
.AX.CZ; ","; AX.CY.AY.CX; ")"...... ".([
AB]C) ="; (AY.BZ.AZ.BY).CX.(AZ.BX.AX.BZ)
.CY.(AX.BY.AY.BX).CZ.....V$ . ".[A[BC]]
= (".S.... V$; BX.S3.CX.S1; ","; BY.S3.C
Y.S1; ","; BZ.S3.CZ.S1; ")".U.... ".....
NEUSTART: C DRUECKEN"...... R$ : . R$ ..
"C" . 1810...... 1080...&.. ".".Q.0.. "
A = ("; AX; ","; AY; ","; AZ; ")"...:..
".B = ("; BX; ","; BY; ","; BZ; ")".%.D.
. ".C = ("; CX; ","; CY; ","; CZ; ")".+.
N...1.X.....
> CLICK IMAGE PREVIEW FOR FULL MODAL