Garbo

home *** CD-ROM | disk | FTP | other *** search

/ Garbo / Garbo.cdr / mac / technote / tn256.sit / LazyPassƒ / LazyTest.p < prev next >

MacBinary | 1990-06-20 | 896 b | [TEXT/MPS ]

open in:

MacOS 8.1 extracted |

Win98 extracted |

DOS extracted

view JSON data |

view as text

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: LazyTest.p

Confidence	Program	Detection	Match Type	Support
`66%`	dexvert	ZX81 Sinclair BASIC `(image/sinclairBASIC)`	ext	Supported
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Wed Jun 20 15:57:53 1990, modified Wed Jun 20 15:57:53 1990, creator 'MPS ', type ASCII, 352 bytes "LazyTest.p" , at 0x1e0 382 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default

id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[MPS ]`

hex view

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0a 4c 61 7a 79 54 65 | 73 74 2e 70 00 00 00 00 |..LazyTe|st.p....|
|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 50 53 | 20 01 00 00 00 00 00 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 01 60 00 | 00 01 7e a2 a5 85 c1 a2 |......`.|..~.....|
|00000060| a5 85 c1 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 ca 0b 00 00 |........|........|
|00000080| 0d 50 52 4f 47 52 41 4d | 20 54 65 73 74 41 70 70 |.PROGRAM| TestApp|
|00000090| 3b 0d 0d 55 53 45 53 0d | 09 54 79 70 65 73 2c 20 |;..USES.|.Types, |
|000000a0| 52 65 73 6f 75 72 63 65 | 73 2c 20 4d 65 6d 6f 72 |Resource|s, Memor|
|000000b0| 79 2c 20 4f 53 55 74 69 | 6c 73 3b 0d 09 0d 56 41 |y, OSUti|ls;...VA|
|000000c0| 52 0d 09 61 2c 20 63 3a | 20 52 65 61 6c 3b 0d 09 |R..a, c:| Real;..|
|000000d0| 68 31 3a 20 48 61 6e 64 | 6c 65 3b 0d 09 0d 0d 09 |h1: Hand|le;.....|
|000000e0| 46 55 4e 43 54 49 4f 4e | 20 43 61 6c 6c 4d 6f 64 |FUNCTION| CallMod|
|000000f0| 75 6c 65 20 28 70 61 72 | 6d 3a 20 52 65 61 6c 3b |ule (par|m: Real;|
|00000100| 20 6d 6f 64 48 61 6e 64 | 6c 65 3a 20 48 61 6e 64 | modHand|le: Hand|
|00000110| 6c 65 29 20 3a 20 52 65 | 61 6c 3b 0d 09 49 4e 4c |le) : Re|al;..INL|
|00000120| 49 4e 45 09 24 32 30 35 | 46 2c 0d 09 09 09 24 32 |INE.$205|F,....$2|
|00000130| 30 35 30 2c 0d 09 09 09 | 24 34 45 39 30 3b 0d 09 |050,....|$4E90;..|
|00000140| 0d 09 0d 42 45 47 49 4e | 0d 09 57 72 69 74 65 28 |...BEGIN|..Write(|
|00000150| 27 43 69 72 63 75 6d 66 | 65 72 65 6e 63 65 3a 27 |'Circumf|erence:'|
|00000160| 29 3b 0d 09 52 65 61 64 | 4c 6e 28 63 29 3b 0d 09 |);..Read|Ln(c);..|
|00000170| 0d 09 68 31 20 3a 3d 20 | 47 65 74 52 65 73 6f 75 |..h1 := |GetResou|
|00000180| 72 63 65 28 27 43 55 53 | 54 27 2c 31 32 38 29 3b |rce('CUS|T',128);|
|00000190| 0d 09 48 4c 6f 63 6b 28 | 68 31 29 3b 0d 09 61 20 |..HLock(|h1);..a |
|000001a0| 3a 3d 20 43 61 6c 6c 4d | 6f 64 75 6c 65 28 63 2c |:= CallM|odule(c,|
|000001b0| 68 31 29 3b 0d 09 48 55 | 6e 6c 6f 63 6b 28 68 31 |h1);..HU|nlock(h1|
|000001c0| 29 3b 0d 09 0d 09 57 72 | 69 74 65 4c 6e 28 27 41 |);....Wr|iteLn('A|
|000001d0| 72 65 61 3a 20 27 2c 61 | 29 3b 0d 45 4e 44 2e 0d |rea: ',a|);.END..|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 01 00 00 00 01 4c | 00 00 00 4c 00 00 00 32 |.......L|...L...2|
|00000210| 30 30 31 35 2c 24 41 38 | 38 46 3b 0d 46 55 4e 43 |0015,$A8|8F;.FUNC|
|00000220| 54 49 4f 4e 20 4d 46 46 | 72 65 65 4d 65 6d 3a 20 |TION MFF|reeMem: |
|00000230| 0a 4c 61 7a 79 54 65 73 | 74 2e 70 54 02 00 00 00 |.LazyTes|t.pT....|
|00000240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000270| 00 00 a3 20 02 9e 00 00 | 00 00 00 00 01 7e 3b 56 |... ....|.....~;V|
|00000280| 41 52 20 72 65 73 75 6c | 74 43 6f 64 65 3a 20 4f |AR resul|tCode: O|
|00000290| 53 45 72 72 29 3a 20 48 | 61 6e 64 6c 65 3b 0d 09 |SErr): H|andle;..|
|000002a0| 49 4e 4c 49 4e 45 20 24 | 33 46 33 43 2c 24 30 30 |INLINE $|3F3C,$00|
|000002b0| 31 44 2c 24 41 38 38 46 | 3b 0d 50 52 4f 43 45 44 |1D,$A88F|;.PROCED|
|000002c0| 55 52 45 20 4d 46 54 65 | 6d 70 48 4c 6f 63 6b 28 |URE MFTe|mpHLock(|
|000002d0| 68 3a 20 48 61 6e 64 6c | 65 3b 56 41 52 20 72 65 |h: Handl|e;VAR re|
|000002e0| 73 75 6c 74 43 6f 64 65 | 3a 20 4f 53 45 72 72 29 |sultCode|: OSErr)|
|000002f0| 3b 0d 09 49 4e 4c 49 4e | 45 20 24 33 46 33 43 2c |;..INLIN|E $3F3C,|
|00000300| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 63 3a 20 |...H..Mo|naco.c: |
|00000310| 52 65 61 6c 3b 0d 09 68 | 3a 20 48 61 6e 64 6c 65 |Real;..h|: Handle|
|00000320| 3b 0d 0d 0d 09 46 00 06 | 00 04 01 b7 01 02 03 4a |;....F..|.......J|
|00000330| 02 c8 01 b7 01 02 03 4a | 02 c8 a2 a5 4d 81 00 00 |.......J|....M...|
|00000340| 00 00 00 00 00 00 00 00 | 00 00 01 00 00 00 01 00 |........|........|
|00000350| 00 00 01 4c 00 00 00 4c | 00 00 00 32 00 4e a6 c4 |...L...L|...2.N..|
|00000360| 05 84 00 00 00 1c 00 32 | 00 00 4d 50 53 52 00 00 |.......2|..MPSR..|
|00000370| 00 0a 03 ed ff ff 00 00 | 00 00 00 50 4b e8 00 00 |........|...PK...|
+--------+-------------------------+-------------------------+--------+--------+