home *** CD-ROM | disk | FTP | other *** search
| Unknown | 2019-04-13 | 2.2 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
| |
| 100%
| gt2
| Kopftext: '0 REM ***************************
| default (weak)
| |
| 100%
| detectItEasy
| Format: plain text[LF]
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 30 20 52 45 4d 20 20 2a | 2a 2a 2a 2a 2a 2a 2a 2a |0 REM *|********|
|00000010| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000020| 2a 2a 0a 31 20 52 45 4d | 20 20 2a 2a 2a 2a 2a 20 |**.1 REM| ***** |
|00000030| 4e 45 57 54 4f 4e 27 53 | 20 4d 45 54 48 4f 44 20 |NEWTON'S| METHOD |
|00000040| 2a 2a 2a 2a 2a 0a 32 20 | 52 45 4d 20 20 2a 2a 2a |*****.2 |REM ***|
|00000050| 2a 2a 20 42 59 20 43 48 | 52 49 53 20 48 41 59 4e |** BY CH|RIS HAYN|
|00000060| 45 53 20 2a 2a 2a 2a 2a | 0a 33 20 52 45 4d 20 20 |ES *****|.3 REM |
|00000070| 2a 2a 2a 2a 2a 20 20 20 | 20 20 31 31 2d 31 33 2d |***** | 11-13-|
|00000080| 38 38 20 20 20 20 2a 2a | 2a 2a 2a 0a 34 20 52 45 |88 **|***.4 RE|
|00000090| 4d 20 20 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |M *****|********|
|000000a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 0a 35 |********|******.5|
|000000b0| 20 50 52 49 4e 54 22 93 | 22 3b 3a 50 4f 4b 45 35 | PRINT".|";:POKE5|
|000000c0| 33 32 38 31 2c 30 3a 50 | 4f 4b 45 35 33 32 38 30 |3281,0:P|OKE53280|
|000000d0| 2c 32 3a 50 4f 4b 45 35 | 33 32 37 32 2c 32 33 0a |,2:POKE5|3272,23.|
|000000e0| 31 30 20 41 24 3d 22 ce | 45 57 54 4f 4e 27 53 20 |10 A$=".|EWTON'S |
|000000f0| cd 45 54 48 4f 44 22 0a | 31 35 20 50 52 49 4e 54 |.ETHOD".|15 PRINT|
|00000100| 22 11 11 11 11 9a 22 0a | 32 30 20 4c 3d 4c 45 4e |".....".|20 L=LEN|
|00000110| 28 41 24 29 0a 33 30 20 | 46 4f 52 20 4e 3d 31 20 |(A$).30 |FOR N=1 |
|00000120| 54 4f 20 4c 0a 34 30 20 | 50 52 49 4e 54 54 41 42 |TO L.40 |PRINTTAB|
|00000130| 28 31 32 2b 4e 29 3b 4d | 49 44 24 28 41 24 2c 4e |(12+N);M|ID$(A$,N|
|00000140| 2c 31 29 0a 34 35 20 46 | 4f 52 54 3d 31 54 4f 37 |,1).45 F|ORT=1TO7|
|00000150| 35 3a 4e 45 58 54 20 54 | 0a 35 30 20 4e 45 58 54 |5:NEXT T|.50 NEXT|
|00000160| 20 4e 0a 36 30 20 50 52 | 49 4e 54 22 99 11 11 11 | N.60 PR|INT"....|
|00000170| 12 1d 1d 1d 1d 1d 1d 1d | 1d 1d 1d 20 20 20 20 c8 |........|... .|
|00000180| 49 54 20 c1 4e 59 20 cb | 45 59 20 20 20 20 22 0a |IT .NY .|EY ".|
|00000190| 37 30 20 47 45 54 20 5a | 24 3a 49 46 20 5a 24 3d |70 GET Z|$:IF Z$=|
|000001a0| 22 22 20 54 48 45 4e 20 | 37 30 0a 31 30 30 20 50 |"" THEN |70.100 P|
|000001b0| 52 49 4e 54 22 93 9a 22 | 3b 0a 31 31 30 20 50 52 |RINT".."|;.110 PR|
|000001c0| 49 4e 54 22 11 11 11 d4 | 48 49 53 20 50 52 4f 47 |INT"....|HIS PROG|
|000001d0| 52 41 4d 20 55 53 45 53 | 20 ce 45 57 54 4f 4e 27 |RAM USES| .EWTON'|
|000001e0| 53 20 4d 45 54 48 4f 44 | 20 46 4f 52 22 0a 31 32 |S METHOD| FOR".12|
|000001f0| 30 20 50 52 49 4e 54 22 | 41 50 50 52 4f 58 49 4d |0 PRINT"|APPROXIM|
|00000200| 41 54 49 4e 47 20 52 4f | 4f 54 53 20 4f 46 20 45 |ATING RO|OTS OF E|
|00000210| 51 55 41 54 49 4f 4e 53 | 2e 22 0a 31 33 30 20 50 |QUATIONS|.".130 P|
|00000220| 52 49 4e 54 22 11 20 d4 | 48 45 20 45 51 55 41 54 |RINT". .|HE EQUAT|
|00000230| 49 4f 4e 20 55 53 45 44 | 20 49 53 20 4f 46 20 54 |ION USED| IS OF T|
|00000240| 48 45 20 46 4f 52 4d 22 | 3a 50 52 49 4e 54 0a 31 |HE FORM"|:PRINT.1|
|00000250| 33 35 20 50 52 49 4e 54 | 22 9c 20 20 20 20 20 20 |35 PRINT|". |
|00000260| 20 20 20 20 20 20 20 20 | 46 28 20 d8 20 29 22 0a | |F( . )".|
|00000270| 31 34 30 20 50 52 49 4e | 54 22 20 20 20 20 20 20 |140 PRIN|T" |
|00000280| 20 20 20 20 20 20 20 20 | 20 20 20 20 4e 22 0a 31 | | N".1|
|00000290| 34 35 20 50 52 49 4e 54 | 22 20 20 d8 20 20 20 3d |45 PRINT|" . =|
|000002a0| 20 d8 20 2d 20 20 2d 2d | 2d 2d 2d 2d 2d 2d 2d 20 | . - --|------- |
|000002b0| 20 20 20 4e 3d 31 2c 32 | 2c 33 2c 2e 2e 2e 22 0a | N=1,2|,3,...".|
|000002c0| 31 35 30 20 50 52 49 4e | 54 22 20 20 20 4e 2b 31 |150 PRIN|T" N+1|
|000002d0| 20 20 20 4e 20 20 20 20 | 46 27 28 20 d8 20 29 22 | N |F'( . )"|
|000002e0| 0a 31 36 30 20 50 52 49 | 4e 54 22 20 20 20 20 20 |.160 PRI|NT" |
|000002f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 4e 22 | | N"|
|00000300| 0a 31 36 35 20 50 52 49 | 4e 54 22 9a 11 c1 4e 20 |.165 PRI|NT"...N |
|00000310| 49 4e 49 54 49 41 4c 20 | 47 55 45 53 53 20 49 53 |INITIAL |GUESS IS|
|00000320| 20 55 53 45 44 20 41 4c | 4f 4e 47 20 57 49 54 48 | USED AL|ONG WITH|
|00000330| 20 22 0a 31 37 30 20 50 | 52 49 4e 54 22 53 4f 4d | ".170 P|RINT"SOM|
|00000340| 45 20 45 52 52 4f 52 20 | 54 4f 4c 45 52 41 4e 43 |E ERROR |TOLERANC|
|00000350| 45 2e 22 0a 31 38 30 20 | 50 52 49 4e 54 22 11 11 |E.".180 |PRINT"..|
|00000360| 11 12 1d 1d 1d 1d 1d 1d | 1d 1d 1d 1d 20 20 20 20 |........|.... |
|00000370| c8 49 54 20 c1 4e 59 20 | cb 45 59 20 20 20 20 22 |.IT .NY |.EY "|
|00000380| 0a 31 38 35 20 47 45 54 | 20 5a 24 3a 49 46 20 5a |.185 GET| Z$:IF Z|
|00000390| 24 3d 22 22 20 54 48 45 | 4e 20 31 38 35 0a 32 30 |$="" THE|N 185.20|
|000003a0| 30 20 50 52 49 4e 54 22 | 93 11 9a 20 20 d4 48 45 |0 PRINT"|... .HE|
|000003b0| 20 45 51 55 41 54 49 4f | 4e 20 46 4f 52 20 46 28 | EQUATIO|N FOR F(|
|000003c0| d8 29 20 4d 55 53 54 20 | 42 45 20 49 4e 50 55 54 |.) MUST |BE INPUT|
|000003d0| 20 22 0a 32 30 35 20 50 | 52 49 4e 54 22 4f 4e 20 | ".205 P|RINT"ON |
|000003e0| 4c 49 4e 45 20 33 35 30 | 2e 20 d4 48 45 20 45 51 |LINE 350|. .HE EQ|
|000003f0| 55 41 54 49 4f 4e 20 4f | 46 20 46 27 28 d8 29 20 |UATION O|F F'(.) |
|00000400| 4d 55 53 54 22 0a 32 31 | 30 20 50 52 49 4e 54 22 |MUST".21|0 PRINT"|
|00000410| 42 45 20 49 4e 50 55 54 | 20 4f 4e 20 4c 49 4e 45 |BE INPUT| ON LINE|
|00000420| 20 33 36 30 2e 22 0a 32 | 31 35 20 50 52 49 4e 54 | 360.".2|15 PRINT|
|00000430| 22 a0 d4 48 45 59 20 53 | 48 4f 55 4c 44 20 42 45 |"..HEY S|HOULD BE|
|00000440| 20 4f 46 20 54 48 45 20 | 46 4f 52 4d 20 3a 22 0a | OF THE |FORM :".|
|00000450| 32 32 30 20 50 52 49 4e | 54 22 9c 11 11 1d 1d 1d |220 PRIN|T"......|
|00000460| 1d 1d 33 35 30 20 d9 3d | 32 2a 28 d8 5e 33 29 2b |..350 .=|2*(.^3)+|
|00000470| 33 2a d8 2b 35 22 0a 32 | 32 35 20 50 52 49 4e 54 |3*.+5".2|25 PRINT|
|00000480| 22 11 1d 1d 1d 1d 1d 33 | 36 30 20 c4 d9 3d 36 2a |"......3|60 ..=6*|
|00000490| 28 d8 5e 32 29 2b 33 22 | 0a 32 33 30 20 50 52 49 |(.^2)+3"|.230 PRI|
|000004a0| 4e 54 22 11 9a 20 c5 58 | 41 4d 50 4c 45 20 c6 4f |NT".. .X|AMPLE .O|
|000004b0| 52 3a 20 20 20 20 20 20 | 20 20 33 20 20 22 0a 32 |R: | 3 ".2|
|000004c0| 33 35 20 50 52 49 4e 54 | 22 20 20 20 20 20 20 20 |35 PRINT|" |
|000004d0| 20 20 20 20 20 20 20 20 | d9 20 3d 20 32 d8 20 2b | |. = 2. +|
|000004e0| 20 33 d8 20 2b 20 35 20 | 22 0a 32 33 37 20 50 52 | 3. + 5 |".237 PR|
|000004f0| 49 4e 54 22 11 20 20 d4 | 48 45 09 00 4f 4c 45 52 |INT". .|HE..OLER|
|00000500| 41 4e 43 45 20 53 48 4f | 55 4c 44 20 42 45 20 53 |ANCE SHO|ULD BE S|
|00000510| 4f 4d 45 20 53 4d 41 4c | 4c 22 0a 32 33 38 20 50 |OME SMAL|L".238 P|
|00000520| 52 49 4e 54 22 4e 55 4d | 42 45 52 2e 20 20 28 49 |RINT"NUM|BER. (I|
|00000530| 2e 45 2e 20 2e 30 30 30 | 30 31 29 22 0a 32 33 39 |.E. .000|01)".239|
|00000540| 20 50 52 49 4e 54 22 11 | 20 20 c9 46 20 54 48 45 | PRINT".| .F THE|
|00000550| 20 49 4e 49 54 49 41 4c | 20 47 55 45 53 53 20 49 | INITIAL| GUESS I|
|00000560| 53 20 43 4c 4f 53 45 20 | 54 4f 20 54 48 45 22 0a |S CLOSE |TO THE".|
|00000570| 32 34 30 20 50 52 49 4e | 54 22 52 45 41 4c 20 52 |240 PRIN|T"REAL R|
|00000580| 4f 4f 54 2c 20 49 54 20 | 57 49 4c 4c 20 43 4f 4e |OOT, IT |WILL CON|
|00000590| 56 45 52 47 45 20 46 4f | 52 20 54 48 49 53 22 0a |VERGE FO|R THIS".|
|000005a0| 32 34 31 20 50 52 49 4e | 54 22 54 4f 4c 45 52 41 |241 PRIN|T"TOLERA|
|000005b0| 4e 43 45 20 4d 4f 52 45 | 20 52 41 50 49 44 4c 59 |NCE MORE| RAPIDLY|
|000005c0| 2e 22 0a 32 34 33 20 50 | 52 49 4e 54 22 11 99 20 |.".243 P|RINT".. |
|000005d0| c1 52 45 20 45 51 55 41 | 54 49 4f 4e 53 20 49 4e |.RE EQUA|TIONS IN|
|000005e0| 50 55 54 20 3f 20 28 59 | 2f 4e 29 22 0a 32 34 34 |PUT ? (Y|/N)".244|
|000005f0| 20 47 45 54 20 51 24 3a | 49 46 20 51 24 3d 22 22 | GET Q$:|IF Q$=""|
|00000600| 20 54 48 45 4e 20 32 34 | 34 0a 32 34 36 20 49 46 | THEN 24|4.246 IF|
|00000610| 20 51 24 3d 22 59 22 20 | 54 48 45 4e 20 47 4f 54 | Q$="Y" |THEN GOT|
|00000620| 4f 20 32 39 39 0a 32 34 | 37 20 49 46 51 24 3c 3e |O 299.24|7 IFQ$<>|
|00000630| 22 59 22 41 4e 44 51 24 | 3c 3e 22 4e 22 20 54 48 |"Y"ANDQ$|<>"N" TH|
|00000640| 45 4e 20 32 34 34 0a 32 | 35 30 20 50 52 49 4e 54 |EN 244.2|50 PRINT|
|00000650| 22 93 1f 22 3b 3a 50 4f | 4b 45 35 33 32 37 32 2c |"..";:PO|KE53272,|
|00000660| 32 31 0a 32 35 32 20 50 | 52 49 4e 54 22 11 20 20 |21.252 P|RINT". |
|00000670| 49 4e 50 55 54 20 45 51 | 55 41 54 49 4f 4e 53 22 |INPUT EQ|UATIONS"|
|00000680| 0a 32 35 34 20 4c 49 53 | 54 20 33 35 30 2d 33 36 |.254 LIS|T 350-36|
|00000690| 30 0a 32 39 39 20 52 45 | 4d 20 2a 2a 2a 20 4d 41 |0.299 RE|M *** MA|
|000006a0| 49 4e 20 50 52 4f 47 52 | 41 4d 20 2a 2a 2a 0a 33 |IN PROGR|AM ***.3|
|000006b0| 32 30 20 50 52 49 4e 54 | 22 93 9a 22 3b 3a 50 4f |20 PRINT|"..";:PO|
|000006c0| 4b 45 35 33 32 37 32 2c | 32 33 0a 33 33 30 20 49 |KE53272,|23.330 I|
|000006d0| 4e 50 55 54 22 c5 4e 54 | 45 52 20 45 52 52 4f 52 |NPUT".NT|ER ERROR|
|000006e0| 20 54 4f 4c 45 52 41 4e | 43 45 22 3b 45 54 0a 33 | TOLERAN|CE";ET.3|
|000006f0| 33 35 20 49 46 20 45 54 | 3e 3d 31 20 54 48 45 4e |35 IF ET|>=1 THEN|
|00000700| 20 33 33 30 0a 33 34 30 | 20 49 4e 50 55 54 22 c5 | 330.340| INPUT".|
|00000710| 4e 54 45 52 20 49 4e 49 | 54 49 41 4c 20 47 55 45 |NTER INI|TIAL GUE|
|00000720| 53 53 22 3b 58 0a 33 34 | 35 20 49 54 3d 30 0a 33 |SS";X.34|5 IT=0.3|
|00000730| 34 37 20 46 4f 52 20 48 | 3d 31 54 4f 20 31 30 30 |47 FOR H|=1TO 100|
|00000740| 30 30 30 30 0a 39 20 59 | 3d 32 2a 58 0a 33 36 30 |0000.9 Y|=2*X.360|
|00000750| 20 44 59 3d 32 0a 33 36 | 35 20 49 54 3d 49 54 2b | DY=2.36|5 IT=IT+|
|00000760| 31 0a 33 37 30 20 4e 3d | 58 2d 28 59 2f 44 59 29 |1.370 N=|X-(Y/DY)|
|00000770| 0a 33 37 35 20 50 52 49 | 4e 54 22 41 50 50 52 4f |.375 PRI|NT"APPRO|
|00000780| 58 20 56 41 4c 20 3d 20 | 22 3b 4e 0a 33 38 30 20 |X VAL = |";N.380 |
|00000790| 49 46 20 41 42 53 28 4e | 2d 58 29 3c 3d 45 54 20 |IF ABS(N|-X)<=ET |
|000007a0| 54 48 45 4e 20 39 30 30 | 0a 33 38 35 20 58 3d 4e |THEN 900|.385 X=N|
|000007b0| 0a 34 30 30 20 4e 45 58 | 54 20 48 0a 39 30 30 20 |.400 NEX|T H.900 |
|000007c0| 50 52 49 4e 54 22 11 20 | 20 20 20 20 c1 46 54 45 |PRINT". | .FTE|
|000007d0| 52 20 22 3b 49 54 3b 22 | 20 49 54 45 52 41 54 49 |R ";IT;"| ITERATI|
|000007e0| 4f 4e 53 20 54 48 45 20 | 45 52 52 4f 52 20 57 41 |ONS THE |ERROR WA|
|000007f0| 53 20 4c 45 53 53 20 54 | 48 41 4e 20 22 3b 45 54 |S LESS T|HAN ";ET|
|00000800| 0a 39 31 30 20 50 52 49 | 4e 54 22 11 c1 4e 44 20 |.910 PRI|NT"..ND |
|00000810| 54 48 45 20 41 50 50 52 | 4f 58 49 4d 41 54 45 20 |THE APPR|OXIMATE |
|00000820| 52 4f 4f 54 20 57 41 53 | 20 22 3b 4e 0a 39 32 30 |ROOT WAS| ";N.920|
|00000830| 20 50 52 49 4e 54 22 11 | 11 1d 1d 1d 1d 1d 1d 1d | PRINT".|........|
|00000840| 1d 20 c1 4e 4f 54 48 45 | 52 20 3f 28 59 2f 4e 29 |. .NOTHE|R ?(Y/N)|
|00000850| 20 22 3b 0a 39 33 30 20 | 47 45 54 20 52 24 3a 49 | ";.930 |GET R$:I|
|00000860| 46 52 24 3d 22 22 20 54 | 48 45 4e 20 39 33 30 0a |FR$="" T|HEN 930.|
|00000870| 39 34 30 20 49 46 20 52 | 24 3d 22 59 22 20 54 48 |940 IF R|$="Y" TH|
|00000880| 45 4e 20 47 4f 54 4f 20 | 35 0a 39 35 30 20 49 46 |EN GOTO |5.950 IF|
|00000890| 20 52 24 3d 22 4e 22 20 | 54 48 45 4e 20 45 4e 44 | R$="N" |THEN END|
|000008a0| 0a 39 36 30 20 49 46 20 | 52 24 3c 3e 22 59 22 20 |.960 IF |R$<>"Y" |
|000008b0| 41 4e 44 20 52 24 3c 3e | 22 4e 22 20 54 48 45 4e |AND R$<>|"N" THEN|
|000008c0| 20 39 33 30 0a | | 930. | |
+--------+-------------------------+-------------------------+--------+--------+
