| / Garbo
/ Garbo.cdr / mac / util / medit15.sit / MEdit / Pascal.mcr.bin
| < prev |
| MacBinary | 1989-09-30 | 3.6 KB | [TEXT/MEDT] |
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text| Confidence | Program | Detection | Match Type | Support |
|---|---|---|---|---|
| 66% | dexvert | AMOS Picture Packer (image/amosPicturePacker) | ext | 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, Fri Mar 14 11:39:12 1986, modified Thu Jun 5 06:29:29 1986, creator 'MEDT', type ASCII, 2782 bytes "Pascal.mcr" , at 0xb5e 740 bytes resource | default (weak) | |
| 99% | file | data | default | |
| 74% | TrID | Macintosh plain text (MacBinary) | default | |
| 25% | TrID | MacBinary 1 | default (weak) | |
| 100% | lsar | MacBinary | default | |
| 100% | gt2 | MAC Bilddatei | default (weak) |
| id metadata | |
|---|---|
| key | value |
| macFileType | [TEXT] |
| macFileCreator | [MEDT] |
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0a 50 61 73 63 61 6c | 2e 6d 63 72 00 00 00 00 |..Pascal|.mcr....|
|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 4d 45 44 | 54 00 00 00 00 00 00 00 |.TEXTMED|T.......|
|00000050| 00 00 00 00 00 0a de 00 | 00 02 e4 9a 9e 04 b0 9b |........|........|
|00000060| 0b 1a 89 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| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000090| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0d 2a 20 54 68 69 |********|**.* Thi|
|000000d0| 73 20 6d 61 63 72 6f 20 | 66 69 6c 65 20 69 73 20 |s macro |file is |
|000000e0| 75 73 65 66 75 6c 20 66 | 6f 72 20 50 61 73 63 61 |useful f|or Pasca|
|000000f0| 6c 20 70 72 6f 67 72 61 | 6d 6d 69 6e 67 2e 20 49 |l progra|mming. I|
|00000100| 74 20 61 6c 6c 6f 77 73 | 20 79 6f 75 20 74 6f 20 |t allows| you to |
|00000110| 20 20 20 20 2a 0d 2a 20 | 69 6e 73 65 72 74 20 61 | *.* |insert a|
|00000120| 6c 6c 20 69 6d 70 6f 72 | 74 61 6e 74 20 70 72 6f |ll impor|tant pro|
|00000130| 67 72 61 6d 2d 73 74 72 | 75 63 74 75 72 65 73 20 |gram-str|uctures |
|00000140| 77 69 74 68 20 6f 6e 65 | 20 6b 65 79 2e 20 20 20 |with one| key. |
|00000150| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 2a | | *|
|00000160| 0d 2a 20 77 72 69 74 74 | 65 6e 20 20 20 20 20 20 |.* writt|en |
|00000170| 20 20 20 20 20 3a 20 30 | 36 2e 30 32 2e 38 36 20 | : 0|6.02.86 |
|00000180| 4d 61 74 74 68 69 61 73 | 20 41 65 62 69 20 20 20 |Matthias| Aebi |
|00000190| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000001a0| 20 20 20 20 20 20 20 20 | 20 20 2a 0d 2a 20 4c 61 | | *.* La|
|000001b0| 73 74 20 6d 6f 64 69 66 | 69 63 61 74 69 6f 6e 20 |st modif|ication |
|000001c0| 3a 20 33 31 2e 30 33 2e | 38 36 20 4d 61 74 74 68 |: 31.03.|86 Matth|
|000001d0| 69 61 73 20 41 65 62 69 | 20 20 20 20 20 20 20 20 |ias Aebi| |
|000001e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000001f0| 20 20 20 20 20 2a 0d 2a | 2a 2a 2a 2a 2a 2a 2a 2a | *.*|********|
|00000200| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000210| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000220| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000230| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000240| 2a 0d 0d 2a 20 31 0d 2a | 20 70 75 74 73 20 62 72 |*..* 1.*| puts br|
|00000250| 61 63 65 73 20 61 72 6f | 75 6e 64 20 74 68 65 20 |aces aro|und the |
|00000260| 63 75 72 72 65 6e 74 20 | 73 65 6c 65 63 74 69 6f |current |selectio|
|00000270| 6e 0d 22 43 6f 6d 6d 65 | 6e 74 2f 4b 22 20 7b 0d |n."Comme|nt/K" {.|
|00000280| 20 20 20 20 50 75 73 68 | 3b 0d 20 20 20 20 53 65 | Push|;. Se|
|00000290| 6c 65 63 74 28 4c 5d 2c | 43 5d 29 3b 0d 20 20 20 |lect(L],|C]);. |
|000002a0| 20 49 6e 73 65 72 74 28 | 22 20 7d 22 29 3b 0d 20 | Insert(|" }");. |
|000002b0| 20 20 20 53 65 6c 65 63 | 74 28 4c 5b 2c 43 5b 29 | Selec|t(L[,C[)|
|000002c0| 3b 0d 20 20 20 20 49 6e | 73 65 72 74 28 22 7b 20 |;. In|sert("{ |
|000002d0| 22 29 3b 0d 20 20 20 20 | 50 6f 70 3b 0d 20 20 20 |");. |Pop;. |
|000002e0| 20 49 66 20 4c 2e 20 3d | 20 4c 3a 20 7b 0d 20 20 | If L. =| L: {. |
|000002f0| 20 20 20 20 20 20 53 65 | 6c 65 63 74 28 4c 2e 2c | Se|lect(L.,|
|00000300| 43 2e 20 7c 20 4c 3a 2c | 43 3a 2b 34 29 3b 0d 20 |C. | L:,|C:+4);. |
|00000310| 20 20 20 7d 0d 20 20 20 | 20 45 6c 73 65 20 7b 0d | }. | Else {.|
|00000320| 20 20 20 20 20 20 20 20 | 53 65 6c 65 63 74 28 4c | |Select(L|
|00000330| 2e 2c 43 2e 20 7c 20 4c | 3a 2c 43 3a 2b 32 29 3b |.,C. | L|:,C:+2);|
|00000340| 0d 20 20 20 20 7d 3b 0d | 7d 3b 0d 0d 2a 20 32 0d |. };.|};..* 2.|
|00000350| 2a 20 72 65 6d 6f 76 65 | 73 20 63 6f 6d 6d 65 6e |* remove|s commen|
|00000360| 74 2d 62 72 61 63 65 73 | 20 61 74 20 73 74 61 72 |t-braces| at star|
|00000370| 74 20 61 6e 64 20 65 6e | 64 20 6f 66 20 74 68 65 |t and en|d of the|
|00000380| 20 63 75 72 72 65 6e 74 | 20 73 65 6c 65 63 74 69 | current| selecti|
|00000390| 6f 6e 0d 22 55 6e 63 6f | 6d 6d 65 6e 74 2f 55 22 |on."Unco|mment/U"|
|000003a0| 20 7b 0d 20 20 20 20 50 | 75 73 68 3b 0d 20 20 20 | {. P|ush;. |
|000003b0| 20 53 65 6c 65 63 74 28 | 4c 5d 2c 43 5d 2d 32 20 | Select(|L],C]-2 |
|000003c0| 7c 20 4c 5d 2c 43 5d 29 | 3b 0d 20 20 20 20 43 6c || L],C])|;. Cl|
|000003d0| 65 61 72 3b 0d 20 20 20 | 20 53 65 6c 65 63 74 28 |ear;. | Select(|
|000003e0| 4c 5b 2c 43 5b 20 7c 20 | 4c 5b 2c 43 5b 2b 32 29 |L[,C[ | |L[,C[+2)|
|000003f0| 3b 0d 20 20 20 20 43 6c | 65 61 72 3b 0d 20 20 20 |;. Cl|ear;. |
|00000400| 20 50 6f 70 3b 0d 7d 3b | 0d 0d 2a 20 33 0d 2a 20 | Pop;.};|..* 3.* |
|00000410| 69 6e 73 65 72 74 20 61 | 20 6c 69 6e 65 20 69 6e |insert a| line in|
|00000420| 20 74 68 65 20 6d 65 6e | 75 0d 22 2d 22 20 7b 7d | the men|u."-" {}|
|00000430| 3b 0d 0d 2a 20 34 0d 2a | 20 6a 75 6d 70 73 20 74 |;..* 4.*| jumps t|
|00000440| 6f 20 74 68 65 20 6e 65 | 78 74 20 70 6c 61 63 65 |o the ne|xt place|
|00000450| 68 6f 6c 64 65 72 20 69 | 6e 20 61 20 50 61 73 63 |holder i|n a Pasc|
|00000460| 61 6c 20 73 74 72 75 63 | 74 75 72 65 0d 22 50 6c |al struc|ture."Pl|
|00000470| 61 63 65 68 6f 6c 64 65 | 72 2f 2d 22 20 7b 0d 20 |aceholde|r/-" {. |
|00000480| 20 20 20 46 69 6e 64 28 | 22 7b 2e 22 29 3b 0d 20 | Find(|"{.");. |
|00000490| 20 20 20 49 66 20 4c 3a | 20 3d 20 30 20 41 6e 64 | If L:| = 0 And|
|000004a0| 20 43 3a 20 3d 20 30 20 | 7b 0d 20 20 20 20 20 20 | C: = 0 |{. |
|000004b0| 20 20 46 69 6e 64 28 22 | 7b 2e 22 29 3b 0d 20 20 | Find("|{.");. |
|000004c0| 20 20 7d 3b 0d 20 20 20 | 20 50 75 73 68 3b 0d 20 | };. | Push;. |
|000004d0| 20 20 20 46 69 6e 64 28 | 22 2e 7d 22 29 3b 0d 20 | Find(|".}");. |
|000004e0| 20 20 20 53 65 6c 65 63 | 74 28 4c 5b 2c 43 5b 20 | Selec|t(L[,C[ |
|000004f0| 7c 20 4c 3a 2c 43 3a 29 | 21 3b 0d 20 20 20 20 44 || L:,C:)|!;. D|
|00000500| 72 6f 70 3b 0d 7d 3b 0d | 0d 2a 20 35 0d 2a 20 69 |rop;.};.|.* 5.* i|
|00000510| 6e 73 65 72 74 20 61 20 | 6c 69 6e 65 20 69 6e 20 |nsert a |line in |
|00000520| 74 68 65 20 6d 65 6e 75 | 0d 22 2d 22 20 7b 7d 3b |the menu|."-" {};|
|00000530| 0d 0d 2a 20 36 0d 2a 20 | 69 6e 73 65 72 74 20 61 |..* 6.* |insert a|
|00000540| 20 50 52 4f 47 52 41 4d | 20 74 65 6d 70 6c 61 74 | PROGRAM| templat|
|00000550| 65 0d 22 50 52 4f 47 52 | 41 4d 2f 50 22 20 7b 0d |e."PROGR|AM/P" {.|
|00000560| 20 20 20 20 50 75 73 68 | 3b 0d 20 20 20 20 49 6e | Push|;. In|
|00000570| 73 65 72 74 28 22 50 52 | 4f 47 52 41 4d 20 7b 2e |sert("PR|OGRAM {.|
|00000580| 50 72 6f 67 4e 61 6d 65 | 2e 7d 3b 5c 4e 22 29 3b |ProgName|.};\N");|
|00000590| 0d 20 20 20 20 49 6e 73 | 65 72 74 28 22 43 4f 4e |. Ins|ert("CON|
|000005a0| 53 54 5c 6e 5c 74 7b 2e | 43 6f 6e 73 74 61 6e 74 |ST\n\t{.|Constant|
|000005b0| 73 2e 7d 3b 5c 4e 5c 4e | 22 29 3b 0d 20 20 20 20 |s.};\N\N|");. |
|000005c0| 49 6e 73 65 72 74 28 22 | 54 59 50 45 5c 6e 5c 74 |Insert("|TYPE\n\t|
|000005d0| 7b 2e 54 79 70 65 73 2e | 7d 3b 5c 4e 5c 4e 22 29 |{.Types.|};\N\N")|
|000005e0| 3b 0d 20 20 20 20 49 6e | 73 65 72 74 28 22 56 41 |;. In|sert("VA|
|000005f0| 52 5c 6e 5c 74 7b 2e 56 | 61 72 69 61 62 6c 65 73 |R\n\t{.V|ariables|
|00000600| 2e 7d 3b 5c 4e 5c 4e 22 | 29 3b 0d 20 20 20 20 49 |.};\N\N"|);. I|
|00000610| 6e 73 65 72 74 28 22 42 | 45 47 49 4e 5c 6e 5c 74 |nsert("B|EGIN\n\t|
|00000620| 7b 2e 53 74 61 74 65 6d | 65 6e 74 2e 7d 3b 5c 4e |{.Statem|ent.};\N|
|00000630| 45 4e 44 2e 22 29 3b 0d | 0d 20 20 20 20 43 61 6c |END.");.|. Cal|
|00000640| 6c 28 31 33 29 3b 0d 7d | 3b 0d 0d 2a 20 37 0d 2a |l(13);.}|;..* 7.*|
|00000650| 20 69 6e 73 65 72 74 20 | 61 20 50 52 4f 43 45 44 | insert |a PROCED|
|00000660| 55 52 45 20 74 65 6d 70 | 6c 61 74 65 0d 22 50 52 |URE temp|late."PR|
|00000670| 4f 43 45 44 55 52 45 22 | 20 7b 0d 20 20 20 20 50 |OCEDURE"| {. P|
|00000680| 75 73 68 3b 0d 20 20 20 | 20 49 6e 73 65 72 74 28 |ush;. | Insert(|
|00000690| 22 50 52 4f 43 45 44 55 | 52 45 20 7b 2e 50 72 6f |"PROCEDU|RE {.Pro|
|000006a0| 63 4e 61 6d 65 2e 7d 20 | 28 7b 2e 50 61 72 61 6d |cName.} |({.Param|
|000006b0| 65 74 65 72 73 2e 7d 29 | 3b 5c 6e 22 29 3b 0d 20 |eters.})|;\n");. |
|000006c0| 20 20 20 49 6e 73 65 72 | 74 28 22 43 4f 4e 53 54 | Inser|t("CONST|
|000006d0| 5c 6e 5c 74 7b 2e 43 6f | 6e 73 74 61 6e 74 73 2e |\n\t{.Co|nstants.|
|000006e0| 7d 3b 5c 6e 5c 54 5c 6e | 22 29 3b 0d 20 20 20 20 |};\n\T\n|");. |
|000006f0| 49 6e 73 65 72 74 28 22 | 54 59 50 45 5c 6e 5c 74 |Insert("|TYPE\n\t|
|00000700| 7b 2e 54 79 70 65 73 2e | 7d 3b 5c 6e 5c 54 5c 6e |{.Types.|};\n\T\n|
|00000710| 22 29 3b 0d 20 20 20 20 | 49 6e 73 65 72 74 28 22 |");. |Insert("|
|00000720| 56 41 52 5c 6e 5c 74 7b | 2e 56 61 72 69 61 62 6c |VAR\n\t{|.Variabl|
|00000730| 65 73 2e 7d 3b 5c 6e 5c | 54 5c 6e 22 29 3b 0d 20 |es.};\n\|T\n");. |
|00000740| 20 20 20 49 6e 73 65 72 | 74 28 22 42 45 47 49 4e | Inser|t("BEGIN|
|00000750| 5c 6e 5c 74 7b 2e 53 74 | 61 74 65 6d 65 6e 74 2e |\n\t{.St|atement.|
|00000760| 7d 3b 5c 6e 5c 54 45 4e | 44 3b 22 29 3b 0d 0d 20 |};\n\TEN|D;");.. |
|00000770| 20 20 20 43 61 6c 6c 28 | 31 33 29 3b 0d 7d 3b 0d | Call(|13);.};.|
|00000780| 0d 2a 38 0d 2a 20 69 6e | 73 65 72 74 20 61 20 42 |.*8.* in|sert a B|
|00000790| 45 47 49 4e 2d 45 4e 44 | 20 74 65 6d 70 6c 61 74 |EGIN-END| templat|
|000007a0| 65 0d 22 42 45 47 49 4e | 2f 42 22 20 7b 0d 20 20 |e."BEGIN|/B" {. |
|000007b0| 20 20 50 75 73 68 3b 0d | 20 20 20 20 49 6e 73 65 | Push;.| Inse|
|000007c0| 72 74 28 22 42 45 47 49 | 4e 5c 6e 5c 74 7b 2e 53 |rt("BEGI|N\n\t{.S|
|000007d0| 74 61 74 65 6d 65 6e 74 | 2e 7d 3b 5c 6e 5c 54 45 |tatement|.};\n\TE|
|000007e0| 4e 44 3b 22 29 3b 0d 0d | 20 20 20 20 43 61 6c 6c |ND;");..| Call|
|000007f0| 28 31 32 29 3b 0d 20 20 | 20 20 43 61 6c 6c 28 31 |(12);. | Call(1|
|00000800| 33 29 3b 0d 7d 3b 0d 0d | 2a 20 39 0d 2a 20 69 6e |3);.};..|* 9.* in|
|00000810| 73 65 72 74 20 61 20 46 | 4f 52 2d 54 4f 2d 44 4f |sert a F|OR-TO-DO|
|00000820| 20 74 65 6d 70 6c 61 74 | 65 0d 22 46 4f 52 2f 4c | templat|e."FOR/L|
|00000830| 22 20 7b 0d 20 20 20 20 | 50 75 73 68 3b 0d 20 20 |" {. |Push;. |
|00000840| 20 20 49 6e 73 65 72 74 | 28 22 46 4f 52 20 7b 2e | Insert|("FOR {.|
|00000850| 56 61 72 69 61 62 6c 65 | 2e 7d 20 3a 3d 20 7b 2e |Variable|.} := {.|
|00000860| 56 61 6c 75 65 2e 7d 20 | 54 4f 20 7b 2e 56 61 6c |Value.} |TO {.Val|
|00000870| 75 65 2e 7d 20 44 4f 5c | 6e 22 29 3b 0d 20 20 20 |ue.} DO\|n");. |
|00000880| 20 49 6e 73 65 72 74 28 | 22 5c 74 7b 2e 53 74 61 | Insert(|"\t{.Sta|
|00000890| 74 65 6d 65 6e 74 2e 7d | 3b 22 29 3b 0d 0d 20 20 |tement.}|;");.. |
|000008a0| 20 20 43 61 6c 6c 28 31 | 32 29 3b 0d 20 20 20 20 | Call(1|2);. |
|000008b0| 43 61 6c 6c 28 31 33 29 | 3b 0d 7d 3b 0d 0d 2a 20 |Call(13)|;.};..* |
|000008c0| 31 30 0d 2a 20 69 6e 73 | 65 72 74 20 61 20 43 41 |10.* ins|ert a CA|
|000008d0| 53 45 20 74 65 6d 70 6c | 61 74 65 0d 22 43 41 53 |SE templ|ate."CAS|
|000008e0| 45 22 20 7b 0d 20 20 20 | 20 50 75 73 68 3b 0d 20 |E" {. | Push;. |
|000008f0| 20 20 20 49 6e 73 65 72 | 74 28 22 43 41 53 45 20 | Inser|t("CASE |
|00000900| 7b 2e 56 61 6c 75 65 2e | 7d 20 4f 46 5c 6e 7b 2e |{.Value.|} OF\n{.|
|00000910| 43 6f 6e 73 74 61 6e 74 | 2e 7d 3a 5c 6e 5c 74 22 |Constant|.}:\n\t"|
|00000920| 29 3b 0d 20 20 20 20 49 | 6e 73 65 72 74 28 22 7b |);. I|nsert("{|
|00000930| 2e 53 74 61 74 65 6d 65 | 6e 74 2e 7d 3b 5c 6e 5c |.Stateme|nt.};\n\|
|00000940| 54 5c 6e 4f 54 48 45 52 | 57 49 53 45 5c 6e 5c 74 |T\nOTHER|WISE\n\t|
|00000950| 22 29 3b 0d 20 20 20 20 | 49 6e 73 65 72 74 28 22 |");. |Insert("|
|00000960| 7b 2e 53 74 61 74 65 6d | 65 6e 74 2e 7d 3b 5c 6e |{.Statem|ent.};\n|
|00000970| 5c 54 5c 6e 45 4e 44 3b | 22 29 3b 0d 0d 20 20 20 |\T\nEND;|");.. |
|00000980| 20 43 61 6c 6c 28 31 32 | 29 3b 0d 20 20 20 20 43 | Call(12|);. C|
|00000990| 61 6c 6c 28 31 33 29 3b | 0d 7d 3b 0d 0d 2a 20 31 |all(13);|.};..* 1|
|000009a0| 31 0d 2a 20 69 6e 73 65 | 72 74 20 61 6e 20 49 46 |1.* inse|rt an IF|
|000009b0| 2d 54 48 45 4e 2d 45 4c | 53 45 20 74 65 6d 70 6c |-THEN-EL|SE templ|
|000009c0| 61 74 65 0d 22 49 46 2f | 49 22 20 7b 0d 20 20 20 |ate."IF/|I" {. |
|000009d0| 20 50 75 73 68 3b 0d 20 | 20 20 20 49 6e 73 65 72 | Push;. | Inser|
|000009e0| 74 28 22 49 46 20 7b 2e | 43 6f 6e 64 69 74 69 6f |t("IF {.|Conditio|
|000009f0| 6e 2e 7d 5c 6e 54 48 45 | 4e 5c 6e 5c 74 7b 2e 53 |n.}\nTHE|N\n\t{.S|
|00000a00| 74 61 74 65 6d 65 6e 74 | 2e 7d 5c 6e 5c 54 22 29 |tatement|.}\n\T")|
|00000a10| 3b 0d 20 20 20 20 49 6e | 73 65 72 74 28 22 45 4c |;. In|sert("EL|
|00000a20| 53 45 5c 6e 5c 74 7b 2e | 53 74 61 74 65 6d 65 6e |SE\n\t{.|Statemen|
|00000a30| 74 2e 7d 3b 22 29 3b 0d | 0d 20 20 20 20 43 61 6c |t.};");.|. Cal|
|00000a40| 6c 28 31 32 29 3b 0d 20 | 20 20 20 43 61 6c 6c 28 |l(12);. | Call(|
|00000a50| 31 33 29 3b 0d 7d 3b 0d | 0d 2a 20 31 32 0d 2a 20 |13);.};.|.* 12.* |
|00000a60| 63 68 61 6e 67 65 20 3b | 3b 20 74 6f 20 3b 20 69 |change ;|; to ; i|
|00000a70| 66 20 61 6e 79 0d 7b 0d | 20 20 20 20 50 75 73 68 |f any.{.| Push|
|00000a80| 3b 0d 20 20 20 20 53 65 | 6c 65 63 74 28 4c 2e 2c |;. Se|lect(L.,|
|00000a90| 43 2e 2d 31 29 3b 0d 20 | 20 20 20 46 69 6e 64 28 |C.-1);. | Find(|
|00000aa0| 22 3b 3b 22 29 3b 0d 20 | 20 20 20 49 66 20 4c 2e |";;");. | If L.|
|00000ab0| 20 3d 20 4c 5b 20 7b 0d | 20 20 20 20 20 20 20 20 | = L[ {.| |
|00000ac0| 49 6e 73 65 72 74 28 22 | 3b 22 29 3b 0d 20 20 20 |Insert("|;");. |
|00000ad0| 20 7d 3b 0d 20 20 20 20 | 50 6f 70 3b 0d 7d 3b 0d | };. |Pop;.};.|
|00000ae0| 0d 2a 20 31 33 0d 2a 20 | 73 65 6c 65 63 74 20 66 |.* 13.* |select f|
|00000af0| 69 72 73 74 20 70 6c 61 | 63 65 68 6f 6c 64 65 72 |irst pla|ceholder|
|00000b00| 0d 7b 0d 20 20 20 20 50 | 6f 70 3b 0d 20 20 20 20 |.{. P|op;. |
|00000b10| 46 69 6e 64 28 22 7b 2e | 22 29 3b 0d 20 20 20 20 |Find("{.|");. |
|00000b20| 50 75 73 68 3b 0d 20 20 | 20 20 46 69 6e 64 28 22 |Push;. | Find("|
|00000b30| 2e 7d 22 29 3b 0d 20 20 | 20 20 53 65 6c 65 63 74 |.}");. | Select|
|00000b40| 28 4c 5b 2c 43 5b 20 7c | 20 4c 3a 2c 43 3a 29 21 |(L[,C[ || L:,C:)!|
|00000b50| 3b 0d 20 20 20 20 44 72 | 6f 70 3b 0d 7d 2e 00 00 |;. Dr|op;.}...|
|00000b60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b80| 00 00 01 00 00 00 02 8a | 00 00 01 8a 00 00 00 5a |........|.......Z|
|00000b90| 00 00 06 07 53 4c 33 30 | 49 4c 31 00 04 00 00 00 |....SL30|IL1.....|
|00000ba0| 24 02 0d 48 49 4c 49 54 | 45 44 4c 47 49 54 45 4d |$..HILIT|EDLGITEM|
|00000bb0| 0a 50 61 73 63 61 6c 2e | 6d 63 72 61 02 00 00 00 |.Pascal.|mcra....|
|00000bc0| 54 45 58 54 4d 45 44 54 | 00 00 00 40 00 40 00 00 |TEXTMEDT|...@.@..|
|00000bd0| 00 00 54 45 58 54 4d 45 | 44 54 00 00 00 40 00 40 |..TEXTME|DT...@.@|
|00000be0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000bf0| 00 00 9a 9e 04 b0 00 00 | 0a de 00 00 02 e4 4c 36 |........|......L6|
|00000c00| 00 11 00 00 00 fa 02 07 | 53 4c 33 33 49 4c 37 00 |........|SL33IL7.|
|00000c10| 13 00 00 01 0a 02 07 53 | 4c 33 33 49 4c 38 00 14 |.......S|L33IL8..|
|00000c20| 00 00 01 32 02 07 53 4c | 33 33 49 4c 34 00 0f 00 |...2..SL|33IL4...|
|00000c30| 00 01 58 02 07 53 4c 33 | 33 49 4c 35 00 10 00 00 |..X..SL3|3IL5....|
|00000c40| 01 74 02 07 53 4c 33 33 | 49 4c 33 00 0e 00 00 01 |.t..SL33|IL3.....|
|00000c50| 74 02 07 53 4c 33 33 49 | 4c 32 00 0d 00 00 01 74 |t..SL33I|L2.....t|
|00000c60| 02 05 53 4c 31 33 32 00 | 16 00 00 01 84 02 08 53 |..SL132.|.......S|
|00000c70| 4c 31 33 32 49 4c 32 00 | 1c 00 00 02 4a 02 08 53 |L132IL2.|....J..S|
|00000c80| 00 00 00 78 00 03 00 00 | 00 48 00 50 00 00 00 00 |...x....|.H.P....|
|00000c90| 02 f0 02 80 ff dc ff ec | 02 f4 02 94 01 02 05 28 |........|.......(|
|00000ca0| 03 fc 00 01 00 00 00 48 | 00 50 00 00 00 00 02 f0 |.......H|.P......|
|00000cb0| 02 80 00 50 00 20 02 80 | 0c 80 00 18 00 01 01 01 |...P. ..|........|
|00000cc0| 00 00 00 01 27 0f 00 01 | 01 01 00 00 00 00 00 00 |....'...|........|
|00000cd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ce0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 09 |........|........|
|00000d00| 00 09 06 4d 6f 6e 61 63 | 6f 07 53 4c 33 34 49 4c |...Monac|o.SL34IL|
|00000d10| 37 00 2d 00 00 04 3a 02 | 07 53 4c 33 34 49 4c 35 |7.-...:.|.SL34IL5|
|00000d20| 00 2a 00 00 04 4a 02 07 | 53 4c 33 34 49 4c 38 00 |.*...J..|SL34IL8.|
|00000d30| 2e 00 00 04 d2 02 07 53 | 4c 33 34 49 4c 39 00 30 |.......S|L34IL9.0|
|00000d40| 00 00 04 e2 02 07 53 4c | 33 34 49 4c 34 00 29 00 |......SL|34IL4.).|
|00000d50| 00 04 e6 02 08 53 4c 33 | 34 49 4c 31 30 00 33 00 |.....SL3|4IL10.3.|
|00000d60| 00 05 68 02 0d 44 4f 4d | 41 43 52 4f 43 48 4f 49 |..h..DOM|ACROCHOI|
|00000d70| 43 45 00 35 00 00 05 7a | 06 07 53 4c 36 34 49 4c |CE.5...z|..SL64IL|
|00000d80| 00 09 12 02 09 53 4c 31 | 33 34 49 4c 31 36 00 65 |.....SL1|34IL16.e|
|00000d90| 00 00 09 5a 02 09 53 4c | 31 33 34 49 4c 31 38 00 |...Z..SL|134IL18.|
|00000da0| 67 00 00 09 5a 02 09 53 | 4c 31 33 34 49 4c 31 37 |g...Z..S|L134IL17|
|00000db0| 00 66 00 00 09 8e 02 09 | 53 4c 31 33 34 49 4c 31 |.f......|SL134IL1|
|00000dc0| 39 00 68 00 00 09 9a 02 | 09 53 4c 31 33 34 49 4c |9.h.....|.SL134IL|
|00000dd0| 32 31 00 6b 00 00 09 e6 | 02 09 53 4c 31 33 34 49 |21.k....|..SL134I|
|00000de0| 4c 32 32 00 6c 00 00 0a | 20 02 09 53 4c 31 33 34 |L22.l...| ..SL134|
|00000df0| 49 4c 32 33 00 6d 00 00 | 0a 56 02 09 53 4c 31 33 |IL23.m..|.V..SL13|
|00000e00| 34 49 00 00 00 04 00 05 | 00 04 00 00 01 00 00 00 |4I......|........|
|00000e10| 02 8a 00 00 01 8a 00 00 | 00 5a 00 00 d2 f6 04 6a |........|.Z.....j|
|00000e20| 00 00 00 1c 00 5a 00 02 | 45 50 52 52 00 00 00 1a |.....Z..|EPRR....|
|00000e30| 45 46 4e 54 00 00 00 26 | 45 54 41 42 00 00 00 32 |EFNT...&|ETAB...2|
|00000e40| 03 ea ff ff 00 00 00 00 | 00 00 d2 3a 03 eb ff ff |........|...:....|
|00000e50| 00 00 00 7c 00 00 d2 36 | 03 ec ff ff 00 00 01 82 |...|...6|........|
|00000e60| 00 00 d2 32 00 00 00 00 | 00 00 00 00 00 00 00 00 |...2....|........|
|00000e70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+