home *** CD-ROM | disk | FTP | other *** search
Unknown | 2019-04-13 | 2.0 KB |
open in:
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence | Program | Detection | Match Type | Support
|
---|
66%
| dexvert
| GW-BASIC (document/gwBasic)
| ext
| Supported |
66%
| dexvert
| GFA-BASIC Atari (other/gfaBASICAtari)
| ext
| Supported |
1%
| dexvert
| Amiga BASIC Protected File (other/amigaBASICProtectedFile)
| ext
| Unsupported |
1%
| dexvert
| BAS VBDOS Pro 1.0 Source (other/basVBDOSPro10Source)
| ext
| Unsupported |
1%
| dexvert
| Visual Basic Tokenized Source (other/visualBasicTokenizedSource)
| ext
| Unsupported |
1%
| dexvert
| ZBASIC (other/zbasic)
| ext
| Unsupported |
100%
| file
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 35 20 50 4f 4b 45 20 35 | 33 32 38 30 2c 30 3a 50 |5 POKE 5|3280,0:P|
|00000010| 4f 4b 45 20 35 33 32 38 | 31 2c 30 3a 50 52 49 4e |OKE 5328|1,0:PRIN|
|00000020| 54 22 05 22 0a 31 30 20 | 50 52 49 4e 54 22 93 22 |T".".10 |PRINT"."|
|00000030| 0a 31 35 20 50 52 49 4e | 54 22 20 20 20 20 20 20 |.15 PRIN|T" |
|00000040| 2a 2a 2a 2a 2a 4d 41 54 | 52 49 58 20 4d 55 4c 54 |*****MAT|RIX MULT|
|00000050| 49 50 4c 49 45 52 2a 2a | 2a 2a 2a 20 20 22 0a 31 |IPLIER**|*** ".1|
|00000060| 36 20 50 52 49 4e 54 3a | 50 52 49 4e 54 3a 50 52 |6 PRINT:|PRINT:PR|
|00000070| 49 4e 54 22 20 54 48 49 | 53 20 50 52 4f 47 52 41 |INT" THI|S PROGRA|
|00000080| 4d 20 4d 55 4c 54 49 50 | 4c 49 45 53 20 54 57 4f |M MULTIP|LIES TWO|
|00000090| 20 4d 41 54 52 49 43 45 | 53 22 3a 50 52 49 4e 54 | MATRICE|S":PRINT|
|000000a0| 0a 31 37 20 50 52 49 4e | 54 22 54 4f 47 45 54 48 |.17 PRIN|T"TOGETH|
|000000b0| 45 52 20 53 55 43 48 20 | 54 48 41 54 20 41 28 4d |ER SUCH |THAT A(M|
|000000c0| 4e 29 2a 42 28 4e 50 29 | 3d 43 28 4d 50 29 2e 22 |N)*B(NP)|=C(MP)."|
|000000d0| 3a 50 52 49 4e 54 3a 50 | 52 49 4e 54 0a 34 35 20 |:PRINT:P|RINT.45 |
|000000e0| 47 4f 53 55 42 20 39 30 | 30 30 0a 34 36 20 50 52 |GOSUB 90|00.46 PR|
|000000f0| 49 4e 54 22 20 45 4e 54 | 45 52 20 44 45 47 52 45 |INT" ENT|ER DEGRE|
|00000100| 45 20 4d 3a 22 3a 49 4e | 50 55 54 20 4d 25 0a 34 |E M:":IN|PUT M%.4|
|00000110| 38 20 50 52 49 4e 54 22 | 20 45 4e 54 45 52 20 44 |8 PRINT"| ENTER D|
|00000120| 45 47 52 45 45 20 4e 3a | 22 3a 49 4e 50 55 54 20 |EGREE N:|":INPUT |
|00000130| 4e 25 0a 35 30 20 50 52 | 49 4e 54 22 20 45 4e 54 |N%.50 PR|INT" ENT|
|00000140| 45 52 20 44 45 47 52 45 | 45 20 50 3a 22 3a 49 4e |ER DEGRE|E P:":IN|
|00000150| 50 55 54 20 50 25 0a 35 | 32 20 44 49 4d 20 41 28 |PUT P%.5|2 DIM A(|
|00000160| 4d 25 2c 4e 25 29 2c 42 | 28 4e 25 2c 50 25 29 2c |M%,N%),B|(N%,P%),|
|00000170| 43 28 4d 25 2c 50 25 29 | 0a 35 35 20 50 52 49 4e |C(M%,P%)|.55 PRIN|
|00000180| 54 3a 50 52 49 4e 54 22 | 20 20 2a 2a 2a 2a 2a 28 |T:PRINT"| *****(|
|00000190| 48 49 54 20 41 4e 59 20 | 4b 45 59 20 54 4f 20 43 |HIT ANY |KEY TO C|
|000001a0| 4f 4e 54 49 4e 55 45 29 | 2a 2a 2a 2a 20 20 20 22 |ONTINUE)|**** "|
|000001b0| 0a 36 30 20 47 45 54 20 | 41 24 3a 49 46 20 41 24 |.60 GET |A$:IF A$|
|000001c0| 3d 22 22 20 54 48 45 4e | 20 36 30 0a 36 35 20 50 |="" THEN| 60.65 P|
|000001d0| 52 49 4e 54 22 93 22 3a | 47 4f 53 55 42 20 39 30 |RINT".":|GOSUB 90|
|000001e0| 30 30 0a 37 30 20 46 4f | 52 20 44 3d 31 54 4f 20 |00.70 FO|R D=1TO |
|000001f0| 4e 25 0a 37 35 20 46 4f | 52 20 43 3d 31 20 54 4f |N%.75 FO|R C=1 TO|
|00000200| 20 4d 25 0a 38 30 20 50 | 52 49 4e 54 22 20 45 4e | M%.80 P|RINT" EN|
|00000210| 54 45 52 20 41 28 22 43 | 22 22 44 22 29 3a 22 3a |TER A("C|""D"):":|
|00000220| 49 4e 50 55 54 20 41 28 | 43 2c 44 29 0a 38 35 20 |INPUT A(|C,D).85 |
|00000230| 4e 45 58 54 20 43 0a 39 | 30 20 4e 45 58 54 20 44 |NEXT C.9|0 NEXT D|
|00000240| 0a 39 32 20 50 52 49 4e | 54 3a 50 52 49 4e 54 22 |.92 PRIN|T:PRINT"|
|00000250| 20 20 2a 2a 2a 2a 2a 28 | 48 49 54 20 41 4e 59 20 | *****(|HIT ANY |
|00000260| 4b 45 59 20 54 4f 20 43 | 4f 4e 54 49 4e 55 45 29 |KEY TO C|ONTINUE)|
|00000270| 2a 2a 2a 2a 20 20 20 22 | 0a 39 33 20 47 45 54 20 |**** "|.93 GET |
|00000280| 53 24 3a 49 46 53 24 3d | 22 22 20 54 48 45 4e 20 |S$:IFS$=|"" THEN |
|00000290| 39 33 0a 39 34 20 50 52 | 49 4e 54 22 93 22 3a 47 |93.94 PR|INT".":G|
|000002a0| 4f 53 55 42 20 39 30 30 | 30 0a 39 35 20 46 4f 52 |OSUB 900|0.95 FOR|
|000002b0| 20 44 3d 31 54 4f 20 50 | 25 0a 31 30 30 20 46 4f | D=1TO P|%.100 FO|
|000002c0| 52 20 43 3d 31 54 4f 20 | 4e 25 0a 31 30 35 20 50 |R C=1TO |N%.105 P|
|000002d0| 52 49 4e 54 22 20 45 4e | 54 45 52 20 42 28 22 43 |RINT" EN|TER B("C|
|000002e0| 22 22 44 22 29 3a 22 3a | 49 4e 50 55 54 20 42 28 |""D"):":|INPUT B(|
|000002f0| 43 2c 44 29 0a 31 31 30 | 20 4e 45 58 54 20 43 0a |C,D).110| NEXT C.|
|00000300| 31 31 35 20 4e 45 58 54 | 20 44 0a 31 35 30 20 46 |115 NEXT| D.150 F|
|00000310| 4f 52 20 49 3d 31 20 54 | 4f 20 4d 25 0a 31 36 30 |OR I=1 T|O M%.160|
|00000320| 20 46 4f 52 20 4a 3d 31 | 20 54 4f 20 50 25 0a 31 | FOR J=1| TO P%.1|
|00000330| 36 35 20 53 55 4d 3d 30 | 2e 30 0a 31 37 30 20 46 |65 SUM=0|.0.170 F|
|00000340| 4f 52 20 4b 3d 31 20 54 | 4f 20 4e 25 0a 31 37 35 |OR K=1 T|O N%.175|
|00000350| 20 53 55 4d 3d 53 55 4d | 20 2b 20 28 41 28 49 2c | SUM=SUM| + (A(I,|
|00000360| 4b 29 2a 42 28 4b 2c 4a | 29 29 0a 31 38 30 20 43 |K)*B(K,J|)).180 C|
|00000370| 28 49 2c 4a 29 3d 53 55 | 4d 0a 31 38 31 20 4e 45 |(I,J)=SU|M.181 NE|
|00000380| 58 54 20 4b 0a 31 38 35 | 20 4e 45 58 54 20 4a 0a |XT K.185| NEXT J.|
|00000390| 31 39 30 20 4e 45 58 54 | 20 49 0a 31 39 39 20 50 |190 NEXT| I.199 P|
|000003a0| 52 49 4e 54 22 93 22 3a | 50 52 49 4e 54 22 20 54 |RINT".":|PRINT" T|
|000003b0| 48 45 20 53 4f 4c 55 54 | 49 4f 4e 20 4d 41 54 52 |HE SOLUT|ION MATR|
|000003c0| 49 58 20 49 53 20 41 53 | 20 46 4f 4c 4c 4f 57 53 |IX IS AS| FOLLOWS|
|000003d0| 3a 22 3a 50 52 49 4e 54 | 0a 32 30 30 20 50 52 49 |:":PRINT|.200 PRI|
|000003e0| 4e 54 22 aa 43 28 31 31 | 29 20 43 28 31 32 29 2e |NT".C(11|) C(12).|
|000003f0| 43 28 31 50 29 b4 22 0a | 32 30 35 20 50 52 49 4e |C(1P).".|205 PRIN|
|00000400| 54 22 aa 43 28 32 31 29 | 20 43 28 32 32 29 2e 43 |T".C(21)| C(22).C|
|00000410| 28 32 4e 29 b4 22 0a 32 | 31 30 20 50 52 49 4e 54 |(2N).".2|10 PRINT|
|00000420| 22 aa 43 28 33 31 29 20 | 43 28 33 32 29 2e 43 28 |".C(31) |C(32).C(|
|00000430| 33 4e 29 b4 22 0a 32 31 | 35 20 50 52 49 4e 54 22 |3N).".21|5 PRINT"|
|00000440| aa 20 20 2e 20 20 20 20 | 20 2e 20 20 20 20 20 2e |. . | . .|
|00000450| 20 20 b4 22 0a 32 32 30 | 20 50 52 49 4e 54 22 aa | .".220| PRINT".|
|00000460| 20 20 2e 20 20 20 20 20 | 2e 20 20 20 20 20 2e 20 | . |. . |
|00000470| 20 b4 22 0a 32 32 35 20 | 50 52 49 4e 54 22 aa 20 | .".225 |PRINT". |
|00000480| 20 2e 20 20 20 20 20 2e | 20 20 20 20 20 2e 20 20 | . .| . |
|00000490| b4 22 0a 32 33 30 20 50 | 52 49 4e 54 22 aa 43 28 |.".230 P|RINT".C(|
|000004a0| 4d 31 29 20 43 28 4d 32 | 29 2e 43 28 4d 4e 29 b4 |M1) C(M2|).C(MN).|
|000004b0| 22 0a 32 35 30 20 50 52 | 49 4e 54 0a 32 35 35 20 |".250 PR|INT.255 |
|000004c0| 46 4f 52 20 49 3d 31 54 | 4f 50 25 0a 32 36 30 20 |FOR I=1T|OP%.260 |
|000004d0| 46 4f 52 20 4a 3d 31 20 | 54 4f 20 4d 25 0a 32 37 |FOR J=1 |TO M%.27|
|000004e0| 30 20 50 52 49 4e 54 22 | 20 43 28 22 4a 22 22 49 |0 PRINT"| C("J""I|
|000004f0| 22 29 3d 22 2c 43 28 4a | 2c 49 29 0a 32 39 30 20 |")=",C(J|,I).290 |
|00000500| 4e 45 58 54 20 4a 0a 32 | 39 35 20 4e 45 58 54 20 |NEXT J.2|95 NEXT |
|00000510| 49 0a 33 30 30 20 50 52 | 49 4e 54 3a 50 52 49 4e |I.300 PR|INT:PRIN|
|00000520| 54 22 20 2a 2a 2a 2a 2a | 2a 28 48 49 54 20 53 50 |T" *****|*(HIT SP|
|00000530| 41 43 45 20 54 4f 20 52 | 45 50 45 41 54 29 2a 2a |ACE TO R|EPEAT)**|
|00000540| 2a 2a 2a 2a 2a 22 0a 33 | 30 35 20 09 0a 33 31 30 |*****".3|05 ..310|
|00000550| 20 49 46 20 41 24 3d 22 | 20 22 20 54 48 45 4e 20 | IF A$="| " THEN |
|00000560| 47 4f 54 4f 20 33 32 30 | 0a 33 31 35 20 45 4e 44 |GOTO 320|.315 END|
|00000570| 0a 33 32 30 20 50 52 49 | 4e 54 22 93 22 0a 33 33 |.320 PRI|NT".".33|
|00000580| 30 20 50 52 49 4e 54 22 | 20 48 49 54 20 41 4e 59 |0 PRINT"| HIT ANY|
|00000590| 20 4b 45 59 20 41 46 54 | 45 52 20 43 28 4d 2c 50 | KEY AFT|ER C(M,P|
|000005a0| 29 20 49 53 20 44 49 53 | 50 4c 41 59 45 44 22 3a |) IS DIS|PLAYED":|
|000005b0| 50 52 49 4e 54 0a 33 33 | 35 20 50 52 49 4e 54 22 |PRINT.33|5 PRINT"|
|000005c0| 54 4f 20 56 49 45 57 20 | 46 4f 4c 4c 4f 57 49 4e |TO VIEW |FOLLOWIN|
|000005d0| 47 20 54 45 52 4d 2e 22 | 0a 33 34 30 20 50 52 49 |G TERM."|.340 PRI|
|000005e0| 4e 54 0a 33 34 35 20 46 | 4f 52 20 49 3d 31 20 54 |NT.345 F|OR I=1 T|
|000005f0| 4f 20 50 25 0a 33 35 30 | 20 46 4f 52 20 4a 3d 31 |O P%.350| FOR J=1|
|00000600| 54 4f 20 4d 25 0a 33 36 | 30 20 50 52 49 4e 54 22 |TO M%.36|0 PRINT"|
|00000610| 20 43 28 22 4a 22 22 49 | 22 29 3d 22 2c 43 28 4a | C("J""I|")=",C(J|
|00000620| 2c 49 29 0a 33 36 35 20 | 47 45 54 20 41 24 3a 49 |,I).365 |GET A$:I|
|00000630| 46 20 41 24 3d 22 22 20 | 54 48 45 4e 20 33 36 35 |F A$="" |THEN 365|
|00000640| 0a 33 37 30 20 4e 45 58 | 54 20 4a 0a 33 37 35 20 |.370 NEX|T J.375 |
|00000650| 4e 45 58 54 20 49 0a 33 | 38 30 20 47 4f 54 4f 20 |NEXT I.3|80 GOTO |
|00000660| 33 30 30 0a 38 39 39 35 | 20 45 4e 44 0a 39 30 30 |300.8995| END.900|
|00000670| 30 20 50 52 49 4e 54 22 | aa 41 28 31 31 29 20 41 |0 PRINT"|.A(11) A|
|00000680| 28 31 32 29 2e 41 28 31 | 4e 29 b4 20 a7 42 28 31 |(12).A(1|N). .B(1|
|00000690| 31 29 20 42 28 31 32 29 | 2e 42 28 31 50 29 b4 22 |1) B(12)|.B(1P)."|
|000006a0| 0a 39 30 31 30 20 50 52 | 49 4e 54 22 aa 41 28 32 |.9010 PR|INT".A(2|
|000006b0| 31 29 20 41 28 32 32 29 | 2e 41 28 32 4e 29 b4 20 |1) A(22)|.A(2N). |
|000006c0| a7 42 28 32 31 29 20 42 | 28 32 32 29 2e 42 28 32 |.B(21) B|(22).B(2|
|000006d0| 50 29 b4 22 0a 39 30 31 | 35 20 50 52 49 4e 54 22 |P).".901|5 PRINT"|
|000006e0| aa 41 28 33 31 29 20 41 | 28 33 32 29 2e 41 28 33 |.A(31) A|(32).A(3|
|000006f0| 4e 29 b4 20 a7 42 28 33 | 31 29 20 42 28 33 32 29 |N). .B(3|1) B(32)|
|00000700| 2e 42 28 33 50 29 b4 22 | 0a 39 30 32 30 20 50 52 |.B(3P)."|.9020 PR|
|00000710| 49 4e 54 22 aa 20 20 2e | 20 20 20 20 20 2e 20 20 |INT". .| . |
|00000720| 20 20 20 2e 20 20 b4 2a | a7 20 20 2e 20 20 20 20 | . .*|. . |
|00000730| 20 2e 20 20 20 20 20 2e | 20 20 a5 22 0a 39 30 33 | . .| .".903|
|00000740| 30 20 50 52 49 4e 54 22 | aa 20 20 2e 20 20 20 20 |0 PRINT"|. . |
|00000750| 20 2e 20 20 20 20 20 2e | 20 20 b4 20 a7 20 20 2e | . .| . . .|
|00000760| 20 20 20 20 20 2e 20 20 | 20 20 20 2e 20 20 a5 22 | . | . ."|
|00000770| 0a 39 30 34 30 20 50 52 | 49 4e 54 22 aa 20 20 2e |.9040 PR|INT". .|
|00000780| 20 20 20 20 20 2e 20 20 | 20 20 20 2e 20 20 b4 20 | . | . . |
|00000790| a7 09 00 2e 20 20 20 20 | 20 2e 20 20 20 20 20 2e |.... | . .|
|000007a0| 20 20 a5 22 0a 39 30 35 | 30 20 50 52 49 4e 54 22 | .".905|0 PRINT"|
|000007b0| aa 41 28 4d 31 29 20 41 | 28 4d 32 29 2e 41 28 4d |.A(M1) A|(M2).A(M|
|000007c0| 4e 29 b4 20 a7 42 28 4e | 31 29 20 42 28 4e 32 29 |N). .B(N|1) B(N2)|
|000007d0| 2e 42 28 4e 50 29 b4 22 | 0a 39 30 35 35 20 50 52 |.B(NP)."|.9055 PR|
|000007e0| 49 4e 54 0a 39 30 36 30 | 20 52 45 54 55 52 4e 0a |INT.9060| RETURN.|
+--------+-------------------------+-------------------------+--------+--------+