/ BBS in a Box 15 / BBS in a box XV-1.iso / Files / System 7 / AppleScript / TCP-IP ScriptAdd 1.1.2.sit / TCP_IP Scripting Addition 1.1.2 / Examples 1.2 / Text Versions / Finger (text)

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0d 46 69 6e 67 65 72 | 20 28 74 65 78 74 29 00 |..Finger| (text).|
|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 54 45 58 54 54 6f 79 | 53 00 00 00 00 00 00 00 |.TEXTToy|S.......|
|00000050| 00 00 00 00 00 04 2f 00 | 00 01 cf aa a2 2a e9 aa |....../.|.....*..|
|00000060| a2 2a e9 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.*......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 26 5c 00 00 |........|....&\..|
|00000080| 28 2a 0d 46 69 6e 67 65 | 72 20 31 2e 31 0d 43 6f |(*.Finge|r 1.1.Co|
|00000090| 70 79 72 69 67 68 74 20 | a9 20 31 39 39 34 20 62 |pyright |. 1994 b|
|000000a0| 79 20 41 74 75 6c 20 42 | 75 74 74 65 2e 20 41 6c |y Atul B|utte. Al|
|000000b0| 6c 20 52 69 67 68 74 73 | 20 52 65 73 65 72 76 65 |l Rights| Reserve|
|000000c0| 64 2e 0d 2a 29 0d 0d 67 | 6c 6f 62 61 6c 20 43 52 |d..*)..g|lobal CR|
|000000d0| 2c 20 4c 46 2c 20 43 52 | 4c 46 0d 73 65 74 20 4c |, LF, CR|LF.set L|
|000000e0| 46 20 74 6f 20 28 41 53 | 43 49 49 20 63 68 61 72 |F to (AS|CII char|
|000000f0| 61 63 74 65 72 20 6f 66 | 20 31 30 29 0d 73 65 74 |acter of| 10).set|
|00000100| 20 43 52 20 74 6f 20 28 | 41 53 43 49 49 20 63 68 | CR to (|ASCII ch|
|00000110| 61 72 61 63 74 65 72 20 | 6f 66 20 31 33 29 0d 73 |aracter |of 13).s|
|00000120| 65 74 20 43 52 4c 46 20 | 74 6f 20 43 52 20 26 20 |et CRLF |to CR & |
|00000130| 4c 46 0d 0d 73 65 74 20 | 64 69 61 6c 6f 67 5f 72 |LF..set |dialog_r|
|00000140| 65 73 70 6f 6e 73 65 20 | 74 6f 20 28 64 69 73 70 |esponse |to (disp|
|00000150| 6c 61 79 20 64 69 61 6c | 6f 67 20 22 45 6e 74 65 |lay dial|og "Ente|
|00000160| 72 20 74 68 65 20 6e 61 | 6d 65 20 6f 66 20 74 68 |r the na|me of th|
|00000170| 65 20 6d 61 63 68 69 6e | 65 20 74 6f 20 63 68 65 |e machin|e to che|
|00000180| 63 6b 22 20 64 65 66 61 | 75 6c 74 20 61 6e 73 77 |ck" defa|ult answ|
|00000190| 65 72 20 22 22 29 0d 69 | 66 20 28 62 75 74 74 6f |er "").i|f (butto|
|000001a0| 6e 20 72 65 74 75 72 6e | 65 64 20 6f 66 20 64 69 |n return|ed of di|
|000001b0| 61 6c 6f 67 5f 72 65 73 | 70 6f 6e 73 65 20 ad 20 |alog_res|ponse . |
|000001c0| 22 4f 4b 22 29 20 74 68 | 65 6e 0d 09 72 65 74 75 |"OK") th|en..retu|
|000001d0| 72 6e 0d 65 6c 73 65 0d | 09 73 65 74 20 65 6d 61 |rn.else.|.set ema|
|000001e0| 69 6c 5f 68 6f 73 74 20 | 74 6f 20 74 65 78 74 20 |il_host |to text |
|000001f0| 72 65 74 75 72 6e 65 64 | 20 6f 66 20 64 69 61 6c |returned| of dial|
|00000200| 6f 67 5f 72 65 73 70 6f | 6e 73 65 0d 65 6e 64 20 |og_respo|nse.end |
|00000210| 69 66 0d 0d 73 65 74 20 | 64 69 61 6c 6f 67 5f 72 |if..set |dialog_r|
|00000220| 65 73 70 6f 6e 73 65 20 | 74 6f 20 28 64 69 73 70 |esponse |to (disp|
|00000230| 6c 61 79 20 64 69 61 6c | 6f 67 20 22 45 6e 74 65 |lay dial|og "Ente|
|00000240| 72 20 74 68 65 20 65 2d | 6d 61 69 6c 20 61 64 64 |r the e-|mail add|
|00000250| 72 65 73 73 20 74 6f 20 | 63 68 65 63 6b 20 6f 6e |ress to |check on|
|00000260| 20 22 20 26 20 65 6d 61 | 69 6c 5f 68 6f 73 74 20 | " & ema|il_host |
|00000270| 64 65 66 61 75 6c 74 20 | 61 6e 73 77 65 72 20 22 |default |answer "|
|00000280| 22 29 0d 69 66 20 28 62 | 75 74 74 6f 6e 20 72 65 |").if (b|utton re|
|00000290| 74 75 72 6e 65 64 20 6f | 66 20 64 69 61 6c 6f 67 |turned o|f dialog|
|000002a0| 5f 72 65 73 70 6f 6e 73 | 65 20 ad 20 22 4f 4b 22 |_respons|e . "OK"|
|000002b0| 29 20 74 68 65 6e 0d 09 | 72 65 74 75 72 6e 0d 65 |) then..|return.e|
|000002c0| 6c 73 65 0d 09 73 65 74 | 20 65 6d 61 69 6c 5f 61 |lse..set| email_a|
|000002d0| 64 64 72 65 73 73 20 74 | 6f 20 74 65 78 74 20 72 |ddress t|o text r|
|000002e0| 65 74 75 72 6e 65 64 20 | 6f 66 20 64 69 61 6c 6f |eturned |of dialo|
|000002f0| 67 5f 72 65 73 70 6f 6e | 73 65 0d 65 6e 64 20 69 |g_respon|se.end i|
|00000300| 66 0d 0d 73 65 74 20 73 | 73 73 20 74 6f 20 28 74 |f..set s|ss to (t|
|00000310| 63 70 20 63 6f 6e 6e 65 | 63 74 20 74 6f 20 68 6f |cp conne|ct to ho|
|00000320| 73 74 20 65 6d 61 69 6c | 5f 68 6f 73 74 20 70 6f |st email|_host po|
|00000330| 72 74 20 37 39 29 0d 74 | 72 79 0d 09 74 63 70 20 |rt 79).t|ry..tcp |
|00000340| 77 72 69 74 65 20 64 61 | 74 61 20 65 6d 61 69 6c |write da|ta email|
|00000350| 5f 61 64 64 72 65 73 73 | 20 26 20 72 65 74 75 72 |_address| & retur|
|00000360| 6e 20 75 73 69 6e 67 20 | 49 53 4f 38 38 35 39 31 |n using |ISO88591|
|00000370| 20 73 74 72 65 61 6d 20 | 73 73 73 0d 09 72 65 70 | stream |sss..rep|
|00000380| 65 61 74 20 75 6e 74 69 | 6c 20 28 62 79 74 65 73 |eat unti|l (bytes|
|00000390| 20 77 61 69 74 69 6e 67 | 20 6f 66 20 28 74 63 70 | waiting| of (tcp|
|000003a0| 20 73 74 61 74 75 73 20 | 73 74 72 65 61 6d 20 73 | status |stream s|
|000003b0| 73 73 29 20 3e 20 30 29 | 0d 09 65 6e 64 20 72 65 |ss) > 0)|..end re|
|000003c0| 70 65 61 74 0d 09 73 65 | 74 20 72 65 73 70 6f 6e |peat..se|t respon|
|000003d0| 73 65 20 74 6f 20 28 74 | 63 70 20 72 65 61 64 20 |se to (t|cp read |
|000003e0| 75 73 69 6e 67 20 49 53 | 4f 38 38 35 39 31 20 73 |using IS|O88591 s|
|000003f0| 74 72 65 61 6d 20 73 73 | 73 29 0d 6f 6e 20 65 72 |tream ss|s).on er|
|00000400| 72 6f 72 0d 09 74 63 70 | 20 63 6c 6f 73 65 20 73 |ror..tcp| close s|
|00000410| 74 72 65 61 6d 20 73 73 | 73 0d 65 6e 64 20 74 72 |tream ss|s.end tr|
|00000420| 79 0d 74 63 70 20 63 6c | 6f 73 65 20 73 74 72 65 |y.tcp cl|ose stre|
|00000430| 61 6d 20 73 73 73 0d 0d | 74 65 6c 6c 20 61 70 70 |am sss..|tell app|
|00000440| 6c 69 63 61 74 69 6f 6e | 20 22 53 63 72 69 70 74 |lication| "Script|
|00000450| 61 62 6c 65 20 54 65 78 | 74 20 45 64 69 74 6f 72 |able Tex|t Editor|
|00000460| 22 0d 09 61 63 74 69 76 | 61 74 65 0d 09 6d 61 6b |"..activ|ate..mak|
|00000470| 65 20 6e 65 77 20 64 6f | 63 75 6d 65 6e 74 20 61 |e new do|cument a|
|00000480| 74 20 62 65 67 69 6e 6e | 69 6e 67 0d 09 73 65 74 |t beginn|ing..set|
|00000490| 20 73 65 6c 65 63 74 69 | 6f 6e 20 74 6f 20 72 65 | selecti|on to re|
|000004a0| 73 70 6f 6e 73 65 0d 65 | 6e 64 20 74 65 6c 6c 00 |sponse.e|nd tell.|
|000004b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000500| 00 00 01 00 00 00 01 75 | 00 00 00 75 00 00 00 5a |.......u|...u...Z|
|00000510| 00 00 00 00 00 02 00 00 | 08 01 07 00 00 00 00 06 |........|........|
|00000520| 05 00 04 00 00 00 00 06 | 05 02 07 00 00 00 00 06 |........|........|
|00000530| 0d 46 69 6e 67 65 72 20 | 28 74 65 78 74 29 02 00 |.Finger |(text)..|
|00000540| 00 00 50 61 72 74 53 49 | 54 78 00 00 00 00 00 00 |..PartSI|Tx......|
|00000550| 00 00 50 61 72 74 53 49 | 54 78 00 00 00 00 00 00 |..PartSI|Tx......|
|00000560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000570| 00 00 aa e5 26 cc 00 00 | 00 00 00 00 01 cf 00 00 |....&...|........|
|00000580| 00 00 ff ff ff ff 00 00 | 00 00 00 4a bf 96 00 00 |........|...J....|
|00000590| 00 00 00 00 00 00 ff ff | ff fb 05 72 41 4e 64 59 |........|...rANdY|
|000005a0| 13 41 62 6f 75 74 20 42 | 61 6c 6c 6f 6f 6e 20 48 |.About B|alloon H|
|000005b0| 65 6c 70 c9 00 00 00 00 | 01 2d 00 00 00 00 12 53 |elp.....|.-.....S|
|000005c0| 68 6f 77 2f 48 69 64 65 | 20 42 61 6c 6c 6f 6f 6e |how/Hide| Balloon|
|000005d0| 73 00 00 00 00 00 00 00 | 00 44 bf 97 00 00 00 00 |s.......|.D......|
|000005e0| 00 00 00 00 ff ff ff ff | 05 4d 61 75 72 61 07 48 |........|.Maura.H|
|000005f0| 69 64 65 20 5e 30 00 00 | 00 00 0b 48 69 64 65 20 |ide ^0..|...Hide |
|00000600| 00 00 00 3f 46 69 6e 67 | 65 72 20 31 2e 31 0d 43 |...?Fing|er 1.1.C|
|00000610| 6f 70 79 72 69 67 68 74 | 20 a9 20 31 39 39 34 20 |opyright| . 1994 |
|00000620| 62 79 20 41 74 75 6c 20 | 42 75 74 74 65 2e 20 41 |by Atul |Butte. A|
|00000630| 6c 6c 20 52 69 67 68 74 | 73 20 52 65 73 65 72 76 |ll Right|s Reserv|
|00000640| 65 64 2e 00 00 00 16 00 | 01 00 00 00 00 00 10 00 |ed......|........|
|00000650| 0c 00 10 00 00 00 0c 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000660| 14 00 30 00 53 01 a9 02 | 2b 00 28 00 02 01 dd 02 |..0.S...|+.(.....|
|00000670| 5d 00 00 00 00 00 00 01 | 00 00 00 01 75 00 00 00 |].......|....u...|
|00000680| 75 00 00 00 5a 00 4d cf | dc 11 44 00 00 00 1c 00 |u...Z.M.|..D.....|
|00000690| 5a 00 02 54 45 58 54 00 | 00 00 1a 73 74 79 6c 00 |Z..TEXT.|...styl.|
|000006a0| 00 00 26 57 50 6f 73 00 | 00 00 32 04 68 ff ff 00 |..&WPos.|..2.h...|
|000006b0| 00 00 00 00 4d ce 30 04 | 68 ff ff 00 00 00 43 00 |....M.0.|h.....C.|
|000006c0| 4d d3 60 00 80 ff ff 00 | 00 00 5d 00 4d d2 1c 00 |M.`.....|..].M...|
|000006d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+