/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / p / prodata / !ProData / !RunImage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 0b 4d 65 6e 75 | 4e 3d 34 0d 00 14 05 3a |....Menu|N=4....:|
|00000010| 0d 00 1e 0f ee 20 85 20 | f6 3a f1 9e 3a c8 98 0d |..... . |.:..:...|
|00000020| 00 28 05 3a 0d 00 32 14 | c8 9b 22 50 72 6f 44 3a |.(.:..2.|.."ProD:|
|00000030| 54 65 78 74 4c 69 62 22 | 0d 00 3c 13 de 20 46 69 |TextLib"|..<.. Fi|
|00000040| 65 6c 64 24 28 31 32 2c | 35 30 29 0d 00 46 12 de |eld$(12,|50)..F..|
|00000050| 20 4d 65 6e 75 24 28 4d | 65 6e 75 4e 29 0d 00 50 | Menu$(M|enuN)..P|
|00000060| 0d 4d 65 6e 75 4f 70 74 | 3d 31 0d 00 5a 05 3a 0d |.MenuOpt|=1..Z.:.|
|00000070| 00 64 0a eb 20 31 32 3a | 87 0d 00 6e 1e 4d 65 6e |.d.. 12:|...n.Men|
|00000080| 75 24 28 31 29 3d 22 43 | 72 65 61 74 65 20 6e 65 |u$(1)="C|reate ne|
|00000090| 77 20 66 69 6c 65 22 0d | 00 78 21 4d 65 6e 75 24 |w file".|.x!Menu$|
|000000a0| 28 32 29 3d 22 56 69 65 | 77 20 65 78 69 73 74 69 |(2)="Vie|w existi|
|000000b0| 6e 67 20 66 69 6c 65 22 | 0d 00 82 21 4d 65 6e 75 |ng file"|...!Menu|
|000000c0| 24 28 33 29 3d 22 45 64 | 69 74 20 65 78 69 73 74 |$(3)="Ed|it exist|
|000000d0| 69 6e 67 20 66 69 6c 65 | 22 0d 00 8c 13 4d 65 6e |ing file|"....Men|
|000000e0| 75 24 28 34 29 3d 22 51 | 75 69 74 22 0d 00 96 05 |u$(4)="Q|uit"....|
|000000f0| 3a 0d 00 a0 05 f5 0d 00 | aa 07 fb 20 32 0d 00 b4 |:.......|... 2...|
|00000100| 28 f2 54 5f 43 45 4e 54 | 52 45 28 22 50 72 6f 44 |(.T_CENT|RE("ProD|
|00000110| 61 74 61 20 2d 20 76 65 | 72 73 69 6f 6e 20 31 2e |ata - ve|rsion 1.|
|00000120| 30 22 2c 34 29 0d 00 be | 15 e3 20 6c 6f 6f 70 3d |0",4)...|.. loop=|
|00000130| 20 31 20 b8 20 4d 65 6e | 75 4e 0d 00 c8 1e e7 20 | 1 . Men|uN..... |
|00000140| 6c 6f 6f 70 3d 4d 65 6e | 75 4f 70 74 20 8c 20 fb |loop=Men|uOpt . .|
|00000150| 20 31 20 8b 20 fb 20 37 | 0d 00 d2 25 f2 54 5f 43 | 1 . . 7|...%.T_C|
|00000160| 45 4e 54 52 45 28 4d 65 | 6e 75 24 28 6c 6f 6f 70 |ENTRE(Me|nu$(loop|
|00000170| 29 2c 28 6c 6f 6f 70 2b | 33 29 2a 32 29 0d 00 dc |),(loop+|3)*2)...|
|00000180| 0a ed 20 6c 6f 6f 70 0d | 00 e6 22 e7 20 a6 2d 35 |.. loop.|..". .-5|
|00000190| 38 20 8c 20 4d 65 6e 75 | 4f 70 74 2d 3d 31 3a f2 |8 . Menu|Opt-=1:.|
|000001a0| 50 41 55 53 45 28 32 35 | 29 0d 00 f0 22 e7 20 a6 |PAUSE(25|)...". .|
|000001b0| 2d 34 32 20 8c 20 4d 65 | 6e 75 4f 70 74 2b 3d 31 |-42 . Me|nuOpt+=1|
|000001c0| 3a f2 50 41 55 53 45 28 | 32 35 29 0d 00 fa 1d e7 |:.PAUSE(|25).....|
|000001d0| 20 a6 2d 37 34 20 8c 20 | f2 50 41 55 53 45 28 33 | .-74 . |.PAUSE(3|
|000001e0| 30 29 3a f2 4d 45 4e 55 | 0d 01 04 29 e7 20 4d 65 |0):.MENU|...). Me|
|000001f0| 6e 75 4f 70 74 3c 31 20 | 8c 20 4d 65 6e 75 4f 70 |nuOpt<1 |. MenuOp|
|00000200| 74 3d 4d 65 6e 75 4e 3a | f2 50 41 55 53 45 28 35 |t=MenuN:|.PAUSE(5|
|00000210| 29 0d 01 0e 29 e7 20 4d | 65 6e 75 4f 70 74 3e 4d |)...). M|enuOpt>M|
|00000220| 65 6e 75 4e 20 8c 20 4d | 65 6e 75 4f 70 74 3d 31 |enuN . M|enuOpt=1|
|00000230| 3a f2 50 41 55 53 45 28 | 35 29 0d 01 18 07 fd 20 |:.PAUSE(|5)..... |
|00000240| a3 0d 01 22 05 3a 0d 01 | 2c 05 3a 0d 01 36 05 3a |...".:..|,.:..6.:|
|00000250| 0d 01 40 0a dd f2 4d 45 | 4e 55 0d 01 4a 15 f2 54 |..@...ME|NU..J..T|
|00000260| 5f 43 4c 45 41 52 3a f2 | 54 5f 43 4c 45 41 52 0d |_CLEAR:.|T_CLEAR.|
|00000270| 01 54 19 e7 20 4d 65 6e | 75 4f 70 74 3d 31 20 8c |.T.. Men|uOpt=1 .|
|00000280| 20 f2 43 52 45 41 54 45 | 0d 01 5e 17 e7 20 4d 65 | .CREATE|..^.. Me|
|00000290| 6e 75 4f 70 74 3d 32 20 | 8c 20 f2 56 49 45 57 0d |nuOpt=2 |. .VIEW.|
|000002a0| 01 68 17 e7 20 4d 65 6e | 75 4f 70 74 3d 33 20 8c |.h.. Men|uOpt=3 .|
|000002b0| 20 f2 45 44 49 54 0d 01 | 72 14 e7 20 4d 65 6e 75 | .EDIT..|r.. Menu|
|000002c0| 4f 70 74 3d 34 20 8c 20 | c8 98 0d 01 7c 05 e1 0d |Opt=4 . |....|...|
|000002d0| 01 86 05 3a 0d 01 90 05 | 3a 0d 01 9a 05 3a 0d 01 |...:....|:....:..|
|000002e0| a4 0c dd f2 43 52 45 41 | 54 45 0d 01 ae 07 db 3a |....CREA|TE.....:|
|000002f0| 87 0d 01 b8 07 fb 20 37 | 0d 01 c2 20 e8 8a 35 2c |...... 7|... ..5,|
|00000300| 35 29 22 45 6e 74 65 72 | 20 66 69 6c 65 6e 61 6d |5)"Enter| filenam|
|00000310| 65 22 2c 4e 61 6d 65 24 | 0d 01 cc 05 87 0d 01 d6 |e",Name$|........|
|00000320| 2e e8 8a 35 2c 36 29 22 | 45 6e 74 65 72 20 6e 75 |...5,6)"|Enter nu|
|00000330| 6d 62 65 72 20 6f 66 20 | 66 69 65 6c 64 73 20 28 |mber of |fields (|
|00000340| 6d 61 78 20 31 32 29 20 | 22 2c 46 0d 01 e0 05 87 |max 12) |",F.....|
|00000350| 0d 01 ea 2d e8 8a 35 2c | 37 29 22 45 6e 74 65 72 |...-..5,|7)"Enter|
|00000360| 20 6e 75 6d 62 65 72 20 | 6f 66 20 63 61 72 64 73 | number |of cards|
|00000370| 20 28 6d 61 78 20 35 30 | 29 20 22 2c 43 0d 01 f4 | (max 50|) ",C...|
|00000380| 11 e7 20 46 3e 31 32 20 | 8c 20 46 3d 31 32 0d 01 |.. F>12 |. F=12..|
|00000390| fe 11 e7 20 43 3e 35 30 | 20 8c 20 43 3d 35 30 0d |... C>50| . C=50.|
|000003a0| 02 08 05 3a 0d 02 12 10 | e3 20 6c 6f 6f 70 3d 31 |...:....|. loop=1|
|000003b0| 20 b8 20 46 0d 02 1c 05 | 87 0d 02 26 2b f1 8a 35 | . F....|...&+..5|
|000003c0| 2c 6c 6f 6f 70 2b 37 29 | 22 45 6e 74 65 72 20 6e |,loop+7)|"Enter n|
|000003d0| 61 6d 65 20 6f 66 20 66 | 69 65 6c 64 20 22 3b 6c |ame of f|ield ";l|
|000003e0| 6f 6f 70 3b 0d 02 30 14 | e8 20 46 69 65 6c 64 24 |oop;..0.|. Field$|
|000003f0| 28 6c 6f 6f 70 2c 30 29 | 0d 02 3a 0a ed 20 6c 6f |(loop,0)|..:.. lo|
|00000400| 6f 70 0d 02 44 05 3a 0d | 02 4e 1e 46 49 4c 45 3d |op..D.:.|.N.FILE=|
|00000410| ae 28 22 50 72 6f 44 46 | 69 6c 65 73 3a 22 2b 4e |.("ProDF|iles:"+N|
|00000420| 61 6d 65 24 29 0d 02 58 | 0e d5 23 46 49 4c 45 2c |ame$)..X|..#FILE,|
|00000430| c3 20 46 0d 02 62 0e d5 | 23 46 49 4c 45 2c c3 20 |. F..b..|#FILE,. |
|00000440| 43 0d 02 6c 10 e3 20 6c | 6f 6f 70 3d 31 20 b8 20 |C..l.. l|oop=1 . |
|00000450| 46 0d 02 76 19 d5 23 46 | 49 4c 45 2c 46 69 65 6c |F..v..#F|ILE,Fiel|
|00000460| 64 24 28 6c 6f 6f 70 2c | 30 29 0d 02 80 0a ed 20 |d$(loop,|0)..... |
|00000470| 6c 6f 6f 70 0d 02 8a 05 | 3a 0d 02 94 10 e3 20 6c |loop....|:..... l|
|00000480| 6f 6f 70 3d 31 20 b8 20 | 43 0d 02 9e 11 e3 20 6c |oop=1 . |C..... l|
|00000490| 6f 6f 70 32 3d 31 20 b8 | 20 46 0d 02 a8 0d d5 23 |oop2=1 .| F.....#|
|000004a0| 46 49 4c 45 2c 22 22 0d | 02 b2 0b ed 20 6c 6f 6f |FILE,"".|.... loo|
|000004b0| 70 32 0d 02 bc 0a ed 20 | 6c 6f 6f 70 0d 02 c6 05 |p2..... |loop....|
|000004c0| 3a 0d 02 d0 0a d9 23 46 | 49 4c 45 0d 02 da 05 3a |:.....#F|ILE....:|
|000004d0| 0d 02 e4 07 db 3a 87 0d | 02 ee 07 fb 20 31 0d 02 |.....:..|.... 1..|
|000004e0| f8 20 f2 54 5f 43 45 4e | 54 52 45 28 22 46 69 6c |. .T_CEN|TRE("Fil|
|000004f0| 65 20 63 72 65 61 74 65 | 64 22 2c 31 30 29 0d 03 |e create|d",10)..|
|00000500| 02 0e f2 50 41 55 53 45 | 28 33 30 29 0d 03 0c 05 |...PAUSE|(30)....|
|00000510| e1 0d 03 16 05 3a 0d 03 | 20 05 3a 0d 03 2a 05 3a |.....:..| .:..*.:|
|00000520| 0d 03 34 0a dd f2 56 49 | 45 57 0d 03 3e 07 db 3a |..4...VI|EW..>..:|
|00000530| 87 0d 03 48 07 fb 20 37 | 0d 03 52 17 ff 28 22 43 |...H.. 7|..R..("C|
|00000540| 61 74 20 50 72 6f 44 46 | 69 6c 65 73 3a 22 29 0d |at ProDF|iles:").|
|00000550| 03 5c 05 f1 0d 03 66 1e | e8 8a 35 29 22 45 6e 74 |.\....f.|..5)"Ent|
|00000560| 65 72 20 66 69 6c 65 6e | 61 6d 65 22 2c 4e 61 6d |er filen|ame",Nam|
|00000570| 65 24 0d 03 70 10 f2 4c | 4f 41 44 28 4e 61 6d 65 |e$..p..L|OAD(Name|
|00000580| 24 29 0d 03 7a 0d 43 73 | 65 6c 65 63 74 3d 31 0d |$)..z.Cs|elect=1.|
|00000590| 03 84 07 db 3a 87 0d 03 | 8e 05 3a 0d 03 98 05 f5 |....:...|..:.....|
|000005a0| 0d 03 a2 11 e3 20 6c 6f | 6f 70 3d 20 31 20 b8 20 |..... lo|op= 1 . |
|000005b0| 46 0d 03 ac 07 fb 20 32 | 0d 03 b6 22 f1 8a 30 2c |F..... 2|..."..0,|
|000005c0| 28 6c 6f 6f 70 2b 31 29 | 2a 32 29 3b 46 69 65 6c |(loop+1)|*2);Fiel|
|000005d0| 64 24 28 6c 6f 6f 70 2c | 30 29 0d 03 c0 07 fb 20 |d$(loop,|0)..... |
|000005e0| 37 0d 03 ca 66 f1 8a 32 | 30 2c 28 6c 6f 6f 70 2b |7...f..2|0,(loop+|
|000005f0| 31 29 2a 32 29 3b 46 69 | 65 6c 64 24 28 6c 6f 6f |1)*2);Fi|eld$(loo|
|00000600| 70 2c 43 73 65 6c 65 63 | 74 29 3b 22 20 20 20 20 |p,Cselec|t);"    |
|00000610| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000620| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000630| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000640| 20 20 20 20 20 20 22 0d | 03 d4 0a ed 20 6c 6f 6f |      ".|.... loo|
|00000650| 70 0d 03 de 07 fb 20 31 | 0d 03 e8 35 f2 54 5f 43 |p..... 1|...5.T_C|
|00000660| 45 4e 54 52 45 28 28 22 | 43 61 72 64 20 6e 6f 20 |ENTRE(("|Card no |
|00000670| 3a 20 22 2b c3 20 43 73 | 65 6c 65 63 74 2b 22 2f |: "+. Cs|elect+"/|
|00000680| 22 2b c3 20 43 2b 22 20 | 22 29 2c 31 29 0d 03 f2 |"+. C+" |"),1)...|
|00000690| 3b f2 54 5f 43 45 4e 54 | 52 45 28 22 50 72 65 73 |;.T_CENT|RE("Pres|
|000006a0| 73 20 73 70 61 63 65 20 | 74 6f 20 72 65 74 75 72 |s space |to retur|
|000006b0| 6e 20 74 6f 20 6d 61 69 | 6e 20 6d 65 6e 75 22 2c |n to mai|n menu",|
|000006c0| 28 46 2b 32 29 2a 32 29 | 0d 03 fc 1b e7 20 a6 2d |(F+2)*2)|..... .-|
|000006d0| 39 39 20 8c 20 f2 50 41 | 55 53 45 28 33 30 29 3a |99 . .PA|USE(30):|
|000006e0| db 3a e1 0d 04 06 23 e7 | 20 a6 2d 31 32 32 20 8c |.:....#.| .-122 .|
|000006f0| 20 43 73 65 6c 65 63 74 | 2b 3d 31 3a f2 50 41 55 | Cselect|+=1:.PAU|
|00000700| 53 45 28 33 30 29 0d 04 | 10 22 e7 20 a6 2d 32 36 |SE(30)..|.". .-26|
|00000710| 20 8c 20 43 73 65 6c 65 | 63 74 2d 3d 31 3a f2 50 | . Csele|ct-=1:.P|
|00000720| 41 55 53 45 28 33 30 29 | 0d 04 1a 1b e7 20 43 73 |AUSE(30)|..... Cs|
|00000730| 65 6c 65 63 74 3e 43 20 | 8c 20 43 73 65 6c 65 63 |elect>C |. Cselec|
|00000740| 74 3d 31 0d 04 24 1b e7 | 20 43 73 65 6c 65 63 74 |t=1..$..| Cselect|
|00000750| 3c 31 20 8c 20 43 73 65 | 6c 65 63 74 3d 43 0d 04 |<1 . Cse|lect=C..|
|00000760| 2e 07 fd 20 a3 0d 04 38 | 05 3a 0d 04 42 05 3a 0d |... ...8|.:..B.:.|
|00000770| 04 4c 05 3a 0d 04 56 0a | dd f2 45 44 49 54 0d 04 |.L.:..V.|..EDIT..|
|00000780| 60 07 db 3a 87 0d 04 6a | 07 fb 20 37 0d 04 74 17 |`..:...j|.. 7..t.|
|00000790| ff 28 22 43 61 74 20 50 | 72 6f 44 46 69 6c 65 73 |.("Cat P|roDFiles|
|000007a0| 3a 22 29 0d 04 7e 05 f1 | 0d 04 88 1e e8 8a 35 29 |:")..~..|......5)|
|000007b0| 22 45 6e 74 65 72 20 66 | 69 6c 65 6e 61 6d 65 22 |"Enter f|ilename"|
|000007c0| 2c 4e 61 6d 65 24 0d 04 | 92 10 f2 4c 4f 41 44 28 |,Name$..|...LOAD(|
|000007d0| 4e 61 6d 65 24 29 0d 04 | 9c 0d 43 73 65 6c 65 63 |Name$)..|..Cselec|
|000007e0| 74 3d 31 0d 04 a6 0d 46 | 73 65 6c 65 63 74 3d 31 |t=1....F|select=1|
|000007f0| 0d 04 b0 07 db 3a 87 0d | 04 ba 05 3a 0d 04 c4 05 |.....:..|...:....|
|00000800| f5 0d 04 ce 05 87 0d 04 | d8 11 e3 20 6c 6f 6f 70 |........|... loop|
|00000810| 3d 20 31 20 b8 20 46 0d | 04 e2 1e e7 20 6c 6f 6f |= 1 . F.|.... loo|
|00000820| 70 3d 46 73 65 6c 65 63 | 74 20 8c 20 fb 20 31 20 |p=Fselec|t . . 1 |
|00000830| 8b 20 fb 20 32 0d 04 ec | 22 f1 8a 30 2c 28 6c 6f |. . 2...|"..0,(lo|
|00000840| 6f 70 2b 31 29 2a 32 29 | 3b 46 69 65 6c 64 24 28 |op+1)*2)|;Field$(|
|00000850| 6c 6f 6f 70 2c 30 29 0d | 04 f6 07 fb 20 37 0d 05 |loop,0).|.... 7..|
|00000860| 00 66 f1 8a 32 30 2c 28 | 6c 6f 6f 70 2b 31 29 2a |.f..20,(|loop+1)*|
|00000870| 32 29 3b 46 69 65 6c 64 | 24 28 6c 6f 6f 70 2c 43 |2);Field|$(loop,C|
|00000880| 73 65 6c 65 63 74 29 3b | 22 20 20 20 20 20 20 20 |select);|"       |
|00000890| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000008a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000008b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000008c0| 20 20 20 22 0d 05 0a 0a | ed 20 6c 6f 6f 70 0d 05 |   "....|. loop..|
|000008d0| 14 07 fb 20 31 0d 05 1e | 35 f2 54 5f 43 45 4e 54 |... 1...|5.T_CENT|
|000008e0| 52 45 28 28 22 43 61 72 | 64 20 6e 6f 20 3a 20 22 |RE(("Car|d no : "|
|000008f0| 2b c3 20 43 73 65 6c 65 | 63 74 2b 22 2f 22 2b c3 |+. Csele|ct+"/"+.|
|00000900| 20 43 2b 22 20 22 29 2c | 31 29 0d 05 28 44 f2 54 | C+" "),|1)..(D.T|
|00000910| 5f 43 45 4e 54 52 45 28 | 22 50 72 65 73 73 20 73 |_CENTRE(|"Press s|
|00000920| 70 61 63 65 20 74 6f 20 | 73 61 76 65 20 61 6e 64 |pace to |save and|
|00000930| 20 72 65 74 75 72 6e 20 | 74 6f 20 6d 61 69 6e 20 | return |to main |
|00000940| 6d 65 6e 75 22 2c 28 46 | 2b 32 29 2a 32 29 0d 05 |menu",(F|+2)*2)..|
|00000950| 32 23 e7 20 a6 2d 39 39 | 20 8c 20 f2 50 41 55 53 |2#. .-99| . .PAUS|
|00000960| 45 28 33 30 29 3a db 3a | 87 3a f2 53 41 56 45 3a |E(30):.:|.:.SAVE:|
|00000970| e1 0d 05 3c 14 e7 20 a6 | 2d 37 34 20 8c 20 f2 43 |...<.. .|-74 . .C|
|00000980| 48 41 4e 47 45 0d 05 46 | 23 e7 20 a6 2d 31 32 32 |HANGE..F|#. .-122|
|00000990| 20 8c 20 43 73 65 6c 65 | 63 74 2b 3d 31 3a f2 50 | . Csele|ct+=1:.P|
|000009a0| 41 55 53 45 28 33 30 29 | 0d 05 50 22 e7 20 a6 2d |AUSE(30)|..P". .-|
|000009b0| 32 36 20 8c 20 43 73 65 | 6c 65 63 74 2d 3d 31 3a |26 . Cse|lect-=1:|
|000009c0| f2 50 41 55 53 45 28 33 | 30 29 0d 05 5a 22 e7 20 |.PAUSE(3|0)..Z". |
|000009d0| a6 2d 35 38 20 8c 20 46 | 73 65 6c 65 63 74 2d 3d |.-58 . F|select-=|
|000009e0| 31 3a f2 50 41 55 53 45 | 28 33 30 29 0d 05 64 22 |1:.PAUSE|(30)..d"|
|000009f0| e7 20 a6 2d 34 32 20 8c | 20 46 73 65 6c 65 63 74 |. .-42 .| Fselect|
|00000a00| 2b 3d 31 3a f2 50 41 55 | 53 45 28 33 30 29 0d 05 |+=1:.PAU|SE(30)..|
|00000a10| 6e 1b e7 20 43 73 65 6c | 65 63 74 3e 43 20 8c 20 |n.. Csel|ect>C . |
|00000a20| 43 73 65 6c 65 63 74 3d | 31 0d 05 78 1b e7 20 43 |Cselect=|1..x.. C|
|00000a30| 73 65 6c 65 63 74 3c 31 | 20 8c 20 43 73 65 6c 65 |select<1| . Csele|
|00000a40| 63 74 3d 43 0d 05 82 25 | e7 20 46 73 65 6c 65 63 |ct=C...%|. Fselec|
|00000a50| 74 3e 46 20 8c 20 46 73 | 65 6c 65 63 74 3d 31 3a |t>F . Fs|elect=1:|
|00000a60| f2 50 41 55 53 45 28 35 | 29 0d 05 8c 25 e7 20 46 |.PAUSE(5|)...%. F|
|00000a70| 73 65 6c 65 63 74 3c 31 | 20 8c 20 46 73 65 6c 65 |select<1| . Fsele|
|00000a80| 63 74 3d 46 3a f2 50 41 | 55 53 45 28 35 29 0d 05 |ct=F:.PA|USE(5)..|
|00000a90| 96 07 fd 20 a3 0d 05 a0 | 05 3a 0d 05 aa 05 3a 0d |... ....|.:....:.|
|00000aa0| 05 b4 05 3a 0d 05 be 11 | dd f2 4c 4f 41 44 28 4e |...:....|..LOAD(N|
|00000ab0| 61 6d 65 24 29 0d 05 c8 | 1a e7 20 4e 61 6d 65 24 |ame$)...|.. Name$|
|00000ac0| 3d 22 22 20 8c 20 4e 61 | 6d 65 24 3d 22 2a 22 0d |="" . Na|me$="*".|
|00000ad0| 05 d2 1e 46 49 4c 45 3d | 8e 28 22 50 72 6f 44 46 |...FILE=|.("ProDF|
|00000ae0| 69 6c 65 73 3a 22 2b 4e | 61 6d 65 24 29 0d 05 dc |iles:"+N|ame$)...|
|00000af0| 0d 46 24 3d be 23 46 49 | 4c 45 0d 05 e6 0d 43 24 |.F$=.#FI|LE....C$|
|00000b00| 3d be 23 46 49 4c 45 0d | 05 f0 0a 46 3d bb 20 46 |=.#FILE.|...F=. F|
|00000b10| 24 0d 05 fa 0a 43 3d bb | 20 43 24 0d 06 04 10 e3 |$....C=.| C$.....|
|00000b20| 20 6c 6f 6f 70 3d 30 20 | b8 20 43 0d 06 0e 11 e3 | loop=0 |. C.....|
|00000b30| 20 6c 6f 6f 70 32 3d 31 | 20 b8 20 46 0d 06 18 1d | loop2=1| . F....|
|00000b40| 46 69 65 6c 64 24 28 6c | 6f 6f 70 32 2c 6c 6f 6f |Field$(l|oop2,loo|
|00000b50| 70 29 3d be 23 46 49 4c | 45 0d 06 22 0b ed 20 6c |p)=.#FIL|E..".. l|
|00000b60| 6f 6f 70 32 0d 06 2c 0a | ed 20 6c 6f 6f 70 0d 06 |oop2..,.|. loop..|
|00000b70| 36 0a d9 23 46 49 4c 45 | 0d 06 40 05 e1 0d 06 4a |6..#FILE|..@....J|
|00000b80| 05 3a 0d 06 54 0a dd f2 | 53 41 56 45 0d 06 5e 07 |.:..T...|SAVE..^.|
|00000b90| fb 20 37 0d 06 68 20 e8 | 8a 35 2c 35 29 22 45 6e |. 7..h .|.5,5)"En|
|00000ba0| 74 65 72 20 66 69 6c 65 | 6e 61 6d 65 22 2c 4e 61 |ter file|name",Na|
|00000bb0| 6d 65 24 0d 06 72 1e 46 | 49 4c 45 3d ae 28 22 50 |me$..r.F|ILE=.("P|
|00000bc0| 72 6f 44 46 69 6c 65 73 | 3a 22 2b 4e 61 6d 65 24 |roDFiles|:"+Name$|
|00000bd0| 29 0d 06 7c 0e d5 23 46 | 49 4c 45 2c c3 20 46 0d |)..|..#F|ILE,. F.|
|00000be0| 06 86 0e d5 23 46 49 4c | 45 2c c3 20 43 0d 06 90 |....#FIL|E,. C...|
|00000bf0| 10 e3 20 6c 6f 6f 70 3d | 30 20 b8 20 43 0d 06 9a |.. loop=|0 . C...|
|00000c00| 11 e3 20 6c 6f 6f 70 32 | 3d 31 20 b8 20 46 0d 06 |.. loop2|=1 . F..|
|00000c10| a4 1d d5 23 46 49 4c 45 | 2c 46 69 65 6c 64 24 28 |...#FILE|,Field$(|
|00000c20| 6c 6f 6f 70 32 2c 6c 6f | 6f 70 29 0d 06 ae 0b ed |loop2,lo|op).....|
|00000c30| 20 6c 6f 6f 70 32 0d 06 | b8 0a ed 20 6c 6f 6f 70 | loop2..|... loop|
|00000c40| 0d 06 c2 0a d9 23 46 49 | 4c 45 0d 06 cc 07 db 3a |.....#FI|LE.....:|
|00000c50| 87 0d 06 d6 05 e1 0d 06 | e0 05 3a 0d 06 ea 05 3a |........|..:....:|
|00000c60| 0d 06 f4 05 3a 0d 06 fe | 0c dd f2 43 48 41 4e 47 |....:...|...CHANG|
|00000c70| 45 0d 07 08 07 fb 20 37 | 0d 07 12 4a f1 8a 31 39 |E..... 7|...J..19|
|00000c80| 2c 28 46 73 65 6c 65 63 | 74 2b 31 29 2a 32 29 3b |,(Fselec|t+1)*2);|
|00000c90| 22 3e 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |">      |        |
|00000ca0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000cb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000cc0| 20 22 0d 07 1c 1e 46 69 | 65 6c 64 24 28 46 73 65 | "....Fi|eld$(Fse|
|00000cd0| 6c 65 63 74 2c 43 73 65 | 6c 65 63 74 29 3d 22 22 |lect,Cse|lect)=""|
|00000ce0| 0d 07 26 36 46 69 65 6c | 64 24 28 46 73 65 6c 65 |..&6Fiel|d$(Fsele|
|00000cf0| 63 74 2c 43 73 65 6c 65 | 63 74 29 3d a4 54 5f 49 |ct,Csele|ct)=.T_I|
|00000d00| 4e 50 55 54 28 32 30 2c | 28 46 73 65 6c 65 63 74 |NPUT(20,|(Fselect|
|00000d10| 2b 31 29 2a 32 29 0d 07 | 30 1b f1 8a 31 39 2c 28 |+1)*2)..|0...19,(|
|00000d20| 46 73 65 6c 65 63 74 2b | 31 29 2a 32 29 3b 22 20 |Fselect+|1)*2);" |
|00000d30| 22 0d 07 3a 05 87 0d 07 | 44 0e f2 50 41 55 53 45 |"..:....|D..PAUSE|
|00000d40| 28 32 30 29 0d 07 4e 05 | e1 0d ff                |(20)..N.|...     |
+--------+-------------------------+-------------------------+--------+--------+