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

SHA.MATMULT

FILE INFORMATION

FILENAME(S): SHA.MATMULT

FILE TYPE(S): USR

FILE SIZE: 766b

FIRST SEEN: 2025-11-02 22:11:25

APPEARS ON: 1 disk(s)

FILE HASH

d4e04196bb7b29710c2261f1e7e3450e4eb2f38dbe1b2dd2199a7fb5154ee9eb

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
046A SHA.MATMULT USR Treasure Chest - ToGuMi 15 8 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: FC 02 70 00 00 00 00 00  00 00 5F 00 5A 05 22 4D  |..p......._.Z."M|
00000010: 22 C9 0D 00 64 20 CB 41  59 28 31 30 2C 31 30 29  |"...d .AY(10,10)|
00000020: 3A CB 42 59 28 31 30 2C  31 30 29 3A CB 43 28 31  |:.BY(10,10):.C(1|
00000030: 30 2C 31 30 29 0D 00 6E  05 C6 38 30 30 0D 00 C8  |0,10)..n..800...|
00000040: 1C D7 20 23 23 23 20 4B  20 20 55 4E 44 20 4C 20  |.. ### K  UND L |
00000050: 45 49 4E 4C 45 53 45 4E  20 23 23 23 0D 00 D2 12  |EINLESEN ###....|
00000060: DD 22 4D 41 54 52 49 5A  45 4E 20 4D 55 4C 54 49  |."MATRIZEN MULTI|
00000070: 22 0D 00 E6 0F DF 22 5A  45 49 4C 45 4E 20 41 3D  |"....."ZEILEN A=|
00000080: 22 3B 4B 0D 00 F0 10 DF  22 53 50 41 4C 54 45 4E  |";K....."SPALTEN|
00000090: 20 41 3D 22 3B 4C 0D 00  FA 02 E3 0D 01 2C 15 D7  | A=";L.......,..|
000000A0: 20 23 23 23 20 50 20 45  49 4E 4C 45 53 45 4E 20  | ### P EINLESEN |
000000B0: 23 23 23 0D 01 36 0F DD  22 5A 45 49 4C 45 4E 20  |###..6.."ZEILEN |
000000C0: 42 3D 22 3B 4C 0D 01 40  10 DF 22 53 50 41 4C 54  |B=";L..@.."SPALT|
000000D0: 45 4E 20 42 3D 22 3B 50  0D 01 4A 02 E3 0D 01 90  |EN B=";P..J.....|
000000E0: 22 D7 20 23 23 23 20 45  4C 45 4D 45 4E 54 45 20  |". ### ELEMENTE |
000000F0: 56 4F 4E 20 41 20 45 49  4E 4C 45 53 45 4E 20 23  |VON A EINLESEN #|
00000100: 23 23 0D 01 AE 07 D5 5A  3D 31 D0 4B 0D 01 B8 07  |##.....Z=1.K....|
00000110: D5 53 3D 31 D0 4C 0D 01  C2 1D DD 22 41 28 22 3B  |.S=1.L....."A(";|
00000120: 5A 3B 22 2C 22 3B 53 3B  22 29 3D 20 22 3A DF 41  |Z;",";S;")= ":.A|
00000130: 59 28 5A 2C 53 29 0D 01  CC 03 D9 53 0D 01 D6 03  |Y(Z,S).....S....|
00000140: D9 5A 0D 01 E0 02 E3 0D  01 F4 22 D7 20 23 23 23  |.Z........". ###|
00000150: 20 45 4C 45 4D 45 4E 54  45 20 56 4F 4E 20 42 20  | ELEMENTE VON B |
00000160: 45 49 4E 4C 45 53 45 4E  20 23 23 23 0D 02 12 07  |EINLESEN ###....|
00000170: D5 5A 3D 31 D0 4C 0D 02  1C 07 D5 53 3D 31 D0 50  |.Z=1.L.....S=1.P|
00000180: 0D 02 26 1D DD 22 42 28  22 3B 5A 3B 22 2C 22 3B  |..&.."B(";Z;",";|
00000190: 53 3B 22 29 3D 20 22 3A  DF 42 59 28 5A 2C 53 29  |S;")= ":.BY(Z,S)|
000001A0: 0D 02 30 03 D9 53 0D 02  3A 03 D9 5A 0D 02 44 02  |..0..S..:..Z..D.|
000001B0: E3 0D 02 58 23 D7 20 23  23 23 20 45 4C 45 4D 45  |...X#. ### ELEME|
000001C0: 4E 54 45 20 56 4F 4E 20  5A 20 42 45 52 45 43 48  |NTE VON Z BERECH|
000001D0: 4E 45 4E 20 23 23 23 0D  02 62 08 D5 5A 3D 31 D0  |NEN ###..b..Z=1.|
000001E0: 41 5A 0D 02 6C 07 D5 44  3D 31 D0 50 0D 02 76 07  |AZ..l..D=1.P..v.|
000001F0: D5 45 3D 31 D0 4C 0D 02  80 1F D6 43 28 5A 2C 44  |.E=1.L.....C(Z,D|
00000200: 29 3D 43 28 5A 2C 44 29  2B 41 59 28 5A 2C 45 29  |)=C(Z,D)+AY(Z,E)|
00000210: 2A 42 59 28 45 2C 44 29  0D 02 8A 03 D9 45 0D 02  |*BY(E,D).....E..|
00000220: 94 03 D9 44 0D 02 9E 03  D9 5A 0D 02 A8 02 E3 0D  |...D.....Z......|
00000230: 02 BC 22 D7 20 23 23 23  20 45 4C 45 4D 45 4E 54  |..". ### ELEMENT|
00000240: 45 20 56 4F 4E 20 43 20  41 55 53 47 45 42 45 4E  |E VON C AUSGEBEN|
00000250: 20 23 23 23 0D 02 C6 12  DD 22 20 43 3D 41 2A 42  | ###....." C=A*B|
00000260: 20 4C 41 55 54 45 54 3A  22 0D 02 DA 07 D5 5A 3D  | LAUTET:".....Z=|
00000270: 31 D0 4B 0D 02 E4 07 D5  53 3D 31 D0 50 0D 02 EE  |1.K.....S=1.P...|
00000280: 1A DE 22 43 28 22 3B 5A  3B 22 2C 22 3B 53 3B 22  |.."C(";Z;",";S;"|
00000290: 29 3D 22 3B 43 28 5A 2C  53 29 0D 02 F8 03 D9 53  |)=";C(Z,S).....S|
000002A0: 0D 03 0C 03 D9 5A 0D 03  16 02 E3 0D 03 20 18 D7  |.....Z....... ..|
000002B0: 20 23 23 23 20 48 41 55  50 54 50 52 4F 47 52 41  | ### HAUPTPROGRA|
000002C0: 4D 4D 20 23 23 23 0D 03  2A 05 E0 32 30 30 0D 03  |MM ###..*..200..|
000002D0: 34 05 E0 33 30 30 0D 03  3E 05 E0 34 30 30 0D 03  |4..300..>..400..|
000002E0: 48 05 E0 35 30 30 0D 03  52 05 E0 36 30 30 0D 03  |H..500..R..600..|
000002F0: 5C 05 E0 37 30 30 0D 03  66 02 D8 0D FF FF        |\..700..f.....  |
..P......._.Z."M"I..D KAY(10,10):KBY(10,
10):KC(10,10)..N.F800..H.W ### K  UND L 
EINLESEN ###..R.."MATRIZEN MULTI"....."Z
EILEN A=";K....."SPALTEN A=";L.......,.W
 ### P EINLESEN ###..6.."ZEILEN B=";L..@
.."SPALTEN B=";P..J....."W ### ELEMENTE 
VON A EINLESEN ###....UZ=1PK....US=1PL..
B.."A(";Z;",";S;")= ":.AY(Z,S)..L.YS..V.
YZ........"W ### ELEMENTE VON B EINLESEN
 ###....UZ=1PL....US=1PP..&.."B(";Z;",";
S;")= ":.BY(Z,S)..0.YS..:.YZ..D....X#W #
## ELEMENTE VON Z BERECHNEN ###..B.UZ=1P
AZ..L.UD=1PP..V.UE=1PL....VC(Z,D)=C(Z,D)
+AY(Z,E)*BY(E,D)....YE....YD....YZ......
.."W ### ELEMENTE VON C AUSGEBEN ###..F.
." C=A*B LAUTET:"..Z.UZ=1PK....US=1PP...
.."C(";Z;",";S;")=";C(Z,S)....YS....YZ..
..... .W ### HAUPTPROGRAMM ###..*..200..
4..300..>..400..H..500..R..600..\..700..
F.X...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL