ProfitPress Mega CDROM2 Shareware Freeware (MSDOS)(1992)(Eng)

home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / MAGAZINE / PCMAG / VOL11N09.ZIP / SPCCHK.SCT < prev next >
Unknown | 1992-01-26 | 3.8 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	Sound Control Module `(music/soundControl)`	ext	Supported
`100%`	file	Adobe Photoshop Color swatch, version 0, 118 colors; 1st RGB space (0), w 0x21, x 0, y 0, z 0 ; 2nd RGB space (0), w 0, x 0, y 0, z 0	default (weak)
`99%`	file	data	default
`50%`	TrID	MacBinary 1	default (weak)
`49%`	TrID	Adobe PhotoShop Brush	default (weak)
`100%`	siegfried	x-fmt/342 Microsoft FoxPro Memo	default (weak)
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 76 00 00 00 21 | 00 00 00 00 00 00 00 00 |...v...!|........|
|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 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 00 00 00 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| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000090| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|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 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000210| 00 00 00 01 00 00 00 06 | 73 70 63 63 68 6b 00 00 |........|spcchk..|
|00000220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000230| 00 00 00 00 01 00 00 00 | 1e 22 46 69 65 6c 64 20 |........|."Field |
|00000240| 53 70 61 63 65 20 55 73 | 61 67 65 20 43 61 6c 63 |Space Us|age Calc|
|00000250| 75 6c 61 74 6f 72 22 00 | 00 00 00 00 00 00 00 00 |ulator".|........|
|00000260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000270| 00 00 00 00 00 00 01 00 | 00 05 1a 50 55 42 4c 49 |........|...PUBLI|
|00000280| 43 20 6f 6c 64 65 73 63 | 2c 20 6f 6c 64 65 63 68 |C oldesc|, oldech|
|00000290| 6f 2c 20 6f 6c 64 74 61 | 6c 6b 2c 20 74 69 6e 64 |o, oldta|lk, tind|
|000002a0| 65 78 0d 0a 53 45 54 20 | 53 59 53 4d 45 4e 55 20 |ex..SET |SYSMENU |
|000002b0| 41 55 54 4f 4d 41 54 49 | 43 0d 0a 0d 0a 74 69 6e |AUTOMATI|C....tin|
|000002c0| 64 65 78 20 3d 20 22 22 | 20 20 20 20 20 20 20 20 |dex = ""|        |
|000002d0| 20 20 20 20 20 20 20 20 | 20 20 20 26 26 20 74 65 |        |   && te|
|000002e0| 6d 70 6f 72 61 72 79 20 | 69 6e 64 65 78 20 66 69 |mporary |index fi|
|000002f0| 6c 65 6e 61 6d 65 0d 0a | 6f 6c 64 65 73 63 20 3d |lename..|oldesc =|
|00000300| 20 53 45 54 28 22 45 53 | 43 41 50 45 22 29 0d 0a | SET("ES|CAPE")..|
|00000310| 53 45 54 20 45 53 43 41 | 50 45 20 4f 46 46 0d 0a |SET ESCA|PE OFF..|
|00000320| 6f 6c 64 65 63 68 6f 20 | 3d 20 53 45 54 28 22 45 |oldecho |= SET("E|
|00000330| 43 48 4f 22 29 0d 0a 53 | 45 54 20 45 43 48 4f 20 |CHO")..S|ET ECHO |
|00000340| 4f 46 46 0d 0a 6f 6c 64 | 74 61 6c 6b 20 3d 20 53 |OFF..old|talk = S|
|00000350| 45 54 28 22 54 41 4c 4b | 22 29 0d 0a 53 45 54 20 |ET("TALK|")..SET |
|00000360| 54 41 4c 4b 20 4f 46 46 | 0d 0a 0d 0a 4f 4e 20 45 |TALK OFF|....ON E|
|00000370| 52 52 4f 52 20 44 4f 20 | 53 68 75 74 64 6f 77 6e |RROR DO |Shutdown|
|00000380| 20 57 49 54 48 20 3b 0d | 0a 09 45 52 52 4f 52 28 | WITH ;.|..ERROR(|
|00000390| 29 2c 20 4d 45 53 53 41 | 47 45 28 29 2c 20 4d 45 |), MESSA|GE(), ME|
|000003a0| 53 53 41 47 45 28 31 29 | 2c 20 50 52 4f 47 52 41 |SSAGE(1)|, PROGRA|
|000003b0| 4d 28 29 2c 20 4c 49 4e | 45 4e 4f 28 29 2c 20 74 |M(), LIN|ENO(), t|
|000003c0| 69 6e 64 65 78 0d 0a 0d | 0a 2a 0d 0a 2a 20 20 44 |index...|.*..*  D|
|000003d0| 6f 20 74 68 69 73 20 66 | 6f 72 20 73 63 72 65 65 |o this f|or scree|
|000003e0| 6e 20 73 68 6f 74 0d 0a | 2a 0d 0a 49 46 20 53 52 |n shot..|*..IF SR|
|000003f0| 4f 57 53 28 29 20 3c 20 | 32 36 20 2e 41 4e 44 2e |OWS() < |26 .AND.|
|00000400| 20 53 43 4f 4c 53 28 29 | 20 3c 20 38 31 0d 0a 20 | SCOLS()| < 81.. |
|00000410| 20 43 4c 45 41 52 0d 0a | 20 20 53 45 54 20 43 4f | CLEAR..|  SET CO|
|00000420| 4c 4f 52 20 54 4f 20 57 | 2b 2f 4e 0d 0a 20 20 70 |LOR TO W|+/N..  p|
|00000430| 63 6d 61 67 3d 22 50 43 | 20 4d 61 67 61 7a 69 6e |cmag="PC| Magazin|
|00000440| 65 20 44 61 74 61 62 61 | 73 65 73 20 50 43 20 4d |e Databa|ses PC M|
|00000450| 61 67 61 7a 22 2b 3b 0d | 0a 20 20 20 20 20 20 22 |agaz"+;.|.      "|
|00000460| 69 6e 65 20 44 61 74 61 | 62 61 73 65 73 20 50 43 |ine Data|bases PC|
|00000470| 20 4d 61 67 61 7a 69 6e | 65 20 44 61 74 61 22 2b | Magazin|e Data"+|
|00000480| 3b 0d 0a 20 20 20 20 20 | 20 22 62 61 73 65 73 20 |;..     | "bases |
|00000490| 50 43 20 4d 61 67 61 7a | 69 6e 65 20 22 0d 0a 20 |PC Magaz|ine ".. |
|000004a0| 20 73 69 6e 67 6c 65 20 | 3d 20 43 48 52 28 32 31 | single |= CHR(21|
|000004b0| 38 29 2b 43 48 52 28 31 | 39 36 29 2b 43 48 52 28 |8)+CHR(1|96)+CHR(|
|000004c0| 31 39 31 29 2b 3b 0d 0a | 20 20 43 48 52 28 31 37 |191)+;..|  CHR(17|
|000004d0| 39 29 2b 43 48 52 28 32 | 31 37 29 2b 43 48 52 28 |9)+CHR(2|17)+CHR(|
|000004e0| 31 39 36 29 2b 43 48 52 | 28 31 39 32 29 2b 3b 0d |196)+CHR|(192)+;.|
|000004f0| 0a 20 20 43 48 52 28 31 | 37 39 29 0d 0a 20 20 40 |.  CHR(1|79)..  @|
|00000500| 20 31 2c 20 30 2c 20 32 | 34 2c 20 37 39 20 42 4f | 1, 0, 2|4, 79 BO|
|00000510| 58 20 73 69 6e 67 6c 65 | 2b 22 78 22 0d 0a 20 20 |X single|+"x"..  |
|00000520| 69 20 3d 20 32 0d 0a 20 | 20 44 4f 20 57 48 49 4c |i = 2.. | DO WHIL|
|00000530| 45 20 69 20 3c 3d 32 33 | 0d 0a 20 20 20 20 20 40 |E i <=23|..     @|
|00000540| 20 69 2c 31 20 53 41 59 | 20 70 63 6d 61 67 0d 0a | i,1 SAY| pcmag..|
|00000550| 20 20 20 20 20 69 20 3d | 20 69 20 2b 20 31 0d 0a |     i =| i + 1..|
|00000560| 20 20 45 4e 44 44 4f 0d | 0a 45 4e 44 49 46 0d 0a |  ENDDO.|.ENDIF..|
|00000570| 0d 0a 49 46 20 22 22 20 | 3d 20 41 4c 49 41 53 28 |..IF "" |= ALIAS(|
|00000580| 29 0d 0a 20 20 20 66 6c | 6e 20 3d 20 47 45 54 46 |)..   fl|n = GETF|
|00000590| 49 4c 45 28 22 44 42 46 | 22 2c 22 53 65 6c 65 63 |ILE("DBF|","Selec|
|000005a0| 74 20 74 68 65 20 66 69 | 6c 65 20 74 6f 20 73 70 |t the fi|le to sp|
|000005b0| 61 63 65 20 63 68 65 63 | 6b 3a 22 29 0d 0a 20 20 |ace chec|k:")..  |
|000005c0| 20 49 46 20 22 22 20 3d | 20 66 6c 6e 0d 0a 20 20 | IF "" =| fln..  |
|000005d0| 20 20 20 20 43 4c 45 41 | 52 0d 0a 20 20 20 20 20 |    CLEA|R..     |
|000005e0| 20 52 45 54 55 52 4e 0d | 0a 20 20 20 45 4c 53 45 | RETURN.|.   ELSE|
|000005f0| 0d 0a 20 20 20 20 20 20 | 55 53 45 20 28 66 6c 6e |..      |USE (fln|
|00000600| 29 0d 0a 20 20 20 45 4e | 44 49 46 0d 0a 45 4e 44 |)..   EN|DIF..END|
|00000610| 49 46 0d 0a 0d 0a 6f 6b | 62 75 74 74 6f 6e 20 3d |IF....ok|button =|
|00000620| 20 22 43 68 65 63 6b 20 | 55 73 61 67 65 22 0d 0a | "Check |Usage"..|
|00000630| 66 6c 64 76 61 72 20 3d | 20 31 20 20 20 20 20 20 |fldvar =| 1      |
|00000640| 20 20 20 26 26 20 69 6e | 69 74 69 61 6c 69 7a 65 |   && in|itialize|
|00000650| 20 74 6f 20 7a 65 72 6f | 0d 0a 66 6c 64 63 6f 75 | to zero|..fldcou|
|00000660| 6e 74 20 3d 20 41 46 49 | 45 4c 44 53 28 66 6c 64 |nt = AFI|ELDS(fld|
|00000670| 6c 69 73 74 29 0d 0a 0d | 0a 2a 0d 0a 2a 20 52 65 |list)...|.*..* Re|
|00000680| 6d 6f 76 65 20 6e 6f 6e | 2d 63 68 61 72 61 63 74 |move non|-charact|
|00000690| 65 72 20 66 69 65 6c 64 | 73 20 66 72 6f 6d 20 74 |er field|s from t|
|000006a0| 68 65 20 61 72 72 61 79 | 0d 0a 2a 20 61 6e 64 20 |he array|..* and |
|000006b0| 72 65 64 69 6d 65 6e 73 | 69 6f 6e 20 74 68 65 20 |redimens|ion the |
|000006c0| 61 72 72 61 79 0d 0a 2a | 0d 0a 58 20 3d 20 31 0d |array..*|..X = 1.|
|000006d0| 0a 44 4f 20 57 48 49 4c | 45 20 58 20 3c 3d 20 66 |.DO WHIL|E X <= f|
|000006e0| 6c 64 63 6f 75 6e 74 0d | 0a 20 20 20 49 46 20 66 |ldcount.|.   IF f|
|000006f0| 6c 64 6c 69 73 74 28 58 | 2c 32 29 20 3c 3e 20 22 |ldlist(X|,2) <> "|
|00000700| 43 22 0d 0a 20 20 20 20 | 20 20 3d 41 44 45 4c 28 |C"..    |  =ADEL(|
|00000710| 66 6c 64 6c 69 73 74 2c | 58 29 0d 0a 20 20 20 20 |fldlist,|X)..    |
|00000720| 20 20 66 6c 64 63 6f 75 | 6e 74 20 3d 20 66 6c 64 |  fldcou|nt = fld|
|00000730| 63 6f 75 6e 74 20 2d 20 | 31 0d 0a 20 20 20 45 4c |count - |1..   EL|
|00000740| 53 45 0d 0a 20 20 20 20 | 20 20 58 20 3d 20 58 20 |SE..    |  X = X |
|00000750| 2b 20 31 0d 0a 20 20 20 | 45 4e 44 49 46 0d 0a 45 |+ 1..   |ENDIF..E|
|00000760| 4e 44 44 4f 0d 0a 44 45 | 43 4c 41 52 45 20 66 6c |NDDO..DE|CLARE fl|
|00000770| 64 6c 69 73 74 5b 66 6c | 64 63 6f 75 6e 74 2c 34 |dlist[fl|dcount,4|
|00000780| 5d 20 20 20 20 26 26 20 | 72 65 64 69 6d 65 6e 73 |]    && |redimens|
|00000790| 69 6f 6e 0d 0a 00 00 00 | 00 00 00 00 00 00 01 00 |ion.....|........|
|000007a0| 00 03 0f 53 45 54 20 45 | 53 43 41 50 45 20 26 6f |...SET E|SCAPE &o|
|000007b0| 6c 64 65 73 63 0d 0a 53 | 45 54 20 54 41 4c 4b 20 |ldesc..S|ET TALK |
|000007c0| 26 6f 6c 64 74 61 6c 6b | 0d 0a 53 45 54 20 45 43 |&oldtalk|..SET EC|
|000007d0| 48 4f 20 26 6f 6c 64 65 | 63 68 6f 0d 0a 43 4c 45 |HO &olde|cho..CLE|
|000007e0| 41 52 0d 0a 0d 0a 0d 0a | 2a 2a 2a 2a 2a 2a 2a 2a |AR......|********|
|000007f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000800| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000810| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000820| 2a 2a 2a 0d 0a 2a 20 50 | 52 4f 43 45 44 55 52 45 |***..* P|ROCEDURE|
|00000830| 20 53 68 75 74 64 6f 77 | 6e 20 2d 20 43 61 6c 6c | Shutdow|n - Call|
|00000840| 65 64 20 62 79 20 4f 4e | 20 45 52 52 4f 52 0d 0a |ed by ON| ERROR..|
|00000850| 2a 0d 0a 2a 20 54 68 69 | 73 20 69 73 20 61 6e 20 |*..* Thi|s is an |
|00000860| 61 62 62 72 65 76 69 61 | 74 65 64 20 65 72 72 6f |abbrevia|ted erro|
|00000870| 72 20 68 61 6e 64 6c 65 | 72 20 74 68 61 74 20 6a |r handle|r that j|
|00000880| 75 73 74 20 63 6c 6f 73 | 65 73 0d 0a 2a 20 65 76 |ust clos|es..* ev|
|00000890| 65 72 79 74 68 69 6e 67 | 20 61 6e 64 20 63 61 6e |erything| and can|
|000008a0| 63 65 6c 73 2c 20 64 69 | 73 70 6c 61 79 69 6e 67 |cels, di|splaying|
|000008b0| 20 73 6f 6d 65 20 6d 65 | 73 73 61 67 65 73 2e 2e | some me|ssages..|
|000008c0| 2e 0d 0a 2a 0d 0a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |...*..**|********|
|000008d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000008e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000008f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000900| 2a 0d 0a 50 52 4f 43 45 | 44 55 52 45 20 53 68 75 |*..PROCE|DURE Shu|
|00000910| 74 64 6f 77 6e 0d 0a 50 | 41 52 41 4d 45 54 45 52 |tdown..P|ARAMETER|
|00000920| 20 6d 65 72 72 6f 72 2c | 20 6d 65 73 73 2c 20 6d | merror,| mess, m|
|00000930| 65 73 73 31 2c 20 6d 70 | 72 6f 67 2c 20 6d 6c 69 |ess1, mp|rog, mli|
|00000940| 6e 65 6e 6f 2c 20 74 66 | 69 6c 65 0d 0a 43 4c 4f |neno, tf|ile..CLO|
|00000950| 53 45 20 49 4e 44 45 58 | 0d 0a 43 4c 4f 53 45 20 |SE INDEX|..CLOSE |
|00000960| 44 41 54 41 42 41 53 45 | 53 0d 0a 46 4c 55 53 48 |DATABASE|S..FLUSH|
|00000970| 0d 0a 52 45 4c 45 41 53 | 45 20 57 49 4e 44 4f 57 |..RELEAS|E WINDOW|
|00000980| 20 73 70 63 63 68 6b 0d | 0a 43 4c 45 41 52 0d 0a | spcchk.|.CLEAR..|
|00000990| 3f 0d 0a 3f 20 27 45 72 | 72 6f 72 20 6e 75 6d 62 |?..? 'Er|ror numb|
|000009a0| 65 72 3a 20 27 20 2b 20 | 4c 54 52 49 4d 28 53 54 |er: ' + |LTRIM(ST|
|000009b0| 52 28 6d 65 72 72 6f 72 | 29 29 0d 0a 3f 20 27 45 |R(merror|))..? 'E|
|000009c0| 72 72 6f 72 20 6d 65 73 | 73 61 67 65 3a 20 27 20 |rror mes|sage: ' |
|000009d0| 2b 20 6d 65 73 73 0d 0a | 3f 20 27 4c 69 6e 65 20 |+ mess..|? 'Line |
|000009e0| 6f 66 20 63 6f 64 65 20 | 77 69 74 68 20 65 72 72 |of code |with err|
|000009f0| 6f 72 3a 20 27 20 2b 20 | 6d 65 73 73 31 0d 0a 3f |or: ' + |mess1..?|
|00000a00| 20 27 4c 69 6e 65 20 6e | 75 6d 62 65 72 20 6f 66 | 'Line n|umber of|
|00000a10| 20 65 72 72 6f 72 3a 20 | 27 20 2b 20 4c 54 52 49 | error: |' + LTRI|
|00000a20| 4d 28 53 54 52 28 6d 6c | 69 6e 65 6e 6f 29 29 0d |M(STR(ml|ineno)).|
|00000a30| 0a 3f 20 27 50 72 6f 67 | 72 61 6d 20 77 69 74 68 |.? 'Prog|ram with|
|00000a40| 20 65 72 72 6f 72 3a 20 | 27 20 2b 20 6d 70 72 6f | error: |' + mpro|
|00000a50| 67 20 0d 0a 0d 0a 2a 20 | 0d 0a 2a 20 49 46 20 46 |g ....* |..* IF F|
|00000a60| 49 4c 45 28 74 66 69 6c | 65 20 2b 20 22 2e 49 44 |ILE(tfil|e + ".ID|
|00000a70| 58 22 29 0d 0a 2a 20 20 | 20 44 45 4c 45 54 45 20 |X")..*  | DELETE |
|00000a80| 46 49 4c 45 20 28 74 66 | 69 6c 65 20 2b 20 22 2e |FILE (tf|ile + ".|
|00000a90| 49 44 58 22 29 0d 0a 2a | 20 45 4e 44 49 46 0d 0a |IDX")..*| ENDIF..|
|00000aa0| 0d 0a 43 41 4e 43 45 4c | 0d 0a 0d 0a 52 45 54 55 |..CANCEL|....RETU|
|00000ab0| 52 4e 00 00 00 00 01 00 | 00 00 06 66 6c 64 76 61 |RN......|...fldva|
|00000ac0| 72 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |r.......|........|
|00000ad0| 00 00 00 00 00 00 00 01 | 00 00 00 07 66 6c 64 6c |........|....fldl|
|00000ae0| 69 73 74 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |ist.....|........|
|00000af0| 00 00 00 00 00 00 00 00 | 01 00 00 00 05 22 40 5e |........|....."@^|
|00000b00| 20 22 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 | "......|........|
|00000b10| 00 00 00 00 00 00 00 00 | 00 01 00 00 00 11 22 46 |........|......"F|
|00000b20| 69 65 6c 64 20 74 6f 20 | 63 68 65 63 6b 3a 22 00 |ield to |check:".|
|00000b30| 00 00 00 00 00 00 00 00 | 00 00 01 00 00 00 08 6f |........|.......o|
|00000b40| 6b 62 75 74 74 6f 6e 00 | 00 00 00 00 00 00 00 00 |kbutton.|........|
|00000b50| 00 00 00 00 00 00 00 00 | 00 00 00 01 00 00 00 1f |........|........|
|00000b60| 22 40 2a 48 4e 20 43 68 | 65 63 6b 20 5c 3c 55 73 |"@*HN Ch|eck \<Us|
|00000b70| 61 67 65 3b 5c 3f 5c 3c | 43 61 6e 63 65 6c 22 00 |age;\?\<|Cancel".|
|00000b80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 01 00 00 |........|........|
|00000ba0| 03 63 44 4f 20 43 41 53 | 45 0d 0a 43 41 53 45 20 |.cDO CAS|E..CASE |
|00000bb0| 6f 6b 62 75 74 74 6f 6e | 20 3d 20 22 43 68 65 63 |okbutton| = "Chec|
|00000bc0| 6b 20 55 73 61 67 65 22 | 0d 0a 20 20 20 6f 6c 64 |k Usage"|..   old|
|00000bd0| 6f 72 64 20 3d 20 4f 52 | 44 45 52 28 29 0d 0a 20 |ord = OR|DER().. |
|00000be0| 20 20 74 69 6e 64 65 78 | 20 3d 20 53 59 53 28 33 |  tindex| = SYS(3|
|00000bf0| 29 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |)       |        |
|00000c00| 20 20 20 26 26 20 74 65 | 6d 70 6f 72 61 72 79 20 |   && te|mporary |
|00000c10| 66 69 6c 65 20 6e 61 6d | 65 0d 0a 20 20 20 66 6c |file nam|e..   fl|
|00000c20| 64 6e 61 6d 65 20 3d 20 | 66 6c 64 6c 69 73 74 28 |dname = |fldlist(|
|00000c30| 66 6c 64 76 61 72 2c 31 | 29 0d 0a 20 20 20 66 6c |fldvar,1|)..   fl|
|00000c40| 64 77 69 64 74 68 20 3d | 20 66 6c 64 6c 69 73 74 |dwidth =| fldlist|
|00000c50| 28 66 6c 64 76 61 72 2c | 33 29 0d 0a 20 20 20 57 |(fldvar,|3)..   W|
|00000c60| 41 49 54 20 57 49 4e 44 | 4f 57 20 22 57 6f 72 6b |AIT WIND|OW "Work|
|00000c70| 69 6e 67 2e 2e 2e 22 20 | 4e 4f 57 41 49 54 0d 0a |ing..." |NOWAIT..|
|00000c80| 20 20 20 49 4e 44 45 58 | 20 4f 4e 20 4c 45 4e 28 |   INDEX| ON LEN(|
|00000c90| 41 4c 4c 54 52 49 4d 28 | 26 66 6c 64 6e 61 6d 65 |ALLTRIM(|&fldname|
|00000ca0| 29 29 20 54 4f 20 28 74 | 69 6e 64 65 78 29 20 43 |)) TO (t|index) C|
|00000cb0| 4f 4d 50 41 43 54 0d 0a | 20 20 20 47 4f 20 42 4f |OMPACT..|   GO BO|
|00000cc0| 54 54 4f 4d 0d 0a 20 20 | 20 6d 61 78 77 69 64 20 |TTOM..  | maxwid |
|00000cd0| 3d 20 4c 45 4e 28 41 4c | 4c 54 52 49 4d 28 26 66 |= LEN(AL|LTRIM(&f|
|00000ce0| 6c 64 6e 61 6d 65 29 29 | 0d 0a 20 20 20 6d 73 67 |ldname))|..   msg|
|00000cf0| 6e 75 6d 20 3d 20 41 4c | 4c 54 52 49 4d 28 54 52 |num = AL|LTRIM(TR|
|00000d00| 41 4e 53 46 4f 52 4d 28 | 6d 61 78 77 69 64 2c 22 |ANSFORM(|maxwid,"|
|00000d10| 39 39 39 2c 39 39 39 22 | 29 29 0d 0a 20 20 20 6d |999,999"|))..   m|
|00000d20| 73 67 20 3d 20 22 4d 61 | 78 69 6d 75 6d 20 75 73 |sg = "Ma|ximum us|
|00000d30| 61 67 65 20 69 73 20 22 | 20 2b 20 6d 73 67 6e 75 |age is "| + msgnu|
|00000d40| 6d 20 2b 20 22 20 62 79 | 74 65 73 20 6f 75 74 20 |m + " by|tes out |
|00000d50| 6f 66 20 22 20 2b 20 3b | 0d 0a 20 20 20 20 20 20 |of " + ;|..      |
|00000d60| 41 4c 4c 54 52 49 4d 28 | 54 52 41 4e 53 46 4f 52 |ALLTRIM(|TRANSFOR|
|00000d70| 4d 28 66 6c 64 77 69 64 | 74 68 2c 22 39 39 39 2c |M(fldwid|th,"999,|
|00000d80| 39 39 39 22 29 29 20 2b | 20 22 2e 20 22 0d 0a 20 |999")) +| ". ".. |
|00000d90| 20 20 6d 73 67 6e 75 6d | 20 3d 20 41 4c 4c 54 52 |  msgnum| = ALLTR|
|00000da0| 49 4d 28 54 52 41 4e 53 | 46 4f 52 4d 28 52 45 43 |IM(TRANS|FORM(REC|
|00000db0| 43 4f 55 4e 54 28 29 2a | 28 66 6c 64 77 69 64 74 |COUNT()*|(fldwidt|
|00000dc0| 68 2d 6d 61 78 77 69 64 | 29 2c 22 39 2c 39 39 39 |h-maxwid|),"9,999|
|00000dd0| 2c 39 39 39 2c 39 39 39 | 22 29 29 0d 0a 20 20 20 |,999,999|"))..   |
|00000de0| 6d 73 67 20 3d 20 6d 73 | 67 20 2b 20 22 53 61 76 |msg = ms|g + "Sav|
|00000df0| 69 6e 67 73 20 70 6f 74 | 65 6e 74 69 61 6c 20 69 |ings pot|ential i|
|00000e00| 73 20 22 20 2b 20 6d 73 | 67 6e 75 6d 20 2b 20 22 |s " + ms|gnum + "|
|00000e10| 20 62 79 74 65 73 2e 22 | 0d 0a 20 20 20 57 41 49 | bytes."|..   WAI|
|00000e20| 54 20 6d 73 67 20 57 49 | 4e 44 4f 57 0d 0a 20 20 |T msg WI|NDOW..  |
|00000e30| 20 53 45 54 20 49 4e 44 | 45 58 20 54 4f 0d 0a 20 | SET IND|EX TO.. |
|00000e40| 20 20 49 46 20 22 22 20 | 3c 3e 20 6f 6c 64 6f 72 |  IF "" |<> oldor|
|00000e50| 64 0d 0a 20 20 20 20 20 | 20 53 45 54 20 49 4e 44 |d..     | SET IND|
|00000e60| 45 58 20 54 4f 20 28 6f | 6c 64 6f 72 64 29 0d 0a |EX TO (o|ldord)..|
|00000e70| 20 20 20 45 4e 44 49 46 | 0d 0a 20 20 20 44 45 4c |   ENDIF|..   DEL|
|00000e80| 45 54 45 20 46 49 4c 45 | 20 28 74 69 6e 64 65 78 |ETE FILE| (tindex|
|00000e90| 2b 22 2e 69 64 78 22 29 | 0d 0a 20 20 20 5f 43 55 |+".idx")|..   _CU|
|00000ea0| 52 4f 42 4a 20 3d 20 31 | 20 20 20 20 20 20 20 20 |ROBJ = 1|        |
|00000eb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 26 26 |        |      &&|
|00000ec0| 20 67 6f 20 62 61 63 6b | 20 74 6f 20 66 69 65 6c | go back| to fiel|
|00000ed0| 64 73 20 70 6f 70 75 70 | 0d 0a 4f 54 48 45 52 57 |ds popup|..OTHERW|
|00000ee0| 49 53 45 0d 0a 20 20 20 | 43 4c 45 41 52 20 52 45 |ISE..   |CLEAR RE|
|00000ef0| 41 44 0d 0a 45 4e 44 43 | 41 53 45 0d 0a 52 45 54 |AD..ENDC|ASE..RET|
|00000f00| 55 52 4e 0d 0a 00 00 00 | 00 00 00 00 00 00 00 00 |URN.....|........|
|00000f10| 00 00 00 00 00 00 00 00 | 01 00 00 00 0d 22 43 68 |........|....."Ch|
|00000f20| 65 63 6b 20 55 73 61 67 | 65 22                   |eck Usag|e"      |
+--------+-------------------------+-------------------------+--------+--------+