Liren Large Software Subsidy 5

home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 5 / 05.iso / a / a102 / 1.ddi / F_PRJECT.FPT < prev next >
FoxPro Memo File | 1993-05-20 | 2.6 KB
open in:
MacOS 8.1 |
Win98 |
DOS
view JSON data |
view as text

This file was processed as: FoxPro Memo File (other/foxProMemo).
This format is not currently supported by dexvert.
Confidence	Program	Detection	Match Type	Support
`1%`	dexvert	FoxPro Memo File `(other/foxProMemo)`	magic	Unsupported
`100%`	file	Adobe Photoshop Color swatch, version 0, 41 colors; 1st RGB space (0), w 0x40, x 0, y 0, z 0 ; 2nd RGB space (0), w 0, x 0, y 0, z 0	default (weak)
`99%`	file	FoxPro FPT, blocks size 64, next free block index 41, field type 1, field length 2103, 1st item "my_func(var1, @var2)"	default
`98%`	file	data	default
`59%`	TrID	Photoshop Action	default (weak)
`16%`	TrID	Sybase iAnywhere memo files	default
`12%`	TrID	MacBinary 1	default (weak)
`11%`	TrID	Adobe PhotoShop Brush	default (weak)
`100%`	siegfried	x-fmt/342 Microsoft FoxPro Memo	default (weak)
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 29 00 00 00 40 | 00 00 00 00 00 00 00 00 |...)...@|........|
|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 01 00 00 08 37 | 6d 79 5f 66 75 6e 63 28 |.......7|my_func(|
|00000210| 76 61 72 31 2c 20 40 76 | 61 72 32 29 0d 0a 61 70 |var1, @v|ar2)..ap|
|00000220| 70 65 6e 64 20 66 72 6f | 6d 20 6d 79 66 69 6c 65 |pend fro|m myfile|
|00000230| 2e 64 62 66 20 77 68 69 | 6c 65 20 78 3c 31 32 20 |.dbf whi|le x<12 |
|00000240| 20 20 20 20 20 20 20 20 | 20 20 20 20 0d 0a 61 70 |        |    ..ap|
|00000250| 70 65 6e 64 20 66 69 65 | 6c 64 73 20 69 64 2c 20 |pend fie|lds id, |
|00000260| 78 63 63 63 20 66 72 6f | 6d 20 78 0d 0a 42 45 47 |xccc fro|m x..BEG|
|00000270| 49 4e 20 53 45 51 55 45 | 4e 43 45 0d 0a 43 41 4c |IN SEQUE|NCE..CAL|
|00000280| 4c 20 74 68 69 73 66 69 | 6c 65 2e 62 69 6e 20 77 |L thisfi|le.bin w|
|00000290| 69 74 68 20 78 2c 79 2c | 7a 0d 0a 43 4c 45 41 52 |ith x,y,|z..CLEAR|
|000002a0| 20 73 63 72 65 65 6e 0d | 0a 43 4f 4d 4d 49 54 20 | screen.|.COMMIT |
|000002b0| 20 20 20 20 20 20 20 0d | 0a 45 4c 53 45 49 46 20 |       .|.ELSEIF |
|000002c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 0d 0a 45 |        |     ..E|
|000002d0| 58 54 45 52 4e 41 4c 20 | 70 31 2c 20 70 32 2c 20 |XTERNAL |p1, p2, |
|000002e0| 70 33 0d 0a 53 45 54 20 | 43 55 52 53 4f 52 20 4f |p3..SET |CURSOR O|
|000002f0| 4e 0d 0a 53 45 54 20 46 | 55 4e 43 54 49 4f 4e 20 |N..SET F|UNCTION |
|00000300| 78 20 74 6f 20 31 32 33 | 0d 0a 53 45 54 20 4b 45 |x to 123|..SET KE|
|00000310| 59 20 66 32 20 74 6f 20 | 61 63 63 6f 75 6e 74 73 |Y f2 to |accounts|
|00000320| 20 20 20 20 20 20 20 0d | 0a 53 45 54 20 72 65 6c |       .|.SET rel|
|00000330| 61 74 69 6f 6e 20 74 6f | 20 63 75 73 74 6f 6d 65 |ation to| custome|
|00000340| 72 20 69 6e 74 6f 20 69 | 6e 76 6f 69 63 65 73 2c |r into i|nvoices,|
|00000350| 20 74 6f 20 7a 69 70 63 | 6f 64 65 20 69 6e 74 6f | to zipc|ode into|
|00000360| 20 7a 69 70 0d 0a 53 45 | 54 20 53 4f 46 54 53 45 | zip..SE|T SOFTSE|
|00000370| 45 4b 20 6f 6e 20 20 20 | 0d 0a 53 45 54 20 57 52 |EK on   |..SET WR|
|00000380| 41 50 20 6f 6e 20 20 20 | 20 20 0d 0a 54 45 58 54 |AP on   |  ..TEXT|
|00000390| 20 74 6f 20 70 72 69 6e | 74 0d 0a 74 65 78 74 20 | to prin|t..text |
|000003a0| 74 6f 20 66 69 6c 65 20 | 0d 0a 63 61 73 65 20 6d |to file |..case m|
|000003b0| 79 3d 3d 79 6f 75 72 73 | 20 20 20 20 20 20 20 20 |y==yours|        |
|000003c0| 0d 0a 6d 65 6e 75 63 68 | 6f 69 63 65 20 3d 20 41 |..menuch|oice = A|
|000003d0| 43 48 4f 49 43 45 28 31 | 30 2c 20 31 30 2c 20 31 |CHOICE(1|0, 10, 1|
|000003e0| 32 2c 20 31 35 2c 20 70 | 61 64 29 20 20 20 20 20 |2, 15, p|ad)     |
|000003f0| 20 20 20 20 20 20 0d 0a | 3d 41 44 49 52 28 22 2a |      ..|=ADIR("*|
|00000400| 2e 64 62 66 22 2c 20 64 | 62 66 5f 66 69 6c 65 2c |.dbf", d|bf_file,|
|00000410| 20 64 79 75 6d 6d 79 2c | 20 64 62 66 5f 64 61 74 | dyummy,| dbf_dat|
|00000420| 65 29 0d 0a 3d 41 46 49 | 45 4c 44 53 28 66 6e 61 |e)..=AFI|ELDS(fna|
|00000430| 6d 65 2c 20 64 79 6d 6d | 79 20 66 6c 65 6e 29 20 |me, dymm|y flen) |
|00000440| 20 20 20 20 20 20 20 20 | 20 20 0d 0a 3d 41 46 49 |        |  ..=AFI|
|00000450| 4c 4c 28 61 6c 6f 67 69 | 63 2c 20 2e 46 2e 29 20 |LL(alogi|c, .F.) |
|00000460| 20 20 20 20 20 20 20 20 | 20 20 20 20 0d 0a 74 68 |        |    ..th|
|00000470| 69 73 20 3d 20 41 4c 54 | 44 28 30 29 20 20 20 20 |is = ALT|D(0)    |
|00000480| 20 20 20 20 20 20 20 20 | 20 20 0d 0a 79 65 61 72 |        |  ..year|
|00000490| 20 3d 20 42 49 4e 32 49 | 28 75 64 66 28 68 61 6e | = BIN2I|(udf(han|
|000004a0| 64 6c 65 64 2c 20 31 29 | 29 20 2b 63 68 72 28 30 |dled, 1)|) +chr(0|
|000004b0| 29 0d 0a 79 65 61 72 20 | 3d 20 6c 74 72 69 6d 28 |)..year |= ltrim(|
|000004c0| 73 74 72 28 42 49 4e 32 | 4c 28 6e 75 6d 5f 72 65 |str(BIN2|L(num_re|
|000004d0| 63 73 29 29 29 0d 0a 3f | 20 6c 74 72 69 6d 28 73 |cs)))..?| ltrim(s|
|000004e0| 74 72 28 42 49 4e 32 57 | 28 72 65 63 5f 73 69 7a |tr(BIN2W|(rec_siz|
|000004f0| 65 29 29 29 0d 0a 3d 44 | 42 45 44 49 54 28 34 2c |e)))..=D|BEDIT(4,|
|00000500| 20 30 2c 20 32 32 2c 20 | 37 39 2c 20 66 69 65 6c | 0, 22, |79, fiel|
|00000510| 64 5f 6c 69 73 74 2c 20 | 22 55 73 65 72 66 75 6e |d_list, |"Userfun|
|00000520| 63 22 29 20 20 20 20 20 | 20 20 20 20 20 20 20 0d |c")     |       .|
|00000530| 0a 71 72 79 5f 73 74 72 | 69 6e 67 20 3d 20 44 42 |.qry_str|ing = DB|
|00000540| 46 49 4c 54 45 52 28 29 | 20 20 20 20 20 20 20 20 |FILTER()|        |
|00000550| 20 20 0d 0a 3f 20 44 42 | 52 45 4c 41 54 49 4f 4e |  ..? DB|RELATION|
|00000560| 28 32 29 20 20 20 20 20 | 20 20 20 0d 0a 3f 20 61 |(2)     |   ..? a|
|00000570| 6c 69 61 73 28 44 42 52 | 53 45 4c 45 43 54 28 32 |lias(DBR|SELECT(2|
|00000580| 29 29 20 20 20 20 20 20 | 20 20 20 0d 0a 64 6f 20 |))      |   ..do |
|00000590| 64 65 6c 65 74 65 20 66 | 69 6c 65 20 77 69 74 68 |delete f|ile with|
|000005a0| 20 6d 79 66 69 6c 65 2e | 44 42 54 0d 0a 69 6e 64 | myfile.|DBT..ind|
|000005b0| 65 78 20 6f 6e 20 44 45 | 53 43 45 4e 44 28 73 61 |ex on DE|SCEND(sa|
|000005c0| 6c 65 73 5f 64 61 74 65 | 29 20 74 6f 20 64 61 74 |les_date|) to dat|
|000005d0| 65 5f 64 77 6e 0d 0a 3f | 20 44 4f 53 45 52 52 4f |e_dwn..?| DOSERRO|
|000005e0| 52 28 29 0d 0a 3d 45 52 | 52 4f 52 4c 45 56 45 4c |R()..=ER|RORLEVEL|
|000005f0| 28 31 29 20 20 20 0d 0a | 69 66 20 46 52 45 41 44 |(1)   ..|if FREAD|
|00000600| 28 68 61 6e 64 6c 65 2c | 20 40 62 75 66 66 65 72 |(handle,| @buffer|
|00000610| 2c 20 62 6c 6f 63 6b 29 | 20 3c 3e 20 62 6c 6f 63 |, block)| <> bloc|
|00000620| 6b 0d 0a 62 75 66 66 65 | 72 20 3d 20 46 52 45 41 |k..buffe|r = FREA|
|00000630| 44 53 54 52 28 68 61 6e | 64 6c 65 2c 20 31 36 29 |DSTR(han|dle, 16)|
|00000640| 20 0d 0a 3f 20 48 41 52 | 44 43 52 28 6e 6f 74 65 | ..? HAR|DCR(note|
|00000650| 73 29 20 0d 0a 79 65 61 | 72 20 3d 20 49 32 42 49 |s) ..yea|r = I2BI|
|00000660| 4e 28 38 38 29 0d 0a 3f | 20 49 46 28 70 61 69 64 |N(88)..?| IF(paid|
|00000670| 2c 20 73 70 61 63 65 28 | 31 30 29 2c 20 22 67 6f |, space(|10), "go|
|00000680| 20 67 65 74 20 27 65 6d | 22 29 20 20 20 20 20 20 | get 'em|")      |
|00000690| 20 20 20 20 20 20 20 20 | 20 20 0d 0a 49 66 20 2e |        |  ..If .|
|000006a0| 6e 6f 74 2e 20 66 69 6c | 65 28 22 4e 61 6d 65 2e |not. fil|e("Name.|
|000006b0| 22 20 2b 20 49 4e 44 45 | 58 45 58 54 28 29 29 0d |" + INDE|XEXT()).|
|000006c0| 0a 3f 20 49 4e 44 45 58 | 4b 45 59 28 31 29 0d 0a |.? INDEX|KEY(1)..|
|000006d0| 3f 20 49 4e 44 45 58 4f | 52 44 28 29 0d 0a 64 6f |? INDEXO|RD()..do|
|000006e0| 20 77 68 69 6c 65 20 6b | 65 79 20 3c 3e 20 32 37 | while k|ey <> 27|
|000006f0| 20 2e 41 4e 44 2e 20 28 | 21 49 53 50 52 49 4e 54 | .AND. (|!ISPRINT|
|00000700| 45 52 28 29 29 0d 0a 3f | 4c 32 42 49 4e 28 32 31 |ER())..?|L2BIN(21|
|00000710| 31 30 29 0d 0a 3f 20 4c | 41 53 54 52 45 43 28 29 |10)..? L|ASTREC()|
|00000720| 0d 0a 09 3f 20 6c 61 73 | 74 6b 65 79 28 29 0d 0a |...? las|tkey()..|
|00000730| 3d 4d 45 4d 4f 45 44 49 | 54 28 6d 65 6d 6f 2c 20 |=MEMOEDI|T(memo, |
|00000740| 35 2c 20 31 30 2c 20 32 | 30 2c 20 36 39 20 2e 46 |5, 10, 2|0, 69 .F|
|00000750| 2e 29 0d 0a 70 72 69 6e | 74 5f 6c 69 6e 65 20 3d |.)..prin|t_line =|
|00000760| 20 4d 45 4d 4f 4c 49 4e | 45 28 6e 6f 74 65 73 2c | MEMOLIN|E(notes,|
|00000770| 20 77 69 64 74 68 2c 20 | 63 75 72 72 5f 6c 69 6e | width, |curr_lin|
|00000780| 65 2c 20 74 61 62 2c 20 | 77 72 61 70 29 0d 0a 20 |e, tab, |wrap).. |
|00000790| 3f 20 4d 45 4d 4f 52 45 | 41 44 28 66 69 6c 65 29 |? MEMORE|AD(file)|
|000007a0| 20 20 20 20 0d 0a 72 65 | 70 6c 61 63 65 20 6e 6f |    ..re|place no|
|000007b0| 74 65 73 20 77 69 74 68 | 20 4d 45 4d 4f 54 52 41 |tes with| MEMOTRA|
|000007c0| 4e 28 4e 6f 74 65 73 2c | 20 22 20 22 2c 20 22 20 |N(Notes,| " ", " |
|000007d0| 22 29 0d 0a 73 74 61 74 | 75 73 20 3d 20 4d 45 4d |")..stat|us = MEM|
|000007e0| 4f 57 52 49 54 28 22 74 | 65 6d 70 2e 74 78 74 22 |OWRIT("t|emp.txt"|
|000007f0| 2c 20 6e 6f 74 65 73 29 | 0d 0a 3d 20 6d 65 6d 6f |, notes)|..= memo|
|00000800| 72 79 28 30 29 0d 0a 63 | 6f 75 6e 74 20 3d 20 4d |ry(0)..c|ount = M|
|00000810| 4c 43 4f 55 4e 54 28 6d | 65 6d 6f 2c 20 34 30 29 |LCOUNT(m|emo, 40)|
|00000820| 0d 0a 6c 6f 63 20 3d 20 | 4d 4c 50 4f 53 28 73 74 |..loc = |MLPOS(st|
|00000830| 72 69 6e 67 2c 20 6c 69 | 6e 65 5f 6c 65 6e 2c 20 |ring, li|ne_len, |
|00000840| 6c 69 6e 65 29 0d 0a 64 | 65 6c 65 74 65 20 66 69 |line)..d|elete fi|
|00000850| 6c 65 20 6d 79 66 69 6c | 65 2e 6e 64 78 0d 0a 3f |le myfil|e.ndx..?|
|00000860| 20 4e 45 54 45 52 52 28 | 29 0d 0a 3f 20 4e 45 54 | NETERR(|)..? NET|
|00000870| 4e 41 4d 45 28 29 20 20 | 20 20 20 20 20 20 20 20 |NAME()  |        |
|00000880| 20 0d 0a 3f 20 4e 45 58 | 54 4b 45 59 28 29 20 20 | ..? NEX|TKEY()  |
|00000890| 20 20 20 20 20 20 20 20 | 20 0d 0a 75 73 65 20 6d |        | ..use m|
|000008a0| 79 66 69 6c 65 2e 64 62 | 66 20 69 6e 64 65 78 20 |yfile.db|f index |
|000008b0| 6d 79 66 69 6c 65 2e 4e | 74 78 0d 0a 69 66 20 50 |myfile.N|tx..if P|
|000008c0| 43 4f 55 4e 54 28 29 3d | 30 0d 0a 3f 20 50 52 4f |COUNT()=|0..? PRO|
|000008d0| 43 4c 49 4e 45 28 29 0d | 0a 64 6f 20 68 65 6c 70 |CLINE().|.do help|
|000008e0| 20 77 69 74 68 20 50 52 | 4f 43 4e 41 4d 45 28 29 | with PR|OCNAME()|
|000008f0| 20 20 20 20 20 20 20 20 | 20 20 0d 0a 3d 52 45 41 |        |  ..=REA|
|00000900| 44 45 58 49 54 28 73 74 | 72 69 6e 67 29 0d 0a 3d |DEXIT(st|ring)..=|
|00000910| 52 45 41 44 49 4e 53 45 | 52 54 28 69 6e 73 5f 6d |READINSE|RT(ins_m|
|00000920| 6f 64 65 29 20 20 20 20 | 0d 0a 40 20 32 33 2c 20 |ode)    |..@ 23, |
|00000930| 30 20 73 61 79 20 22 47 | 65 74 66 69 65 6c 64 20 |0 say "G|etfield |
|00000940| 3d 20 22 2b 52 45 41 44 | 56 41 52 28 29 0d 0a 20 |= "+READ|VAR().. |
|00000950| 3d 20 52 45 53 54 53 43 | 52 45 45 4e 28 31 2c 20 |= RESTSC|REEN(1, |
|00000960| 31 2c 20 32 30 2c 20 34 | 30 2c 20 77 69 6e 62 75 |1, 20, 4|0, winbu|
|00000970| 66 66 29 0d 0a 77 69 6e | 62 75 66 66 20 3d 20 53 |ff)..win|buff = S|
|00000980| 41 56 45 53 43 52 45 45 | 4e 28 74 2c 20 6c 2c 20 |AVESCREE|N(t, l, |
|00000990| 62 20 2c 72 29 0d 0a 64 | 75 6d 6d 79 3d 20 53 43 |b ,r)..d|ummy= SC|
|000009a0| 52 4f 4c 4c 28 74 2c 20 | 62 2c 20 72 2c 20 6c 2c |ROLL(t, |b, r, l,|
|000009b0| 20 31 29 0d 0a 72 65 61 | 6c 20 3d 53 45 54 43 41 | 1)..rea|l =SETCA|
|000009c0| 4e 43 45 4c 28 2e 46 2e | 29 20 20 20 20 20 20 20 |NCEL(.F.|)       |
|000009d0| 0d 0a 3f 20 53 45 54 43 | 4f 4c 4f 52 28 29 20 20 |..? SETC|OLOR()  |
|000009e0| 20 20 20 20 20 0d 0a 70 | 72 6f 63 3d 53 45 54 50 |     ..p|roc=SETP|
|000009f0| 52 43 28 72 6f 77 2c 20 | 63 6f 6c 29 0d 0a 3f 20 |RC(row, |col)..? |
|00000a00| 54 4f 4e 45 28 33 30 30 | 2c 31 29 20 20 20 20 0d |TONE(300|,1)    .|
|00000a10| 0a 69 73 5f 61 72 72 3d | 74 79 70 65 28 27 76 61 |.is_arr=|type('va|
|00000a20| 27 29 0d 0a 64 6f 20 74 | 68 69 73 20 77 69 74 68 |')..do t|his with|
|00000a30| 20 57 4f 52 44 28 33 30 | 30 30 30 30 29 0d 0a 72 | WORD(30|0000)..r|
+--------+-------------------------+-------------------------+--------+--------+