home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1986-01-06 | 256 b |
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
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| gt2
| Kopftext: 'FUNCTION PULL(LOW,HIGH '
| default (weak)
| |
| 100%
| disktype
| Blank disk/medium
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 46 55 4e 43 54 49 4f 4e | 20 50 55 4c 4c 28 4c 4f |FUNCTION| PULL(LO|
|00000010| 57 2c 48 49 47 48 20 3a | 20 49 4e 54 45 47 45 52 |W,HIGH :| INTEGER|
|00000020| 29 20 3a 20 49 4e 54 45 | 47 45 52 3b 0d 0a 0d 0a |) : INTE|GER;....|
|00000030| 56 41 52 20 49 20 3a 20 | 49 4e 54 45 47 45 52 3b |VAR I : |INTEGER;|
|00000040| 0d 0a 0d 0a 42 45 47 49 | 4e 0d 0a 20 20 52 45 50 |....BEGI|N.. REP|
|00000050| 45 41 54 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |EAT | |
|00000060| 20 20 20 20 20 20 7b 20 | 4b 65 65 70 20 72 65 71 | { |Keep req|
|00000070| 75 65 73 74 69 6e 67 20 | 72 61 6e 64 6f 6d 20 69 |uesting |random i|
|00000080| 6e 74 65 67 65 72 73 20 | 75 6e 74 69 6c 20 7d 0d |ntegers |until }.|
|00000090| 0a 20 20 20 20 49 20 3a | 3d 20 52 41 4e 44 4f 4d |. I :|= RANDOM|
|000000a0| 28 48 49 47 48 20 2b 20 | 31 29 3b 20 7b 20 6f 6e |(HIGH + |1); { on|
|000000b0| 65 20 66 61 6c 6c 73 20 | 62 65 74 77 65 65 6e 20 |e falls |between |
|000000c0| 4c 4f 57 20 61 6e 64 20 | 48 49 47 48 20 7d 0d 0a |LOW and |HIGH }..|
|000000d0| 20 20 55 4e 54 49 4c 20 | 49 20 3e 3d 20 4c 4f 57 | UNTIL |I >= LOW|
|000000e0| 3b 0d 0a 20 20 50 55 4c | 4c 20 3a 3d 20 49 0d 0a |;.. PUL|L := I..|
|000000f0| 45 4e 44 3b 0d 0a 1a 00 | 00 00 24 00 45 16 00 00 |END;....|..$.E...|
+--------+-------------------------+-------------------------+--------+--------+
