/ CD Direkt 1995 #1 / Image.iso / cdd / winanw / demo_pf / adress.prc

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 20 52 47 48 2d 50 52 4f | 46 41 4e b2 20 44 41 54 | RGH-PRO|FAN. DAT|
|00000010| 45 49 1a 20 20 20 20 20 | 20 20 20 20 20 20 20 00 |EI.     |       .|
|00000020| 12 cc 45 6e 64 65 25 2c | 4e 72 25 2c 4e 72 24 2c |..Ende%,|Nr%,Nr$,|
|00000030| 43 52 24 26 cc 4e 61 6d | 65 24 2c 56 6f 72 6e 61 |CR$&.Nam|e$,Vorna|
|00000040| 6d 65 24 2c 53 74 72 61 | 73 73 65 24 2c 4f 72 74 |me$,Stra|sse$,Ort|
|00000050| 24 2c 54 65 6c 65 66 6f | 6e 24 04 cb 39 39 39 01 |$,Telefo|n$..999.|
|00000060| 27 0b 99 22 26 41 64 72 | 65 73 73 65 22 12 96 31 |'.."&Adr|esse"..1|
|00000070| 30 31 2c 22 26 48 69 6e | 7a 75 66 fc 67 65 6e 22 |01,"&Hin|zuf.gen"|
|00000080| 0e 96 31 30 32 2c 22 26 | 53 75 63 68 65 6e 22 0d |..102,"&|Suchen".|
|00000090| 96 31 30 33 2c 22 26 4c | 69 73 74 65 22 01 97 0c |.103,"&L|iste"...|
|000000a0| 96 31 30 39 2c 22 26 45 | 6e 64 65 22 0c 94 31 33 |.109,"&E|nde"..13|
|000000b0| 30 2c 22 26 49 6e 66 6f | 22 01 27 05 8f 49 6e 66 |0,"&Info|".'..Inf|
|000000c0| 6f 22 40 40 9b 22 4d 49 | 4e 49 2d 41 44 52 45 53 |o"@@."MI|NI-ADRES|
|000000d0| 53 2d 4b 41 52 54 45 49 | 22 2c 22 49 6e 66 6f 22 |S-KARTEI|","Info"|
|000000e0| 2c 36 34 29 01 8c 01 27 | 06 8f 55 65 62 65 72 4c |,64)...'|..UeberL|
|000000f0| 40 40 9b 40 92 40 92 22 | 4d 49 4e 49 2d 41 44 52 |@@.@.@."|MINI-ADR|
|00000100| 45 53 53 2d 4b 41 52 54 | 45 49 22 2c 43 52 24 29 |ESS-KART|EI",CR$)|
|00000110| 2c 22 41 75 74 6f 72 3a | 20 52 6f 6c 61 6e 64 20 |,"Autor:| Roland |
|00000120| 47 2e 20 48 fc 6c 73 6d | 61 6e 6e 22 29 2c 22 dc |G. H.lsm|ann"),".|
|00000130| 62 65 72 20 2e 2e 2e 22 | 2c 34 38 29 01 8c 01 27 |ber ..."|,48)...'|
|00000140| 06 8f 5a 65 69 67 65 03 | cf 49 25 06 cc 54 65 78 |..Zeige.|.I%..Tex|
|00000150| 74 24 23 ce 4e 61 6d 65 | 24 3d 40 c7 22 41 44 52 |t$#.Name|$=@."ADR|
|00000160| 45 53 53 2e 44 41 54 22 | 2c 40 9a 49 25 29 2c 22 |ESS.DAT"|,@.I%),"|
|00000170| 4e 41 4d 45 22 29 29 ce | 56 6f 72 4e 61 6d 65 24 |NAME")).|VorName$|
|00000180| 3d 40 c7 22 41 44 52 45 | 53 53 2e 44 41 54 22 2c |=@."ADRE|SS.DAT",|
|00000190| 40 9a 49 25 29 2c 22 56 | 4f 52 4e 41 4d 45 22 29 |@.I%),"V|ORNAME")|
|000001a0| 29 ce 53 74 72 61 73 73 | 65 24 3d 40 c7 22 41 44 |).Strass|e$=@."AD|
|000001b0| 52 45 53 53 2e 44 41 54 | 22 2c 40 9a 49 25 29 2c |RESS.DAT|",@.I%),|
|000001c0| 22 53 54 52 41 53 53 45 | 22 29 25 ce 4f 72 74 24 |"STRASSE|")%.Ort$|
|000001d0| 3d 40 c7 22 41 44 52 45 | 53 53 2e 44 41 54 22 2c |=@."ADRE|SS.DAT",|
|000001e0| 40 9a 49 25 29 2c 22 50 | 4c 5a 5f 4f 52 54 22 29 |@.I%),"P|LZ_ORT")|
|000001f0| 29 ce 54 65 6c 65 66 6f | 6e 24 3d 40 c7 22 41 44 |).Telefo|n$=@."AD|
|00000200| 52 45 53 53 2e 44 41 54 | 22 2c 40 9a 49 25 29 2c |RESS.DAT|",@.I%),|
|00000210| 22 54 45 4c 45 46 4f 4e | 22 29 26 ce 54 65 78 74 |"TELEFON|")&.Text|
|00000220| 24 3d 40 92 40 92 40 92 | 56 6f 72 4e 61 6d 65 24 |$=@.@.@.|VorName$|
|00000230| 2c 22 20 22 29 2c 4e 61 | 6d 65 24 29 2c 43 52 24 |," "),Na|me$),CR$|
|00000240| 29 1f ce 54 65 78 74 24 | 3d 40 92 40 92 54 65 78 |)..Text$|=@.@.Tex|
|00000250| 74 24 2c 53 74 72 61 73 | 73 65 24 29 2c 43 52 24 |t$,Stras|se$),CR$|
|00000260| 29 1b ce 54 65 78 74 24 | 3d 40 92 40 92 54 65 78 |)..Text$|=@.@.Tex|
|00000270| 74 24 2c 4f 72 74 24 29 | 2c 43 52 24 29 1f ce 54 |t$,Ort$)|,CR$)..T|
|00000280| 65 78 74 24 3d 40 92 40 | 92 54 65 78 74 24 2c 54 |ext$=@.@|.Text$,T|
|00000290| 65 6c 65 66 6f 6e 24 29 | 2c 43 52 24 29 17 40 40 |elefon$)|,CR$).@@|
|000002a0| 9b 54 65 78 74 24 2c 22 | 41 44 52 45 53 53 45 3a |.Text$,"|ADRESSE:|
|000002b0| 22 2c 34 38 29 01 8c 01 | 27 0b 8f 48 69 6e 7a 75 |",48)...|'..Hinzu|
|000002c0| 66 fc 67 65 6e 04 cc 4f | 6b 25 06 ce 4f 6b 25 3d |f.gen..O|k%..Ok%=|
|000002d0| 37 26 ce 4e 72 24 3d 40 | c7 22 41 44 52 45 53 53 |7&.Nr$=@|."ADRESS|
|000002e0| 2e 44 41 54 22 2c 22 48 | 65 61 64 65 72 22 2c 22 |.DAT","H|eader","|
|000002f0| 41 6e 7a 61 68 6c 22 29 | 0b ce 4e 72 25 3d 40 bd |Anzahl")|..Nr%=@.|
|00000300| 4e 72 24 29 09 88 40 8a | 4f 6b 25 2c 37 29 01 90 |Nr$)..@.|Ok%,7)..|
|00000310| 0c e2 34 2c 34 2d 31 36 | 2c 34 30 3b 30 05 da 31 |..4,4-16|,40;0..1|
|00000320| 35 2c 31 04 be 35 2c 35 | 26 a2 22 20 20 20 20 20 |5,1..5,5|&."     |
|00000330| 20 20 20 41 64 72 65 73 | 73 65 20 68 69 6e 7a 75 |   Adres|se hinzu|
|00000340| 66 fc 67 65 6e 20 20 20 | 20 20 20 20 20 20 22 05 |f.gen   |      ".|
|00000350| da 30 2c 31 35 04 be 37 | 2c 35 0e a2 22 4e 61 63 |.0,15..7|,5.."Nac|
|00000360| 68 6e 61 6d 65 3a 20 22 | 3b 04 be 39 2c 35 0e a2 |hname: "|;..9,5..|
|00000370| 22 56 6f 72 6e 61 6d 65 | 3a 20 20 22 3b 05 be 31 |"Vorname|:  ";..1|
|00000380| 31 2c 35 0e a2 22 53 74 | 72 61 df 65 3a 20 20 20 |1,5.."St|ra.e:   |
|00000390| 22 3b 05 be 31 33 2c 35 | 0e a2 22 50 4c 5a 20 4f |";..13,5|.."PLZ O|
|000003a0| 72 74 3a 20 20 22 3b 05 | be 31 35 2c 35 0e a2 22 |rt:  ";.|.15,5.."|
|000003b0| 54 65 6c 65 66 6f 6e 3a | 20 20 22 3b 05 be 37 2c |Telefon:|  ";..7,|
|000003c0| 31 36 06 cd 4e 61 6d 65 | 24 05 be 39 2c 31 36 09 |16..Name|$..9,16.|
|000003d0| cd 56 6f 72 4e 61 6d 65 | 24 06 be 31 31 2c 31 36 |.VorName|$..11,16|
|000003e0| 09 cd 53 74 72 61 73 73 | 65 24 06 be 31 33 2c 31 |..Strass|e$..13,1|
|000003f0| 36 05 cd 4f 72 74 24 06 | be 31 35 2c 31 36 09 cd |6..Ort$.|.15,16..|
|00000400| 54 65 6c 65 66 6f 6e 24 | 37 ce 4f 6b 25 3d 40 9b |Telefon$|7.Ok%=@.|
|00000410| 22 49 73 74 20 64 69 65 | 20 41 64 72 65 73 73 65 |"Ist die| Adresse|
|00000420| 20 72 69 63 68 74 69 67 | 20 65 69 6e 67 65 62 65 | richtig| eingebe|
|00000430| 6e 3f 22 2c 22 46 72 61 | 67 65 3a 22 2c 33 35 29 |n?","Fra|ge:",35)|
|00000440| 01 8a 09 85 40 8a 4f 4b | 25 2c 36 29 21 ec 22 41 |....@.OK|%,6)!."A|
|00000450| 44 52 45 53 53 2e 44 41 | 54 22 2c 40 9a 4e 72 25 |DRESS.DA|T",@.Nr%|
|00000460| 29 2c 22 4e 41 4d 45 22 | 3d 4e 61 6d 65 24 27 ec |),"NAME"|=Name$'.|
|00000470| 22 41 44 52 45 53 53 2e | 44 41 54 22 2c 40 9a 4e |"ADRESS.|DAT",@.N|
|00000480| 72 25 29 2c 22 56 4f 52 | 4e 41 4d 45 22 3d 56 6f |r%),"VOR|NAME"=Vo|
|00000490| 72 4e 61 6d 65 24 27 ec | 22 41 44 52 45 53 53 2e |rName$'.|"ADRESS.|
|000004a0| 44 41 54 22 2c 40 9a 4e | 72 25 29 2c 22 53 54 52 |DAT",@.N|r%),"STR|
|000004b0| 41 53 53 45 22 3d 53 74 | 72 61 73 73 65 24 23 ec |ASSE"=St|rasse$#.|
|000004c0| 22 41 44 52 45 53 53 2e | 44 41 54 22 2c 40 9a 4e |"ADRESS.|DAT",@.N|
|000004d0| 72 25 29 2c 22 50 4c 5a | 5f 4f 52 54 22 3d 4f 72 |r%),"PLZ|_ORT"=Or|
|000004e0| 74 24 27 ec 22 41 44 52 | 45 53 53 2e 44 41 54 22 |t$'."ADR|ESS.DAT"|
|000004f0| 2c 40 9a 4e 72 25 29 2c | 22 54 45 4c 45 46 4f 4e |,@.Nr%),|"TELEFON|
|00000500| 22 3d 54 65 6c 65 66 6f | 6e 24 04 d0 4e 72 25 26 |"=Telefo|n$..Nr%&|
|00000510| ec 22 41 44 52 45 53 53 | 2e 44 41 54 22 2c 22 48 |."ADRESS|.DAT","H|
|00000520| 65 61 64 65 72 22 2c 22 | 41 6e 7a 61 68 6c 22 3d |eader","|Anzahl"=|
|00000530| 40 9a 4e 72 25 29 01 84 | 01 90 01 8c 01 27 06 8f |@.Nr%)..|.....'..|
|00000540| 4c 69 73 74 65 06 cc 49 | 25 2c 54 24 05 ce 49 25 |Liste..I|%,T$..I%|
|00000550| 3d 31 01 dc 0a 88 40 89 | 49 25 2c 4e 72 25 29 27 |=1....@.|I%,Nr%)'|
|00000560| ce 54 24 3d 40 92 22 20 | 20 20 20 20 20 20 20 20 |.T$=@." |        |
|00000570| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 23 22 |        |      #"|
|00000580| 2c 40 9a 49 25 29 29 4d | dd 40 92 40 92 40 92 40 |,@.I%))M|.@.@.@.@|
|00000590| c7 22 41 44 52 45 53 53 | 2e 44 41 54 22 2c 40 9a |."ADRESS|.DAT",@.|
|000005a0| 49 25 29 2c 22 4e 41 4d | 45 22 29 2c 22 2c 20 22 |I%),"NAM|E"),", "|
|000005b0| 29 2c 40 c7 22 41 44 52 | 45 53 53 2e 44 41 54 22 |),@."ADR|ESS.DAT"|
|000005c0| 2c 40 9a 49 25 29 2c 22 | 56 4f 52 4e 41 4d 45 22 |,@.I%),"|VORNAME"|
|000005d0| 29 2c 54 24 29 03 d0 49 | 25 01 8a 10 ce 54 24 3d |),T$)..I|%....T$=|
|000005e0| 40 9c 22 4e 61 6d 65 6e | 22 2c 30 29 09 85 40 8e |@."Namen|",0)..@.|
|000005f0| 54 24 2c 22 22 29 0d ce | 49 25 3d 40 97 22 23 22 |T$,"")..|I%=@."#"|
|00000600| 2c 54 24 29 17 ce 49 25 | 3d 40 bd 40 93 54 24 2c |,T$)..I%|=@.@.T$,|
|00000610| 40 81 49 25 2c 31 29 2c | 32 35 35 29 09 ff 05 5a |@.I%,1),|255)...Z|
|00000620| 45 49 47 45 49 25 01 84 | 01 8c 01 27 06 8f 53 75 |EIGEI%..|...'..Su|
|00000630| 63 68 65 11 cc 53 75 63 | 68 24 2c 54 24 2c 49 25 |che..Suc|h$,T$,I%|
|00000640| 2c 47 65 66 25 3a ce 53 | 75 63 68 24 3d 40 a0 22 |,Gef%:.S|uch$=@."|
|00000650| 4e 61 6d 65 20 28 6f 64 | 65 72 20 54 65 69 6c 29 |Name (od|er Teil)|
|00000660| 20 65 69 6e 67 65 62 65 | 6e 3a 22 2c 22 41 64 72 | eingebe|n:","Adr|
|00000670| 65 73 73 65 20 73 75 63 | 68 65 6e 22 2c 22 22 29 |esse suc|hen","")|
|00000680| 05 ce 49 25 3d 31 07 ce | 47 65 66 25 3d 30 01 dc |..I%=1..|Gef%=0..|
|00000690| 0a 88 40 89 49 25 2c 4e | 72 25 29 27 ce 54 24 3d |..@.I%,N|r%)'.T$=|
|000006a0| 40 92 22 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |@."     |        |
|000006b0| 20 20 20 20 20 20 20 20 | 20 20 23 22 2c 40 9a 49 |        |  #",@.I|
|000006c0| 25 29 29 23 ce 4e 61 6d | 65 24 3d 40 c7 22 41 44 |%))#.Nam|e$=@."AD|
|000006d0| 52 45 53 53 2e 44 41 54 | 22 2c 40 9a 49 25 29 2c |RESS.DAT|",@.I%),|
|000006e0| 22 4e 41 4d 45 22 29 19 | 85 40 97 40 a1 53 75 63 |"NAME").|.@.@.Suc|
|000006f0| 68 24 29 2c 40 a1 4e 61 | 6d 65 24 29 29 54 68 65 |h$),@.Na|me$))The|
|00000700| 6e 36 dd 40 92 40 92 40 | 92 4e 61 6d 65 24 2c 22 |n6.@.@.@|.Name$,"|
|00000710| 2c 20 22 29 2c 40 c7 22 | 41 44 52 45 53 53 2e 44 |, "),@."|ADRESS.D|
|00000720| 41 54 22 2c 40 9a 49 25 | 29 2c 22 56 4f 52 4e 41 |AT",@.I%|),"VORNA|
|00000730| 4d 45 22 29 2c 54 24 29 | 05 d0 47 65 66 25 01 84 |ME"),T$)|..Gef%..|
|00000740| 03 d0 49 25 01 8a 0a 85 | 40 8b 47 65 66 25 2c 31 |..I%....|@.Gef%,1|
|00000750| 29 10 ce 54 24 3d 40 9c | 22 4e 61 6d 65 6e 22 2c |)..T$=@.|"Namen",|
|00000760| 30 29 09 85 40 8e 54 24 | 2c 22 22 29 0d ce 49 25 |0)..@.T$|,"")..I%|
|00000770| 3d 40 97 22 23 22 2c 54 | 24 29 17 ce 49 25 3d 40 |=@."#",T|$)..I%=@|
|00000780| bd 40 93 54 24 2c 40 81 | 49 25 2c 31 29 2c 32 35 |.@.T$,@.|I%,1),25|
|00000790| 35 29 09 ff 05 5a 45 49 | 47 45 49 25 01 84 0a f3 |5)...ZEI|GEI%....|
|000007a0| 40 8a 47 65 66 25 2c 31 | 29 08 ce 54 24 3d 40 9d |@.Gef%,1|)..T$=@.|
|000007b0| 30 29 0d ce 49 25 3d 40 | 97 22 23 22 2c 54 24 29 |0)..I%=@|."#",T$)|
|000007c0| 17 ce 49 25 3d 40 bd 40 | 93 54 24 2c 40 81 49 25 |..I%=@.@|.T$,@.I%|
|000007d0| 2c 31 29 2c 32 35 35 29 | 09 ff 05 5a 45 49 47 45 |,1),255)|...ZEIGE|
|000007e0| 49 25 01 86 2b 40 40 9b | 22 41 64 72 65 73 73 65 |I%..+@@.|"Adresse|
|000007f0| 20 6e 69 63 68 74 20 67 | 65 66 75 6e 64 65 6e 21 | nicht g|efunden!|
|00000800| 22 2c 22 48 69 6e 77 65 | 69 73 3a 22 2c 36 34 29 |","Hinwe|is:",64)|
|00000810| 01 84 01 8c 01 27 0b 8f | 57 61 73 41 6e 64 65 72 |.....'..|WasAnder|
|00000820| 65 73 07 cf 50 75 6e 6b | 74 25 1e a2 22 47 65 77 |es..Punk|t%.."Gew|
|00000830| e4 68 6c 74 65 72 20 4d | 65 6e fc 70 75 6e 6b 74 |.hlter M|en.punkt|
|00000840| 20 22 3b 50 75 6e 6b 74 | 25 01 8c 01 27 01 27 01 | ";Punkt|%...'.'.|
|00000850| 27 01 27 01 27 01 90 0a | ce 43 52 24 3d 40 91 31 |'.'.'...|.CR$=@.1|
|00000860| 33 29 26 ce 4e 72 24 3d | 40 c7 22 41 44 52 45 53 |3)&.Nr$=|@."ADRES|
|00000870| 53 2e 44 41 54 22 2c 22 | 48 65 61 64 65 72 22 2c |S.DAT","|Header",|
|00000880| 22 41 6e 7a 61 68 6c 22 | 29 0b ce 4e 72 25 3d 40 |"Anzahl"|)..Nr%=@|
|00000890| bd 4e 72 24 29 09 85 40 | 8a 4e 72 25 2c 30 29 23 |.Nr$)..@|.Nr%,0)#|
|000008a0| ec 22 41 44 52 45 53 53 | 2e 44 41 54 22 2c 22 48 |."ADRESS|.DAT","H|
|000008b0| 65 61 64 65 72 22 2c 22 | 41 6e 7a 61 68 6c 22 3d |eader","|Anzahl"=|
|000008c0| 22 31 22 01 84 08 ce 45 | 6e 64 65 25 3d 30 06 89 |"1"....E|nde%=0..|
|000008d0| 45 6e 64 65 25 01 c3 07 | 85 40 b4 31 30 39 29 08 |Ende%...|.@.109).|
|000008e0| ce 45 6e 64 65 25 3d 31 | 07 f3 40 b4 31 33 30 29 |.Ende%=1|..@.130)|
|000008f0| 06 ff 04 49 4e 46 4f 07 | f3 40 b4 32 35 34 29 07 |...INFO.|.@.254).|
|00000900| ff 05 55 45 42 45 52 07 | f3 40 b4 31 30 31 29 0c |..UEBER.|.@.101).|
|00000910| ff 0a 48 49 4e 5a 55 46 | dc 47 45 4e 07 f3 40 b4 |..HINZUF|.GEN..@.|
|00000920| 31 30 32 29 07 ff 05 53 | 55 43 48 45 07 f3 40 b4 |102)...S|UCHE..@.|
|00000930| 31 30 33 29 07 ff 05 4c | 49 53 54 45 01 86 0e ff |103)...L|ISTE....|
|00000940| 0a 57 41 53 41 4e 44 45 | 52 45 53 25 8c 01 84 01 |.WASANDE|RES%....|
|00000950| 8a 01 bf 01 27          |                         |....'   |        |
+--------+-------------------------+-------------------------+--------+--------+