/ Garbo
/ Garbo.cdr / mac / progrmng / elan15.sit / turtle / PYTH.E.bin ![]() | < prev | next > |
MacBinary | 1989-09-14 | 1.4 KB | [TEXT/????] |
Confidence | Program | Detection | Match Type | Support |
---|---|---|---|---|
66% | dexvert | AMOS Picture Packer (image/amosPicturePacker) | ext | Supported |
10% | dexvert | Jesper Olsen Module (music/jesperOlsen) | magic | Supported |
1% | dexvert | Debian floppy split (archive/debianFloppySplit) | ext | Unsupported |
1% | dexvert | Sound Images sound sample (audio/soundImagesSoundSample) | ext | Unsupported |
1% | dexvert | DESI-III drawing (image/desiIIIDrawing) | ext | Unsupported |
1% | dexvert | MS-DOS PMODE extender executable (executable/msdosPMODEExtenderExecutable) | ext | Unsupported |
1% | dexvert | Alien Trilogytextures (other/alienTrilogyTextures) | ext | Unsupported |
1% | dexvert | APT cache data (other/aptCacheData) | ext | Unsupported |
1% | dexvert | CorelTRACE configuration (other/corelTRACEConfiguration) | ext | Unsupported |
1% | dexvert | Dreamcast Disc (other/dreamcastDisc) | ext | Unsupported |
1% | dexvert | EST flat binary (other/estFlatBinary) | ext | Unsupported |
1% | dexvert | Finale Enigma Binary Format (other/finaleEnigmaBinaryFormat) | ext | Unsupported |
1% | dexvert | Sega Genesis/Megadrive/32x ROM (other/genesisROM) | ext | Unsupported |
1% | dexvert | Myth: The Fallen Lords game archive (other/mythTheFallenLordsGameArchive) | ext | Unsupported |
1% | dexvert | Sound Images Sound Driver (other/soundImagesSoundDriver) | ext | Unsupported |
1% | dexvert | Symantec/Norton Config (other/symantecNortonConfig) | ext | Unsupported |
1% | dexvert | Vectrex ROM (other/vectrexROM) | ext | Unsupported |
1% | dexvert | BIS raP encoded format (other/bisraPEncoded) | ext | Unsupported |
1% | dexvert | Pascal Script binary (other/pascalScriptBinary) | ext | Unsupported |
1% | dexvert | 7th Level game data archive (other/seventhLevelGameDataArchive) | ext | Unsupported |
1% | dexvert | MacBinary (archive/macBinary) | fallback | Supported |
1% | dexvert | Text File (text/txt) | fallback | Supported |
100% | file | MacBinary, Wed Nov 9 06:51:47 1988, modified Wed Nov 9 06:51:52 1988, creator '????', type ASCII, 1230 bytes "PYTH.E" | default (weak) | |
99% | file | data | default | |
49% | TrID | Macintosh plain text (MacBinary) | default | |
33% | TrID | TTComp archive compressed (bin-4K) | default (weak) | |
17% | TrID | MacBinary 1 | default (weak) | |
100% | lsar | MacBinary | default | |
100% | gt2 | MAC Bilddatei | default (weak) |
id metadata | |
---|---|
key | value |
macFileType | [TEXT] |
macFileCreator | [????] |
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 06 50 59 54 48 2e 45 | 00 00 00 00 00 00 00 00 |..PYTH.E|........|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 3f 3f 3f | 3f 00 00 00 00 00 00 00 |.TEXT???|?.......|
|00000050| 00 00 00 00 00 04 ce 00 | 00 00 00 9f 9d e1 d3 9f |........|........|
|00000060| 9d e1 d8 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000080| 0d 50 52 4f 43 20 70 79 | 74 68 61 67 6f 72 61 73 |.PROC py|thagoras|
|00000090| 20 74 72 65 65 20 28 52 | 45 41 4c 20 43 4f 4e 53 | tree (R|EAL CONS|
|000000a0| 54 20 73 69 7a 65 2c 20 | 49 4e 54 20 43 4f 4e 53 |T size, |INT CONS|
|000000b0| 54 20 64 65 70 74 68 2c | 20 61 6e 67 6c 65 29 3a |T depth,| angle):|
|000000c0| 0d 20 20 20 64 72 61 77 | 20 28 73 69 7a 65 29 3b |. draw| (size);|
|000000d0| 0d 20 20 20 49 46 20 72 | 65 73 6f 6c 75 74 69 6f |. IF r|esolutio|
|000000e0| 6e 20 61 63 68 69 65 76 | 65 64 0d 20 20 20 54 48 |n achiev|ed. TH|
|000000f0| 45 4e 0d 20 20 20 20 20 | 74 75 72 6e 20 72 69 67 |EN. |turn rig|
|00000100| 68 74 3b 0d 20 20 20 20 | 20 64 72 61 77 20 28 73 |ht;. | draw (s|
|00000110| 69 7a 65 29 3b 0d 20 20 | 20 20 20 74 75 72 6e 20 |ize);. | turn |
|00000120| 72 69 67 68 74 0d 20 20 | 20 45 4c 53 45 0d 20 20 |right. | ELSE. |
|00000130| 20 20 20 74 75 72 6e 20 | 28 61 6e 67 6c 65 29 3b | turn |(angle);|
|00000140| 0d 20 20 20 20 20 70 79 | 74 68 61 67 6f 72 61 73 |. py|thagoras|
|00000150| 20 74 72 65 65 20 28 73 | 69 7a 65 20 2a 20 63 6f | tree (s|ize * co|
|00000160| 73 20 28 61 6e 67 6c 65 | 29 2c 20 64 65 70 74 68 |s (angle|), depth|
|00000170| 20 2d 20 31 2c 20 61 6e | 67 6c 65 29 3b 0d 20 20 | - 1, an|gle);. |
|00000180| 20 20 20 74 75 72 6e 20 | 6c 65 66 74 3b 0d 20 20 | turn |left;. |
|00000190| 20 20 20 70 79 74 68 61 | 67 6f 72 61 73 20 74 72 | pytha|goras tr|
|000001a0| 65 65 20 28 73 69 7a 65 | 20 2a 20 73 69 6e 20 28 |ee (size| * sin (|
|000001b0| 61 6e 67 6c 65 29 2c 20 | 64 65 70 74 68 20 2d 20 |angle), |depth - |
|000001c0| 31 2c 20 61 6e 67 6c 65 | 29 3b 0d 20 20 20 20 20 |1, angle|);. |
|000001d0| 74 75 72 6e 20 28 39 30 | 20 2d 20 61 6e 67 6c 65 |turn (90| - angle|
|000001e0| 29 0d 20 20 20 46 49 3b | 0d 20 20 20 64 72 61 77 |). FI;|. draw|
|000001f0| 20 28 73 69 7a 65 29 2e | 0d 0d 20 20 72 65 73 6f | (size).|.. reso|
|00000200| 6c 75 74 69 6f 6e 20 61 | 63 68 69 65 76 65 64 3a |lution a|chieved:|
|00000210| 0d 20 20 20 20 64 65 70 | 74 68 20 3d 20 30 20 4f |. dep|th = 0 O|
|00000220| 52 20 73 69 7a 65 20 3c | 20 30 2e 31 20 2a 20 74 |R size <| 0.1 * t|
|00000230| 72 65 65 20 73 69 7a 65 | 2e 0d 0d 45 4e 44 50 52 |ree size|...ENDPR|
|00000240| 4f 43 20 70 79 74 68 61 | 67 6f 72 61 73 20 74 72 |OC pytha|goras tr|
|00000250| 65 65 3b 0d 0d 70 72 6f | 67 72 61 6d 3a 0d 20 20 |ee;..pro|gram:. |
|00000260| 20 65 6e 74 65 72 20 74 | 75 72 74 6c 65 20 67 72 | enter t|urtle gr|
|00000270| 61 70 68 69 63 73 3b 0d | 20 20 20 6d 6f 76 65 20 |aphics;.| move |
|00000280| 28 67 72 61 70 68 69 63 | 73 20 78 20 6c 69 6d 69 |(graphic|s x limi|
|00000290| 74 20 44 49 56 20 32 20 | 2d 20 36 30 2c 20 6c 69 |t DIV 2 |- 60, li|
|000002a0| 6e 65 20 68 65 69 67 68 | 74 29 3b 0d 20 20 20 70 |ne heigh|t);. p|
|000002b0| 75 74 20 28 22 50 79 74 | 68 61 67 6f 72 61 73 20 |ut ("Pyt|hagoras |
|000002c0| 74 72 65 65 22 29 3b 0d | 20 20 20 6c 69 6e 65 3b |tree");.| line;|
|000002d0| 0d 20 20 20 61 73 6b 20 | 70 61 72 61 6d 65 74 65 |. ask |paramete|
|000002e0| 72 73 3b 0d 20 20 20 64 | 72 61 77 20 66 72 61 6d |rs;. d|raw fram|
|000002f0| 65 3b 0d 20 20 20 64 72 | 61 77 20 70 79 74 68 61 |e;. dr|aw pytha|
|00000300| 67 6f 72 61 73 20 74 72 | 65 65 3b 0d 20 20 20 77 |goras tr|ee;. w|
|00000310| 61 69 74 20 66 6f 72 20 | 63 6f 6e 66 69 72 6d 61 |ait for |confirma|
|00000320| 74 69 6f 6e 20 28 31 2c | 20 67 72 61 70 68 69 63 |tion (1,| graphic|
|00000330| 73 20 79 20 6c 69 6d 69 | 74 20 2d 20 6c 69 6e 65 |s y limi|t - line|
|00000340| 20 68 65 69 67 68 74 29 | 3b 0d 20 20 20 6c 65 61 | height)|;. lea|
|00000350| 76 65 20 74 75 72 74 6c | 65 20 67 72 61 70 68 69 |ve turtl|e graphi|
|00000360| 63 73 2e 0d 0d 64 72 61 | 77 20 66 72 61 6d 65 3a |cs...dra|w frame:|
|00000370| 0d 20 20 6d 6f 76 65 20 | 28 30 2e 30 2c 20 30 2e |. move |(0.0, 0.|
|00000380| 30 29 3b 0d 20 20 64 72 | 61 77 20 28 30 2e 30 2c |0);. dr|aw (0.0,|
|00000390| 20 31 30 30 2e 30 29 3b | 0d 20 20 64 72 61 77 20 | 100.0);|. draw |
|000003a0| 28 31 30 30 2e 30 2c 20 | 31 30 30 2e 30 29 3b 0d |(100.0, |100.0);.|
|000003b0| 20 20 64 72 61 77 20 28 | 31 30 30 2e 30 2c 20 30 | draw (|100.0, 0|
|000003c0| 2e 30 29 3b 0d 20 20 64 | 72 61 77 20 28 30 2e 30 |.0);. d|raw (0.0|
|000003d0| 2c 20 30 2e 30 29 2e 0d | 0d 61 73 6b 20 70 61 72 |, 0.0)..|.ask par|
|000003e0| 61 6d 65 74 65 72 73 3a | 0d 20 20 20 49 4e 54 20 |ameters:|. INT |
|000003f0| 43 4f 4e 53 54 20 74 72 | 65 65 20 64 65 70 74 68 |CONST tr|ee depth|
|00000400| 20 3a 3a 20 61 73 6b 20 | 69 6e 74 20 28 22 44 65 | :: ask |int ("De|
|00000410| 70 74 68 3f 20 22 29 3b | 0d 20 20 20 49 4e 54 20 |pth? ");|. INT |
|00000420| 43 4f 4e 53 54 20 74 72 | 65 65 20 61 6e 67 6c 65 |CONST tr|ee angle|
|00000430| 20 3a 3a 20 61 73 6b 20 | 69 6e 74 20 28 22 41 6e | :: ask |int ("An|
|00000440| 67 6c 65 3f 20 22 29 3b | 0d 20 20 20 52 45 41 4c |gle? ");|. REAL|
|00000450| 20 43 4f 4e 53 54 20 74 | 72 65 65 20 73 69 7a 65 | CONST t|ree size|
|00000460| 20 3a 3a 20 61 73 6b 20 | 72 65 61 6c 20 28 22 53 | :: ask |real ("S|
|00000470| 69 7a 65 20 3f 20 22 29 | 3b 0d 20 20 20 52 45 41 |ize ? ")|;. REA|
|00000480| 4c 20 43 4f 4e 53 54 20 | 74 72 65 65 20 78 70 6f |L CONST |tree xpo|
|00000490| 73 20 3a 3a 20 61 73 6b | 20 72 65 61 6c 20 28 22 |s :: ask| real ("|
|000004a0| 58 70 6f 73 20 3f 20 22 | 29 3b 0d 20 20 20 52 45 |Xpos ? "|);. RE|
|000004b0| 41 4c 20 43 4f 4e 53 54 | 20 74 72 65 65 20 79 70 |AL CONST| tree yp|
|000004c0| 6f 73 20 3a 3a 20 61 73 | 6b 20 72 65 61 6c 20 28 |os :: as|k real (|
|000004d0| 22 59 70 6f 73 20 3f 20 | 22 29 2e 0d 0d 64 72 61 |"Ypos ? |")...dra|
|000004e0| 77 20 70 79 74 68 61 67 | 6f 72 61 73 20 74 72 65 |w pythag|oras tre|
|000004f0| 65 3a 0d 20 20 20 6d 6f | 76 65 20 28 74 72 65 65 |e:. mo|ve (tree|
|00000500| 20 78 70 6f 73 2c 20 74 | 72 65 65 20 79 70 6f 73 | xpos, t|ree ypos|
|00000510| 29 3b 0d 20 20 20 70 79 | 74 68 61 67 6f 72 61 73 |);. py|thagoras|
|00000520| 20 74 72 65 65 20 28 74 | 72 65 65 20 73 69 7a 65 | tree (t|ree size|
|00000530| 2c 20 74 72 65 65 20 64 | 65 70 74 68 2c 20 74 72 |, tree d|epth, tr|
|00000540| 65 65 20 61 6e 67 6c 65 | 29 2e 0d 0d 04 0d 00 00 |ee angle|).......|
|00000550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+