/ CP/M / CPM_CDROM.iso / cpm / utils / datestmp / dscresv1.lbr

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 20 20 20 20 20 20 20 | 20 20 20 20 00 00 01 00 |.       |    ....|
|00000010| d6 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 41 4c 49 41 53 45 58 | 41 4d 50 4c 01 00 01 00 |.ALIASEX|AMPL....|
|00000030| a5 90 5e 0e 00 00 00 00 | 00 00 00 00 00 00 00 00 |..^.....|........|
|00000040| 00 44 53 43 52 45 53 41 | 56 43 4f 4d 02 00 0b 00 |.DSCRESA|VCOM....|
|00000050| 05 b8 5e 0e 00 00 00 00 | 00 00 00 00 00 00 00 00 |..^.....|........|
|00000060| 00 52 45 41 44 20 20 20 | 20 4d 45 20 0d 00 09 00 |.READ   | ME ....|
|00000070| 35 b1 5e 0e 00 00 00 00 | 00 00 00 00 00 00 00 00 |5.^.....|........|
|00000080| 76 69 3d 45 44 2e 49 54 | 20 69 66 20 65 78 20 24 |vi=ED.IT| if ex $|
|00000090| 31 3b 61 30 3a 64 73 63 | 72 65 73 61 76 20 24 31 |1;a0:dsc|resav $1|
|000000a0| 20 24 24 72 3b 6c 7a 65 | 64 20 24 31 3b 61 30 3a | $$r;lze|d $1;a0:|
|000000b0| 64 73 63 72 65 73 61 76 | 20 24 31 20 24 24 77 3b |dscresav| $1 $$w;|
|000000c0| 65 6c 73 65 3b 6c 7a 65 | 64 20 24 31 3b 66 69 0d |else;lze|d $1;fi.|
|000000d0| 0a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|000000e0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|000000f0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|00000100| c3 0d 80 5a 33 45 4e 56 | 03 00 fe 00 80 3a 5d 00 |...Z3ENV|.....:].|
|00000110| fe 2f 28 05 fe 20 c2 68 | 81 cd a9 84 cd 4b 84 44 |./(.. .h|.....K.D|
|00000120| 53 43 52 45 53 41 56 20 | 31 2e 30 61 20 28 38 30 |SCRESAV |1.0a (80|
|00000130| 30 30 48 20 76 65 72 73 | 69 6f 6e 29 2d 2d 4a 2e |00H vers|ion)--J.|
|00000140| 20 47 6c 6f 6d 70 68 20 | 42 6c 61 63 6b 2c 20 32 | Glomph |Black, 2|
|00000150| 36 20 4a 61 6e 20 31 39 | 38 38 0d 0a 09 09 2d 2d |6 Jan 19|88....--|
|00000160| 46 6f 72 20 5a 43 50 52 | 33 20 73 79 73 74 65 6d |For ZCPR|3 system|
|00000170| 73 20 77 69 74 68 20 44 | 61 74 65 53 74 61 6d 70 |s with D|ateStamp|
|00000180| 65 72 0d 0a 0a 69 6e 76 | 6f 6b 65 20 62 79 3a 20 |er...inv|oke by: |
|00000190| 20 44 53 43 52 45 53 41 | 56 20 5b 64 75 3a 20 6f | DSCRESA|V [du: o|
|000001a0| 72 20 64 69 72 3a 5d 66 | 69 6c 65 6e 61 6d 65 2e |r dir:]f|ilename.|
|000001b0| 74 79 70 20 24 78 20 77 | 68 65 72 65 20 78 3d 72 |typ $x w|here x=r|
|000001c0| 20 6f 72 20 77 0d 0a 0a | 09 09 24 72 20 73 61 76 | or w...|..$r sav|
|000001d0| 65 73 20 63 72 65 61 74 | 65 20 64 61 74 65 20 6f |es creat|e date o|
|000001e0| 66 20 66 69 6c 6e 61 6d | 20 69 6e 20 72 65 67 73 |f filnam| in regs|
|000001f0| 20 30 2d 34 0d 0a 09 09 | 24 77 20 74 61 6b 65 73 | 0-4....|$w takes|
|00000200| 20 64 61 74 61 20 69 6e | 20 72 65 67 73 20 30 2d | data in| regs 0-|
|00000210| 34 2c 20 72 65 73 74 6f | 72 65 73 20 63 72 65 61 |4, resto|res crea|
|00000220| 74 65 20 64 61 74 65 0d | 0a 0a 4e 6f 72 6d 61 6c |te date.|..Normal|
|00000230| 6c 79 20 75 73 65 64 20 | 69 6e 20 61 6c 69 61 73 |ly used |in alias|
|00000240| 65 73 2c 20 77 69 74 68 | 20 24 72 2f 24 77 20 73 |es, with| $r/$w s|
|00000250| 61 6e 64 77 69 63 68 69 | 6e 67 20 61 6e 20 65 64 |andwichi|ng an ed|
|00000260| 69 74 6f 72 00 c3 00 00 | 0e 0c 1e 44 cd 05 00 7c |itor....|...D...||
|00000270| fe 44 c2 00 00 3a 6d 00 | fe 24 28 17 cd 4b 84 4e |.D...:m.|.$(..K.N|
|00000280| 6f 20 73 65 63 6f 6e 64 | 20 74 6f 6b 65 6e 21 00 |o second| token!.|
|00000290| c3 19 80 3a 6e 00 21 b0 | 82 fe 52 20 04 06 01 18 |...:n.!.|..R ....|
|000002a0| 07 fe 57 c2 00 00 06 00 | 70 2a 09 80 cd 15 83 11 |..W.....|p*......|
|000002b0| 5c 00 cd 1b 83 01 11 00 | 11 5c 00 cd 05 00 d5 e1 |\.......|.\......|
|000002c0| 32 b2 82 22 b3 82 cb 0c | cb 1d 22 b5 82 cd f7 84 |2.."....|..".....|
|000002d0| 04 78 32 b7 82 af 32 c4 | 82 11 b7 82 cd 1b 83 3a |.x2...2.|.......:|
|000002e0| b0 82 a7 20 0b cd 47 83 | 32 b1 82 e6 fe cd a6 83 |... ..G.|2.......|
|000002f0| cd 09 84 c2 00 00 2a b5 | 82 cd 49 85 c2 00 00 21 |......*.|..I....!|
|00000300| 80 00 3a b3 82 e6 01 28 | 04 11 40 00 19 af ed 5b |..:....(|..@....[|
|00000310| b2 82 57 cb 03 cb 03 cb | 03 cb 03 19 06 00 0e 05 |..W.....|........|
|00000320| 3a b0 82 a7 28 32 7e cd | f0 82 04 23 0d 20 f7 cd |:...(2~.|...#. ..|
|00000330| a9 84 cd 4b 84 43 72 65 | 61 74 65 20 44 61 74 65 |...K.Cre|ate Date|
|00000340| 20 73 74 6f 72 65 64 20 | 69 6e 20 72 65 67 73 2e | stored |in regs.|
|00000350| 20 30 2d 34 00 c3 00 00 | cd db 82 77 04 23 0d 20 | 0-4....|...w.#. |
|00000360| f7 af 06 7f 21 80 00 86 | 23 10 fc 77 11 b7 82 2a |....!...|#..w...*|
|00000370| b5 82 cd 63 85 c2 00 00 | cd 3b 84 c2 00 00 3a b1 |...c....|.;....:.|
|00000380| 82 cd a6 83 cd a9 84 cd | 4b 84 4f 72 69 67 69 6e |........|K.Origin|
|00000390| 61 6c 20 43 72 65 61 74 | 65 20 44 61 74 65 20 73 |al Creat|e Date s|
|000003a0| 61 76 65 64 20 74 6f 20 | 64 69 73 6b 00 c3 00 00 |aved to |disk....|
|000003b0| 00 00 00 00 00 00 00 00 | 21 21 21 54 49 4d 45 26 |........|!!!TIME&|
|000003c0| 44 41 54 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |DAT.....|........|
|000003d0| 00 00 00 00 00 00 00 00 | 00 00 00 e5 d5 cd 06 83 |........|........|
|000003e0| 11 30 00 19 78 85 6f 7c | ce 00 67 7e d1 e1 b7 c9 |.0..x.o||..g~....|
|000003f0| e5 d5 f5 cd 06 83 11 30 | 00 19 78 85 6f 7c ce 00 |.......0|..x.o|..|
|00000400| 67 f1 77 d1 e1 c9 d5 2a | 19 83 11 22 00 19 7e 23 |g.w....*|..."..~#|
|00000410| 66 6f b4 d1 c9 22 19 83 | c9 00 00 e5 d5 c5 f5 d5 |fo..."..|........|
|00000420| 0e 19 cd 05 00 3c 47 d1 | 1a b7 ca 2e 83 47 05 21 |.....<G.|.....G.!|
|00000430| 0d 00 19 4e c5 58 0e 0e | cd 05 00 c1 59 0e 20 cd |...N.X..|....Y. .|
|00000440| 05 00 f1 c1 d1 e1 c9 e5 | d5 c5 d5 13 06 0b 1a e6 |........|........|
|00000450| 7f 12 fe 3f ca 5d 83 13 | 05 c2 4e 83 04 d1 ca 9f |...?.]..|..N.....|
|00000460| 83 d5 cd f4 83 0e 11 cd | 05 00 d1 fe ff ca 9f 83 |........|........|
|00000470| 87 87 87 87 87 4f 06 00 | 21 81 00 09 13 06 08 7e |.....O..|!......~|
|00000480| 12 23 13 05 c2 7f 83 7e | 12 07 e6 01 4f 23 13 7e |.#.....~|....O#.~|
|00000490| 12 e6 80 b1 4f 23 13 7e | 12 af 79 c1 d1 e1 c9 3e |....O#.~|..y....>|
|000004a0| ff b7 c1 d1 e1 c9 e5 d5 | c5 4f d5 13 06 0b 1a e6 |........|.O......|
|000004b0| 7f fe 3f ca bc 83 13 05 | c2 ae 83 04 d1 ca e2 83 |..?.....|........|
|000004c0| d5 21 09 00 19 79 0f cd | e9 83 23 79 cd e9 83 d1 |.!...y..|..#y....|
|000004d0| cd f4 83 0e 1e cd 05 00 | fe ff ca e2 83 af c1 d1 |........|........|
|000004e0| e1 c9 3e ff b7 c1 d1 e1 | c9 f5 7e e6 7f 47 f1 e6 |..>.....|..~..G..|
|000004f0| 80 b0 77 c9 c5 d5 e5 f5 | eb af 77 11 0c 00 19 06 |..w.....|..w.....|
|00000500| 18 cd 16 85 f1 e1 d1 c1 | c9 c5 d5 e5 0e 0f cd 0e |........|........|
|00000510| 85 fe ff c2 1c 84 3e ff | b7 c3 1d 84 af e1 d1 c1 |......>.|........|
|00000520| c9 c5 d5 e5 0e 0f cd 0e | 85 fe ff c2 1c 84 0e 16 |........|........|
|00000530| cd 0e 85 fe ff c2 1c 84 | c3 16 84 e5 c5 0e 10 cd |........|........|
|00000540| 0e 85 fe ff ca 48 84 af | c1 e1 c9 e3 cd 51 84 e3 |.....H..|.....Q..|
|00000550| c9 d5 c5 f5 0e 00 7e 23 | b7 ca a5 84 fe 09 ca 8f |......~#|........|
|00000560| 84 0c cd b6 84 fe 0d ca | 7c 84 fe 0a ca 81 84 fe |........||.......|
|00000570| 07 ca 81 84 fe 08 ca 85 | 84 c3 56 84 0e 00 c3 56 |........|..V....V|
|00000580| 84 0d c3 56 84 79 b7 ca | 56 84 0d 0d c3 56 84 79 |...V.y..|V....V.y|
|00000590| e6 07 47 3e 08 90 47 81 | 4f 3e 20 cd e3 84 05 c2 |..G>..G.|O> .....|
|000005a0| 9b 84 c3 56 84 f1 c1 d1 | c9 f5 3e 0d cd e3 84 3e |...V....|..>....>|
|000005b0| 0a cd e3 84 f1 c9 fe 20 | d2 e3 84 fe 00 ca e3 84 |....... |........|
|000005c0| fe 07 ca e3 84 fe 08 ca | e3 84 fe 0a ca e3 84 fe |........|........|
|000005d0| 0d ca e3 84 f5 f5 3e 5e | cd e3 84 f1 c6 40 cd e3 |......>^|.....@..|
|000005e0| 84 f1 c9 f5 c5 d5 e5 4f | 2a 01 00 2e 0c 11 f2 84 |.......O|*.......|
|000005f0| d5 e9 e1 d1 c1 f1 c9 f5 | d5 e5 0e 19 cd 05 00 f5 |........|........|
|00000600| 1e ff 0e 20 cd 05 00 4f | f1 47 e1 d1 f1 c9 c5 d5 |... ...O|.G......|
|00000610| cd 05 00 d1 c1 c9 c5 48 | 06 00 cd 1f 85 c1 c9 e5 |.......H|........|
|00000620| f5 c5 d5 57 cd 40 85 d1 | c1 f1 e1 c9 c5 48 06 00 |...W.@..|.....H..|
|00000630| cd 35 85 c1 c9 f5 c5 d5 | 57 cd 40 85 d1 c1 f1 c9 |.5......|W.@.....|
|00000640| 72 23 0b 78 b1 c2 40 85 | c9 e5 d5 c5 d5 eb 01 21 |r#.x..@.|.......!|
|00000650| 00 09 73 23 72 23 36 00 | d1 0e 21 cd 05 00 c1 d1 |..s#r#6.|..!.....|
|00000660| e1 b7 c9 e5 d5 c5 d5 eb | 01 21 00 09 73 23 72 23 |........|.!..s#r#|
|00000670| 36 00 d1 0e 22 cd 05 00 | c1 d1 e1 b7 c9 4b 3a 48 |6..."...|.....K:H|
|00000680| 09 09 2a 2a 2a 2a 2a 20 | 44 53 43 52 45 53 41 56 |..***** |DSCRESAV|
|00000690| 20 2a 2a 2a 2a 2a 0d 0a | 09 09 28 66 6f 72 20 5a | *****..|..(for Z|
|000006a0| 43 50 52 33 20 73 79 73 | 74 65 6d 73 29 0d 0a 09 |CPR3 sys|tems)...|
|000006b0| 44 61 74 65 53 74 61 6d | 70 65 72 20 43 52 45 61 |DateStam|per CREa|
|000006c0| 74 65 2d 64 61 74 65 20 | 53 41 56 65 72 20 70 72 |te-date |SAVer pr|
|000006d0| 6f 67 72 61 6d 3a 0d 0a | 0d 0a 09 49 6e 20 74 68 |ogram:..|...In th|
|000006e0| 65 20 75 73 65 20 6f 66 | 20 44 61 74 65 53 74 61 |e use of| DateSta|
|000006f0| 6d 70 65 72 2c 20 6f 6e | 65 20 61 6e 6e 6f 79 69 |mper, on|e annoyi|
|00000700| 6e 67 20 70 72 6f 62 6c | 65 6d 20 61 72 69 73 65 |ng probl|em arise|
|00000710| 73 3a 20 77 68 65 6e 20 | 65 64 69 74 69 6e 67 20 |s: when |editing |
|00000720| 0d 0a 61 6e 20 65 78 69 | 73 74 69 6e 67 20 66 69 |..an exi|sting fi|
|00000730| 6c 65 2c 20 74 68 65 20 | 6e 65 77 20 76 65 72 73 |le, the |new vers|
|00000740| 69 6f 6e 20 74 61 6b 65 | 73 20 6f 6e 20 61 20 6e |ion take|s on a n|
|00000750| 65 77 20 63 72 65 61 74 | 65 20 64 61 74 65 2c 20 |ew creat|e date, |
|00000760| 61 6e 64 20 74 68 65 20 | 6f 72 69 67 69 6e 61 6c |and the |original|
|00000770| 0d 0a 63 72 65 61 74 69 | 6f 6e 20 64 61 74 65 20 |..creati|on date |
|00000780| 69 73 20 6c 6f 73 74 2e | 20 20 54 68 69 73 20 63 |is lost.|  This c|
|00000790| 61 6e 20 6d 61 6b 65 20 | 74 68 65 20 74 72 61 63 |an make |the trac|
|000007a0| 69 6e 67 20 6f 66 20 74 | 68 65 20 68 69 73 74 6f |ing of t|he histo|
|000007b0| 72 79 20 6f 66 20 73 6f | 75 72 63 65 20 0d 0a 66 |ry of so|urce ..f|
|000007c0| 69 6c 65 73 20 64 69 66 | 66 69 63 75 6c 74 2e 0d |iles dif|ficult..|
|000007d0| 0a 0d 0a 09 44 53 43 52 | 45 53 41 56 20 69 73 20 |....DSCR|ESAV is |
|000007e0| 62 65 73 74 20 63 61 6c | 6c 65 64 20 66 72 6f 6d |best cal|led from|
|000007f0| 20 61 6e 20 61 6c 69 61 | 73 20 77 68 65 72 65 20 | an alia|s where |
|00000800| 69 74 20 69 73 20 69 6e | 76 6f 6b 65 64 20 62 6f |it is in|voked bo|
|00000810| 74 68 20 62 65 66 6f 72 | 65 0d 0a 61 6e 64 20 61 |th befor|e..and a|
|00000820| 66 74 65 72 20 61 6e 20 | 65 78 69 73 74 69 6e 67 |fter an |existing|
|00000830| 20 66 69 6c 65 20 69 73 | 20 65 64 69 74 65 64 2e | file is| edited.|
|00000840| 20 49 74 20 6d 61 79 20 | 61 6c 73 6f 20 62 65 20 | It may |also be |
|00000850| 75 73 65 64 20 69 6e 20 | 63 6f 6e 6a 75 6e 63 74 |used in |conjunct|
|00000860| 69 6f 6e 20 77 69 74 68 | 20 0d 0a 6f 74 68 65 72 |ion with| ..other|
|00000870| 20 70 72 6f 67 72 61 6d | 73 20 77 68 69 63 68 20 | program|s which |
|00000880| 6d 6f 64 69 66 79 20 65 | 78 69 73 74 69 6e 67 20 |modify e|xisting |
|00000890| 66 69 6c 65 73 2c 20 61 | 6e 64 20 69 6e 20 74 68 |files, a|nd in th|
|000008a0| 65 20 70 72 6f 63 65 73 | 73 2c 20 63 72 65 61 74 |e proces|s, creat|
|000008b0| 65 20 61 20 6e 65 77 0d | 0a 63 6f 70 79 2e 0d 0a |e a new.|.copy...|
|000008c0| 0d 0a 41 4e 20 65 78 61 | 6d 70 6c 65 20 61 6c 69 |..AN exa|mple ali|
|000008d0| 61 73 20 28 74 61 6b 65 | 6e 20 66 72 6f 6d 20 6d |as (take|n from m|
|000008e0| 79 20 61 6c 69 61 73 2e | 63 6d 64 20 66 69 6c 65 |y alias.|cmd file|
|000008f0| 2c 20 72 75 6e 20 62 79 | 20 74 68 65 20 65 63 70 |, run by| the ecp|
|00000900| 2c 20 61 72 75 6e 7a 3a | 29 0d 0a 76 69 3d 45 44 |, arunz:|)..vi=ED|
|00000910| 2e 49 54 20 69 66 20 65 | 78 20 24 31 3b 61 30 3a |.IT if e|x $1;a0:|
|00000920| 64 73 63 72 65 73 61 76 | 20 24 31 20 24 24 72 3b |dscresav| $1 $$r;|
|00000930| 6c 7a 65 64 20 24 31 3b | 61 30 3a 64 73 63 72 65 |lzed $1;|a0:dscre|
|00000940| 73 61 76 20 24 31 20 24 | 24 77 3b 65 6c 73 65 3b |sav $1 $|$w;else;|
|00000950| 6c 7a 65 64 20 24 31 3b | 66 69 0d 0a 0d 0a 54 68 |lzed $1;|fi....Th|
|00000960| 75 73 20 62 79 20 74 79 | 70 69 6e 67 3a 20 65 64 |us by ty|ping: ed|
|00000970| 20 66 69 6c 65 6e 61 6d | 2e 74 79 70 2c 20 74 68 | filenam|.typ, th|
|00000980| 65 20 63 72 65 61 74 65 | 20 64 61 74 65 20 69 73 |e create| date is|
|00000990| 20 73 61 76 65 64 2c 20 | 6c 7a 65 64 20 69 73 20 | saved, |lzed is |
|000009a0| 69 6e 76 6f 6b 65 64 2c | 0d 0a 61 6e 64 20 75 70 |invoked,|..and up|
|000009b0| 6f 6e 20 65 78 69 74 69 | 6e 67 20 6c 7a 65 64 20 |on exiti|ng lzed |
|000009c0| 74 68 65 20 4f 52 49 47 | 49 4e 41 4c 20 63 72 65 |the ORIG|INAL cre|
|000009d0| 61 74 65 20 64 61 74 65 | 20 69 73 20 72 65 73 74 |ate date| is rest|
|000009e0| 6f 72 65 64 20 74 6f 20 | 74 68 65 20 6e 65 77 20 |ored to |the new |
|000009f0| 66 69 6c 65 2e 0d 0a 54 | 68 65 20 27 6d 6f 64 69 |file...T|he 'modi|
|00000a00| 66 69 65 64 27 20 64 61 | 74 65 20 73 74 61 6d 70 |fied' da|te stamp|
|00000a10| 20 72 65 66 6c 65 63 74 | 73 20 79 6f 75 72 20 65 | reflect|s your e|
|00000a20| 64 69 74 69 6e 67 20 70 | 72 6f 63 65 64 75 72 65 |diting p|rocedure|
|00000a30| 2e 0d 0a 0d 0a 50 6c 65 | 61 73 65 20 73 65 6e 64 |.....Ple|ase send|
|00000a40| 20 63 6f 6d 6d 65 6e 74 | 73 20 74 6f 20 6d 65 20 | comment|s to me |
|00000a50| 6f 6e 20 4a 61 79 20 53 | 61 67 65 27 73 20 5a 2d |on Jay S|age's Z-|
|00000a60| 4e 4f 44 45 2c 20 36 31 | 37 2d 39 36 35 2d 37 32 |NODE, 61|7-965-72|
|00000a70| 35 39 0d 0a 09 09 09 4a | 65 72 72 79 20 42 6c 61 |59.....J|erry Bla|
|00000a80| 63 6b 20 32 36 20 4a 61 | 6e 75 61 72 79 20 31 39 |ck 26 Ja|nuary 19|
|00000a90| 38 38 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |88......|........|
|00000aa0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|00000ab0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|00000ac0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|00000ad0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|00000ae0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|00000af0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
+--------+-------------------------+-------------------------+--------+--------+