/ Celestin Apprentice 5 / Apprentice-Release5.iso / Environments / Frontier 4.0.1 / Frontier SDK 4.0b2 / Extras / Useful Scripts & Droplets / addCopyright / addCopyright.rsrc / scpt_129

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 01 04 fe 00 02 00 00 | 00 c6 00 00 04 11 00 07 |........|........|
|00000010| 02 00 00 0f 06 47 65 6e | 65 76 61 00 00 00 00 00 |.....Gen|eva.....|
|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 09 | 00 00 00 00 00 03 00 01 |........|........|
|00000040| 00 00 06 45 00 00 a8 fd | 7a 07 a8 fd 81 d3 00 00 |...E....|z.......|
|00000050| 00 04 00 00 00 c2 01 82 | 02 b1 03 59 4c 41 4e 44 |........|...YLAND|
|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 6c 6f 63 61 |........|....loca|
|00000080| 6c 20 28 66 6f 6c 64 65 | 72 2c 20 70 72 65 66 69 |l (folde|r, prefi|
|00000090| 78 2c 20 74 65 78 74 2c | 20 66 2c 20 63 72 65 61 |x, text,| f, crea|
|000000a0| 74 65 64 64 61 74 65 2c | 20 6d 6f 64 64 61 74 65 |teddate,| moddate|
|000000b0| 29 0d 66 6f 6c 64 65 72 | 20 3d 20 66 69 6c 65 2e |).folder| = file.|
|000000c0| 66 6f 6c 64 65 72 66 72 | 6f 6d 70 61 74 68 20 28 |folderfr|ompath (|
|000000d0| 73 79 73 74 65 6d 2e 64 | 65 73 6b 73 63 72 69 70 |system.d|eskscrip|
|000000e0| 74 73 2e 70 61 74 68 29 | 0d 70 72 65 66 69 78 20 |ts.path)|.prefix |
|000000f0| 3d 20 22 5c 72 2f 2a a9 | 20 63 6f 70 79 72 69 67 |= "\r/*.| copyrig|
|00000100| 68 74 20 31 39 39 31 2d | 39 33 20 55 73 65 72 4c |ht 1991-|93 UserL|
|00000110| 61 6e 64 20 53 6f 66 74 | 77 61 72 65 2c 20 49 6e |and Soft|ware, In|
|00000120| 63 2e 20 41 6c 6c 20 52 | 49 67 68 74 73 20 52 65 |c. All R|Ights Re|
|00000130| 73 65 72 76 65 64 2e 2a | 2f 5c 72 5c 72 5c 72 22 |served.*|/\r\r\r"|
|00000140| 0d 6f 6e 20 64 65 6c 65 | 74 65 77 68 69 74 65 73 |.on dele|tewhites|
|00000150| 70 61 63 65 20 28 74 65 | 78 74 29 0d 09 6c 6f 63 |pace (te|xt)..loc|
|00000160| 61 6c 20 28 63 68 29 0d | 09 6c 6f 6f 70 0d 09 09 |al (ch).|.loop...|
|00000170| 69 66 20 73 69 7a 65 6f | 66 20 28 74 65 78 74 29 |if sizeo|f (text)|
|00000180| 20 3d 3d 20 30 0d 09 09 | 09 72 65 74 75 72 6e 20 | == 0...|.return |
|00000190| 28 22 22 29 0d 09 09 63 | 68 20 3d 20 74 65 78 74 |("")...c|h = text|
|000001a0| 20 5b 31 5d 0d 09 09 69 | 66 20 28 63 68 20 ad 20 | [1]...i|f (ch . |
|000001b0| 27 5c 72 27 29 20 61 6e | 64 20 28 63 68 20 ad 20 |'\r') an|d (ch . |
|000001c0| 27 20 27 29 20 61 6e 64 | 20 28 63 68 20 ad 20 74 |' ') and| (ch . t|
|000001d0| 61 62 29 0d 09 09 09 72 | 65 74 75 72 6e 20 28 74 |ab)....r|eturn (t|
|000001e0| 65 78 74 29 0d 09 09 74 | 65 78 74 20 3d 20 73 74 |ext)...t|ext = st|
|000001f0| 72 69 6e 67 2e 64 65 6c | 65 74 65 20 28 74 65 78 |ring.del|ete (tex|
|00000200| 74 2c 20 31 2c 20 31 29 | 0d 66 69 6c 65 6c 6f 6f |t, 1, 1)|.fileloo|
|00000210| 70 20 28 66 20 69 6e 20 | 66 6f 6c 64 65 72 2c 20 |p (f in |folder, |
|00000220| 69 6e 66 69 6e 69 74 79 | 29 0d 09 69 66 20 28 66 |infinity|)..if (f|
|00000230| 69 6c 65 2e 74 79 70 65 | 20 28 66 29 20 3d 3d 20 |ile.type| (f) == |
|00000240| 27 54 45 58 54 27 29 20 | 61 6e 64 20 28 66 69 6c |'TEXT') |and (fil|
|00000250| 65 2e 63 72 65 61 74 6f | 72 20 28 66 29 20 3d 3d |e.creato|r (f) ==|
|00000260| 20 27 4b 41 48 4c 27 29 | 0d 09 09 6d 73 67 20 28 | 'KAHL')|...msg (|
|00000270| 66 69 6c 65 2e 66 69 6c | 65 66 72 6f 6d 70 61 74 |file.fil|efrompat|
|00000280| 68 20 28 66 29 29 0d 09 | 09 63 72 65 61 74 65 64 |h (f))..|.created|
|00000290| 64 61 74 65 20 3d 20 66 | 69 6c 65 2e 63 72 65 61 |date = f|ile.crea|
|000002a0| 74 65 64 20 28 66 29 0d | 09 09 6d 6f 64 64 61 74 |ted (f).|..moddat|
|000002b0| 65 20 3d 20 66 69 6c 65 | 2e 6d 6f 64 69 66 69 65 |e = file|.modifie|
|000002c0| 64 20 28 66 29 0d 09 09 | 66 69 6c 65 2e 6f 70 65 |d (f)...|file.ope|
|000002d0| 6e 20 28 66 29 0d 09 09 | 74 65 78 74 20 3d 20 73 |n (f)...|text = s|
|000002e0| 74 72 69 6e 67 20 28 66 | 69 6c 65 2e 72 65 61 64 |tring (f|ile.read|
|000002f0| 20 28 66 2c 20 69 6e 66 | 69 6e 69 74 79 29 29 0d | (f, inf|inity)).|
|00000300| 09 09 66 69 6c 65 2e 63 | 6c 6f 73 65 20 28 66 29 |..file.c|lose (f)|
|00000310| 0d 09 09 74 65 78 74 20 | 3d 20 64 65 6c 65 74 65 |...text |= delete|
|00000320| 77 68 69 74 65 73 70 61 | 63 65 20 28 74 65 78 74 |whitespa|ce (text|
|00000330| 29 0d 09 09 69 66 20 74 | 65 78 74 20 62 65 67 69 |)...if t|ext begi|
|00000340| 6e 73 57 69 74 68 20 22 | 2f 2a a9 22 0d 09 09 09 |nsWith "|/*."....|
|00000350| 74 65 78 74 20 3d 20 73 | 74 72 69 6e 67 2e 64 65 |text = s|tring.de|
|00000360| 6c 65 74 65 20 28 74 65 | 78 74 2c 20 31 2c 20 73 |lete (te|xt, 1, s|
|00000370| 74 72 69 6e 67 2e 70 61 | 74 74 65 72 6e 4d 61 74 |tring.pa|tternMat|
|00000380| 63 68 20 28 22 5c 72 22 | 2c 20 74 65 78 74 29 29 |ch ("\r"|, text))|
|00000390| 0d 09 09 09 74 65 78 74 | 20 3d 20 64 65 6c 65 74 |....text| = delet|
|000003a0| 65 77 68 69 74 65 73 70 | 61 63 65 20 28 74 65 78 |ewhitesp|ace (tex|
|000003b0| 74 29 0d 09 09 74 65 78 | 74 20 3d 20 70 72 65 66 |t)...tex|t = pref|
|000003c0| 69 78 20 2b 20 74 65 78 | 74 0d 09 09 66 69 6c 65 |ix + tex|t...file|
|000003d0| 2e 6e 65 77 20 28 66 29 | 0d 09 09 66 69 6c 65 2e |.new (f)|...file.|
|000003e0| 73 65 74 74 79 70 65 20 | 28 66 2c 20 27 54 45 58 |settype |(f, 'TEX|
|000003f0| 54 27 29 0d 09 09 66 69 | 6c 65 2e 73 65 74 63 72 |T')...fi|le.setcr|
|00000400| 65 61 74 6f 72 20 28 66 | 2c 20 27 4b 41 48 4c 27 |eator (f|, 'KAHL'|
|00000410| 29 0d 09 09 66 69 6c 65 | 2e 6f 70 65 6e 20 28 66 |)...file|.open (f|
|00000420| 29 0d 09 09 66 69 6c 65 | 2e 77 72 69 74 65 20 28 |)...file|.write (|
|00000430| 66 2c 20 74 65 78 74 29 | 0d 09 09 66 69 6c 65 2e |f, text)|...file.|
|00000440| 63 6c 6f 73 65 20 28 66 | 29 0d 09 09 66 69 6c 65 |close (f|)...file|
|00000450| 2e 73 65 74 63 72 65 61 | 74 65 64 20 28 66 2c 20 |.setcrea|ted (f, |
|00000460| 63 72 65 61 74 65 64 64 | 61 74 65 29 0d 09 09 66 |createdd|ate)...f|
|00000470| 69 6c 65 2e 73 65 74 6d | 6f 64 69 66 69 65 64 20 |ile.setm|odified |
|00000480| 28 66 2c 20 6d 6f 64 64 | 61 74 65 29 0d 80 00 00 |(f, modd|ate)....|
|00000490| 00 00 00 80 00 00 00 00 | 00 80 00 00 00 00 00 80 |........|........|
|000004a0| 00 00 00 00 00 80 00 00 | 00 00 00 80 00 00 00 00 |........|........|
|000004b0| 00 80 00 00 00 00 00 80 | 00 00 00 00 00 80 00 00 |........|........|
|000004c0| 00 00 00 80 00 00 00 00 | 00 80 00 00 00 00 00 80 |........|........|
|000004d0| 00 00 00 00 00 80 00 00 | 00 00 00 80 00 00 00 00 |........|........|
|000004e0| 00 80 00 00 00 00 00 80 | 00 00 00 00 00 80 00 00 |........|........|
|000004f0| 00 00 00 80 00 00 00 00 | 00 80 00 00 00 00 00 80 |........|........|
|00000500| 00 00 00 00 00 80 00 00 | 00 00 00 80 00 00 00 00 |........|........|
|00000510| 00 80 00 00 00 00 00 80 | 00 00 00 00 00 80 00 00 |........|........|
|00000520| 00 00 00 80 00 00 00 00 | 00 80 00 00 00 00 00 80 |........|........|
|00000530| 00 00 00 00 00 80 00 00 | 00 00 00 80 00 00 00 00 |........|........|
|00000540| 00 80 00 00 00 00 00 80 | 00 00 00 00 00 80 00 00 |........|........|
|00000550| 00 00 00                |                         |...     |        |
+--------+-------------------------+-------------------------+--------+--------+