home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: DOSIMG Disk Image
(archive/dosimg).
You can browse this item here: 4.img
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| DOSIMG Disk Image (archive/dosimg)
| magic
| Supported |
| 66%
| dexvert
| Alias PIX Image (image/aliasPIX)
| ext
| Supported |
| 66%
| dexvert
| GEM Raster Bitmap (image/gem)
| ext
| Supported |
| 66%
| dexvert
| DaVinci (image/daVinci)
| ext
| Supported |
| 46%
| dexvert
| Disk Image (archive/diskImage)
| ext
| Supported |
| 1%
| dexvert
| AIX/BFF backup/restore (archive/aixBackupRestore)
| ext
| Unsupported |
| 1%
| dexvert
| The Duplicator Toolkit disk image (archive/duplicatorToolkitDiskImage)
| ext
| Unsupported |
| 1%
| dexvert
| PTS-DOS disk image (archive/ptsDOSDiskImage)
| ext
| Unsupported |
| 1%
| dexvert
| QNX volume disk image (archive/qnxVolumeDiskImage)
| ext
| Unsupported |
| 1%
| dexvert
| SNATCH-IT Disk Image (archive/snatchItDiskImage)
| ext
| Unsupported |
| 1%
| dexvert
| Android boot image (archive/androidBootImage)
| ext
| Unsupported |
| 1%
| dexvert
| Paragon DOS disk image (archive/paragonDOSDiskImage)
| ext
| Unsupported |
| 1%
| dexvert
| QEMU QCOW Image (archive/qemuQCOWImage)
| ext
| Unsupported |
| 1%
| dexvert
| Davilex Games game data format (other/davilexGamesGameDataFormat)
| ext
| Unsupported |
| 1%
| dexvert
| Eclipse Image (other/eclipseImage)
| ext
| Unsupported |
| 1%
| dexvert
| InfoComics game data (other/infoComicsGameData)
| ext
| Unsupported |
| 1%
| dexvert
| Garmin map (other/garminMap)
| ext
| Unsupported |
| 1%
| dexvert
| Piklib/BlooMoo graphic data (other/piklibGraphicData)
| ext
| Unsupported |
| 100%
| file
| data
| default
| |
| 100%
| TrID
| DOSIMG disk image (80t/15s)
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 4f 0f 01 01 01 01 01 01 | 01 01 01 00 01 01 01 01 |O.......|........|
|00000010| 01 01 01 01 01 01 01 01 | 01 01 01 01 01 01 01 01 |........|........|
|00000020| 01 01 01 01 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 00 01 01 01 01 01 01 | 01 01 01 01 01 01 01 01 |........|........|
|00000050| 01 01 01 01 01 01 01 01 | 01 01 01 01 01 01 01 01 |........|........|
|00000060| 01 01 01 01 01 01 01 01 | 01 01 01 01 01 01 01 01 |........|........|
|00000070| 01 01 01 01 01 01 01 01 | 01 01 01 01 01 01 01 01 |........|........|
|00000080| 01 01 01 01 01 01 01 01 | 01 01 01 01 01 01 01 01 |........|........|
|00000090| 01 01 01 01 01 01 01 01 | 01 01 01 01 01 01 00 01 |........|........|
|000000a0| 01 01 00 00 00 00 eb 16 | f4 eb 34 90 4d 53 44 4f |........|..4.MSDO|
|000000b0| 53 33 2e 33 00 02 01 01 | 00 02 e0 00 60 09 f9 07 |S3.3....|....`...|
|000000c0| 00 0f 00 02 f4 00 14 12 | f4 00 04 01 00 fa 33 c0 |........|......3.|
|000000d0| 8e d0 bc 00 7c 16 07 bb | 78 00 36 c5 37 1e 56 16 |....|...|x.6.7.V.|
|000000e0| 53 bf 2b 7c b9 0b 00 fc | ac 26 80 3d 00 74 03 26 |S.+|....|.&.=.t.&|
|000000f0| 8a 05 aa 8a c4 e2 f1 06 | 1f 89 47 02 c7 07 2b 7c |........|..G...+||
|00000100| fb cd 13 72 67 a0 10 7c | 98 f7 26 16 7c 03 06 1c |...rg..||..&.|...|
|00000110| 7c 03 06 0e 7c a3 3f 7c | a3 37 7c b8 20 00 f7 26 ||...|.?||.7|. ..&|
|00000120| 11 7c 8b 1e 0b 7c 03 c3 | 48 f7 f3 01 06 37 7c bb |.|...|..|H....7|.|
|00000130| 00 05 a1 3f 7c e8 9f 00 | b8 01 02 e8 b3 00 72 19 |...?|...|......r.|
|00000140| 8b fb b9 0b 00 be d6 7d | f3 a6 75 0d 8d 7f 20 be |.......}|..u... .|
|00000150| e1 7d b9 0b 00 f3 a6 74 | 18 be 77 7d e8 6a 00 32 |.}.....t|..w}.j.2|
|00000160| e4 cd 16 5e 1f 8f 04 8f | 44 02 cd 19 be c0 7d eb |...^....|D.....}.|
|00000170| eb a1 1c 05 33 d2 f7 36 | 0b 7c fe c0 a2 3c 7c a1 |....3..6|.|...<|.|
|00000180| 37 7c a3 3d 7c bb 00 07 | a1 37 7c e8 49 00 a1 18 |7|.=|...|.7|.I...|
|00000190| 7c 2a 06 3b 7c 40 38 06 | 3c 7c 73 03 a0 3c 7c 50 ||*.;|@8.|<|s..<|P|
|000001a0| e8 4e 00 58 72 c6 28 06 | 3c 7c 74 0c 01 06 37 7c |.N.Xr.(.|<|t...7||
|000001b0| f7 26 0b 7c 03 d8 eb d0 | 8a 2e 15 7c 8a 16 fd 7d |.&.|....|...|...}|
|000001c0| 8b 1e 3d 7c ea 00 00 70 | 00 ac 0a c0 74 22 b4 0e |..=|...p|....t"..|
|000001d0| bb 07 00 cd 10 eb f2 33 | d2 f7 36 18 7c fe c2 88 |.......3|..6.|...|
|000001e0| 16 3b 7c 33 d2 f7 36 1a | 7c 88 16 2a 7c a3 39 7c |.;|3..6.||..*|.9||
|000001f0| c3 b4 02 8b 16 39 7c b1 | 06 d2 e6 0a 36 3b 7c 8b |.....9|.|....6;|.|
|00000200| ca 86 e9 8a 16 fd 7d 8a | 36 2a 7c cd 13 c3 0d 0a |......}.|6*|.....|
|00000210| 4e 6f 6e 2d 53 79 73 74 | 65 6d 20 64 69 73 6b 20 |Non-Syst|em disk |
|00000220| 6f 72 20 64 69 73 6b 20 | 65 72 72 6f 72 0d 0a 52 |or disk |error..R|
|00000230| 65 70 6c 61 63 65 20 61 | 6e 64 20 73 74 72 69 6b |eplace a|nd strik|
|00000240| 65 20 61 6e 79 20 6b 65 | 79 20 77 68 65 6e 20 72 |e any ke|y when r|
|00000250| 65 61 64 79 0d 0a 00 0d | 0a 44 69 73 6b 20 42 6f |eady....|.Disk Bo|
|00000260| 6f 74 20 66 61 69 6c 75 | 72 65 0d 0a 00 49 4f f4 |ot failu|re...IO.|
|00000270| 20 06 53 59 53 4d 53 44 | 4f 53 f4 20 03 53 59 53 | .SYSMSD|OS. .SYS|
|00000280| f4 00 12 55 aa f9 ff ff | 03 40 00 05 60 00 07 80 |...U....|.@..`...|
|00000290| 00 09 a0 00 0b c0 00 0d | e0 00 0f 00 01 11 20 01 |........|...... .|
|000002a0| 13 40 01 15 f0 f4 ff 0b | ef 01 4f 00 02 21 20 02 |.@......|..O..! .|
|000002b0| 23 40 02 25 60 02 27 80 | 02 29 a0 02 2b c0 02 2d |#@.%`.'.|.)..+..-|
|000002c0| e0 02 2f 00 03 31 20 03 | 33 40 03 35 60 03 37 80 |../..1 .|3@.5`.7.|
|000002d0| 03 39 a0 03 3b c0 03 3d | e0 03 3f 00 04 41 20 04 |.9..;..=|..?..A .|
|000002e0| 43 40 04 45 60 04 47 80 | 04 49 a0 04 4b c0 04 ff |C@.E`.G.|.I..K...|
|000002f0| ef 04 ff 0f 05 51 20 05 | 53 40 05 55 60 05 57 80 |.....Q .|S@.U`.W.|
|00000300| 05 59 a0 05 5b c0 05 5d | f0 ff f4 00 37 40 08 85 |.Y..[..]|....7@..|
|00000310| 60 08 87 80 08 89 a0 08 | 8b c0 08 8d e0 08 ff 0f |`.......|........|
|00000320| f4 00 18 0a a1 20 0a a3 | 40 0a a5 60 0a a7 80 0a |..... ..|@..`....|
|00000330| a9 a0 0a ab c0 0a ad e0 | 0a af 00 0b b1 20 0b b3 |........|..... ..|
|00000340| 40 0b b5 60 0b b7 80 0b | b9 a0 0b bb c0 0b bd e0 |@..`....|........|
|00000350| 0b bf 00 0c c1 f0 ff c3 | 40 0c c5 60 0c c7 80 0c |........|@..`....|
|00000360| c9 a0 0c cb c0 0c cd e0 | 0c cf 00 0d d1 20 0d d3 |........|..... ..|
|00000370| 40 0d d5 60 0d d7 80 0d | d9 f0 ff db c0 0d dd e0 |@..`....|........|
|00000380| 0d df 00 0e e1 20 0e e3 | 40 0e e5 60 0e e7 80 0e |..... ..|@..`....|
|00000390| e9 a0 0e eb c0 0e ed f0 | ff ef 00 0f f1 20 0f f3 |........|..... ..|
|000003a0| 40 0f f5 f0 ff f7 80 0f | f9 a0 0f fb c0 0f fd f0 |@.......|........|
|000003b0| ff ff 00 10 01 21 10 03 | 41 10 ff 6f 10 07 81 10 |.....!..|A..o....|
|000003c0| 09 a1 10 0b c1 10 0d e1 | 10 0f 01 11 11 21 11 ff |........|.....!..|
|000003d0| 4f 11 15 61 11 17 81 11 | 19 a1 11 1b f1 ff 1d e1 |O..a....|........|
|000003e0| 11 1f 01 12 21 21 12 19 | 40 12 25 61 12 27 81 12 |....!!..|@.%a.'..|
|000003f0| 29 a1 12 2b c1 12 2d e1 | 12 2f 01 13 31 21 13 33 |)..+..-.|./..1!.3|
|00000400| 41 13 35 61 13 37 81 13 | 39 a1 13 3b c1 13 3d e1 |A.5a.7..|9..;..=.|
|00000410| 13 3f 01 14 41 21 14 43 | 41 14 45 61 14 47 81 14 |.?..A!.C|A.Ea.G..|
|00000420| 49 a1 14 4b c1 14 4d e1 | 14 4f 01 15 51 21 15 53 |I..K..M.|.O..Q!.S|
|00000430| 41 15 55 61 15 57 f1 ff | 59 a1 15 5b c1 15 5d e1 |A.Ua.W..|Y..[..].|
|00000440| 15 5f 01 16 61 21 16 63 | 41 16 65 61 16 67 81 16 |._..a!.c|A.ea.g..|
|00000450| 69 a1 16 6b c1 16 6d e1 | 16 6f 01 17 71 f1 ff 73 |i..k..m.|.o..q..s|
|00000460| f1 ff 75 61 17 77 f1 ff | 79 a1 17 ff cf 17 7d e1 |..ua.w..|y.....}.|
|00000470| 17 7f 01 18 81 21 18 83 | f1 ff 85 61 18 87 81 18 |.....!..|...a....|
|00000480| 89 a1 18 8b c1 18 8d f1 | ff 8f 01 19 91 21 19 93 |........|.....!..|
|00000490| 41 19 95 61 19 97 f1 ff | 99 a1 19 9b c1 19 9d e1 |A..a....|........|
|000004a0| 19 9f 01 1a a1 21 1a a3 | 41 1a a5 61 1a a7 f1 ff |.....!..|A..a....|
|000004b0| d8 a1 1a ab c1 1a ad e1 | 1a af 01 1b b1 21 1b b3 |........|.....!..|
|000004c0| 41 1b b5 61 1b b7 81 1b | b9 a1 1b bb c1 1b bd e1 |A..a....|........|
|000004d0| 1b bf 01 1c c1 21 1c c3 | 41 1c c5 61 1c c7 81 1c |.....!..|A..a....|
|000004e0| c9 a1 1c cb c1 1c cd e1 | 1c cf 01 1d d1 21 1d d3 |........|.....!..|
|000004f0| 41 1d d5 61 1d d7 f1 ff | d9 f1 ff f4 00 ff f4 00 |A..a....|........|
|00000500| ff f4 00 c0 af 03 3b b1 | 23 3b b3 43 3b b5 63 3b |......;.|#;.C;.c;|
|00000510| b7 83 3b b9 a3 3b bb c3 | 3b bd e3 3b bf 03 3c c1 |..;..;..|;..;..<.|
|00000520| 23 3c c3 43 3c c5 63 3c | c7 83 3c c9 a3 3c cb c3 |#<.C<.c<|..<..<..|
|00000530| 3c cd e3 3c cf 03 3d d1 | 23 3d d3 43 3d d5 63 3d |<..<..=.|#=.C=.c=|
|00000540| d7 83 3d d9 a3 3d db c3 | 3d dd e3 3d df 03 3e e1 |..=..=..|=..=..>.|
|00000550| 23 3e e3 43 3e e5 63 3e | e7 83 3e e9 a3 3e eb c3 |#>.C>.c>|..>..>..|
|00000560| 3e ed e3 3e ef 03 3f f1 | 23 3f f3 43 3f f5 63 3f |>..>..?.|#?.C?.c?|
|00000570| f7 83 3f f9 a3 3f fb c3 | 3f fd e3 3f ff 03 40 01 |..?..?..|?..?..@.|
|00000580| 24 40 03 44 40 05 64 40 | 07 84 40 09 a4 40 0b c4 |$@.D@.d@|..@..@..|
|00000590| 40 0d e4 40 0f 04 41 11 | 24 41 13 44 41 15 64 41 |@..@..A.|$A.DA.dA|
|000005a0| 17 84 41 19 a4 41 1b c4 | 41 1d e4 41 1f 04 42 21 |..A..A..|A..A..B!|
|000005b0| 24 42 23 44 42 25 64 42 | 27 84 42 29 a4 42 2b c4 |$B#DB%dB|'.B).B+.|
|000005c0| 42 2d e4 42 2f 04 43 31 | 24 43 33 44 43 35 64 43 |B-.B/.C1|$C3DC5dC|
|000005d0| 37 84 43 39 a4 43 3b c4 | 43 3d e4 43 3f 04 44 41 |7.C9.C;.|C=.C?.DA|
|000005e0| 24 44 43 44 44 45 64 44 | 47 84 44 49 a4 44 4b c4 |$DCDDEdD|G.DI.DK.|
|000005f0| 44 4d e4 44 4f 04 45 51 | 24 45 53 44 45 55 64 45 |DM.DO.EQ|$ESDEUdE|
|00000600| 57 84 45 59 a4 45 5b c4 | 45 5d e4 45 5f 04 46 61 |W.EY.E[.|E].E_.Fa|
|00000610| 24 46 63 44 46 65 64 46 | 67 84 46 69 a4 46 6b c4 |$FcDFedF|g.Fi.Fk.|
|00000620| 46 6d e4 46 6f 04 47 71 | 24 47 73 44 47 75 64 47 |Fm.Fo.Gq|$GsDGudG|
|00000630| 77 84 47 79 a4 47 7b c4 | 47 7d e4 47 7f 04 48 81 |w.Gy.G{.|G}.G..H.|
|00000640| 24 48 83 44 48 85 64 48 | 87 84 48 89 a4 48 8b c4 |$H.DH.dH|..H..H..|
|00000650| 48 8d e4 48 8f 04 49 91 | 24 49 93 44 49 95 64 49 |H..H..I.|$I.DI.dI|
|00000660| 97 84 49 99 a4 49 9b c4 | 49 9d e4 49 9f 04 4a a1 |..I..I..|I..I..J.|
|00000670| 24 4a a3 44 4a a5 64 4a | a7 84 4a a9 a4 4a ab c4 |$J.DJ.dJ|..J..J..|
|00000680| 4a ad e4 4a af 04 4b b1 | 24 4b b3 44 4b b5 64 4b |J..J..K.|$K.DK.dK|
|00000690| b7 84 4b b9 a4 4b bb c4 | 4b bd e4 4b bf 04 4c c1 |..K..K..|K..K..L.|
|000006a0| 24 4c c3 44 4c c5 64 4c | c7 84 4c c9 a4 4c cb c4 |$L.DL.dL|..L..L..|
|000006b0| 4c cd e4 4c cf 04 4d d1 | 24 4d d3 44 4d d5 64 4d |L..L..M.|$M.DM.dM|
|000006c0| d7 84 4d d9 a4 4d db c4 | 4d dd e4 4d df 04 4e e1 |..M..M..|M..M..N.|
|000006d0| 24 4e e3 44 4e e5 64 4e | e7 84 4e e9 a4 4e eb c4 |$N.DN.dN|..N..N..|
|000006e0| 4e ed e4 4e ef 04 4f f1 | 24 4f f3 44 4f f5 64 4f |N..N..O.|$O.DO.dO|
|000006f0| f7 84 4f f9 a4 4f fb c4 | 4f fd e4 4f ff 04 50 01 |..O..O..|O..O..P.|
|00000700| 25 50 03 45 50 05 65 50 | 07 85 50 09 a5 50 0b c5 |%P.EP.eP|..P..P..|
|00000710| 50 0d e5 50 0f 05 51 11 | 25 51 13 45 51 15 f5 ff |P..P..Q.|%Q.EQ...|
|00000720| 17 85 51 19 a5 51 1b c5 | 51 1d e5 51 1f 05 52 21 |..Q..Q..|Q..Q..R!|
|00000730| 25 52 23 45 52 25 65 52 | 27 85 52 29 a5 52 2b c5 |%R#ER%eR|'.R).R+.|
|00000740| 52 2d e5 52 2f 05 53 31 | 25 53 33 45 53 35 65 53 |R-.R/.S1|%S3ES5eS|
|00000750| 37 85 53 39 a5 53 3b c5 | 53 3d e5 53 3f 05 54 41 |7.S9.S;.|S=.S?.TA|
|00000760| 25 54 43 45 54 45 65 54 | 47 85 54 49 a5 54 4b c5 |%TCETEeT|G.TI.TK.|
|00000770| 54 4d e5 54 4f 05 55 51 | 25 55 53 45 55 55 65 55 |TM.TO.UQ|%USEUUeU|
|00000780| 57 85 55 59 a5 55 5b c5 | 55 5d e5 55 5f 05 56 61 |W.UY.U[.|U].U_.Va|
|00000790| 25 56 63 45 56 65 65 56 | 67 85 56 69 a5 56 6b c5 |%VcEVeeV|g.Vi.Vk.|
|000007a0| 56 6d e5 56 6f 05 57 71 | 25 57 73 45 57 75 65 57 |Vm.Vo.Wq|%WsEWueW|
|000007b0| 77 85 57 79 a5 57 7b c5 | 57 7d e5 57 7f 05 58 81 |w.Wy.W{.|W}.W..X.|
|000007c0| 25 58 83 45 58 85 65 58 | 87 85 58 89 a5 58 8b c5 |%X.EX.eX|..X..X..|
|000007d0| 58 8d e5 58 8f 05 59 91 | 25 59 93 45 59 95 65 59 |X..X..Y.|%Y.EY.eY|
|000007e0| 97 85 59 99 a5 59 9b c5 | 59 9d e5 59 9f 05 5a a1 |..Y..Y..|Y..Y..Z.|
|000007f0| 25 5a a3 45 5a a5 65 5a | a7 85 5a a9 a5 5a ab c5 |%Z.EZ.eZ|..Z..Z..|
|00000800| 5a ad e5 5a af 05 5b b1 | 25 5b b3 45 5b b5 65 5b |Z..Z..[.|%[.E[.e[|
|00000810| b7 85 5b b9 a5 5b ff cf | 5b bd e5 5b bf 05 5c c1 |..[..[..|[..[..\.|
|00000820| 25 5c c3 45 5c c5 65 5c | c7 85 5c c9 a5 5c cb c5 |%\.E\.e\|..\..\..|
|00000830| 5c cd e5 5c cf 05 5d d1 | 25 5d d3 45 5d d5 65 5d |\..\..].|%].E].e]|
|00000840| d7 85 5d d9 a5 5d db c5 | 5d dd e5 5d df 05 5e e1 |..]..]..|]..]..^.|
|00000850| 25 5e e3 45 5e e5 65 5e | e7 85 5e e9 a5 5e eb c5 |%^.E^.e^|..^..^..|
|00000860| 5e ed e5 5e ef 05 5f f1 | 25 5f f3 45 5f f5 65 5f |^..^.._.|%_.E_.e_|
|00000870| f7 85 5f f9 a5 5f fb c5 | 5f fd e5 5f ff 05 60 01 |.._.._..|_.._..`.|
|00000880| 26 60 03 f6 ff 05 66 60 | 07 86 60 09 a6 60 0b c6 |&`....f`|..`..`..|
|00000890| 60 0d e6 60 0f 06 61 11 | 26 61 13 46 61 15 66 61 |`..`..a.|&a.Fa.fa|
|000008a0| 17 86 61 19 a6 61 1b c6 | 61 1d e6 61 1f 06 62 21 |..a..a..|a..a..b!|
|000008b0| 26 62 23 46 62 25 66 62 | 27 86 62 29 a6 62 2b c6 |&b#Fb%fb|'.b).b+.|
|000008c0| 62 2d e6 62 2f 06 63 31 | 26 63 33 46 63 35 66 63 |b-.b/.c1|&c3Fc5fc|
|000008d0| 37 86 63 39 a6 63 3b c6 | 63 3d e6 63 3f 06 64 41 |7.c9.c;.|c=.c?.dA|
|000008e0| 26 64 43 46 64 45 66 64 | 47 86 64 49 a6 64 4b c6 |&dCFdEfd|G.dI.dK.|
|000008f0| 64 4d e6 64 4f 06 65 51 | 26 65 53 46 65 55 66 65 |dM.dO.eQ|&eSFeUfe|
|00000900| 57 86 65 59 a6 65 5b c6 | 65 5d e6 65 5f 06 66 61 |W.eY.e[.|e].e_.fa|
|00000910| 26 66 63 46 66 65 66 66 | 67 86 66 69 a6 66 6b c6 |&fcFfeff|g.fi.fk.|
|00000920| 66 6d e6 66 6f 06 67 71 | 26 67 73 46 67 75 66 67 |fm.fo.gq|&gsFgufg|
|00000930| 77 86 67 79 a6 67 7b c6 | 67 7d e6 67 7f 06 68 81 |w.gy.g{.|g}.g..h.|
|00000940| f6 ff 83 46 68 85 66 68 | 87 86 68 89 a6 68 8b c6 |...Fh.fh|..h..h..|
|00000950| 68 8d e6 68 8f 06 69 91 | 26 69 93 46 69 95 66 69 |h..h..i.|&i.Fi.fi|
|00000960| 97 86 69 99 a6 69 9b c6 | 69 9d e6 69 9f 06 6a a1 |..i..i..|i..i..j.|
|00000970| 26 6a a3 46 6a a5 66 6a | a7 86 6a a9 a6 6a ab c6 |&j.Fj.fj|..j..j..|
|00000980| 6a ad e6 6a af 06 6b b1 | 26 6b b3 46 6b b5 66 6b |j..j..k.|&k.Fk.fk|
|00000990| b7 86 6b b9 a6 6b bb c6 | 6b bd e6 6b bf 06 6c c1 |..k..k..|k..k..l.|
|000009a0| 26 6c c3 46 6c c5 66 6c | c7 86 6c c9 a6 6c cb c6 |&l.Fl.fl|..l..l..|
|000009b0| 6c cd e6 6c cf 06 6d d1 | 26 6d d3 46 6d d5 66 6d |l..l..m.|&m.Fm.fm|
|000009c0| d7 86 6d d9 a6 6d db c6 | 6d dd e6 6d df 06 6e e1 |..m..m..|m..m..n.|
|000009d0| 26 6e e3 46 6e e5 66 6e | e7 86 6e ff af 6e eb c6 |&n.Fn.fn|..n..n..|
|000009e0| 6e ed e6 6e ef 06 6f f1 | f6 ff f3 46 6f f5 66 6f |n..n..o.|...Fo.fo|
|000009f0| f7 86 6f f9 a6 6f fb c6 | 6f fd e6 6f ff 06 70 01 |..o..o..|o..o..p.|
|00000a00| 27 70 03 47 70 05 f7 ff | 07 87 70 09 a7 70 0b c7 |'p.Gp...|..p..p..|
|00000a10| 70 0d e7 70 0f 07 71 11 | 27 71 13 f7 ff 15 67 71 |p..p..q.|'q....gq|
|00000a20| 17 87 71 19 a7 71 1b c7 | 71 ff ef 71 1f 07 72 21 |..q..q..|q..q..r!|
|00000a30| 27 72 23 47 72 25 67 72 | 27 87 72 29 a7 72 2b c7 |'r#Gr%gr|'.r).r+.|
|00000a40| 72 2d e7 72 2f 07 73 31 | 27 73 33 47 73 35 67 73 |r-.r/.s1|'s3Gs5gs|
|00000a50| 37 87 73 39 a7 73 3b c7 | 73 3d e7 73 3f 07 74 41 |7.s9.s;.|s=.s?.tA|
|00000a60| 27 74 43 47 74 45 67 74 | ff 8f 74 49 a7 74 4b c7 |'tCGtEgt|..tI.tK.|
|00000a70| 74 4d e7 74 4f 07 75 51 | 27 75 53 47 75 55 67 75 |tM.tO.uQ|'uSGuUgu|
|00000a80| 57 87 75 59 a7 75 ff cf | 75 5d e7 75 5f 07 76 61 |W.uY.u..|u].u_.va|
|00000a90| 27 76 63 47 76 65 67 76 | 67 87 76 69 a7 76 6b c7 |'vcGvegv|g.vi.vk.|
|00000aa0| 76 6d e7 76 6f 07 77 71 | 27 77 73 47 77 ff 6f 77 |vm.vo.wq|'wsGw.ow|
|00000ab0| 77 87 77 79 a7 77 7b c7 | 77 7d e7 77 7f f7 ff 81 |w.wy.w{.|w}.w....|
|00000ac0| 27 78 83 47 78 85 67 78 | 87 87 78 89 a7 78 8b c7 |'x.Gx.gx|..x..x..|
|00000ad0| 78 8d e7 78 8f 07 79 91 | 27 79 93 47 79 ff 6f 79 |x..x..y.|'y.Gy.oy|
|00000ae0| 97 87 79 99 a7 79 9b c7 | 79 9d e7 79 9f 07 7a a1 |..y..y..|y..y..z.|
|00000af0| 27 7a a3 47 7a a5 67 7a | a7 87 7a a9 f7 ff ab c7 |'z.Gz.gz|..z.....|
|00000b00| 7a ad f7 ff f4 00 18 bf | 07 7c c1 27 7c c3 47 7c |z.......|.|.'|.G||
|00000b10| c5 67 7c ff 8f 7c c9 f7 | ff cb c7 7c cd e7 7c cf |.g|..|..|...|..|.|
|00000b20| 07 7d d1 27 7d d3 47 7d | d5 67 7d d7 87 7d d9 a7 |.}.'}.G}|.g}..}..|
|00000b30| 7d db c7 7d dd e7 7d df | 07 7e e1 27 7e e3 47 7e |}..}..}.|.~.'~.G~|
|00000b40| e5 67 7e e7 87 7e e9 a7 | 7e eb c7 7e ed e7 7e ef |.g~..~..|~..~..~.|
|00000b50| 07 7f f1 27 7f f3 47 7f | f5 67 7f f7 87 7f f9 a7 |...'..G.|.g......|
|00000b60| 7f fb c7 7f fd e7 7f ff | 07 80 01 28 80 03 48 80 |........|...(..H.|
|00000b70| 05 68 80 07 88 80 09 a8 | 80 0b c8 80 0d e8 80 0f |.h......|........|
|00000b80| 08 81 11 28 81 13 48 81 | 18 f0 ff 17 88 81 19 a8 |...(..H.|........|
|00000b90| 81 1b c8 81 1d e8 81 1f | 08 82 21 f8 ff 23 48 82 |........|..!..#H.|
|00000ba0| 25 68 82 27 f8 ff 29 a8 | 82 2b c8 82 2d f8 ff 2f |%h.'..).|.+..-../|
|00000bb0| 08 83 31 28 83 33 48 83 | ff 6f 83 37 88 83 39 a8 |..1(.3H.|.o.7..9.|
|00000bc0| 83 3b c8 83 3d e8 83 3f | f8 ff 41 28 84 43 48 84 |.;..=..?|..A(.CH.|
|00000bd0| 45 68 84 47 88 84 ff 0f | f4 00 26 40 86 65 68 86 |Eh.G....|..&@.eh.|
|00000be0| 67 88 86 69 a8 86 6b c8 | 86 6d f8 ff 6f 08 87 71 |g..i..k.|.m..o..q|
|00000bf0| 28 87 73 48 87 75 68 87 | 77 f8 ff 79 a8 87 7b c8 |(.sH.uh.|w..y..{.|
|00000c00| 87 7d e8 87 7f 08 88 ff | 2f 88 83 48 88 85 68 88 |.}......|/..H..h.|
|00000c10| 87 88 88 89 a8 88 8b f8 | ff 8d f8 ff 8f 08 89 91 |........|........|
|00000c20| 28 89 93 48 89 95 68 89 | 97 f8 ff 99 a8 89 ff cf |(..H..h.|........|
|00000c30| 89 9d e8 89 ff 0f 8a a1 | 28 8a a3 f8 ff a5 68 8a |........|(.....h.|
|00000c40| a7 88 8a a9 a8 8a ff cf | 8a ad e8 8a ff 0f 8b b1 |........|........|
|00000c50| 28 8b b3 48 8b ff 6f 8b | b7 88 8b b9 a8 8b bb c8 |(..H..o.|........|
|00000c60| 8b ff ef 8b bf 08 8c c1 | 28 8c c3 48 8c c5 68 8c |........|(..H..h.|
|00000c70| c7 88 8c c9 a8 8c cb c8 | 8c cd e8 8c cf 08 8d d1 |........|........|
|00000c80| 28 8d d3 48 8d ff 6f 8d | d7 88 8d d9 a8 8d db f8 |(..H..o.|........|
|00000c90| ff dd e8 8d df 08 8e e1 | 28 8e ff 4f 8e e5 68 8e |........|(..O..h.|
|00000ca0| e7 88 8e e9 a8 8e ff cf | 8e ed e8 8e ef 08 8f ff |........|........|
|00000cb0| 2f 8f f3 48 8f f5 68 8f | f7 88 8f f9 a8 8f fb c8 |/..H..h.|........|
|00000cc0| 8f fd e8 8f ff 08 90 01 | f9 ff f4 00 28 e0 91 1f |........|....(...|
|00000cd0| 09 92 21 29 92 23 49 92 | 25 69 92 27 f9 ff 29 a9 |..!).#I.|%i.'..).|
|00000ce0| 92 2b c9 92 2d e9 92 2f | 09 93 31 29 93 33 49 93 |.+..-../|..1).3I.|
|00000cf0| 35 69 93 37 89 93 39 a9 | 93 3b c9 93 3d e9 93 3f |5i.7..9.|.;..=..?|
|00000d00| 09 94 41 29 94 43 49 94 | 02 f4 00 19 f9 ff ff 03 |..A).CI.|........|
|00000d10| 40 00 05 60 00 07 80 00 | 09 a0 00 0b c0 00 0d e0 |@..`....|........|
|00000d20| 00 0f 00 01 11 20 01 13 | 40 01 15 f0 f4 ff 0b ef |..... ..|@.......|
|00000d30| 01 4f 00 02 21 20 02 23 | 40 02 25 60 02 27 80 02 |.O..! .#|@.%`.'..|
|00000d40| 29 a0 02 2b c0 02 2d e0 | 02 2f 00 03 31 20 03 33 |)..+..-.|./..1 .3|
|00000d50| 40 03 35 60 03 37 80 03 | 39 a0 03 3b c0 03 3d e0 |@.5`.7..|9..;..=.|
|00000d60| 03 3f 00 04 41 20 04 43 | 40 04 45 60 04 47 80 04 |.?..A .C|@.E`.G..|
|00000d70| 49 a0 04 4b c0 04 ff ef | 04 ff 0f 05 51 20 05 53 |I..K....|....Q .S|
|00000d80| 40 05 55 60 05 57 80 05 | 59 a0 05 5b c0 05 5d f0 |@.U`.W..|Y..[..].|
|00000d90| ff f4 00 37 40 08 85 60 | 08 87 80 08 89 a0 08 8b |...7@..`|........|
|00000da0| c0 08 8d e0 08 ff 0f f4 | 00 18 0a a1 20 0a a3 40 |........|.... ..@|
|00000db0| 0a a5 60 0a a7 80 0a a9 | a0 0a ab c0 0a ad e0 0a |..`.....|........|
|00000dc0| af 00 0b b1 20 0b b3 40 | 0b b5 60 0b b7 80 0b b9 |.... ..@|..`.....|
|00000dd0| a0 0b bb c0 0b bd e0 0b | bf 00 0c c1 f0 ff c3 40 |........|.......@|
|00000de0| 0c c5 60 0c c7 80 0c c9 | a0 0c cb c0 0c cd e0 0c |..`.....|........|
|00000df0| cf 00 0d d1 20 0d d3 40 | 0d d5 60 0d d7 80 0d d9 |.... ..@|..`.....|
|00000e00| f0 ff db c0 0d dd e0 0d | df 00 0e e1 20 0e e3 40 |........|.... ..@|
|00000e10| 0e e5 60 0e e7 80 0e e9 | a0 0e eb c0 0e ed f0 ff |..`.....|........|
|00000e20| ef 00 0f f1 20 0f f3 40 | 0f f5 f0 ff f7 80 0f f9 |.... ..@|........|
|00000e30| a0 0f fb c0 0f fd f0 ff | ff 00 10 01 21 10 03 41 |........|....!..A|
|00000e40| 10 ff 6f 10 07 81 10 09 | a1 10 0b c1 10 0d e1 10 |..o.....|........|
|00000e50| 0f 01 11 11 21 11 ff 4f | 11 15 61 11 17 81 11 19 |....!..O|..a.....|
|00000e60| a1 11 1b f1 ff 1d e1 11 | 1f 01 12 21 21 12 19 40 |........|...!!..@|
|00000e70| 12 25 61 12 27 81 12 29 | a1 12 2b c1 12 2d e1 12 |.%a.'..)|..+..-..|
|00000e80| 2f 01 13 31 21 13 33 41 | 13 35 61 13 37 81 13 39 |/..1!.3A|.5a.7..9|
|00000e90| a1 13 3b c1 13 3d e1 13 | 3f 01 14 41 21 14 43 41 |..;..=..|?..A!.CA|
|00000ea0| 14 45 61 14 47 81 14 49 | a1 14 4b c1 14 4d e1 14 |.Ea.G..I|..K..M..|
|00000eb0| 4f 01 15 51 21 15 53 41 | 15 55 61 15 57 f1 ff 59 |O..Q!.SA|.Ua.W..Y|
|00000ec0| a1 15 5b c1 15 5d e1 15 | 5f 01 16 61 21 16 63 41 |..[..]..|_..a!.cA|
|00000ed0| 16 65 61 16 67 81 16 69 | a1 16 6b c1 16 6d e1 16 |.ea.g..i|..k..m..|
|00000ee0| 6f 01 17 71 f1 ff 73 f1 | ff 75 61 17 77 f1 ff 79 |o..q..s.|.ua.w..y|
|00000ef0| a1 17 ff cf 17 7d e1 17 | 7f 01 18 81 21 18 83 f1 |.....}..|....!...|
|00000f00| ff 85 61 18 87 81 18 89 | a1 18 8b c1 18 8d f1 ff |..a.....|........|
|00000f10| 8f 01 19 91 21 19 93 41 | 19 95 61 19 97 f1 ff 99 |....!..A|..a.....|
|00000f20| a1 19 9b c1 19 9d e1 19 | 9f 01 1a a1 21 1a a3 41 |........|....!..A|
|00000f30| 1a a5 61 1a a7 f1 ff d8 | a1 1a ab c1 1a ad e1 1a |..a.....|........|
|00000f40| af 01 1b b1 21 1b b3 41 | 1b b5 61 1b b7 81 1b b9 |....!..A|..a.....|
|00000f50| a1 1b bb c1 1b bd e1 1b | bf 01 1c c1 21 1c c3 41 |........|....!..A|
|00000f60| 1c c5 61 1c c7 81 1c c9 | a1 1c cb c1 1c cd e1 1c |..a.....|........|
|00000f70| cf 01 1d d1 21 1d d3 41 | 1d d5 61 1d d7 f1 ff d9 |....!..A|..a.....|
|00000f80| f1 ff f4 00 ff f4 00 ff | f4 00 c0 af 03 3b b1 23 |........|.....;.#|
|00000f90| 3b b3 43 3b b5 63 3b b7 | 83 3b b9 a3 3b bb c3 3b |;.C;.c;.|.;..;..;|
|00000fa0| bd e3 3b bf 03 3c c1 23 | 3c c3 43 3c c5 63 3c c7 |..;..<.#|<.C<.c<.|
|00000fb0| 83 3c c9 a3 3c cb c3 3c | cd e3 3c cf 03 3d d1 23 |.<..<..<|..<..=.#|
|00000fc0| 3d d3 43 3d d5 63 3d d7 | 83 3d d9 a3 3d db c3 3d |=.C=.c=.|.=..=..=|
|00000fd0| dd e3 3d df 03 3e e1 23 | 3e e3 43 3e e5 63 3e e7 |..=..>.#|>.C>.c>.|
|00000fe0| 83 3e e9 a3 3e eb c3 3e | ed e3 3e ef 03 3f f1 23 |.>..>..>|..>..?.#|
|00000ff0| 3f f3 43 3f f5 63 3f f7 | 83 3f f9 a3 3f fb c3 3f |?.C?.c?.|.?..?..?|
|00001000| fd e3 3f ff 03 40 01 24 | 40 03 44 40 05 64 40 07 |..?..@.$|@.D@.d@.|
|00001010| 84 40 09 a4 40 0b c4 40 | 0d e4 40 0f 04 41 11 24 |.@..@..@|..@..A.$|
|00001020| 41 13 44 41 15 64 41 17 | 84 41 19 a4 41 1b c4 41 |A.DA.dA.|.A..A..A|
|00001030| 1d e4 41 1f 04 42 21 24 | 42 23 44 42 25 64 42 27 |..A..B!$|B#DB%dB'|
|00001040| 84 42 29 a4 42 2b c4 42 | 2d e4 42 2f 04 43 31 24 |.B).B+.B|-.B/.C1$|
|00001050| 43 33 44 43 35 64 43 37 | 84 43 39 a4 43 3b c4 43 |C3DC5dC7|.C9.C;.C|
|00001060| 3d e4 43 3f 04 44 41 24 | 44 43 44 44 45 64 44 47 |=.C?.DA$|DCDDEdDG|
|00001070| 84 44 49 a4 44 4b c4 44 | 4d e4 44 4f 04 45 51 24 |.DI.DK.D|M.DO.EQ$|
|00001080| 45 53 44 45 55 64 45 57 | 84 45 59 a4 45 5b c4 45 |ESDEUdEW|.EY.E[.E|
|00001090| 5d e4 45 5f 04 46 61 24 | 46 63 44 46 65 64 46 67 |].E_.Fa$|FcDFedFg|
|000010a0| 84 46 69 a4 46 6b c4 46 | 6d e4 46 6f 04 47 71 24 |.Fi.Fk.F|m.Fo.Gq$|
|000010b0| 47 73 44 47 75 64 47 77 | 84 47 79 a4 47 7b c4 47 |GsDGudGw|.Gy.G{.G|
|000010c0| 7d e4 47 7f 04 48 81 24 | 48 83 44 48 85 64 48 87 |}.G..H.$|H.DH.dH.|
|000010d0| 84 48 89 a4 48 8b c4 48 | 8d e4 48 8f 04 49 91 24 |.H..H..H|..H..I.$|
|000010e0| 49 93 44 49 95 64 49 97 | 84 49 99 a4 49 9b c4 49 |I.DI.dI.|.I..I..I|
|000010f0| 9d e4 49 9f 04 4a a1 24 | 4a a3 44 4a a5 64 4a a7 |..I..J.$|J.DJ.dJ.|
|00001100| 84 4a a9 a4 4a ab c4 4a | ad e4 4a af 04 4b b1 24 |.J..J..J|..J..K.$|
|00001110| 4b b3 44 4b b5 64 4b b7 | 84 4b b9 a4 4b bb c4 4b |K.DK.dK.|.K..K..K|
|00001120| bd e4 4b bf 04 4c c1 24 | 4c c3 44 4c c5 64 4c c7 |..K..L.$|L.DL.dL.|
|00001130| 84 4c c9 a4 4c cb c4 4c | cd e4 4c cf 04 4d d1 24 |.L..L..L|..L..M.$|
|00001140| 4d d3 44 4d d5 64 4d d7 | 84 4d d9 a4 4d db c4 4d |M.DM.dM.|.M..M..M|
|00001150| dd e4 4d df 04 4e e1 24 | 4e e3 44 4e e5 64 4e e7 |..M..N.$|N.DN.dN.|
|00001160| 84 4e e9 a4 4e eb c4 4e | ed e4 4e ef 04 4f f1 24 |.N..N..N|..N..O.$|
|00001170| 4f f3 44 4f f5 64 4f f7 | 84 4f f9 a4 4f fb c4 4f |O.DO.dO.|.O..O..O|
|00001180| fd e4 4f ff 04 50 01 25 | 50 03 45 50 05 65 50 07 |..O..P.%|P.EP.eP.|
|00001190| 85 50 09 a5 50 0b c5 50 | 0d e5 50 0f 05 51 11 25 |.P..P..P|..P..Q.%|
|000011a0| 51 13 45 51 15 f5 ff 17 | 85 51 19 a5 51 1b c5 51 |Q.EQ....|.Q..Q..Q|
|000011b0| 1d e5 51 1f 05 52 21 25 | 52 23 45 52 25 65 52 27 |..Q..R!%|R#ER%eR'|
|000011c0| 85 52 29 a5 52 2b c5 52 | 2d e5 52 2f 05 53 31 25 |.R).R+.R|-.R/.S1%|
|000011d0| 53 33 45 53 35 65 53 37 | 85 53 39 a5 53 3b c5 53 |S3ES5eS7|.S9.S;.S|
|000011e0| 3d e5 53 3f 05 54 41 25 | 54 43 45 54 45 65 54 47 |=.S?.TA%|TCETEeTG|
|000011f0| 85 54 49 a5 54 4b c5 54 | 4d e5 54 4f 05 55 51 25 |.TI.TK.T|M.TO.UQ%|
|00001200| 55 53 45 55 55 65 55 57 | 85 55 59 a5 55 5b c5 55 |USEUUeUW|.UY.U[.U|
|00001210| 5d e5 55 5f 05 56 61 25 | 56 63 45 56 65 65 56 67 |].U_.Va%|VcEVeeVg|
|00001220| 85 56 69 a5 56 6b c5 56 | 6d e5 56 6f 05 57 71 25 |.Vi.Vk.V|m.Vo.Wq%|
|00001230| 57 73 45 57 75 65 57 77 | 85 57 79 a5 57 7b c5 57 |WsEWueWw|.Wy.W{.W|
|00001240| 7d e5 57 7f 05 58 81 25 | 58 83 45 58 85 65 58 87 |}.W..X.%|X.EX.eX.|
|00001250| 85 58 89 a5 58 8b c5 58 | 8d e5 58 8f 05 59 91 25 |.X..X..X|..X..Y.%|
|00001260| 59 93 45 59 95 65 59 97 | 85 59 99 a5 59 9b c5 59 |Y.EY.eY.|.Y..Y..Y|
|00001270| 9d e5 59 9f 05 5a a1 25 | 5a a3 45 5a a5 65 5a a7 |..Y..Z.%|Z.EZ.eZ.|
|00001280| 85 5a a9 a5 5a ab c5 5a | ad e5 5a af 05 5b b1 25 |.Z..Z..Z|..Z..[.%|
|00001290| 5b b3 45 5b b5 65 5b b7 | 85 5b b9 a5 5b ff cf 5b |[.E[.e[.|.[..[..[|
|000012a0| bd e5 5b bf 05 5c c1 25 | 5c c3 45 5c c5 65 5c c7 |..[..\.%|\.E\.e\.|
|000012b0| 85 5c c9 a5 5c cb c5 5c | cd e5 5c cf 05 5d d1 25 |.\..\..\|..\..].%|
|000012c0| 5d d3 45 5d d5 65 5d d7 | 85 5d d9 a5 5d db c5 5d |].E].e].|.]..]..]|
|000012d0| dd e5 5d df 05 5e e1 25 | 5e e3 45 5e e5 65 5e e7 |..]..^.%|^.E^.e^.|
|000012e0| 85 5e e9 a5 5e eb c5 5e | ed e5 5e ef 05 5f f1 25 |.^..^..^|..^.._.%|
|000012f0| 5f f3 45 5f f5 65 5f f7 | 85 5f f9 a5 5f fb c5 5f |_.E_.e_.|._.._.._|
|00001300| fd e5 5f ff 05 60 01 26 | 60 03 f6 ff 05 66 60 07 |.._..`.&|`....f`.|
|00001310| 86 60 09 a6 60 0b c6 60 | 0d e6 60 0f 06 61 11 26 |.`..`..`|..`..a.&|
|00001320| 61 13 46 61 15 66 61 17 | 86 61 19 a6 61 1b c6 61 |a.Fa.fa.|.a..a..a|
|00001330| 1d e6 61 1f 06 62 21 26 | 62 23 46 62 25 66 62 27 |..a..b!&|b#Fb%fb'|
|00001340| 86 62 29 a6 62 2b c6 62 | 2d e6 62 2f 06 63 31 26 |.b).b+.b|-.b/.c1&|
|00001350| 63 33 46 63 35 66 63 37 | 86 63 39 a6 63 3b c6 63 |c3Fc5fc7|.c9.c;.c|
|00001360| 3d e6 63 3f 06 64 41 26 | 64 43 46 64 45 66 64 47 |=.c?.dA&|dCFdEfdG|
|00001370| 86 64 49 a6 64 4b c6 64 | 4d e6 64 4f 06 65 51 26 |.dI.dK.d|M.dO.eQ&|
|00001380| 65 53 46 65 55 66 65 57 | 86 65 59 a6 65 5b c6 65 |eSFeUfeW|.eY.e[.e|
|00001390| 5d e6 65 5f 06 66 61 26 | 66 63 46 66 65 66 66 67 |].e_.fa&|fcFfeffg|
|000013a0| 86 66 69 a6 66 6b c6 66 | 6d e6 66 6f 06 67 71 26 |.fi.fk.f|m.fo.gq&|
|000013b0| 67 73 46 67 75 66 67 77 | 86 67 79 a6 67 7b c6 67 |gsFgufgw|.gy.g{.g|
|000013c0| 7d e6 67 7f 06 68 81 f6 | ff 83 46 68 85 66 68 87 |}.g..h..|..Fh.fh.|
|000013d0| 86 68 89 a6 68 8b c6 68 | 8d e6 68 8f 06 69 91 26 |.h..h..h|..h..i.&|
|000013e0| 69 93 46 69 95 66 69 97 | 86 69 99 a6 69 9b c6 69 |i.Fi.fi.|.i..i..i|
|000013f0| 9d e6 69 9f 06 6a a1 26 | 6a a3 46 6a a5 66 6a a7 |..i..j.&|j.Fj.fj.|
|00001400| 86 6a a9 a6 6a ab c6 6a | ad e6 6a af 06 6b b1 26 |.j..j..j|..j..k.&|
|00001410| 6b b3 46 6b b5 66 6b b7 | 86 6b b9 a6 6b bb c6 6b |k.Fk.fk.|.k..k..k|
|00001420| bd e6 6b bf 06 6c c1 26 | 6c c3 46 6c c5 66 6c c7 |..k..l.&|l.Fl.fl.|
|00001430| 86 6c c9 a6 6c cb c6 6c | cd e6 6c cf 06 6d d1 26 |.l..l..l|..l..m.&|
|00001440| 6d d3 46 6d d5 66 6d d7 | 86 6d d9 a6 6d db c6 6d |m.Fm.fm.|.m..m..m|
|00001450| dd e6 6d df 06 6e e1 26 | 6e e3 46 6e e5 66 6e e7 |..m..n.&|n.Fn.fn.|
|00001460| 86 6e ff af 6e eb c6 6e | ed e6 6e ef 06 6f f1 f6 |.n..n..n|..n..o..|
|00001470| ff f3 46 6f f5 66 6f f7 | 86 6f f9 a6 6f fb c6 6f |..Fo.fo.|.o..o..o|
|00001480| fd e6 6f ff 06 70 01 27 | 70 03 47 70 05 f7 ff 07 |..o..p.'|p.Gp....|
|00001490| 87 70 09 a7 70 0b c7 70 | 0d e7 70 0f 07 71 11 27 |.p..p..p|..p..q.'|
|000014a0| 71 13 f7 ff 15 67 71 17 | 87 71 19 a7 71 1b c7 71 |q....gq.|.q..q..q|
|000014b0| ff ef 71 1f 07 72 21 27 | 72 23 47 72 25 67 72 27 |..q..r!'|r#Gr%gr'|
|000014c0| 87 72 29 a7 72 2b c7 72 | 2d e7 72 2f 07 73 31 27 |.r).r+.r|-.r/.s1'|
|000014d0| 73 33 47 73 35 67 73 37 | 87 73 39 a7 73 3b c7 73 |s3Gs5gs7|.s9.s;.s|
|000014e0| 3d e7 73 3f 07 74 41 27 | 74 43 47 74 45 67 74 ff |=.s?.tA'|tCGtEgt.|
|000014f0| 8f 74 49 a7 74 4b c7 74 | 4d e7 74 4f 07 75 51 27 |.tI.tK.t|M.tO.uQ'|
|00001500| 75 53 47 75 55 67 75 57 | 87 75 59 a7 75 ff cf 75 |uSGuUguW|.uY.u..u|
|00001510| 5d e7 75 5f 07 76 61 27 | 76 63 47 76 65 67 76 67 |].u_.va'|vcGvegvg|
|00001520| 87 76 69 a7 76 6b c7 76 | 6d e7 76 6f 07 77 71 27 |.vi.vk.v|m.vo.wq'|
|00001530| 77 73 47 77 ff 6f 77 77 | 87 77 79 a7 77 7b c7 77 |wsGw.oww|.wy.w{.w|
|00001540| 7d e7 77 7f f7 ff 81 27 | 78 83 47 78 85 67 78 87 |}.w....'|x.Gx.gx.|
|00001550| 87 78 89 a7 78 8b c7 78 | 8d e7 78 8f 07 79 91 27 |.x..x..x|..x..y.'|
|00001560| 79 93 47 79 ff 6f 79 97 | 87 79 99 a7 79 9b c7 79 |y.Gy.oy.|.y..y..y|
|00001570| 9d e7 79 9f 07 7a a1 27 | 7a a3 47 7a a5 67 7a a7 |..y..z.'|z.Gz.gz.|
|00001580| 87 7a a9 f7 ff ab c7 7a | ad f7 ff f4 00 18 bf 07 |.z.....z|........|
|00001590| 7c c1 27 7c c3 47 7c c5 | 67 7c ff 8f 7c c9 f7 ff ||.'|.G|.|g|..|...|
|000015a0| cb c7 7c cd e7 7c cf 07 | 7d d1 27 7d d3 47 7d d5 |..|..|..|}.'}.G}.|
|000015b0| 67 7d d7 87 7d d9 a7 7d | db c7 7d dd e7 7d df 07 |g}..}..}|..}..}..|
|000015c0| 7e e1 27 7e e3 47 7e e5 | 67 7e e7 87 7e e9 a7 7e |~.'~.G~.|g~..~..~|
|000015d0| eb c7 7e ed e7 7e ef 07 | 7f f1 27 7f f3 47 7f f5 |..~..~..|..'..G..|
|000015e0| 67 7f f7 87 7f f9 a7 7f | fb c7 7f fd e7 7f ff 07 |g.......|........|
|000015f0| 80 01 28 80 03 48 80 05 | 68 80 07 88 80 09 a8 80 |..(..H..|h.......|
|00001600| 0b c8 80 0d e8 80 0f 08 | 81 11 28 81 13 48 81 18 |........|..(..H..|
|00001610| f0 ff 17 88 81 19 a8 81 | 1b c8 81 1d e8 81 1f 08 |........|........|
|00001620| 82 21 f8 ff 23 48 82 25 | 68 82 27 f8 ff 29 a8 82 |.!..#H.%|h.'..)..|
|00001630| 2b c8 82 2d f8 ff 2f 08 | 83 31 28 83 33 48 83 ff |+..-../.|.1(.3H..|
|00001640| 6f 83 37 88 83 39 a8 83 | 3b c8 83 3d e8 83 3f f8 |o.7..9..|;..=..?.|
|00001650| ff 41 28 84 43 48 84 45 | 68 84 47 88 84 ff 0f f4 |.A(.CH.E|h.G.....|
|00001660| 00 26 40 86 65 68 86 67 | 88 86 69 a8 86 6b c8 86 |.&@.eh.g|..i..k..|
|00001670| 6d f8 ff 6f 08 87 71 28 | 87 73 48 87 75 68 87 77 |m..o..q(|.sH.uh.w|
|00001680| f8 ff 79 a8 87 7b c8 87 | 7d e8 87 7f 08 88 ff 2f |..y..{..|}....../|
|00001690| 88 83 48 88 85 68 88 87 | 88 88 89 a8 88 8b f8 ff |..H..h..|........|
|000016a0| 8d f8 ff 8f 08 89 91 28 | 89 93 48 89 95 68 89 97 |.......(|..H..h..|
|000016b0| f8 ff 99 a8 89 ff cf 89 | 9d e8 89 ff 0f 8a a1 28 |........|.......(|
|000016c0| 8a a3 f8 ff a5 68 8a a7 | 88 8a a9 a8 8a ff cf 8a |.....h..|........|
|000016d0| ad e8 8a ff 0f 8b b1 28 | 8b b3 48 8b ff 6f 8b b7 |.......(|..H..o..|
|000016e0| 88 8b b9 a8 8b bb c8 8b | ff ef 8b bf 08 8c c1 28 |........|.......(|
|000016f0| 8c c3 48 8c c5 68 8c c7 | 88 8c c9 a8 8c cb c8 8c |..H..h..|........|
|00001700| cd e8 8c cf 08 8d d1 28 | 8d d3 48 8d ff 6f 8d d7 |.......(|..H..o..|
|00001710| 88 8d d9 a8 8d db f8 ff | dd e8 8d df 08 8e e1 28 |........|.......(|
|00001720| 8e ff 4f 8e e5 68 8e e7 | 88 8e e9 a8 8e ff cf 8e |..O..h..|........|
|00001730| ed e8 8e ef 08 8f ff 2f | 8f f3 48 8f f5 68 8f f7 |......./|..H..h..|
|00001740| 88 8f f9 a8 8f fb c8 8f | fd e8 8f ff 08 90 01 f9 |........|........|
|00001750| ff f4 00 28 e0 91 1f 09 | 92 21 29 92 23 49 92 25 |...(....|.!).#I.%|
|00001760| 69 92 27 f9 ff 29 a9 92 | 2b c9 92 2d e9 92 2f 09 |i.'..)..|+..-../.|
|00001770| 93 31 29 93 33 49 93 35 | 69 93 37 89 93 39 a9 93 |.1).3I.5|i.7..9..|
|00001780| 3b c9 93 3d e9 93 3f 09 | 94 41 29 94 43 49 94 02 |;..=..?.|.A).CI..|
|00001790| f4 00 19 71 08 ff 45 52 | 57 49 4e ff 20 03 4c 53 |...q..ER|WIN. .LS|
|000017a0| 50 20 ff 00 0a 1d 7d 3e | 18 e9 06 00 11 00 00 45 |P ....}>|.......E|
|000017b0| 58 57 ff 20 05 4c 53 50 | 20 ff 00 0a 5b 4e 41 18 |XW. .LSP| ...[NA.|
|000017c0| bd 08 5f 2f 00 00 53 45 | 4c 56 ff 20 04 4c 53 50 |.._/..SE|LV. .LSP|
|000017d0| 20 ff 00 0a a1 4e 3f 18 | f2 06 d3 27 00 00 50 4c | ....N?.|...'..PL|
|000017e0| 45 58 50 4c 20 20 4c 53 | 50 20 ff 00 0a 89 ba 66 |EXPL LS|P .....f|
|000017f0| 15 14 07 7b 10 00 00 50 | 57 ff 20 06 4c 53 50 20 |...{...P|W. .LSP |
|00001800| ff 00 0a 83 82 3e 18 1d | 07 80 53 00 00 45 45 4c |.....>..|..S..EEL|
|00001810| 56 ff 20 04 4c 53 50 20 | ff 00 0a ac 4e 3f 18 47 |V. .LSP |....N?.G|
|00001820| 07 e9 27 00 00 49 53 57 | 49 4e ff 20 03 4c 53 50 |..'..ISW|IN. .LSP|
|00001830| 20 ff 00 0a 8a 80 3e 18 | 5b 07 80 33 00 00 4f 50 | .....>.|[..3..OP|
|00001840| 4d ff 20 05 4c 53 50 20 | ff 00 0a 96 83 3e 18 75 |M. .LSP |.....>.u|
|00001850| 07 00 16 00 00 54 45 52 | ff 20 05 4c 53 50 20 ff |.....TER|. .LSP .|
|00001860| 00 0a 88 4e 3f 18 06 07 | e9 1b 00 00 53 41 4e ff |...N?...|....SAN.|
|00001870| 20 05 4c 53 50 20 ff 00 | 0a 6c 7f b8 16 aa 07 5b | .LSP ..|.l.....[|
|00001880| 07 00 00 54 4a ff 20 06 | 4c 53 50 20 ff 00 0a 7d |...TJ. .|LSP ...}|
|00001890| a5 5c 18 1d 00 3d 21 00 | 00 46 54 4f 4c ff 20 04 |.\...=!.|.FTOL. .|
|000018a0| 4c 53 50 20 ff 00 0a 12 | 84 3e 18 c7 07 00 06 00 |LSP ....|.>......|
|000018b0| 00 45 52 41 50 ff 20 04 | 4c 53 50 20 ff 00 0a 40 |.ERAP. .|LSP ...@|
|000018c0| 84 3e 18 15 08 00 02 00 | 00 45 4e 55 33 ff 20 04 |.>......|.ENU3. .|
|000018d0| 4c 53 50 20 ff 00 0a a8 | 49 41 18 16 08 9e 17 00 |LSP ....|IA......|
|000018e0| 00 4c 45 49 ff 20 05 4c | 53 50 20 ff 00 0a 6b 4a |.LEI. .L|SP ...kJ|
|000018f0| 41 18 af 08 c9 0a 00 00 | 54 4a 45 53 ff 20 04 4c |A.......|TJES. .L|
|00001900| 53 50 20 ff 00 0a 15 4a | 41 18 63 08 90 15 00 00 |SP ....J|A.c.....|
|00001910| 4d 4e 32 ff 20 05 4c 53 | 50 20 ff 00 0a 17 bb 66 |MN2. .LS|P .....f|
|00001920| 15 22 08 d2 0b 00 00 53 | 54 41 49 52 ff 20 03 4c |.".....S|TAIR. .L|
|00001930| 53 50 20 ff 00 0a 1d 52 | 51 17 28 08 23 0b 00 00 |SP ....R|Q.(.#...|
|00001940| 43 48 41 4d ff 20 04 4c | 53 50 20 ff 00 0a 31 bb |CHAM. .L|SP ...1.|
|00001950| 66 15 2e 08 78 0d 00 00 | 46 4c 4c 45 54 ff 20 03 |f...x...|FLLET. .|
|00001960| 4c 53 50 20 ff 00 0a 38 | bb 66 15 35 08 c1 14 00 |LSP ...8|.f.5....|
|00001970| 00 43 4f 52 4e ff 20 04 | 4c 53 50 20 ff 00 0a 41 |.CORN. .|LSP ...A|
|00001980| bb 66 15 40 08 08 11 00 | 00 4c 54 4f 46 ff 20 04 |.f.@....|.LTOF. .|
|00001990| 4c 53 50 20 ff 00 0a d1 | 71 3d 18 58 01 6b 33 00 |LSP ....|q=.X.k3.|
|000019a0| 00 45 44 47 45 ff 20 04 | 4c 53 50 20 ff 00 0a 69 |.EDGE. .|LSP ...i|
|000019b0| bb 66 15 6e 08 7d 12 00 | 00 43 48 46 41 43 45 20 |.f.n.}..|.CHFACE |
|000019c0| 20 4c 53 50 20 ff 00 0a | 70 bb 66 15 78 08 80 11 | LSP ...|p.f.x...|
|000019d0| 00 00 45 58 54 46 ff 20 | 04 4c 53 50 20 ff 00 0a |..EXTF. |.LSP ...|
|000019e0| 76 bb 66 15 81 08 ac 14 | 00 00 55 43 53 ff 20 05 |v.f.....|..UCS. .|
|000019f0| 4c 53 50 20 ff 00 0a 86 | bb 66 15 8c 08 90 02 00 |LSP ....|.f......|
|00001a00| 00 43 4f 4c 55 4d 45 20 | 20 4c 53 50 20 ff 00 0a |.COLUME | LSP ...|
|00001a10| d1 54 41 18 d5 08 78 0d | 00 00 33 44 41 52 52 41 |.TA...x.|..3DARRA|
|00001a20| 59 20 4c 53 50 20 ff 00 | 0a 51 98 28 18 8e 08 e9 |Y LSP ..|.Q.(....|
|00001a30| 13 00 00 4d 49 52 52 ff | 20 04 4c 53 50 20 ff 00 |...MIRR.| .LSP ..|
|00001a40| 0a a1 bb 66 15 98 08 67 | 05 00 00 45 4c 56 ff 20 |...f...g|...ELV. |
|00001a50| 05 4c 53 50 20 ff 00 0a | b0 bb 66 15 9b 08 a1 07 |.LSP ...|..f.....|
|00001a60| 00 00 50 4c 56 ff 20 05 | 4c 53 50 20 ff 00 0a 99 |..PLV. .|LSP ....|
|00001a70| 82 b7 16 9f 08 75 09 00 | 00 33 44 53 54 ff 20 04 |.....u..|.3DST. .|
|00001a80| 4c 53 50 20 ff 00 0a 56 | bc 2b 16 a4 08 ba 0c 00 |LSP ...V|.+......|
|00001a90| 00 50 42 41 4e 4c 56 20 | 20 4c 53 50 20 ff 00 0a |.PBANLV | LSP ...|
|00001aa0| d4 a4 d4 16 ab 08 00 07 | 00 00 50 58 57 ff 20 05 |........|..PXW. .|
|00001ab0| 4c 53 50 20 ff 00 0a d1 | 54 3f 18 be 07 62 11 00 |LSP ....|T?...b..|
|00001ac0| 00 52 4f 4f 46 ff 20 04 | 4c 53 50 20 ff 00 0a ab |.ROOF. .|LSP ....|
|00001ad0| 72 3d 18 b5 08 b1 0f 00 | 00 50 52 4f 4a ff 20 04 |r=......|.PROJ. .|
|00001ae0| 4c 53 50 20 ff 00 0a 3a | 80 3d 18 dc 08 ab 0d 00 |LSP ...:|.=......|
|00001af0| 00 43 48 4b 57 ff 20 04 | 4c 53 50 20 ff 00 0a 02 |.CHKW. .|LSP ....|
|00001b00| 82 74 17 e3 08 4b 0e 00 | 00 54 57 4f ff 20 05 4c |.t...K..|.TWO. .L|
|00001b10| 53 50 20 ff 00 0a 73 80 | 3d 18 eb 08 e6 0b 00 00 |SP ...s.|=.......|
|00001b20| 50 57 41 4c 4c ff 20 03 | 4c 53 50 20 ff 00 0a 16 |PWALL. .|LSP ....|
|00001b30| 68 7a 17 f1 08 64 20 00 | 00 44 49 4d 57 41 4c 4c |hz...d .|.DIMWALL|
|00001b40| 20 4c 53 50 20 ff 00 0a | 82 7a 4a 18 a9 01 22 5c | LSP ...|.zJ..."\|
|00001b50| 00 00 4c 54 31 ff 20 05 | 4c 53 50 20 ff 00 0a 1d |..LT1. .|LSP ....|
|00001b60| 81 4a 18 7b 01 80 11 00 | 00 4c 54 32 ff 20 05 4c |.J.{....|.LT2. .L|
|00001b70| 53 50 20 ff 00 0a 60 5d | 4b 18 8e 01 00 13 00 00 |SP ...`]|K.......|
|00001b80| 4c 54 33 ff 20 05 4c 53 | 50 20 ff 00 0a db 5e 4b |LT3. .LS|P ....^K|
|00001b90| 18 84 01 80 12 00 00 53 | 4c 54 34 ff 20 04 4c 53 |.......S|LT4. .LS|
|00001ba0| 50 20 ff 00 0a 37 62 81 | 17 1d 09 00 16 00 00 4c |P ...7b.|.......L|
|00001bb0| 34 ff 20 06 4c 53 50 20 | ff 00 0a 49 7c 89 17 28 |4. .LSP |...I|..(|
|00001bc0| 09 00 61 00 00 4c 54 30 | ff 20 05 4c 53 50 20 ff |..a..LT0|. .LSP .|
|00001bd0| 00 0a c6 52 4b 18 78 01 | 80 05 00 00 4c 54 44 ff |...RK.x.|....LTD.|
|00001be0| 20 05 4c 53 50 20 ff 00 | 0a aa 52 4b 18 74 01 00 | .LSP ..|..RK.t..|
|00001bf0| 08 00 00 4c 54 34 ff 20 | 05 4c 53 50 20 ff 00 0a |...LT4. |.LSP ...|
|00001c00| 51 87 98 17 72 01 00 03 | 00 00 4f 54 48 4f 41 58 |Q...r...|..OTHOAX|
|00001c10| 20 20 4c 53 50 20 ff 00 | 0a 05 66 2a 18 1f 00 70 | LSP ..|..f*...p|
|00001c20| 5a 00 00 43 48 48 ff 20 | 05 4c 53 50 20 ff 00 0a |Z..CHH. |.LSP ...|
|00001c30| d7 84 3e 18 4d 00 80 03 | 00 00 4c 54 ff 20 06 4c |..>.M...|..LT. .L|
|00001c40| 53 50 20 ff 00 0a 5d 58 | 4b 18 23 01 80 69 00 00 |SP ...]X|K.#..i..|
|00001c50| 5a 58 59 ff 20 05 4c 53 | 50 20 ff 00 0a 1c 75 2a |ZXY. .LS|P ....u*|
|00001c60| 18 83 00 24 16 00 00 50 | 41 4f ff 20 05 4c 53 50 |...$...P|AO. .LSP|
|00001c70| 20 ff 00 0a 06 54 52 18 | ca 07 80 97 00 00 53 53 | ....TR.|......SS|
|00001c80| 54 ff 20 05 4c 53 50 20 | ff 00 0a 32 54 52 18 98 |T. .LSP |...2TR..|
|00001c90| 01 80 1f 00 00 49 4e 53 | 57 49 4e 20 20 4c 53 50 |.....INS|WIN LSP|
|00001ca0| 20 ff 00 0a 23 6f 3c 18 | 9f 00 73 44 00 00 41 52 | ...#o<.|..sD..AR|
|00001cb0| 43 57 41 4c 4c 20 4c 53 | 50 20 ff 00 0a a4 52 3c |CWALL LS|P ....R<|
|00001cc0| 18 c2 00 2d 2f 00 00 45 | 52 41 57 49 4e 20 20 4c |...-/..E|RAWIN L|
|00001cd0| 53 50 20 ff 00 0a 59 63 | 3c 18 da 00 bb 27 00 00 |SP ...Yc|<....'..|
|00001ce0| 54 57 41 4c 4c ff 20 03 | 4c 53 50 20 ff 00 0a ce |TWALL. .|LSP ....|
|00001cf0| 64 3c 18 ee 00 d9 0f 00 | 00 54 57 49 4e ff 20 04 |d<......|.TWIN. .|
|00001d00| 4c 53 50 20 ff 00 0a 21 | 65 3c 18 f6 00 55 0e 00 |LSP ...!|e<...U..|
|00001d10| 00 54 58 48 ff 20 05 4c | 53 50 20 ff 00 0a 88 65 |.TXH. .L|SP ....e|
|00001d20| 3c 18 fe 00 23 0d 00 00 | 57 49 4e 44 4f 57 20 20 |<...#...|WINDOW |
|00001d30| 4c 53 50 20 ff 00 0a 1c | 6b 3c 18 05 01 4f 1a 00 |LSP ....|k<...O..|
|00001d40| 00 57 45 4c 56 ff 20 04 | 4c 53 50 20 ff 00 0a c1 |.WELV. .|LSP ....|
|00001d50| 4e 3f 18 95 07 52 29 00 | 00 4e 45 4c 56 ff 20 04 |N?...R).|.NELV. .|
|00001d60| 4c 53 50 20 ff 00 0a b7 | 4e 3f 18 80 07 4c 29 00 |LSP ....|N?...L).|
|00001d70| 00 44 57 41 4c 4c ff 20 | 03 4c 53 50 20 ff 00 0a |.DWALL. |.LSP ...|
|00001d80| 02 73 3c 18 13 01 d7 10 | 00 00 4c 54 4f 50 4c ff |.s<.....|..LTOPL.|
|00001d90| 20 03 4c 53 50 20 ff 00 | 0a e0 73 3c 18 1c 01 9c | .LSP ..|..s<....|
|00001da0| 0e 00 00 43 ff 20 07 53 | 4c 42 20 ff 00 0a cc 4c |...C. .S|LB ....L|
|00001db0| 4e 15 ae 03 b2 ce 02 00 | 4d ff 20 07 53 4c 42 20 |N.......|M. .SLB |
|00001dc0| ff 00 0a 4a a8 4f 15 16 | 05 c9 49 01 00 4d 43 ff |...J.O..|..I..MC.|
|00001dd0| 20 06 53 4c 42 20 ff 00 | 0a a7 85 4e 15 bb 05 b0 | .SLB ..|...N....|
|00001de0| 91 00 00 4c 49 ff 20 06 | 53 4c 42 20 ff 00 0a b7 |...LI. .|SLB ....|
|00001df0| 73 0e 15 04 06 42 fb 00 | 00 4f 54 48 45 52 ff 20 |s....B..|.OTHER. |
|00001e00| 03 53 4c 42 20 ff 00 0a | 39 85 73 16 82 06 cf cd |.SLB ...|9.s.....|
|00001e10| 00 00 53 55 42 ff 20 05 | 4c 53 50 20 ff 00 0a d6 |..SUB. .|LSP ....|
|00001e20| 58 5e 17 a8 01 80 05 00 | 00 43 4f 4e 46 49 47 20 |X^......|.CONFIG |
|00001e30| 20 53 59 53 20 ff 00 0b | 47 41 18 16 00 5d ff 00 | SYS ...|GA...]..|
|00001e40| 03 43 4f 4e 46 49 47 20 | 20 52 31 31 20 ff 00 0a |.CONFIG | R11 ...|
|00001e50| 17 82 4b 17 17 00 5f ff | 00 03 44 49 53 4b ff 20 |..K..._.|..DISK. |
|00001e60| 04 49 44 20 20 ff 00 0a | 48 67 58 18 1a 00 80 ff |.ID ...|HgX.....|
|00001e70| 00 03 44 49 53 4b 34 ff | 20 03 49 44 20 20 ff 00 |..DISK4.| .ID ..|
|00001e80| 0a 95 6d 58 18 1b 00 80 | ff 00 03 41 45 43 39 31 |..mX....|...AEC91|
|00001e90| 4c 53 50 4d 49 44 20 ff | 00 0a 80 4d 59 18 1c 00 |LSPMID .|...MY...|
|00001ea0| 00 01 ff 00 ff ff 00 ff | ff 00 ff ff 00 ff ff 00 |........|........|
|00001eb0| ff ff 00 ff ff 00 ff ff | 00 ff ff 00 ff ff 00 ff |........|........|
|00001ec0| ff 00 ff ff 00 ff ff 00 | ff ff 00 ff ff 00 ff ff |........|........|
|00001ed0| 00 ff ff 00 ff ff 00 ff | ff 00 94 20 20 29 0d 0a |........|... )..|
|00001ee0| ff 20 06 29 0d 0a ff 20 | 05 28 73 65 74 71 20 68 |. .)... |.(setq h|
|00001ef0| 72 6c 70 74 34 0d 0a ff | 20 0b 28 6c 69 73 74 20 |rlpt4...| .(list |
|00001f00| 28 63 61 72 20 28 70 6f | 6c 61 72 20 75 70 70 74 |(car (po|lar uppt|
|00001f10| 33 0d 0a ff 20 18 28 61 | 6e 67 6c 65 20 75 70 70 |3... .(a|ngle upp|
|00001f20| 74 33 20 75 70 70 74 32 | 29 0d 0a ff 20 18 28 2f |t3 uppt2|)... .(/|
|00001f30| 20 28 64 69 73 74 61 6e | 63 65 20 75 70 70 74 33 | (distan|ce uppt3|
|00001f40| 20 75 70 70 74 32 29 20 | 31 30 29 0d 0a ff 20 16 | uppt2) |10)... .|
|00001f50| 29 0d 0a ff 20 11 29 0d | 0a ff 20 11 28 63 61 64 |)... .).|.. .(cad|
|00001f60| 72 20 28 70 6f 6c 61 72 | 20 75 70 70 74 33 0d 0a |r (polar| uppt3..|
|00001f70| ff 20 18 28 61 6e 67 6c | 65 20 75 70 70 74 33 20 |. .(angl|e uppt3 |
|00001f80| 75 70 70 74 32 29 0d 0a | ff 20 18 28 2f 20 28 64 |uppt2)..|. .(/ (d|
|00001f90| 69 73 74 61 6e 63 65 20 | 75 70 70 74 33 20 75 70 |istance |uppt3 up|
|00001fa0| 70 74 32 29 20 31 30 29 | 0d 0a ff 20 16 29 0d 0a |pt2) 10)|... .)..|
|00001fb0| ff 20 11 29 0d 0a ff 20 | 11 28 2b 20 72 69 73 65 |. .)... |.(+ rise|
|00001fc0| 72 20 72 69 73 65 72 20 | 68 72 6c 29 0d 0a ff 20 |r riser |hrl)... |
|00001fd0| 0c 29 0d 0a ff 20 06 29 | 0d 0a ff 20 05 28 73 65 |.)... .)|... .(se|
|00001fe0| 74 71 20 68 72 6c 70 74 | 31 0d 0a ff 20 0b 28 6c |tq hrlpt|1... .(l|
|00001ff0| 69 73 74 20 28 63 61 72 | 20 28 70 6f 6c 61 72 20 |ist (car| (polar |
|00002000| 68 72 6c 70 74 33 e8 17 | ff 0d 0a ff 20 18 28 61 |hrlpt3..|.... .(a|
|00002010| 6e 67 6c 65 20 68 72 6c | 70 74 33 20 68 72 6c 70 |ngle hrl|pt3 hrlp|
|00002020| 74 34 29 0d 0a ff 20 18 | 28 2f 20 28 64 69 73 74 |t4)... .|(/ (dist|
|00002030| 61 6e 63 65 20 68 72 6c | 70 74 33 20 68 72 6c 70 |ance hrl|pt3 hrlp|
|00002040| 74 34 29 20 32 29 0d 0a | ff 20 16 29 0d 0a ff 20 |t4) 2)..|. .)... |
|00002050| 11 29 0d 0a ff 20 11 28 | 63 61 64 72 20 28 70 6f |.)... .(|cadr (po|
|00002060| 6c 61 72 20 68 72 6c 70 | 74 33 0d 0a ff 20 18 28 |lar hrlp|t3... .(|
|00002070| 61 6e 67 6c 65 20 68 72 | 6c 70 74 33 20 68 72 6c |angle hr|lpt3 hrl|
|00002080| 70 74 34 29 0d 0a ff 20 | 18 28 2f 20 28 64 69 73 |pt4)... |.(/ (dis|
|00002090| 74 61 6e 63 65 20 68 72 | 6c 70 74 33 20 68 72 6c |tance hr|lpt3 hrl|
|000020a0| 70 74 34 29 20 32 29 0d | 0a ff 20 16 29 0d 0a ff |pt4) 2).|.. .)...|
|000020b0| 20 11 29 0d 0a ff 20 11 | 28 2b 20 72 69 73 65 72 | .)... .|(+ riser|
|000020c0| 20 28 2f 20 72 69 73 65 | 72 20 32 29 20 68 72 6c | (/ rise|r 2) hrl|
|000020d0| 29 0d 0a ff 20 0c 29 0d | 0a ff 20 06 29 0d 0a ff |)... .).|.. .)...|
|000020e0| 20 05 28 73 65 74 71 20 | 68 72 6c 70 74 32 0d 0a | .(setq |hrlpt2..|
|000020f0| ff 20 0b 28 6c 69 73 74 | 20 28 63 61 72 20 28 70 |. .(list| (car (p|
|00002100| 6f 6c 61 72 20 68 72 6c | 70 74 33 0d 0a ff 20 18 |olar hrl|pt3... .|
|00002110| 28 61 6e 67 6c 65 20 68 | 72 6c 70 74 33 20 68 72 |(angle h|rlpt3 hr|
|00002120| 6c 70 74 34 29 0d 0a ff | 20 18 28 2f 20 28 64 69 |lpt4)...| .(/ (di|
|00002130| 73 74 61 6e 63 65 20 68 | 72 6c 70 74 33 20 68 72 |stance h|rlpt3 hr|
|00002140| 6c 70 74 34 29 20 32 29 | 0d 0a ff 20 16 29 0d 0a |lpt4) 2)|... .)..|
|00002150| ff 20 11 29 0d 0a ff 20 | 11 28 63 61 64 72 20 28 |. .)... |.(cadr (|
|00002160| 70 6f 6c 61 72 20 68 72 | 6c 70 74 33 0d 0a ff 20 |polar hr|lpt3... |
|00002170| 18 28 61 6e 67 6c 65 20 | 68 72 6c 70 74 33 20 68 |.(angle |hrlpt3 h|
|00002180| 72 6c 70 74 34 29 0d 0a | ff 20 18 28 2f 20 28 64 |rlpt4)..|. .(/ (d|
|00002190| 69 73 74 61 6e 63 65 20 | 68 72 6c 70 74 33 20 68 |istance |hrlpt3 h|
|000021a0| 72 6c 70 74 34 29 20 32 | 29 0d 0a ff 20 16 29 0d |rlpt4) 2|)... .).|
|000021b0| 0a ff 20 11 29 0d 0a ff | 20 12 72 69 73 65 72 0d |.. .)...| .riser.|
|000021c0| 0a ff 20 0c 29 0d 0a ff | 20 06 29 0d 0a ff 20 06 |.. .)...| .)... .|
|000021d0| 28 63 6f 6d 6d 61 6e 64 | 20 22 6c 61 79 65 72 22 |(command| "layer"|
|000021e0| 20 22 73 22 20 22 70 73 | 74 61 69 72 22 20 22 22 | "s" "ps|tair" ""|
|000021f0| 29 0d 0a ff 20 06 28 63 | 6f 6d 6d 61 6e 64 20 22 |)... .(c|ommand "|
|00002200| 33 64 66 61 63 65 22 20 | 75 70 70 74 31 20 75 70 |3dface" |uppt1 up|
|00002210| 70 74 32 20 75 70 70 74 | 33 20 75 70 70 74 34 20 |pt2 uppt|3 uppt4 |
|00002220| 22 22 29 0d 0a ff 20 03 | 28 73 65 74 71 20 73 65 |"")... .|(setq se|
|00002230| 20 28 65 6e 74 6c 61 73 | 74 29 29 20 28 73 73 61 | (entlas|t)) (ssa|
|00002240| 64 64 20 73 65 20 73 73 | 29 20 0d 0a ff 20 06 28 |dd se ss|) ... .(|
|00002250| 63 6f 6d 6d 61 6e 64 20 | 22 33 64 66 61 63 65 22 |command |"3dface"|
|00002260| 20 73 70 20 75 70 70 74 | 31 20 75 70 70 74 34 20 | sp uppt|1 uppt4 |
|00002270| 70 74 34 20 22 22 29 0d | 0a ff 20 03 28 73 65 74 |pt4 "").|.. .(set|
|00002280| 71 20 73 65 20 28 65 6e | 74 6c 61 73 74 29 29 20 |q se (en|tlast)) |
|00002290| 28 73 73 61 64 64 20 73 | 65 20 73 73 29 20 0d 0a |(ssadd s|e ss) ..|
|000022a0| ff 20 06 28 63 6f 6d 6d | 61 6e 64 20 22 6c 61 79 |. .(comm|and "lay|
|000022b0| 65 72 22 20 22 6d 22 20 | 22 70 73 74 61 69 72 68 |er" "m" |"pstairh|
|000022c0| 22 20 22 22 29 20 0d 0a | ff 20 06 28 63 6f 6d 6d |" "") ..|. .(comm|
|000022d0| 61 6e 64 20 22 33 64 6c | 69 6e 65 22 20 68 72 6c |and "3dl|ine" hrl|
|000022e0| 70 74 31 20 68 72 6c 70 | 74 32 20 22 22 29 0d 0a |pt1 hrlp|t2 "")..|
|000022f0| ff 20 03 28 73 65 74 71 | 20 73 65 20 28 65 6e 74 |. .(setq| se (ent|
|00002300| 6c 61 73 74 29 29 20 28 | 73 73 61 64 64 20 73 65 |last)) (|ssadd se|
|00002310| 20 73 73 29 20 0d 0a ff | 20 06 28 63 6f 6d 6d 61 | ss) ...| .(comma|
|00002320| 6e 64 20 22 33 64 6c 69 | 6e 65 22 20 68 72 6c 70 |nd "3dli|ne" hrlp|
|00002330| 74 33 20 68 72 6c 70 74 | 34 20 22 22 29 0d 0a ff |t3 hrlpt|4 "")...|
|00002340| 20 03 28 73 65 74 71 20 | 73 65 20 28 65 6e 74 6c | .(setq |se (entl|
|00002350| 61 73 74 29 29 20 28 73 | 73 61 64 64 20 73 65 20 |ast)) (s|sadd se |
|00002360| 73 73 29 20 0d 0a ff 20 | 05 28 69 66 20 28 2f 3d |ss) ... |.(if (/=|
|00002370| 20 6b 77 6f 72 64 20 22 | 59 65 73 22 29 20 28 70 | kword "|Yes") (p|
|00002380| 72 6f 67 6e 0d 0a ff 20 | 06 28 73 65 74 71 20 68 |rogn... |.(setq h|
|00002390| 72 6c 70 33 31 20 0d 0a | ff 20 0b 28 6c 69 73 74 |rlp31 ..|. .(list|
|000023a0| 20 28 63 61 72 20 28 70 | 6f 6c 61 72 20 75 70 70 | (car (p|olar upp|
|000023b0| 74 31 20 0d 0a ff 20 23 | 28 61 6e 67 6c 65 20 75 |t1 ... #|(angle u|
|000023c0| 70 70 74 31 20 75 70 70 | 74 34 29 0d 0a ff 20 23 |ppt1 upp|t4)... #|
|000023d0| 28 2f 20 28 64 69 73 74 | 61 6e 63 65 20 75 70 70 |(/ (dist|ance upp|
|000023e0| 74 34 20 75 70 70 74 31 | 29 20 31 30 29 0d 0a ff |t4 uppt1|) 10)...|
|000023f0| 20 16 29 0d 0a ff 20 11 | 29 0d 0a ff 20 11 28 63 | .)... .|)... .(c|
|00002400| 61 64 72 20 28 70 6f 6c | 61 72 20 75 70 70 74 31 |adr (pol|ar uppt1|
|00002410| 0d 0a ff 20 17 28 61 6e | 67 6c 65 20 75 70 70 74 |... .(an|gle uppt|
|00002420| 31 20 75 70 70 74 34 29 | 0d 0a ff 20 18 28 2f 20 |1 uppt4)|... .(/ |
|00002430| 28 64 69 73 74 61 6e 63 | 65 20 75 70 70 74 34 20 |(distanc|e uppt4 |
|00002440| 75 70 70 74 31 29 20 31 | 30 29 0d 0a ff 20 16 29 |uppt1) 1|0)... .)|
|00002450| 0d 0a ff 20 11 29 0d 0a | ff 20 11 28 2b 20 72 69 |... .)..|. .(+ ri|
|00002460| 73 65 72 20 68 72 6c 29 | 0d 0a ff 20 0c 29 0d 0a |ser hrl)|... .)..|
|00002470| ff 20 06 29 0d 0a ff 20 | 06 28 73 65 74 71 20 68 |. .)... |.(setq h|
|00002480| 72 6c 70 34 31 0d 0a ff | 20 0b 28 6c 69 73 74 20 |rlp41...| .(list |
|00002490| 28 63 61 72 20 28 70 6f | 6c 61 72 20 75 70 70 74 |(car (po|lar uppt|
|000024a0| 32 0d 0a ff 20 18 28 61 | 6e 67 6c 65 20 75 70 70 |2... .(a|ngle upp|
|000024b0| 74 32 20 75 70 70 74 33 | 29 0d 0a ff 20 18 28 2f |t2 uppt3|)... .(/|
|000024c0| 20 28 64 69 73 74 61 6e | 63 65 20 75 70 70 74 32 | (distan|ce uppt2|
|000024d0| 20 75 70 70 74 33 29 20 | 31 30 29 0d 0a ff 20 16 | uppt3) |10)... .|
|000024e0| 29 0d 0a ff 20 11 29 0d | 0a ff 20 11 28 63 61 64 |)... .).|.. .(cad|
|000024f0| 72 20 28 70 6f 6c 61 72 | 20 75 70 70 74 32 0d 0a |r (polar| uppt2..|
|00002500| ff 20 18 28 61 6e 67 6c | 65 20 75 70 70 74 32 20 |. .(angl|e uppt2 |
|00002510| 75 70 70 74 33 29 0d 0a | ff 20 18 28 2f 20 28 64 |uppt3)..|. .(/ (d|
|00002520| 69 73 74 61 6e 63 65 20 | 75 70 70 74 32 20 75 70 |istance |uppt2 up|
|00002530| 70 74 33 29 20 31 30 29 | 0d 0a ff 20 16 29 0d 0a |pt3) 10)|... .)..|
|00002540| ff 20 11 29 0d 0a ff 20 | 11 28 2b 20 72 69 73 65 |. .)... |.(+ rise|
|00002550| 72 20 72 69 73 65 72 20 | 68 72 6c 29 0d 0a ff 20 |r riser |hrl)... |
|00002560| 0c 29 0d 0a ff 20 06 29 | 0d 0a ff 20 06 28 73 65 |.)... .)|... .(se|
|00002570| 74 71 20 68 72 6c 70 31 | 31 0d 0a ff 20 0b 28 6c |tq hrlp1|1... .(l|
|00002580| 69 73 74 20 28 63 61 72 | 20 28 70 6f 6c 61 72 20 |ist (car| (polar |
|00002590| 68 72 6c 70 33 31 0d 0a | ff 20 18 28 61 6e 67 6c |hrlp31..|. .(angl|
|000025a0| 65 20 68 72 6c 70 33 31 | 20 68 72 6c 70 34 31 29 |e hrlp31| hrlp41)|
|000025b0| 0d 0a ff 20 18 28 2f 20 | 28 64 69 73 74 61 6e 63 |... .(/ |(distanc|
|000025c0| 65 20 68 72 6c 70 33 31 | 20 68 72 6c 70 34 31 29 |e hrlp31| hrlp41)|
|000025d0| 20 32 29 0d 0a ff 20 16 | 29 0d 0a ff 20 11 29 0d | 2)... .|)... .).|
|000025e0| 0a ff 20 11 28 63 61 64 | 72 20 28 70 6f 6c 61 72 |.. .(cad|r (polar|
|000025f0| 20 68 72 6c 70 33 31 0d | 0a ff 20 18 28 61 6e 67 | hrlp31.|.. .(ang|
|00002600| 6c 65 20 68 72 6c 70 33 | 31 20 68 72 6c 70 34 31 |le hrlp3|1 hrlp41|
|00002610| 29 0d 0a ff 20 18 28 2f | 20 28 64 69 73 74 61 6e |)... .(/| (distan|
|00002620| 63 65 20 68 72 6c 70 33 | 31 20 68 72 6c 70 34 31 |ce hrlp3|1 hrlp41|
|00002630| 29 20 32 29 0d 0a ff 20 | 16 29 0d 0a ff 20 11 29 |) 2)... |.)... .)|
|00002640| 0d 0a ff 20 11 28 2b 20 | 72 69 73 65 72 20 28 2f |... .(+ |riser (/|
|00002650| 20 72 69 73 65 72 20 32 | 29 20 68 72 6c 29 0d 0a | riser 2|) hrl)..|
|00002660| ff 20 0c 29 0d 0a ff 20 | 06 29 0d 0a ff 20 06 28 |. .)... |.)... .(|
|00002670| 73 65 74 71 20 68 72 6c | 70 32 31 0d 0a ff 20 0b |setq hrl|p21... .|
|00002680| 28 6c 69 73 74 20 28 63 | 61 72 20 28 70 6f 6c 61 |(list (c|ar (pola|
|00002690| 72 20 68 72 6c 70 33 31 | 0d 0a ff 20 18 28 61 6e |r hrlp31|... .(an|
|000026a0| 67 6c 65 20 68 72 6c 70 | 33 31 20 68 72 6c 70 34 |gle hrlp|31 hrlp4|
|000026b0| 31 29 0d 0a ff 20 18 28 | 2f 20 28 64 69 73 74 61 |1)... .(|/ (dista|
|000026c0| 6e 63 65 20 68 72 6c 70 | 33 31 20 68 72 6c 70 34 |nce hrlp|31 hrlp4|
|000026d0| 31 29 20 32 29 0d 0a ff | 20 16 29 0d 0a ff 20 11 |1) 2)...| .)... .|
|000026e0| 29 0d 0a ff 20 11 28 63 | 61 64 72 20 28 70 6f 6c |)... .(c|adr (pol|
|000026f0| 61 72 20 68 72 6c 70 33 | 31 0d 0a ff 20 18 28 61 |ar hrlp3|1... .(a|
|00002700| 6e 67 6c 65 20 68 72 6c | 70 33 31 20 68 72 6c 70 |ngle hrl|p31 hrlp|
|00002710| 34 31 29 0d 0a ff 20 18 | 28 2f 20 28 64 69 73 74 |41)... .|(/ (dist|
|00002720| 61 6e 63 65 20 68 72 6c | 70 33 31 20 68 72 6c 70 |ance hrl|p31 hrlp|
|00002730| 34 31 29 20 32 29 0d 0a | ff 20 16 29 0d 0a ff 20 |41) 2)..|. .)... |
|00002740| 11 29 0d 0a ff 20 12 72 | 69 73 65 72 0d 0a ff 20 |.)... .r|iser... |
|00002750| 0c 29 0d 0a ff 20 06 29 | 0d 0a ff 20 06 28 63 6f |.)... .)|... .(co|
|00002760| 6d 6d 61 6e 64 20 22 33 | 64 6c 69 6e 65 22 20 68 |mmand "3|dline" h|
|00002770| 72 6c 70 31 31 20 68 72 | 6c 70 32 31 20 22 22 29 |rlp11 hr|lp21 "")|
|00002780| 0d 0a ff 20 06 28 73 65 | 74 71 20 73 65 20 28 65 |... .(se|tq se (e|
|00002790| 6e 74 6c 61 73 74 29 29 | 20 28 73 73 61 64 64 20 |ntlast))| (ssadd |
|000027a0| 73 65 20 73 73 29 20 0d | 0a ff 20 06 28 63 6f 6d |se ss) .|.. .(com|
|000027b0| 6d 61 6e 64 20 22 33 64 | 6c 69 6e 65 22 20 68 72 |mand "3d|line" hr|
|000027c0| 6c 70 33 31 20 68 72 6c | 70 34 31 20 22 22 29 0d |lp31 hrl|p41 "").|
|000027d0| 0a ff 20 06 28 73 65 74 | 71 20 73 65 20 28 65 6e |.. .(set|q se (en|
|000027e0| 74 6c 61 73 74 29 29 20 | 28 73 73 61 64 64 20 73 |tlast)) |(ssadd s|
|000027f0| 65 20 73 73 29 0d 0a ff | 20 12 29 0d 0a 20 20 29 |e ss)...| .).. )|
|00002800| 20 0d 0a ff 20 03 28 73 | 65 74 71 20 66 69 20 22 | ... .(s|etq fi "|
|00002810| 24 24 31 22 20 66 66 20 | 22 24 24 22 20 65 66 20 |$$1" ff |"$$" ef |
|00002820| 31 29 0d 0a ff 20 03 28 | 77 68 69 6c 65 20 28 2f |1)... .(|while (/|
|00002830| 3d 20 28 74 62 6c 73 65 | 61 72 63 68 20 22 42 4c |= (tblse|arch "BL|
|00002840| 4f 43 4b 22 20 66 69 29 | 20 6e 69 6c 29 0d 0a ff |OCK" fi)| nil)...|
|00002850| 20 05 28 73 65 74 71 20 | 65 66 20 28 31 2b 20 65 | .(setq |ef (1+ e|
|00002860| 66 29 20 66 69 20 28 73 | 74 72 63 61 74 20 66 66 |f) fi (s|trcat ff|
|00002870| 20 28 69 74 6f 61 20 65 | 66 ff 29 03 0d 0a ff 20 | (itoa e|f.).... |
|00002880| 03 29 0d 0a ff 20 06 28 | 63 6f 6d 6d 61 6e 64 20 |.)... .(|command |
|00002890| 22 62 6c 6f 63 6b 22 20 | 46 49 20 73 70 20 22 63 |"block" |FI sp "c|
|000028a0| 22 20 28 70 6f 6c 61 72 | 20 73 70 20 28 64 74 72 |" (polar| sp (dtr|
|000028b0| 20 32 31 35 29 20 30 2e | 31 29 0d 0a ff 20 22 28 | 215) 0.|1)... "(|
|000028c0| 70 6f 6c 61 72 20 70 74 | 34 20 28 64 74 72 20 39 |polar pt|4 (dtr 9|
|000028d0| 30 29 20 28 64 69 73 74 | 61 6e 63 65 20 75 70 70 |0) (dist|ance upp|
|000028e0| 74 34 20 75 70 70 74 33 | 29 29 0d 0a ff 20 1f 22 |t4 uppt3|))... ."|
|000028f0| 22 0d 0a ff 20 06 29 0d | 0a ff 20 03 28 73 65 74 |"... .).|.. .(set|
|00002900| 71 20 73 65 20 28 65 6e | 74 6c 61 73 74 29 29 20 |q se (en|tlast)) |
|00002910| 28 73 73 61 64 64 20 73 | 65 20 73 73 29 20 0d 0a |(ssadd s|e ss) ..|
|00002920| ff 20 06 28 63 6f 6d 6d | 61 6e 64 20 22 6f 6f 70 |. .(comm|and "oop|
|00002930| 73 22 29 0d 0a ff 20 03 | 28 73 65 74 71 20 73 65 |s")... .|(setq se|
|00002940| 20 28 65 6e 74 6c 61 73 | 74 29 29 20 28 73 73 61 | (entlas|t)) (ssa|
|00002950| 64 64 20 73 65 20 73 73 | 29 20 0d 0a ff 20 06 28 |dd se ss|) ... .(|
|00002960| 73 65 74 71 20 63 6f 75 | 6e 74 20 28 31 2b 20 63 |setq cou|nt (1+ c|
|00002970| 6f 75 6e 74 29 29 0d 0a | ff 20 06 28 73 65 74 71 |ount))..|. .(setq|
|00002980| 20 64 69 61 67 32 20 28 | 61 6e 67 6c 65 20 75 70 | diag2 (|angle up|
|00002990| 70 74 31 20 75 70 70 74 | 32 29 29 0d 0a ff 20 06 |pt1 uppt|2))... .|
|000029a0| 28 73 65 74 71 20 69 73 | 64 20 28 64 69 73 74 61 |(setq is|d (dista|
|000029b0| 6e 63 65 20 75 70 70 74 | 31 20 75 70 70 74 32 29 |nce uppt|1 uppt2)|
|000029c0| 29 0d 0a ff 20 06 28 73 | 65 74 71 20 73 70 20 28 |)... .(s|etq sp (|
|000029d0| 6c 69 73 74 20 0d 0a ff | 20 10 28 63 61 72 20 28 |list ...| .(car (|
|000029e0| 70 6f 6c 61 72 20 73 70 | 20 64 69 61 67 32 20 69 |polar sp| diag2 i|
|000029f0| 73 64 29 29 0d 0a ff 20 | 10 28 63 61 64 72 20 28 |sd))... |.(cadr (|
|00002a00| 70 6f 6c 61 72 20 73 70 | 20 64 69 61 67 32 20 69 |polar sp| diag2 i|
|00002a10| 73 64 29 29 0d 0a ff 20 | 0f 72 69 73 65 72 0d 0a |sd))... |.riser..|
|00002a20| ff 20 0f 29 0d 0a ff 20 | 07 29 0d 0a ff 20 06 28 |. .)... |.)... .(|
|00002a30| 73 65 74 71 20 69 6e 73 | 61 6e 67 20 28 72 74 64 |setq ins|ang (rtd|
|00002a40| 20 64 69 61 67 29 29 0d | 0a ff 20 06 28 73 65 74 | diag)).|.. .(set|
|00002a50| 71 20 72 69 73 65 72 20 | 28 2b 20 72 69 73 65 72 |q riser |(+ riser|
|00002a60| 20 65 6c 29 29 0d 0a 29 | 0d 0a 0d 0a 28 64 65 66 | el))..)|....(def|
|00002a70| 75 6e 20 73 62 75 69 6c | 64 20 28 29 0d 0a ff 20 |un sbuil|d ()... |
|00002a80| 06 28 63 6f 6d 6d 61 6e | 64 20 22 69 6e 73 65 72 |.(comman|d "inser|
|00002a90| 74 22 20 66 69 20 73 70 | 20 22 22 20 22 22 20 69 |t" fi sp| "" "" i|
|00002aa0| 6e 73 61 6e 67 29 0d 0a | ff 20 03 28 73 65 74 71 |nsang)..|. .(setq|
|00002ab0| 20 73 65 20 28 65 6e 74 | 6c 61 73 74 29 29 20 28 | se (ent|last)) (|
|00002ac0| 73 73 61 64 64 20 73 65 | 20 73 73 29 20 0d 0a ff |ssadd se| ss) ...|
|00002ad0| 20 06 28 73 65 74 71 20 | 64 69 61 67 32 20 28 2b | .(setq |diag2 (+|
|00002ae0| 20 64 69 61 67 32 20 69 | 6e 63 72 29 29 0d 0a ff | diag2 i|ncr))...|
|00002af0| 20 06 28 73 65 74 71 20 | 73 70 0d 0a ff 20 0c 28 | .(setq |sp... .(|
|00002b00| 6c 69 73 74 20 28 63 61 | 72 20 28 70 6f 6c 61 72 |list (ca|r (polar|
|00002b10| 20 73 70 20 64 69 61 67 | 32 20 69 73 64 29 29 0d | sp diag|2 isd)).|
|00002b20| 0a ff 20 12 28 63 61 64 | 72 20 28 70 6f 6c 61 72 |.. .(cad|r (polar|
|00002b30| 20 73 70 20 64 69 61 67 | 32 20 69 73 64 29 29 0d | sp diag|2 isd)).|
|00002b40| 0a ff 20 0c 72 69 73 65 | 72 0d 0a ff 20 0c 29 0d |.. .rise|r... .).|
|00002b50| 0a ff 20 06 29 0d 0a ff | 20 06 28 73 65 74 71 20 |.. .)...| .(setq |
|00002b60| 64 69 61 67 20 28 2b 20 | 64 69 61 67 20 69 6e 63 |diag (+ |diag inc|
|00002b70| 72 29 29 0d 0a ff 20 06 | 28 73 65 74 71 20 69 6e |r))... .|(setq in|
|00002b80| 73 61 6e 67 20 28 72 74 | 64 20 64 69 61 67 29 29 |sang (rt|d diag))|
|00002b90| 0d 0a ff 20 06 28 73 65 | 74 71 20 63 6f 75 6e 74 |... .(se|tq count|
|00002ba0| 20 28 31 2b 20 63 6f 75 | 6e 74 29 29 0d 0a ff 20 | (1+ cou|nt))... |
|00002bb0| 06 28 73 65 74 71 20 72 | 69 73 65 72 20 28 2b 20 |.(setq r|iser (+ |
|00002bc0| 72 69 73 65 72 20 65 6c | 29 29 0d 0a 29 0d 0a 0d |riser el|))..)...|
|00002bd0| 0a 28 64 65 66 75 6e 20 | 70 6f 6c 65 20 28 29 0d |.(defun |pole ().|
|00002be0| 0a ff 20 04 28 69 66 20 | 28 2f 3d 20 28 74 62 6c |.. .(if |(/= (tbl|
|00002bf0| 73 65 61 72 63 68 20 22 | 4c 41 59 45 52 22 20 22 |search "|LAYER" "|
|00002c00| 50 53 54 41 49 52 34 22 | 29 20 6e 69 6c 29 0d 0a |PSTAIR4"|) nil)..|
|00002c10| ff 20 07 28 63 6f 6d 6d | 61 6e 64 20 22 6c 61 79 |. .(comm|and "lay|
|00002c20| 65 72 22 20 22 54 22 20 | 22 50 53 54 41 49 52 34 |er" "T" |"PSTAIR4|
|00002c30| 22 20 22 22 29 0d 0a ff | 20 04 29 0d 0a ff 20 04 |" "")...| .)... .|
|00002c40| 28 43 4f 4d 4d 41 4e 44 | 20 22 4c 41 59 45 52 22 |(COMMAND| "LAYER"|
|00002c50| 20 22 4d 22 20 22 50 53 | 54 41 49 52 34 22 20 22 | "M" "PS|TAIR4" "|
|00002c60| 22 29 0d 0a ff 20 06 28 | 63 6f 6d 6d 61 6e 64 20 |")... .(|command |
|00002c70| 22 63 69 72 63 6c 65 22 | 20 63 70 0d 0a ff 20 1a |"circle"| cp... .|
|00002c80| 28 70 6f 6c 61 72 20 63 | 70 20 30 20 28 2f 20 28 |(polar c|p 0 (/ (|
|00002c90| 64 69 73 74 61 6e 63 65 | 20 63 70 20 73 70 29 20 |distance| cp sp) |
|00002ca0| 31 30 29 29 0d 0a ff 20 | 06 29 0d 0a ff 20 03 28 |10))... |.)... .(|
|00002cb0| 73 65 74 71 20 73 65 20 | 28 65 6e 74 6c 61 73 74 |setq se |(entlast|
|00002cc0| 29 29 20 28 73 73 61 64 | 64 20 73 65 20 73 73 29 |)) (ssad|d se ss)|
|00002cd0| 20 0d 0a ff 20 06 28 63 | 6f 6d 6d 61 6e 64 20 22 | ... .(c|ommand "|
|00002ce0| 63 68 61 6e 67 65 22 20 | 22 6c 22 20 22 22 20 22 |change" |"l" "" "|
|00002cf0| 70 22 20 22 65 22 20 30 | 20 22 74 68 22 20 28 2b |p" "e" 0| "th" (+|
|00002d00| 20 72 69 73 65 72 20 36 | 35 29 20 22 22 29 0d 0a | riser 6|5) "")..|
|00002d10| ff 20 03 28 73 65 74 71 | 20 73 65 20 28 65 6e 74 |. .(setq| se (ent|
|00002d20| 6c 61 73 74 29 29 20 28 | 73 73 61 64 64 20 73 65 |last)) (|ssadd se|
|00002d30| 20 73 73 29 20 0d 0a 29 | 0d 0a 0d 0a 28 64 65 66 | ss) ..)|....(def|
|00002d40| 75 6e 20 64 74 72 20 28 | 61 29 0d 0a ff 20 05 28 |un dtr (|a)... .(|
|00002d50| 2a 20 70 69 20 28 2f 20 | 61 20 31 38 30 2e 30 29 |* pi (/ |a 180.0)|
|00002d60| 29 0d 0a 29 0d 0a 28 64 | 65 66 75 6e 20 72 74 64 |)..)..(d|efun rtd|
|00002d70| 20 28 61 29 0d 0a ff 20 | 05 28 2a 20 28 2f 20 61 | (a)... |.(* (/ a|
|00002d80| 20 70 69 29 20 31 38 30 | 29 0d 0a 29 0d 0a 0d 0a | pi) 180|)..)....|
|00002d90| 28 64 65 66 75 6e 20 4c | 54 30 28 2f 20 73 70 20 |(defun L|T0(/ sp |
|00002da0| 65 70 20 70 6c 20 6e 20 | 6f 65 72 20 6b 77 6f 72 |ep pl n |oer kwor|
|00002db0| 64 20 74 65 73 29 0d 0a | ff 20 03 28 69 66 20 28 |d tes)..|. .(if (|
|00002dc0| 2f 3d 20 73 31 20 22 34 | 22 29 20 28 70 72 6f 67 |/= s1 "4|") (prog|
|00002dd0| 6e 20 0d 0a ff 20 03 28 | 73 65 74 76 61 72 20 22 |n ... .(|setvar "|
|00002de0| 4f 52 54 48 4f 4d 4f 44 | 45 22 20 31 29 20 0d 0a |ORTHOMOD|E" 1) ..|
|00002df0| ff 20 03 28 63 6f 6d 6d | 61 6e 64 20 22 6c 61 79 |. .(comm|and "lay|
|00002e00| 65 72 22 20 22 6d 22 20 | 22 70 73 74 61 69 72 31 |er" "m" |"pstair1|
|00002e10| 22 20 22 22 29 0d 0a ff | 20 03 28 73 65 74 71 20 |" "")...| .(setq |
|00002e20| 74 65 73 20 74 29 20 0d | 0a ff 20 03 28 77 68 69 |tes t) .|.. .(whi|
|00002e30| 6c 65 20 74 65 73 0d 0a | ff 20 03 28 69 6e 69 74 |le tes..|. .(init|
|00002e40| 67 65 74 20 31 29 0d 0a | ff 20 03 28 73 65 74 71 |get 1)..|. .(setq|
|00002e50| 20 73 70 20 28 67 65 74 | 70 6f 69 6e 74 20 22 5c | sp (get|point "\|
|00002e60| 6e c2 a5 cc dd bc fd cd | b7 c6 f0 b5 e3 3a 22 29 |n.......|.....:")|
|00002e70| 29 0d 0a ff 20 03 28 73 | 65 74 71 20 70 6c 20 6e |)... .(s|etq pl n|
|00002e80| 69 6c 20 70 6c 20 28 63 | 6f 6e 73 20 73 70 20 70 |il pl (c|ons sp p|
|00002e90| 6c 29 29 0d 0a ff 20 03 | 28 77 68 69 6c 65 20 73 |l))... .|(while s|
|00002ea0| 70 20 0d 0a ff 20 06 28 | 69 6e 69 74 67 65 74 20 |p ... .(|initget |
|00002eb0| 22 55 6e 64 6f 22 29 0d | 0a ff 20 06 28 73 65 74 |"Undo").|.. .(set|
|00002ec0| 71 20 65 70 20 28 67 65 | 74 70 6f 69 6e 74 20 73 |q ep (ge|tpoint s|
|00002ed0| 70 20 22 5c 6e bb d8 cd | cb 55 6e 64 6f 2f 3c cf |p "\n...|.Undo/<.|
|00002ee0| c2 d2 bb b5 e3 3e 3a 22 | 29 29 0d 0a ff 20 06 28 |.....>:"|))... .(|
|00002ef0| 69 66 20 28 3d 20 65 70 | 20 22 55 6e 64 6f 22 29 |if (= ep| "Undo")|
|00002f00| 20 28 69 66 20 28 3e 20 | 28 6c 65 6e 67 74 68 20 | (if (> |(length |
|00002f10| 70 6c 29 20 31 29 20 28 | 73 65 74 71 20 70 6c 20 |pl) 1) (|setq pl |
|00002f20| 28 63 64 72 20 70 6c 29 | 20 73 70 20 28 63 61 72 |(cdr pl)| sp (car|
|00002f30| 20 70 6c 29 29 20 28 70 | 72 69 6e 63 20 22 2a bb | pl)) (p|rinc "*.|
|00002f40| d8 cd cb cd ea c1 cb 2a | 22 29 29 0d 0a ff 20 0a |.......*|"))... .|
|00002f50| 28 69 66 20 28 2f 3d 20 | 65 70 20 6e 69 6c 29 20 |(if (/= |ep nil) |
|00002f60| 28 73 65 74 71 20 70 6c | 20 28 63 6f 6e 73 20 65 |(setq pl| (cons e|
|00002f70| 70 20 70 6c 29 20 73 70 | 20 65 70 29 20 28 73 65 |p pl) sp| ep) (se|
|00002f80| 74 71 20 73 70 20 65 70 | 29 29 0d 0a ff 20 06 29 |tq sp ep|))... .)|
|00002f90| 0d 0a ff 20 03 29 0d 0a | ff 20 03 28 73 65 74 71 |... .)..|. .(setq|
|00002fa0| 20 70 6c 20 28 72 65 76 | 65 72 73 65 20 70 6c 29 | pl (rev|erse pl)|
|00002fb0| 20 73 70 20 28 6e 74 68 | 20 30 20 70 6c 29 20 6e | sp (nth| 0 pl) n|
|00002fc0| 20 31 29 0d 0a ff 20 03 | 28 69 6e 69 74 67 65 74 | 1)... .|(initget|
|00002fd0| 20 22 55 70 22 29 0d 0a | ff 20 03 28 73 65 74 71 | "Up")..|. .(setq|
|00002fe0| 20 6b 77 6f 72 64 20 28 | 67 65 74 6b 77 6f 72 64 | kword (|getkword|
|00002ff0| 20 22 5c c9 cf 55 70 2f | 3c cf c2 3e 3a 22 29 29 | "\..Up/|<..>:"))|
|00003000| 0d 0a ff 20 03 28 69 66 | 20 28 3d 20 6b 77 6f 72 |... .(if| (= kwor|
|00003010| 64 20 22 55 70 22 29 20 | 28 73 65 74 71 20 6b 77 |d "Up") |(setq kw|
|00003020| 6f 72 64 20 22 c9 cf 22 | 29 20 28 73 65 74 71 20 |ord ".."|) (setq |
|00003030| 6b 77 6f 72 64 20 22 cf | c2 22 29 29 0d 0a ff 20 |kword ".|."))... |
|00003040| 03 28 73 65 74 71 20 65 | 70 20 28 70 6f 6c 61 72 |.(setq e|p (polar|
|00003050| 20 73 70 20 28 61 6e 67 | 6c 65 20 28 6e 74 68 20 | sp (ang|le (nth |
|00003060| 6e 20 70 6c 29 20 73 70 | 29 20 28 2a 20 34 20 28 |n pl) sp|) (* 4 (|
|00003070| 67 65 74 76 61 72 20 22 | 75 73 65 72 72 31 22 ff |getvar "|userr1".|
|00003080| 29 04 0d 0a ff 20 03 28 | 63 6f 6d 6d 61 6e 64 20 |).... .(|command |
|00003090| 22 74 65 78 74 22 20 22 | 63 22 20 65 70 20 28 2a |"text" "|c" ep (*|
|000030a0| 20 33 20 28 67 65 74 76 | 61 72 20 22 75 73 65 72 | 3 (getv|ar "user|
|000030b0| 72 31 22 29 29 20 22 30 | 22 20 6b 77 6f 72 64 29 |r1")) "0|" kword)|
|000030c0| 0d 0a ff 20 03 28 63 6f | 6d 6d 61 6e 64 20 22 70 |... .(co|mmand "p|
|000030d0| 6c 69 6e 65 22 20 73 70 | 20 22 77 22 20 30 20 22 |line" sp| "w" 0 "|
|000030e0| 22 29 0d 0a ff 20 03 28 | 72 65 70 65 61 74 20 28 |")... .(|repeat (|
|000030f0| 2d 20 28 6c 65 6e 67 74 | 68 20 70 6c 29 20 31 29 |- (lengt|h pl) 1)|
|00003100| 0d 0a ff 20 06 28 63 6f | 6d 6d 61 6e 64 20 28 6e |... .(co|mmand (n|
|00003110| 74 68 20 6e 20 70 6c 29 | 29 0d 0a ff 20 06 28 73 |th n pl)|)... .(s|
|00003120| 65 74 71 20 6e 20 28 31 | 2b 20 6e 29 29 0d 0a ff |etq n (1|+ n))...|
|00003130| 20 03 29 0d 0a ff 20 03 | 28 63 6f 6d 6d 61 6e 64 | .)... .|(command|
|00003140| 29 0d 0a ff 20 03 28 73 | 65 74 71 20 65 70 20 28 |)... .(s|etq ep (|
|00003150| 6e 74 68 20 28 31 2d 20 | 6e 29 20 70 6c 29 20 73 |nth (1- |n) pl) s|
|00003160| 70 20 28 6e 74 68 20 28 | 2d 20 6e 20 32 29 20 70 |p (nth (|- n 2) p|
|00003170| 6c 29 20 73 70 20 28 70 | 6f 6c 61 72 20 65 70 20 |l) sp (p|olar ep |
|00003180| 28 61 6e 67 6c 65 20 65 | 70 20 73 70 29 20 28 2a |(angle e|p sp) (*|
|00003190| 20 32 2e 35 20 28 67 65 | 74 76 61 72 20 22 75 73 | 2.5 (ge|tvar "us|
|000031a0| 65 72 72 31 22 ff 29 04 | 0d 0a ff 20 03 28 63 6f |err1".).|... .(co|
|000031b0| 6d 6d 61 6e 64 20 22 70 | 6c 69 6e 65 22 20 65 70 |mmand "p|line" ep|
|000031c0| 20 22 77 22 20 30 20 28 | 67 65 74 76 61 72 20 22 | "w" 0 (|getvar "|
|000031d0| 75 73 65 72 72 31 22 29 | 20 73 70 20 22 22 29 0d |userr1")| sp "").|
|000031e0| 0a ff 20 03 28 73 65 74 | 71 20 6b 77 6f 72 64 20 |.. .(set|q kword |
|000031f0| 22 4e 6f 22 29 0d 0a ff | 20 03 28 69 6e 69 74 67 |"No")...| .(initg|
|00003200| 65 74 20 22 59 65 73 20 | 4e 6f 22 29 0d 0a ff 20 |et "Yes |No")... |
|00003210| 03 28 73 65 74 71 20 6b | 77 6f 72 64 20 28 67 65 |.(setq k|word (ge|
|00003220| 74 6b 77 6f 72 64 20 22 | 5c 6e ca c7 b7 f1 bc cc |tkword "|\n......|
|00003230| d0 f8 b1 ea d7 a2 c2 a5 | cc dd c9 cf cf c2 cf df |........|........|
|00003240| 3f 20 3c 4e 3e 3a 22 29 | 29 0d 0a ff 20 10 28 69 |? <N>:")|)... .(i|
|00003250| 66 20 28 2f 3d 20 6b 77 | 6f 72 64 20 22 59 65 73 |f (/= kw|ord "Yes|
|00003260| 22 29 20 28 73 65 74 71 | 20 74 65 73 20 6e 69 6c |") (setq| tes nil|
|00003270| 29 29 0d 0a 20 29 3b 77 | 68 69 6c 65 0d 0a 20 29 |)).. );w|hile.. )|
|00003280| 29 0d 0a 29 0d 0a 0d 0a | 28 64 65 66 75 6e 20 4c |)..)....|(defun L|
|00003290| 54 44 28 2f 20 73 6e 20 | 73 6e 32 20 65 6e 20 6f |TD(/ sn |sn2 en o|
|000032a0| 65 72 20 65 6e 61 6d 65 | 20 65 6c 61 79 20 64 73 |er ename| elay ds|
|000032b0| 65 31 20 64 73 65 32 20 | 6b 77 6f 72 64 20 73 70 |e1 dse2 |kword sp|
|000032c0| 20 65 70 20 6d 70 20 6d | 70 31 20 6d 70 32 20 6d | ep mp m|p1 mp2 m|
|000032d0| 70 33 20 6d 70 34 20 70 | 6c 77 20 61 6e 67 31 20 |p3 mp4 p|lw ang1 |
|000032e0| 61 6e 67 30 20 61 6e 67 | 32 29 0d 0a ff 20 03 28 |ang0 ang|2)... .(|
|000032f0| 73 65 74 76 61 72 20 22 | 4f 52 54 48 4f 4d 4f 44 |setvar "|ORTHOMOD|
|00003300| 45 22 20 30 29 0d 0a ff | 20 03 28 73 65 74 71 20 |E" 0)...| .(setq |
|00003310| 73 6e 20 6e 69 6c 29 0d | 0a ff 20 03 28 77 68 69 |sn nil).|.. .(whi|
|00003320| 6c 65 20 28 3d 20 73 6e | 20 6e 69 6c 29 20 0d 0a |le (= sn| nil) ..|
|00003330| ff 20 03 28 73 65 74 71 | 20 73 6e 20 28 65 6e 74 |. .(setq| sn (ent|
|00003340| 73 65 6c 20 22 5c 6e d1 | a1 d4 f1 b6 cf c1 d1 cf |sel "\n.|........|
|00003350| df 3a 22 29 20 73 6e 20 | 28 63 61 72 20 73 6e 29 |.:") sn |(car sn)|
|00003360| 29 0d 0a ff 20 03 28 69 | 66 20 73 6e 20 28 70 72 |)... .(i|f sn (pr|
|00003370| 6f 67 6e 0d 0a ff 20 03 | 28 73 65 74 71 20 65 6e |ogn... .|(setq en|
|00003380| 20 28 65 6e 74 67 65 74 | 20 73 6e 29 20 65 6e 61 | (entget| sn) ena|
|00003390| 6d 65 20 28 63 64 72 20 | 28 61 73 73 6f 63 20 30 |me (cdr |(assoc 0|
|000033a0| 20 65 6e 29 29 20 65 6c | 61 79 20 28 63 64 72 20 | en)) el|ay (cdr |
|000033b0| 28 61 73 73 6f 63 20 38 | 20 65 6e ff 29 03 0d 0a |(assoc 8| en.)...|
|000033c0| ff 20 05 28 69 66 20 28 | 61 6e 64 20 28 3d 20 65 |. .(if (|and (= e|
|000033d0| 6e 61 6d 65 20 22 4c 49 | 4e 45 22 29 20 28 3d 20 |name "LI|NE") (= |
|000033e0| 65 6c 61 79 20 22 50 53 | 54 41 49 52 22 29 29 20 |elay "PS|TAIR")) |
|000033f0| 28 70 72 6f 67 6e 0d 0a | ff 20 03 28 73 65 74 71 |(progn..|. .(setq|
|00003400| 20 73 70 20 28 63 64 72 | 20 28 61 73 73 6f 63 20 | sp (cdr| (assoc |
|00003410| 31 30 20 65 6e 29 29 20 | 65 70 20 28 63 64 72 20 |10 en)) |ep (cdr |
|00003420| 28 61 73 73 6f 63 20 31 | 31 20 65 6e 29 29 20 6d |(assoc 1|1 en)) m|
|00003430| 70 20 28 70 6f 6c 61 72 | 20 73 70 20 28 61 6e 67 |p (polar| sp (ang|
|00003440| 6c 65 20 73 70 20 65 70 | 29 20 28 2f 20 28 64 69 |le sp ep|) (/ (di|
|00003450| 73 74 61 6e 63 65 20 73 | 70 20 65 70 29 20 32 2e |stance s|p ep) 2.|
|00003460| 30 ff 29 03 0d 0a ff 20 | 03 28 70 72 69 6e 63 20 |0.).... |.(princ |
|00003470| 22 5c 6e c8 b7 b6 a8 b6 | cf c1 d1 cf df b7 bd cf |"\n.....|........|
|00003480| f2 3a 22 29 0d 0a ff 20 | 03 28 63 6f 6d 6d 61 6e |.:")... |.(comman|
|00003490| 64 20 22 72 6f 74 61 74 | 65 22 20 73 6e 20 22 22 |d "rotat|e" sn ""|
|000034a0| 20 6d 70 20 70 61 75 73 | 65 29 0d 0a ff 20 03 28 | mp paus|e)... .(|
|000034b0| 73 65 74 71 20 65 6e 20 | 28 65 6e 74 67 65 74 20 |setq en |(entget |
|000034c0| 73 6e 29 29 0d 0a ff 20 | 03 28 63 6f 6d 6d 61 6e |sn))... |.(comman|
|000034d0| 64 20 22 75 22 29 0d 0a | ff 20 03 28 73 65 74 71 |d "u")..|. .(setq|
|000034e0| 20 73 70 20 28 63 64 72 | 20 28 61 73 73 6f 63 20 | sp (cdr| (assoc |
|000034f0| 31 30 20 65 6e 29 29 20 | 65 70 20 28 63 64 72 20 |10 en)) |ep (cdr |
|00003500| 28 61 73 73 6f 63 20 31 | 31 20 65 6e 29 29 20 6d |(assoc 1|1 en)) m|
|00003510| 70 20 28 70 6f 6c 61 72 | 20 73 70 20 28 61 6e 67 |p (polar| sp (ang|
|00003520| 6c 65 20 73 70 20 65 70 | 29 20 28 2f 20 28 64 69 |le sp ep|) (/ (di|
|00003530| 73 74 61 6e 63 65 20 73 | 70 20 65 70 29 20 32 2e |stance s|p ep) 2.|
|00003540| 30 ff 29 03 0d 0a ff 20 | 03 28 73 65 74 71 20 70 |0.).... |.(setq p|
|00003550| 6c 77 20 28 67 65 74 76 | 61 72 20 22 75 73 65 72 |lw (getv|ar "user|
|00003560| 72 31 22 29 20 61 6e 67 | 31 20 28 61 6e 67 6c 65 |r1") ang|1 (angle|
|00003570| 20 73 70 20 65 70 29 20 | 61 6e 67 30 20 28 2d 20 | sp ep) |ang0 (- |
|00003580| 61 6e 67 31 20 31 2e 35 | 37 30 37 39 29 20 61 6e |ang1 1.5|7079) an|
|00003590| 67 32 20 28 2b 20 61 6e | 67 31 20 31 2e 35 37 30 |g2 (+ an|g1 1.570|
|000035a0| 37 39 29 29 0d 0a ff 20 | 03 28 73 65 74 71 20 6d |79))... |.(setq m|
|000035b0| 70 31 20 28 70 6f 6c 61 | 72 20 6d 70 20 61 6e 67 |p1 (pola|r mp ang|
|000035c0| 31 20 70 6c 77 29 20 6d | 70 32 20 28 70 6f 6c 61 |1 plw) m|p2 (pola|
|000035d0| 72 20 6d 70 20 28 2b 20 | 61 6e 67 31 20 70 69 29 |r mp (+ |ang1 pi)|
|000035e0| 20 70 6c 77 29 29 0d 0a | ff 20 03 28 73 65 74 71 | plw))..|. .(setq|
|000035f0| 20 6d 70 33 20 28 70 6f | 6c 61 72 20 28 70 6f 6c | mp3 (po|lar (pol|
|00003600| 61 72 20 6d 70 31 20 28 | 2b 20 61 6e 67 31 20 70 |ar mp1 (|+ ang1 p|
|00003610| 69 29 20 28 2f 20 70 6c | 77 20 32 2e 30 29 29 20 |i) (/ pl|w 2.0)) |
|00003620| 61 6e 67 32 20 70 6c 77 | 29 29 0d 0a ff 20 03 28 |ang2 plw|))... .(|
|00003630| 73 65 74 71 20 6d 70 34 | 20 28 70 6f 6c 61 72 20 |setq mp4| (polar |
|00003640| 28 70 6f 6c 61 72 20 6d | 70 32 20 61 6e 67 31 20 |(polar m|p2 ang1 |
|00003650| 28 2f 20 70 6c 77 20 32 | 2e 30 29 29 20 61 6e 67 |(/ plw 2|.0)) ang|
|00003660| 30 20 70 6c 77 29 29 0d | 0a ff 20 03 28 63 6f 6d |0 plw)).|.. .(com|
|00003670| 6d 61 6e 64 20 22 6c 61 | 79 65 72 22 20 22 6d 22 |mand "la|yer" "m"|
|00003680| 20 22 70 73 74 61 69 72 | 32 22 20 22 22 29 0d 0a | "pstair|2" "")..|
|00003690| ff 20 03 28 63 6f 6d 6d | 61 6e 64 20 22 70 6c 69 |. .(comm|and "pli|
|000036a0| 6e 65 22 20 73 70 20 22 | 77 22 20 30 20 22 22 20 |ne" sp "|w" 0 "" |
|000036b0| 6d 70 32 20 6d 70 34 20 | 6d 70 33 20 6d 70 31 20 |mp2 mp4 |mp3 mp1 |
|000036c0| 65 70 20 22 22 29 0d 0a | ff 20 03 28 73 65 74 71 |ep "")..|. .(setq|
|000036d0| 20 64 73 65 31 20 28 65 | 6e 74 6c 61 73 74 29 29 | dse1 (e|ntlast))|
|000036e0| 0d 0a ff 20 03 28 63 6f | 6d 6d 61 6e 64 20 22 63 |... .(co|mmand "c|
|000036f0| 6f 70 79 22 20 64 73 65 | 31 20 22 22 20 6d 70 20 |opy" dse|1 "" mp |
|00003700| 28 70 6f 6c 61 72 20 6d | 70 20 61 6e 67 32 20 28 |(polar m|p ang2 (|
|00003710| 2a 20 30 2e 35 20 70 6c | 77 ff 29 03 0d 0a ff 20 |* 0.5 pl|w.).... |
|00003720| 03 28 73 65 74 71 20 64 | 73 65 32 20 28 65 6e 74 |.(setq d|se2 (ent|
|00003730| 6c 61 73 74 29 29 0d 0a | ff 20 05 29 0d 0a ff 20 |last))..|. .)... |
|00003740| 05 28 73 65 74 71 20 73 | 6e 20 6e 69 6c 29 29 0d |.(setq s|n nil)).|
|00003750| 0a ff 20 03 29 29 0d 0a | ff 20 03 29 3b 77 68 69 |.. .))..|. .);whi|
|00003760| 6c 65 0d 0a ff 20 03 28 | 63 6f 6d 6d 61 6e 64 20 |le... .(|command |
|00003770| 22 7a 6f 6f 6d 22 20 22 | 77 22 20 73 70 20 65 70 |"zoom" "|w" sp ep|
|00003780| 29 20 0d 0a ff 20 03 28 | 73 65 74 71 20 73 6e 20 |) ... .(|setq sn |
|00003790| 74 29 20 0d 0a ff 20 03 | 28 77 68 69 6c 65 20 73 |t) ... .|(while s|
|000037a0| 6e 20 0d 0a ff 20 03 28 | 73 65 74 71 20 73 6e 20 |n ... .(|setq sn |
|000037b0| 28 65 6e 74 73 65 6c 20 | 22 5c 6e d1 a1 d4 f1 d2 |(entsel |"\n.....|
|000037c0| aa bc f4 c7 d0 b5 c4 c2 | a5 cc dd cf e0 b9 d8 cf |........|........|
|000037d0| df 3a 22 29 20 73 6e 32 | 20 28 63 61 72 20 73 6e |.:") sn2| (car sn|
|000037e0| 29 29 0d 0a ff 20 03 28 | 69 66 20 73 6e 32 20 28 |))... .(|if sn2 (|
|000037f0| 13 19 fe 70 72 6f 67 6e | 0d 0a fe 20 03 28 73 65 |...progn|... .(se|
|00003800| 74 71 20 65 6e 20 28 65 | 6e 74 67 65 74 20 73 6e |tq en (e|ntget sn|
|00003810| 32 29 20 65 6e 61 6d 65 | 20 28 63 64 72 20 28 61 |2) ename| (cdr (a|
|00003820| 73 73 6f 63 20 30 20 65 | 6e 29 29 20 65 6c 61 79 |ssoc 0 e|n)) elay|
|00003830| 20 28 63 64 72 20 28 61 | 73 73 6f 63 20 38 20 65 | (cdr (a|ssoc 8 e|
|00003840| 6e fe 29 03 0d 0a fe 20 | 04 28 69 66 20 28 61 6e |n.).... |.(if (an|
|00003850| 64 20 28 3d 20 65 6e 61 | 6d 65 20 22 4c 49 4e 45 |d (= ena|me "LINE|
|00003860| 22 29 20 28 3d 20 65 6c | 61 79 20 22 50 53 54 41 |") (= el|ay "PSTA|
|00003870| 49 52 22 29 29 0d 0a fe | 20 0a 28 63 6f 6d 6d 61 |IR"))...| .(comma|
|00003880| 6e 64 20 22 74 72 69 6d | 22 20 64 73 65 32 20 64 |nd "trim|" dse2 d|
|00003890| 73 65 31 20 22 22 20 73 | 6e 20 22 22 29 29 0d 0a |se1 "" s|n ""))..|
|000038a0| fe 20 0a 29 0d 0a fe 20 | 0a 28 70 72 6f 67 6e 0d |. .)... |.(progn.|
|000038b0| 0a fe 20 0a 28 73 65 74 | 71 20 6b 77 6f 72 64 20 |.. .(set|q kword |
|000038c0| 22 4e 6f 22 29 0d 0a fe | 20 0a 28 69 6e 69 74 67 |"No")...| .(initg|
|000038d0| 65 74 20 22 59 65 73 20 | 4e 6f 22 29 0d 0a fe 20 |et "Yes |No")... |
|000038e0| 0a 28 73 65 74 71 20 6b | 77 6f 72 64 20 28 67 65 |.(setq k|word (ge|
|000038f0| 74 6b 77 6f 72 64 20 22 | 5c 6e ca c7 b7 f1 bc cc |tkword "|\n......|
|00003900| d0 f8 d1 a1 d4 f1 3f 20 | 3c 4e 3e 3a 22 29 29 0d |......? |<N>:")).|
|00003910| 0a fe 20 0a 28 69 66 20 | 28 3d 20 6b 77 6f 72 64 |.. .(if |(= kword|
|00003920| 20 22 59 65 73 22 29 20 | 28 73 65 74 71 20 73 6e | "Yes") |(setq sn|
|00003930| 20 31 29 20 28 73 65 74 | 71 20 73 6e 20 6e 69 6c | 1) (set|q sn nil|
|00003940| 29 29 0d 0a fe 20 03 29 | 29 0d 0a fe 20 03 29 3b |))... .)|)... .);|
|00003950| 77 68 69 6c 65 0d 0a fe | 20 03 28 63 6f 6d 6d 61 |while...| .(comma|
|00003960| 6e 64 20 22 7a 6f 6f 6d | 22 20 22 61 22 29 0d 0a |nd "zoom|" "a")..|
|00003970| 29 0d 0a 0d 0a 28 64 65 | 66 75 6e 20 69 6e 73 74 |)....(de|fun inst|
|00003980| 72 28 73 74 20 73 30 20 | 73 30 30 20 2f 20 6c 20 |r(st s0 |s00 / l |
|00003990| 6e 20 6c 6f 6f 70 20 78 | 20 6e 30 20 6c 30 29 0d |n loop x| n0 l0).|
|000039a0| 0a fe 20 03 28 73 65 74 | 71 20 6c 20 28 2b 20 28 |.. .(set|q l (+ (|
|000039b0| 2d 20 28 73 74 72 6c 65 | 6e 20 73 30 29 20 73 74 |- (strle|n s0) st|
|000039c0| 29 20 31 29 20 6c 30 20 | 30 20 6e 30 20 73 74 20 |) 1) l0 |0 n0 st |
|000039d0| 6e 20 31 20 6c 6f 6f 70 | 20 74 29 0d 0a fe 20 03 |n 1 loop| t)... .|
|000039e0| 28 77 68 69 6c 65 20 28 | 61 6e 64 20 28 3c 3d 20 |(while (|and (<= |
|000039f0| 6e 20 6c 29 20 6c 6f 6f | 70 29 0d 0a fe 20 06 28 |n l) loo|p)... .(|
|00003a00| 73 65 74 71 20 78 20 28 | 73 75 62 73 74 72 20 73 |setq x (|substr s|
|00003a10| 30 20 6e 30 20 31 29 29 | 0d 0a fe 20 06 28 69 66 |0 n0 1))|... .(if|
|00003a20| 20 28 65 71 20 78 20 73 | 30 30 29 20 28 73 65 74 | (eq x s|00) (set|
|00003a30| 71 20 6c 6f 6f 70 20 6e | 69 6c 20 6c 30 20 6e 30 |q loop n|il l0 n0|
|00003a40| 29 20 28 73 65 74 71 20 | 6e 30 20 28 31 2b 20 6e |) (setq |n0 (1+ n|
|00003a50| 30 29 20 6e 20 28 31 2b | 20 6e fe 29 03 0d 0a fe |0) n (1+| n.)....|
|00003a60| 20 03 29 0d 0a fe 20 03 | 28 65 76 61 6c 20 6c 30 | .)... .|(eval l0|
|00003a70| 29 0d 0a 29 0d 0a 0d 0a | 28 64 65 66 75 6e 20 73 |)..)....|(defun s|
|00003a80| 75 62 32 32 28 61 66 20 | 2f 20 6c 30 20 73 70 20 |ub22(af |/ l0 sp |
|00003a90| 65 70 29 0d 0a fe 20 03 | 28 73 65 74 71 20 6c 30 |ep)... .|(setq l0|
|00003aa0| 20 28 69 6e 73 74 72 20 | 31 20 61 66 20 22 2a 22 | (instr |1 af "*"|
|00003ab0| 29 20 6e 6c 20 6e 69 6c | 29 0d 0a fe 20 03 28 73 |) nl nil|)... .(s|
|00003ac0| 65 74 71 20 73 70 20 28 | 73 75 62 73 74 72 20 61 |etq sp (|substr a|
|00003ad0| 66 20 31 20 28 2d 20 6c | 30 20 31 29 29 20 65 70 |f 1 (- l|0 1)) ep|
|00003ae0| 20 28 73 75 62 73 74 72 | 20 61 66 20 28 2b 20 6c | (substr| af (+ l|
|00003af0| 30 20 31 fe 29 03 0d 0a | fe 20 03 28 72 65 70 65 |0 1.)...|. .(repe|
|00003b00| 61 74 20 28 61 74 6f 69 | 20 73 70 29 0d 0a fe 20 |at (atoi| sp)... |
|00003b10| 06 28 73 65 74 71 20 6e | 6c 20 28 63 6f 6e 73 20 |.(setq n|l (cons |
|00003b20| 28 61 74 6f 69 20 65 70 | 29 20 6e 6c 29 29 0d 0a |(atoi ep|) nl))..|
|00003b30| fe 20 03 29 0d 0a 29 0d | 0a 0d 0a 28 64 65 66 75 |. .)..).|...(defu|
|00003b40| 6e 20 73 75 62 31 31 28 | 61 78 64 20 2f 20 6c 30 |n sub11(|axd / l0|
|00003b50| 20 6c 31 20 61 78 20 6e | 6c 29 0d 0a fe 20 03 28 | l1 ax n|l)... .(|
|00003b60| 73 65 74 71 20 61 78 64 | 6c 20 6e 69 6c 29 0d 0a |setq axd|l nil)..|
|00003b70| fe 20 03 28 69 66 20 28 | 61 6e 64 20 28 3d 20 28 |. .(if (|and (= (|
|00003b80| 69 6e 73 74 72 20 31 20 | 61 78 64 20 22 2c 22 29 |instr 1 |axd ",")|
|00003b90| 20 30 29 20 28 3e 20 28 | 73 74 72 6c 65 6e 20 61 | 0) (> (|strlen a|
|00003ba0| 78 64 29 20 30 29 29 0d | 0a fe 20 03 28 70 72 6f |xd) 0)).|.. .(pro|
|00003bb0| 67 6e 0d 0a fe 20 03 28 | 69 66 20 28 3e 20 28 69 |gn... .(|if (> (i|
|00003bc0| 6e 73 74 72 20 31 20 61 | 78 64 20 22 2a 22 29 20 |nstr 1 a|xd "*") |
|00003bd0| 30 29 0d 0a fe 20 07 28 | 70 72 6f 67 6e 0d 0a fe |0)... .(|progn...|
|00003be0| 20 07 28 73 75 62 32 32 | 20 61 78 64 29 0d 0a fe | .(sub22| axd)...|
|00003bf0| 20 07 28 73 65 74 71 20 | 61 78 64 6c 20 6e 6c 29 | .(setq |axdl nl)|
|00003c00| 29 0d 0a fe 20 07 28 73 | 65 74 71 20 61 78 64 6c |)... .(s|etq axdl|
|00003c10| 20 28 63 6f 6e 73 20 28 | 61 74 6f 69 20 61 78 64 | (cons (|atoi axd|
|00003c20| 29 20 61 78 64 6c 29 29 | 0d 0a fe 20 03 29 0d 0a |) axdl))|... .)..|
|00003c30| fe 20 03 29 0d 0a fe 20 | 03 28 70 72 6f 67 6e 0d |. .)... |.(progn.|
|00003c40| 0a fe 20 03 28 73 65 74 | 71 20 6c 30 20 30 20 6c |.. .(set|q l0 0 l|
|00003c50| 31 20 28 69 6e 73 74 72 | 20 31 20 61 78 64 20 22 |1 (instr| 1 axd "|
|00003c60| 2c 22 29 29 0d 0a fe 20 | 03 28 77 68 69 6c 65 20 |,"))... |.(while |
|00003c70| 28 3e 20 28 69 6e 73 74 | 72 20 28 2b 20 6c 30 20 |(> (inst|r (+ l0 |
|00003c80| 31 29 20 61 78 64 20 22 | 2c 22 29 20 30 29 0d 0a |1) axd "|,") 0)..|
|00003c90| fe 20 05 28 73 65 74 71 | 20 61 78 20 28 73 75 62 |. .(setq| ax (sub|
|00003ca0| 73 74 72 20 61 78 64 20 | 28 2b 20 6c 30 20 31 29 |str axd |(+ l0 1)|
|00003cb0| 20 28 2d 20 6c 31 20 6c | 30 20 31 fe 29 03 0d 0a | (- l1 l|0 1.)...|
|00003cc0| fe 20 05 28 69 66 20 28 | 3e 20 28 69 6e 73 74 72 |. .(if (|> (instr|
|00003cd0| 20 31 20 61 78 20 22 2a | 22 29 20 30 29 20 28 70 | 1 ax "*|") 0) (p|
|00003ce0| 72 6f 67 6e 0d 0a fe 20 | 05 28 73 75 62 32 32 20 |rogn... |.(sub22 |
|00003cf0| 61 78 29 0d 0a fe 20 05 | 28 73 65 74 71 20 61 78 |ax)... .|(setq ax|
|00003d00| 64 6c 20 28 61 70 70 65 | 6e 64 20 6e 6c 20 61 78 |dl (appe|nd nl ax|
|00003d10| 64 6c 29 29 0d 0a fe 20 | 05 29 0d 0a fe 20 05 28 |dl))... |.)... .(|
|00003d20| 73 65 74 71 20 61 78 64 | 6c 20 28 63 6f 6e 73 20 |setq axd|l (cons |
|00003d30| 28 61 74 6f 69 20 61 78 | 29 20 61 78 64 6c 29 29 |(atoi ax|) axdl))|
|00003d40| 0d 0a fe 20 05 29 0d 0a | fe 20 05 28 73 65 74 71 |... .)..|. .(setq|
|00003d50| 20 6c 30 20 6c 31 20 6c | 31 20 28 69 6e 73 74 72 | l0 l1 l|1 (instr|
|00003d60| 20 28 2b 20 6c 30 20 31 | 29 20 61 78 64 20 22 2c | (+ l0 1|) axd ",|
|00003d70| 22 29 29 0d 0a fe 20 03 | 29 0d 0a fe 20 03 28 73 |"))... .|)... .(s|
|00003d80| 65 74 71 20 61 78 20 28 | 73 75 62 73 74 72 20 61 |etq ax (|substr a|
|00003d90| 78 64 20 28 2b 20 6c 30 | 20 31 fe 29 03 0d 0a fe |xd (+ l0| 1.)....|
|00003da0| 20 03 28 69 66 20 28 3e | 20 28 69 6e 73 74 72 20 | .(if (>| (instr |
|00003db0| 31 20 61 78 20 22 2a 22 | 29 20 30 29 20 28 70 72 |1 ax "*"|) 0) (pr|
|00003dc0| 6f 67 6e 0d 0a fe 20 03 | 28 73 75 62 32 32 20 61 |ogn... .|(sub22 a|
|00003dd0| 78 29 0d 0a fe 20 03 28 | 73 65 74 71 20 61 78 64 |x)... .(|setq axd|
|00003de0| 6c 20 28 61 70 70 65 6e | 64 20 6e 6c 20 61 78 64 |l (appen|d nl axd|
|00003df0| 6c 29 29 0d 0a fe 20 03 | 29 0d 0a fe 20 03 28 73 |l))... .|)... .(s|
|00003e00| 65 74 71 20 61 78 64 6c | 20 28 63 6f 6e 73 20 28 |etq axdl| (cons (|
|00003e10| 61 74 6f 69 20 61 78 29 | 20 61 78 64 6c 29 29 0d |atoi ax)| axdl)).|
|00003e20| 0a fe 20 03 29 0d 0a fe | 20 03 29 29 0d 0a fe 20 |.. .)...| .))... |
|00003e30| 03 28 73 65 74 71 20 61 | 78 64 6c 20 28 72 65 76 |.(setq a|xdl (rev|
|00003e40| 65 72 73 65 20 61 78 64 | 6c 29 29 0d 0a 29 0d 0a |erse axd|l))..)..|
|00003e50| fe 1a 48 50 52 4f 4a fe | 20 04 4c 53 50 20 fe 00 |..HPROJ.| .LSP ..|
|00003e60| 0a 3a 80 3d 18 8a 05 ab | 0d 00 00 43 48 4b 57 fe |.:.=....|...CHKW.|
|00003e70| 20 04 4c 53 50 20 fe 00 | 0a 02 82 74 17 3a 34 4b | .LSP ..|...t.:4K|
|00003e80| 0e 00 00 54 57 4f fe 20 | 05 4c 53 50 20 fe 00 0a |...TWO. |.LSP ...|
|00003e90| 73 80 3d 18 2d 3f e6 0b | 00 00 e5 4f 4c 55 4d 45 |s.=.-?..|...OLUME|
|00003ea0| 20 20 42 41 4b 20 fe 00 | 0a 16 52 41 18 da 67 98 | BAK ..|..RA..g.|
|00003eb0| 0d 00 00 50 57 41 4c 4c | fe 20 03 4c 53 50 20 fe |...PWALL|. .LSP .|
|00003ec0| 00 0a 16 68 7a 17 9a 49 | 64 20 00 00 e5 53 55 fe |...hz..I|d ...SU.|
|00003ed0| 20 05 43 4f 4d 20 fe 00 | 0a d6 00 21 00 6c 0b 80 | .COM ..|...!.l..|
|00003ee0| 53 00 00 e5 53 4d 53 47 | 53 20 20 4f 56 52 20 fe |S...SMSG|S OVR .|
|00003ef0| 00 0e 71 14 80 6a 00 00 | e5 53 4f 56 4c 59 31 20 |..q..j..|.SOVLY1 |
|00003f00| 4f 56 52 20 fe 00 0e 1c | 17 00 a0 00 00 46 49 4c |OVR ....|.....FIL|
|00003f10| 45 53 3d 34 30 0d 0a 42 | 55 46 46 45 52 53 3d 31 |ES=40..B|UFFERS=1|
|00003f20| 30 0d 0a 42 52 45 41 4b | 3d 4f 46 46 0d 0a 53 48 |0..BREAK|=OFF..SH|
|00003f30| 45 4c 4c 3d 5c 43 4f 4d | 4d 41 4e 44 2e 43 4f 4d |ELL=\COM|MAND.COM|
|00003f40| 20 2f 45 3a 35 31 32 2f | 50 0d 0a 64 65 76 69 63 | /E:512/|P..devic|
|00003f50| 65 3d 5c 64 6f 73 5c 63 | 65 6d 6d 2e 65 78 65 20 |e=\dos\c|emm.exe |
|00003f60| 33 32 33 32 20 6f 6e 0d | 0a 1a 01 00 00 54 4e 54 |3232 on.|.....TNT|
|00003f70| 56 49 52 55 53 fe 20 03 | 10 fe 00 0a 12 46 4f 17 |VIRUS. .|.....FO.|
|00003f80| 35 01 fe 00 04 41 44 49 | fe 20 05 42 41 4b 20 fe |5....ADI|. .BAK .|
|00003f90| 00 0a d1 46 4e 17 a1 07 | 2d fe 00 03 54 49 47 41 |...FN...|-...TIGA|
|00003fa0| fe 20 04 42 41 54 20 fe | 00 0a dd 46 4e 17 a2 07 |. .BAT .|...FN...|
|00003fb0| 21 fe 00 03 42 4f 4f 54 | fe 20 04 54 41 56 22 fe |!...BOOT|. .TAV".|
|00003fc0| 00 0a 29 46 4f 17 0c 14 | 00 04 00 00 47 fe 20 0a |..)FO...|....G. .|
|00003fd0| 10 fe 00 0a ed 80 4f 17 | 36 01 fe 00 04 55 53 54 |......O.|6....UST|
|00003fe0| 41 54 49 4f 4e fe 20 03 | 10 fe 00 0a e8 78 55 17 |ATION. .|.....xU.|
|00003ff0| 6d 35 fe 00 04 41 43 41 | 44 31 30 fe 20 05 10 fe |m5...ACA|D10. ...|
|00004000| 00 0a 68 7d 50 17 7c 19 | fe 00 04 49 4e 53 54 41 |..h}P.|.|...INSTA|
|00004010| 4c 4c 32 42 41 54 20 fe | 00 0a 02 81 ab 12 51 19 |LL2BAT .|......Q.|
|00004020| 00 4d 00 00 41 45 43 fe | 20 08 10 fe 00 0a 49 7e |.M..AEC.| .....I~|
|00004030| 50 17 82 1b fe 00 04 49 | 4d 41 47 45 43 45 4c fe |P......I|MAGECEL.|
|00004040| 20 03 10 fe 00 0a 92 6a | 51 17 c4 23 fe 00 04 53 | ......j|Q..#...S|
|00004050| 48 41 44 45 32 fe 20 05 | 10 fe 00 0a c6 70 51 17 |HADE2. .|.....pQ.|
|00004060| 73 2f fe 00 04 44 47 4e | fe 20 08 10 fe 00 0a f2 |s/...DGN|. ......|
|00004070| 78 55 17 8b 35 fe 00 04 | 4b 45 52 4d 49 54 fe 20 |xU..5...|KERMIT. |
|00004080| 05 10 fe 00 0a 85 7b 55 | 17 d0 38 fe 00 04 46 49 |......{U|..8...FI|
|00004090| 4c 45 53 3d 34 30 0d 0a | 42 55 46 46 45 52 53 3d |LES=40..|BUFFERS=|
|000040a0| 31 30 0d 0a 42 52 45 41 | 4b 3d 4f 46 46 0d 0a 53 |10..BREA|K=OFF..S|
|000040b0| 48 45 4c 4c 3d 5c 43 4f | 4d 4d 41 4e 44 2e 43 4f |HELL=\CO|MMAND.CO|
|000040c0| 4d 20 2f 45 3a 32 35 36 | 2f 50 0d 0a 64 65 76 69 |M /E:256|/P..devi|
|000040d0| 63 65 3d 5c 64 6f 73 5c | 63 65 6d 6d 2e 65 78 65 |ce=\dos\|cemm.exe|
|000040e0| 20 32 37 32 30 20 61 75 | 74 6f 0d 0a 1a ff 41 28 | 2720 au|to....A(|
|000040f0| 84 43 48 84 45 68 84 47 | 88 84 ff 0f fe 00 26 40 |.CH.Eh.G|......&@|
|00004100| 86 65 68 86 67 88 86 69 | a8 86 6b c8 86 6d f8 ff |.eh.g..i|..k..m..|
|00004110| 6f 08 87 71 28 87 73 48 | 87 75 68 87 77 f8 ff 79 |o..q(.sH|.uh.w..y|
|00004120| a8 87 7b c8 87 7d e8 87 | 7f 08 88 ff 2f 88 83 48 |..{..}..|..../..H|
|00004130| 88 85 68 88 87 88 88 89 | a8 88 8b f8 ff 8d f8 ff |..h.....|........|
|00004140| 8f 08 89 91 28 89 93 48 | 89 95 68 89 97 f8 ff 99 |....(..H|..h.....|
|00004150| a8 89 ff cf 89 9d e8 89 | ff 0f 8a a1 28 8a a3 f8 |........|....(...|
|00004160| ff a5 68 8a a7 88 8a a9 | a8 8a ff cf 8a ad e8 8a |..h.....|........|
|00004170| ff 0f 8b b1 28 8b b3 48 | 8b ff 6f 8b b7 88 8b b9 |....(..H|..o.....|
|00004180| a8 8b bb c8 8b ff ef 8b | bf 08 8c c1 28 8c c3 48 |........|....(..H|
|00004190| 8c c5 68 8c c7 88 8c c9 | a8 8c cb c8 8c cd e8 8c |..h.....|........|
|000041a0| cf 08 8d d1 28 8d d3 48 | 8d ff 6f 8d d7 88 8d d9 |....(..H|..o.....|
|000041b0| a8 8d db f8 ff dd e8 8d | df 08 8e e1 28 8e ff 4f |........|....(..O|
|000041c0| 8e e5 68 8e e7 88 8e e9 | a8 8e ff cf 8e ed e8 8e |..h.....|........|
|000041d0| ef 08 8f ff 2f 8f f3 48 | 8f f5 68 8f f7 88 8f f9 |..../..H|..h.....|
|000041e0| a8 8f fb c8 8f fd e8 8f | ff 08 90 01 f9 ff fe 00 |........|........|
|000041f0| 28 e0 91 1f 09 92 21 29 | 92 23 49 92 25 69 92 27 |(.....!)|.#I.%i.'|
|00004200| f9 ff 29 a9 92 2b c9 92 | 2d e9 92 2f 09 93 31 29 |..)..+..|-../..1)|
|00004210| 93 33 49 93 35 69 93 37 | 89 93 39 a9 93 3b c9 93 |.3I.5i.7|..9..;..|
|00004220| 3d e9 93 3f 09 94 41 29 | 94 43 49 94 02 fe 00 19 |=..?..A)|.CI.....|
|00004230| fe 20 05 28 63 6f 6d 6d | 61 6e 64 29 0d 0a fe 20 |. .(comm|and)... |
|00004240| 05 28 69 66 20 28 65 71 | 20 66 6c 61 67 20 22 46 |.(if (eq| flag "F|
|00004250| 69 6c 65 22 29 20 28 70 | 72 6f 67 6e 0d 0a fe 20 |ile") (p|rogn... |
|00004260| 05 28 77 68 69 6c 65 20 | 28 2f 3d 20 28 73 65 74 |.(while |(/= (set|
|00004270| 71 20 65 6e 74 6c 20 28 | 65 6e 74 6e 65 78 74 20 |q entl (|entnext |
|00004280| 65 6e 74 6c 29 29 20 6e | 69 6c 29 20 28 73 73 61 |entl)) n|il) (ssa|
|00004290| 64 64 20 65 6e 74 6c 20 | 73 73 29 29 0d 0a fe 20 |dd entl |ss))... |
|000042a0| 05 28 69 66 20 28 65 71 | 20 6b 77 6f 72 64 20 22 |.(if (eq| kword "|
|000042b0| 59 65 73 22 29 20 28 63 | 6f 6d 6d 61 6e 64 20 22 |Yes") (c|ommand "|
|000042c0| 77 62 6c 6f 63 6b 22 20 | 66 69 6c 65 20 22 59 22 |wblock" |file "Y"|
|000042d0| 20 22 22 20 6a 64 20 73 | 73 20 22 22 29 20 28 63 | "" jd s|s "") (c|
|000042e0| 6f 6d 6d 61 6e 64 20 22 | 77 62 6c 6f 63 6b 22 20 |ommand "|wblock" |
|000042f0| 66 69 6c 65 20 22 22 20 | 6a 64 20 73 73 20 22 22 |file "" |jd ss ""|
|00004300| fe 29 04 0d 0a fe 20 05 | 28 63 6f 6d 6d 61 6e 64 |.).... .|(command|
|00004310| 20 22 6c 61 79 65 72 22 | 20 22 73 22 20 22 30 22 | "layer"| "s" "0"|
|00004320| 20 22 22 29 0d 0a fe 20 | 05 28 73 65 74 76 61 72 | "")... |.(setvar|
|00004330| 20 22 63 6d 64 65 63 68 | 6f 22 20 31 29 20 28 73 | "cmdech|o" 1) (s|
|00004340| 65 74 71 20 2a 65 72 72 | 6f 72 2a 20 6f 65 72 29 |etq *err|or* oer)|
|00004350| 20 28 70 72 69 6e 63 29 | 0d 0a 29 0d 0a fe 1a 46 | (princ)|..)....F|
|00004360| 53 54 41 49 52 fe 20 03 | 4c 53 50 20 fe 00 0a 1d |STAIR. .|LSP ....|
|00004370| 52 51 17 32 3f 23 0b 00 | 00 e5 4a 45 53 fe 20 04 |RQ.2?#..|..JES. .|
|00004380| 42 41 4b 20 fe 00 0a cb | 49 41 18 d0 40 3b 15 00 |BAK ....|IA..@;..|
|00004390| 00 43 48 41 4d fe 20 04 | 4c 53 50 20 fe 00 0a 31 |.CHAM. .|LSP ...1|
|000043a0| bb 66 15 71 27 78 0d 00 | 00 46 4c 4c 45 54 fe 20 |.f.q'x..|.FLLET. |
|000043b0| 03 4c 53 50 20 fe 00 0a | 38 bb 66 15 74 27 c1 14 |.LSP ...|8.f.t'..|
|000043c0| 00 00 6d 61 6e 64 20 22 | 65 72 61 73 65 22 20 65 |..mand "|erase" e|
|000043d0| 6e 74 6c 20 22 22 29 0d | 0a fe 20 0d 28 63 6f 6d |ntl "").|.. .(com|
|000043e0| 6d 61 6e 64 20 22 70 65 | 64 69 74 22 20 65 6e 74 |mand "pe|dit" ent|
|000043f0| 6e 20 22 77 22 20 28 2a | 20 28 2d 20 6c 77 20 30 |n "w" (*| (- lw 0|
|00004400| 2e 31 29 20 62 6c 29 20 | 22 22 29 0d 0a fe 20 0d |.1) bl) |"")... .|
|00004410| 28 63 6f 6d 6d 61 6e 64 | 20 22 63 68 61 6e 67 65 |(command| "change|
|00004420| 22 20 28 65 6e 74 6c 61 | 73 74 29 20 22 22 20 22 |" (entla|st) "" "|
|00004430| 70 22 20 22 6c 61 22 20 | 22 70 77 61 6c 6c 77 22 |p" "la" |"pwallw"|
|00004440| 20 22 22 29 0d 0a 29 0d | 0a 1a 11 1f 00 00 49 4e | "")..).|......IN|
|00004450| 53 57 49 4e 20 20 4c 53 | 50 20 fe 00 0a 23 6f 3c |SWIN LS|P ...#o<|
|00004460| 18 4c 03 73 44 00 00 e5 | 54 30 fe 20 05 fe 24 03 |.L.sD...|T0. ..$.|
|00004470| 20 fe 00 0a fc 85 3e 18 | fe 00 06 41 52 43 57 41 | .....>.|...ARCWA|
|00004480| 4c 4c 20 4c 53 50 20 fe | 00 0a a4 52 3c 18 e3 00 |LL LSP .|...R<...|
|00004490| 2d 2f 00 00 45 52 41 57 | 49 4e 20 20 4c 53 50 20 |-/..ERAW|IN LSP |
|000044a0| fe 00 0a 59 63 3c 18 45 | 05 bb 27 00 00 e5 57 41 |...Yc<.E|..'...WA|
|000044b0| 4c 4c fe 20 03 42 41 4b | fe 00 0c 64 3c 18 e6 66 |LL. .BAK|...d<..f|
|000044c0| bf 0f 00 00 54 57 41 4c | 4c fe 20 03 4c 53 50 20 |....TWAL|L. .LSP |
|000044d0| fe 00 0a ce 64 3c 18 e7 | 66 d9 0f 00 00 54 57 49 |....d<..|f....TWI|
|000044e0| 4e fe 20 04 4c 53 50 20 | fe 00 0a 21 65 3c 18 e8 |N. .LSP |...!e<..|
|000044f0| 66 55 0e 00 00 54 58 48 | fe 20 05 4c 53 50 20 fe |fU...TXH|. .LSP .|
|00004500| 00 0a 88 65 3c 18 e9 66 | 23 0d 00 00 e5 49 4e 44 |...e<..f|#....IND|
|00004510| 4f 57 20 20 42 41 4b fe | 00 0b d5 6a 3c 18 f0 66 |OW BAK.|...j<..f|
|00004520| 49 1a 00 00 57 49 4e 44 | 4f 57 20 20 4c 53 50 20 |I...WIND|OW LSP |
|00004530| fe 00 0a 1c 6b 3c 18 f1 | 66 4f 1a 00 00 e5 45 4c |....k<..|fO....EL|
|00004540| 56 fe 20 04 42 41 4b fe | 00 0b 86 6b 3c 18 f5 66 |V. .BAK.|...k<..f|
|00004550| f2 27 00 00 41 75 74 6f | 43 41 44 20 33 38 36 0d |.'..Auto|CAD 386.|
|00004560| 0a 52 2d 31 31 0d 0a 41 | 45 43 39 31 20 4c 69 73 |.R-11..A|EC91 Lis|
|00004570| 70 0d 0a 44 4f 4d 45 53 | 54 49 43 0d 0a 0d 0a fe |p..DOMES|TIC.....|
|00004580| 1a 55 43 48 4b 57 fe 20 | 04 4c 53 50 20 fe 00 0a |.UCHKW. |.LSP ...|
|00004590| 02 82 74 17 e3 08 4b 0e | 00 00 54 57 4f fe 20 05 |..t...K.|..TWO. .|
|000045a0| 4c 53 50 20 fe 00 0a 73 | 80 3d 18 eb 08 e6 0b 00 |LSP ...s|.=......|
|000045b0| 00 50 57 41 4c 4c fe 20 | 03 4c 53 50 20 fe 00 0a |.PWALL. |.LSP ...|
|000045c0| 16 68 7a 17 f1 08 64 20 | 00 00 44 49 4d 57 41 4c |.hz...d |..DIMWAL|
|000045d0| 4c 20 4c 53 50 20 fe 00 | 0a 82 7a 4a 18 a9 01 22 |L LSP ..|..zJ..."|
|000045e0| 5c 00 00 4c 54 31 fe 20 | 05 4c 53 50 20 fe 00 0a |\..LT1. |.LSP ...|
|000045f0| 1d 81 4a 18 7b 01 80 11 | 00 00 4c 54 32 fe 20 05 |..J.{...|..LT2. .|
|00004600| 4c 53 50 20 fe 00 0a 60 | 5d 4b 18 8e 01 00 13 00 |LSP ...`|]K......|
|00004610| 00 4c 54 33 fe 20 05 4c | 53 50 20 fe 00 0a db 5e |.LT3. .L|SP ....^|
|00004620| 4b 18 84 01 80 12 00 00 | 53 4c 54 34 fe 20 04 4c |K.......|SLT4. .L|
|00004630| 53 50 20 fe 00 0a 37 62 | 81 17 1d 09 00 16 00 00 |SP ...7b|........|
|00004640| 4c 34 fe 20 06 4c 53 50 | 20 fe 00 0a 49 7c 89 17 |L4. .LSP| ...I|..|
|00004650| 28 09 00 61 00 00 4c 54 | 30 fe 20 05 4c 53 50 20 |(..a..LT|0. .LSP |
|00004660| fe 00 0a c6 52 4b 18 78 | 01 80 05 00 00 4c 54 44 |....RK.x|.....LTD|
|00004670| fe 20 05 4c 53 50 20 fe | 00 0a aa 52 4b 18 74 01 |. .LSP .|...RK.t.|
|00004680| 00 08 00 00 4c 54 34 fe | 20 05 4c 53 50 20 fe 00 |....LT4.| .LSP ..|
|00004690| 0a 51 87 98 17 72 01 00 | 03 00 00 41 75 74 6f 43 |.Q...r..|...AutoC|
|000046a0| 41 44 20 33 38 36 0d 0a | 52 2d 31 31 0d 0a 41 45 |AD 386..|R-11..AE|
|000046b0| 43 39 31 20 4c 69 73 70 | 0d 0a 0d 0a fe 1a 5f 44 |C91 Lisp|......_D|
|000046c0| 49 53 4b 49 4e 49 54 45 | 58 45 20 fe 00 0b 60 9f |ISKINITE|XE ...`.|
|000046d0| 0f 5b 00 33 d9 00 00 44 | 49 53 50 4c 41 59 20 53 |.[.3...D|ISPLAY S|
|000046e0| 59 53 20 fe 00 0b 60 9f | 0f 69 00 03 2d 00 00 44 |YS ...`.|.i..-..D|
|000046f0| 52 49 56 45 52 20 20 53 | 59 53 20 fe 00 0b 60 9f |RIVER S|YS ...`.|
|00004700| 0f 6c 00 69 05 00 00 45 | 44 4c 49 4e fe 20 03 43 |.l.i...E|DLIN. .C|
|00004710| 4f 4d 20 fe 00 0b 60 9f | 0f 6d 00 47 1d 00 00 45 |OM ...`.|.m.G...E|
|00004720| 47 41 fe 20 05 43 50 49 | 20 fe 00 0b 60 9f 0f 6f |GA. .CPI| ...`..o|
|00004730| 00 a9 bf 00 00 45 4e 48 | 44 49 53 4b 20 53 59 53 |.....ENH|DISK SYS|
|00004740| 20 fe 00 0b 60 9f 0f 7b | 00 71 0d 00 00 45 58 45 | ...`..{|.q...EXE|
|00004750| 32 42 49 4e 20 45 58 45 | 20 fe 00 0b 60 9f 0f 7c |2BIN EXE| ...`..||
|00004760| 00 ea 0b 00 00 46 41 53 | 54 4f 50 45 4e 45 58 45 |.....FAS|TOPENEXE|
|00004770| 20 fe 00 0b 60 9f 0f 7d | 00 30 0f 00 00 46 44 49 | ...`..}|.0...FDI|
|00004780| 53 4b fe 20 03 43 4f 4d | 20 fe 00 0b 60 9f 0f 7e |SK. .COM| ...`..~|
|00004790| 00 43 d3 00 00 46 49 4e | 44 fe 20 04 45 58 45 20 |.C...FIN|D. .EXE |
|000047a0| fe 00 0b 60 9f 0f 8c 00 | 03 19 00 00 46 4f 52 4d |...`....|....FORM|
|000047b0| 41 54 20 20 43 4f 4d 20 | fe 00 0b 60 9f 0f ec 0b |AT COM |...`....|
|000047c0| 7b 35 00 00 47 52 41 46 | 54 41 42 4c 43 4f 4d 20 |{5..GRAF|TABLCOM |
|000047d0| fe 00 0b 60 9f 0f 92 00 | 80 18 00 00 4d 49 44 3a |...`....|....MID:|
|000047e0| fe 20 04 33 30 39 30 0d | 0a 4d 61 63 68 69 6e 65 |. .3090.|.Machine|
|000047f0| 3a 20 44 4f 53 20 33 38 | 36 0d 0a 50 72 6f 64 75 |: DOS 38|6..Produ|
|00004800| 63 74 3a 20 41 75 74 6f | 43 41 44 20 0d 0a 52 65 |ct: Auto|CAD ..Re|
|00004810| 6c 65 61 73 65 3a 20 31 | 31 0d 0a 44 69 73 6b 3a |lease: 1|1..Disk:|
|00004820| 20 41 45 43 39 31 20 4c | 69 73 70 20 44 69 73 6b | AEC91 L|isp Disk|
|00004830| 20 0d 0a 46 6f 72 6d 61 | 74 3a 20 31 2e 32 6d 62 | ..Forma|t: 1.2mb|
|00004840| 20 0d 0a 44 61 74 65 3a | 20 20 57 65 64 6e 65 73 | ..Date:| Wednes|
|00004850| 64 61 79 2c 20 53 65 70 | 74 65 6d 62 65 72 20 32 |day, Sep|tember 2|
|00004860| 38 2c 31 39 39 31 0d 0a | 54 69 6d 65 3a 20 20 31 |8,1991..|Time: 1|
|00004870| 38 3a 34 35 3a 31 32 0d | 0a 50 61 72 74 20 4e 6f |8:45:12.|.Part No|
|00004880| 2e 3a 20 20 33 30 39 30 | 2d 50 32 2d 41 43 2d 31 |.: 3090|-P2-AC-1|
|00004890| 2f 34 20 0d 0a fe 1a 46 | 28 01 8b 16 18 01 b1 04 |/4 ....F|(.......|
|000048a0| d3 e2 8b 0e 16 01 e3 1a | 26 c5 b5 10 01 83 c7 04 |........|&.......|
|000048b0| 8c dd 26 03 2e 18 01 83 | c5 01 03 e8 8e dd 01 04 |..&.....|........|
|000048c0| e2 e6 0e 1f bf 00 01 8b | f2 81 c6 10 01 8b cb 2b |........|.......+|
|000048d0| ce f3 a4 58 fa 8e 57 fb | 8b 67 f9 fb ff 6f f5 69 |...X..W.|.g...o.i|
|000048e0| 66 20 6e 65 63 65 73 73 | 61 72 79 0d 0a 53 74 72 |f necess|ary..Str|
|000048f0| 69 6b 65 20 61 6e 79 20 | 6b 65 79 20 77 68 65 6e |ike any |key when|
|00004900| 20 72 65 61 64 79 0d 0a | 24 50 72 6f 67 72 61 6d | ready..|$Program|
|00004910| 20 74 6f 6f 20 62 69 67 | 20 74 6f 20 66 69 74 20 | too big| to fit |
|00004920| 69 6e 20 6d 65 6d 6f 72 | 79 0d 0a 24 0d 0a fe 2a |in memor|y..$...*|
|00004930| 03 20 28 43 29 20 43 6f | 70 79 72 69 67 68 74 20 |. (C) Co|pyright |
|00004940| 43 6f 6d 70 61 71 20 43 | 6f 6d 70 75 74 65 72 20 |Compaq C|omputer |
|00004950| 43 6f 72 70 6f 72 61 74 | 69 6f 6e 20 31 39 38 38 |Corporat|ion 1988|
|00004960| 20 fe 2a 03 45 53 35 65 | 53 37 85 53 39 a5 53 3b | .*.ES5e|S7.S9.S;|
|00004970| c5 53 3d e5 53 3f 05 54 | ff 2f 54 43 45 54 45 65 |.S=.S?.T|./TCETEe|
|00004980| 54 47 85 54 49 a5 54 4b | c5 54 4d e5 54 4f 05 55 |TG.TI.TK|.TM.TO.U|
|00004990| 51 25 55 53 45 55 55 65 | 28 76 6d 6f 6e 29 0d 0a |Q%USEUUe|(vmon)..|
|000049a0| 0d 0a 28 64 65 66 75 6e | 20 74 6a 65 72 72 28 73 |..(defun| tjerr(s|
|000049b0| 29 0d 0a fe 20 03 28 69 | 66 20 28 2f 3d 20 73 20 |)... .(i|f (/= s |
|000049c0| 22 46 75 6e 63 74 69 6f | 6e 20 63 61 6e 63 65 6c |"Functio|n cancel|
|000049d0| 6c 65 64 22 29 0d 0a fe | 20 07 28 70 72 69 6e 63 |led")...| .(princ|
|000049e0| 20 28 73 74 72 63 61 74 | 20 22 5c 6e 45 72 72 6f | (strcat| "\nErro|
|000049f0| 72 3a 22 20 73 29 29 0d | 0a fe 20 03 29 0d 0a fe |r:" s)).|.. .)...|
|00004a00| 20 03 28 63 6f 6d 6d 61 | 6e 64 20 22 6c 61 79 65 | .(comma|nd "laye|
|00004a10| 72 22 20 22 73 22 20 22 | 30 22 20 22 22 29 0d 0a |r" "s" "|0" "")..|
|00004a20| fe 20 03 28 73 65 74 76 | 61 72 20 22 63 6d 64 65 |. .(setv|ar "cmde|
|00004a30| 63 68 6f 22 20 31 29 0d | 0a fe 20 03 28 73 65 74 |cho" 1).|.. .(set|
|00004a40| 71 20 2a 65 72 72 6f 72 | 2a 20 6f 65 72 29 0d 0a |q *error|* oer)..|
|00004a50| fe 20 03 28 70 72 69 6e | 63 29 0d 0a 29 0d 0a 0d |. .(prin|c)..)...|
|00004a60| 0a 28 64 65 66 75 6e 20 | 43 3a 54 4a 28 2f 20 6f |.(defun |C:TJ(/ o|
|00004a70| 65 72 20 74 65 72 68 20 | 73 31 20 74 77 20 74 77 |er terh |s1 tw tw|
|00004a80| 31 20 74 77 32 20 74 77 | 30 20 74 6c 31 20 74 6c |1 tw2 tw|0 tl1 tl|
|00004a90| 32 20 61 78 64 6c 20 78 | 20 70 20 61 6e 67 29 0d |2 axdl x| p ang).|
|00004aa0| 0a fe 20 03 28 73 65 74 | 76 61 72 20 22 63 6d 64 |.. .(set|var "cmd|
|00004ab0| 65 63 68 6f 22 20 30 29 | 0d 0a fe 20 03 28 73 65 |echo" 0)|... .(se|
|00004ac0| 74 71 20 65 6c 76 20 28 | 67 65 74 76 61 72 20 22 |tq elv (|getvar "|
|00004ad0| 65 6c 65 76 61 74 69 6f | 6e 22 29 29 0d 0a fe 20 |elevatio|n"))... |
|00004ae0| 03 28 73 65 74 71 20 6f | 65 72 20 2a 65 72 72 6f |.(setq o|er *erro|
|00004af0| 72 2a 20 2a 65 72 72 6f | 72 2a 20 74 6a 65 72 72 |r* *erro|r* tjerr|
|00004b00| 29 0d 0a fe 20 03 28 73 | 65 74 71 20 73 31 20 28 |)... .(s|etq s1 (|
|00004b10| 67 65 74 73 74 72 69 6e | 67 20 22 5c 6e ca e4 c8 |getstrin|g "\n...|
|00004b20| eb cc a8 bd d7 ca bd d1 | f9 33 2f 32 2f 31 2f 3c |........|.3/2/1/<|
|00004b30| 30 3e 3a 22 29 29 0d 0a | fe 20 03 28 69 66 20 28 |0>:"))..|. .(if (|
|00004b40| 3d 20 73 31 20 22 22 29 | 20 28 73 65 74 71 20 73 |= s1 "")| (setq s|
|00004b50| 31 20 22 30 22 29 29 0d | 0a fe 20 03 28 69 66 20 |1 "0")).|.. .(if |
|00004b60| 28 61 6e 64 20 28 3e 3d | 20 73 31 20 22 30 22 29 |(and (>=| s1 "0")|
|00004b70| 20 28 3c 3d 20 73 31 20 | 22 33 22 29 29 20 28 70 | (<= s1 |"3")) (p|
|00004b80| 72 6f 67 6e 0d 0a fe 20 | 03 28 63 6f 6e 64 20 28 |rogn... |.(cond (|
|00004b90| 28 3d 20 73 31 20 22 30 | 22 29 20 28 73 65 74 71 |(= s1 "0|") (setq|
|00004ba0| 20 74 6c 31 20 28 67 65 | 74 69 6e 74 20 22 5c 6e | tl1 (ge|tint "\n|
|00004bb0| ca e4 c8 eb c6 c2 b5 c0 | b3 a4 b6 c8 20 3c 33 36 |........|.... <36|
|00004bc0| 30 30 3e 3a 22 29 29 0d | 0a fe 20 15 28 69 66 20 |00>:")).|.. .(if |
|00004bd0| 28 3d 20 74 6c 31 20 6e | 69 6c 29 20 28 73 65 74 |(= tl1 n|il) (set|
|00004be0| 71 20 74 6c 31 20 33 36 | 30 30 29 29 0d 0a fe 20 |q tl1 36|00))... |
|00004bf0| 15 28 73 65 74 71 20 74 | 77 20 28 67 65 74 69 6e |.(setq t|w (getin|
|00004c00| 74 20 22 5c 6e ca e4 c8 | eb c6 c2 b5 c0 bf ed b6 |t "\n...|........|
|00004c10| c8 20 3c 31 32 30 30 3e | 3a 22 29 29 0d 0a fe 20 |. <1200>|:"))... |
|00004c20| 15 28 69 66 20 28 3d 20 | 74 77 20 6e 69 6c 29 20 |.(if (= |tw nil) |
|00004c30| 28 73 65 74 71 20 74 77 | 20 31 32 30 30 29 29 0d |(setq tw| 1200)).|
|00004c40| 0a fe 20 15 28 73 65 74 | 71 20 74 77 31 20 28 67 |.. .(set|q tw1 (g|
|00004c50| 65 74 69 6e 74 20 22 5c | 6e ca e4 c8 eb c6 c2 b5 |etint "\|n.......|
|00004c60| c0 b7 c5 c6 c2 be e0 c0 | eb 20 3c 36 30 30 3e 3a |........|. <600>:|
|00004c70| 22 29 29 0d 0a fe 20 15 | 28 69 66 20 28 3d 20 74 |"))... .|(if (= t|
|00004c80| 77 31 20 6e 69 6c 29 20 | 28 73 65 74 71 20 74 77 |w1 nil) |(setq tw|
|00004c90| 31 20 36 30 30 fe 29 03 | 0d 0a fe 20 09 28 28 3d |1 600.).|... .((=|
|00004ca0| 20 73 31 20 22 31 22 29 | 20 28 73 65 74 71 20 74 | s1 "1")| (setq t|
|00004cb0| 6c 31 20 28 67 65 74 69 | 6e 74 20 22 5c 6e ca e4 |l1 (geti|nt "\n..|
|00004cc0| c8 eb cc a8 bd d7 b3 a4 | b6 c8 20 3c 33 36 30 30 |........|.. <3600|
|00004cd0| 3e 3a 22 29 29 0d 0a fe | 20 15 28 69 66 20 28 3d |>:"))...| .(if (=|
|00004ce0| 20 74 6c 31 20 6e 69 6c | 29 20 28 73 65 74 71 20 | tl1 nil|) (setq |
|00004cf0| 74 6c 31 20 33 36 30 30 | 29 29 0d 0a fe 20 15 28 |tl1 3600|))... .(|
|00004d00| 73 65 74 71 20 74 77 20 | 28 67 65 74 69 6e 74 20 |setq tw |(getint |
|00004d10| 28 76 6d 6f 6e 29 0d 0a | 0d 0a 28 64 65 66 75 6e |(vmon)..|..(defun|
|00004d20| 20 61 78 65 72 72 28 73 | 29 0d 0a fe 20 03 28 69 | axerr(s|)... .(i|
|00004d30| 66 20 28 2f 3d 20 73 20 | 22 46 75 6e 63 74 69 6f |f (/= s |"Functio|
|00004d40| 6e 20 63 61 6e 63 65 6c | 6c 65 64 22 29 0d 0a fe |n cancel|led")...|
|00004d50| 20 07 28 70 72 69 6e 63 | 20 28 73 74 72 63 61 74 | .(princ| (strcat|
|00004d60| 20 22 5c 6e 45 72 72 6f | 72 3a 22 20 73 29 29 0d | "\nErro|r:" s)).|
|00004d70| 0a fe 20 03 29 0d 0a fe | 20 03 28 63 6f 6d 6d 61 |.. .)...| .(comma|
|00004d80| 6e 64 29 0d 0a fe 20 03 | 28 69 66 20 28 3e 20 28 |nd)... .|(if (> (|
|00004d90| 61 74 6f 69 20 6f 6c 64 | 63 29 20 30 29 20 28 63 |atoi old|c) 0) (c|
|00004da0| 6f 6d 6d 61 6e 64 20 22 | 63 6f 6c 6f 72 22 20 28 |ommand "|color" (|
|00004db0| 61 74 6f 69 20 6f 6c 64 | 63 29 29 20 28 63 6f 6d |atoi old|c)) (com|
|00004dc0| 6d 61 6e 64 20 22 63 6f | 6c 6f 72 22 20 6f 6c 64 |mand "co|lor" old|
|00004dd0| 63 29 29 0d 0a fe 20 03 | 28 63 6f 6d 6d 61 6e 64 |c))... .|(command|
|00004de0| 20 22 6c 61 79 65 72 22 | 20 22 73 22 20 22 30 22 | "layer"| "s" "0"|
|00004df0| 29 0d 0a fe 20 03 28 73 | 65 74 76 61 72 20 22 62 |)... .(s|etvar "b|
|00004e00| 6c 69 70 6d 6f 64 65 22 | 20 31 29 0d 0a fe 20 03 |lipmode"| 1)... .|
|00004e10| 28 73 65 74 76 61 72 20 | 22 63 6d 64 65 63 68 6f |(setvar |"cmdecho|
|00004e20| 22 20 31 29 0d 0a fe 20 | 03 28 73 65 74 76 61 72 |" 1)... |.(setvar|
|00004e30| 20 22 68 69 67 68 6c 69 | 67 68 74 22 20 31 29 0d | "highli|ght" 1).|
|00004e40| 0a fe 20 03 28 73 65 74 | 76 61 72 20 22 72 65 67 |.. .(set|var "reg|
|00004e50| 65 6e 6d 6f 64 65 22 20 | 31 29 0d 0a fe 20 03 28 |enmode" |1)... .(|
|00004e60| 73 65 74 71 20 2a 65 72 | 72 6f 72 2a 20 6f 65 72 |setq *er|ror* oer|
|00004e70| 29 0d 0a fe 20 03 28 70 | 72 69 6e 63 29 0d 0a 29 |)... .(p|rinc)..)|
|00004e80| 0d 0a 0d 0a 28 64 65 66 | 75 6e 20 69 6e 73 74 72 |....(def|un instr|
|00004e90| 28 73 74 20 73 30 20 73 | 30 30 20 2f 20 6c 20 6e |(st s0 s|00 / l n|
|00004ea0| 20 6c 6f 6f 70 20 78 20 | 6e 30 20 6c 30 29 0d 0a | loop x |n0 l0)..|
|00004eb0| fe 20 03 28 73 65 74 71 | 20 6c 20 28 2b 20 28 2d |. .(setq| l (+ (-|
|00004ec0| 20 28 73 74 72 6c 65 6e | 20 73 30 29 20 73 74 29 | (strlen| s0) st)|
|00004ed0| 20 31 29 20 6c 30 20 30 | 20 6e 30 20 73 74 20 6e | 1) l0 0| n0 st n|
|00004ee0| 20 31 20 6c 6f 6f 70 20 | 74 29 0d 0a fe 20 03 28 | 1 loop |t)... .(|
|00004ef0| 77 68 69 6c 65 20 28 61 | 6e 64 20 28 3c 3d 20 6e |while (a|nd (<= n|
|00004f00| 20 6c 29 20 6c 6f 6f 70 | 29 0d 0a fe 20 06 28 73 | l) loop|)... .(s|
|00004f10| 65 74 71 20 78 20 28 73 | 75 62 73 74 72 20 73 30 |etq x (s|ubstr s0|
|00004f20| 20 6e 30 20 31 29 29 0d | 0a fe 20 06 28 69 66 20 | n0 1)).|.. .(if |
|00004f30| 28 65 71 20 78 20 73 30 | 30 29 20 28 73 65 74 71 |(eq x s0|0) (setq|
|00004f40| 20 6c 6f 6f 70 20 6e 69 | 6c 20 6c 30 20 6e 30 29 | loop ni|l l0 n0)|
|00004f50| 20 28 73 65 74 71 20 6e | 30 20 28 31 2b 20 6e 30 | (setq n|0 (1+ n0|
|00004f60| 29 20 6e 20 28 31 2b 20 | 6e fe 29 03 0d 0a fe 20 |) n (1+ |n.).... |
|00004f70| 03 29 0d 0a fe 20 03 28 | 65 76 61 6c 20 6c 30 29 |.)... .(|eval l0)|
|00004f80| 0d 0a 29 0d 0a 0d 0a 0d | 0a 28 64 65 66 75 6e 20 |..).....|.(defun |
|00004f90| 61 5f 66 28 61 66 20 2f | 20 6c 30 20 73 70 20 65 |a_f(af /| l0 sp e|
|00004fa0| 70 29 0d 0a fe 20 03 28 | 73 65 74 71 20 6c 30 20 |p)... .(|setq l0 |
|00004fb0| 28 69 6e 73 74 72 20 31 | 20 61 66 20 22 2d 22 29 |(instr 1| af "-")|
|00004fc0| 20 6e 6c 20 6e 69 6c 29 | 0d 0a fe 20 03 28 73 65 | nl nil)|... .(se|
|00004fd0| 74 71 20 73 70 20 28 73 | 75 62 73 74 72 20 61 66 |tq sp (s|ubstr af|
|00004fe0| 20 31 20 28 2d 20 6c 30 | 20 31 29 29 20 65 70 20 | 1 (- l0| 1)) ep |
|00004ff0| 28 73 75 62 73 74 72 20 | 61 66 20 28 2b 20 6c 30 |(substr |af (+ l0|
|00005000| 20 31 fe 29 03 0d 0a fe | 20 03 28 69 66 20 28 3d | 1.)....| .(if (=|
|00005010| 20 28 61 74 6f 69 20 73 | 70 29 20 30 29 20 28 70 | (atoi s|p) 0) (p|
|00005020| 72 6f 67 6e 0d 0a fe 20 | 03 28 77 68 69 6c 65 20 |rogn... |.(while |
|00005030| 28 3c 3d 20 28 61 73 63 | 69 69 20 73 70 29 20 28 |(<= (asc|ii sp) (|
|00005040| 61 73 63 69 69 20 65 70 | 29 29 0d 0a fe 20 03 28 |ascii ep|))... .(|
|00005050| 73 65 74 71 20 6e 6c 20 | 28 63 6f 6e 73 20 73 70 |setq nl |(cons sp|
|00005060| 20 6e 6c 29 29 0d 0a fe | 20 03 28 73 65 74 71 20 | nl))...| .(setq |
|00005070| 73 70 20 28 63 68 72 20 | 28 69 66 20 28 6f 72 20 |sp (chr |(if (or |
|00005080| 28 3d 20 28 61 73 63 69 | 69 20 73 70 29 20 37 32 |(= (asci|i sp) 72|
|00005090| 29 20 28 3d 20 28 61 73 | 63 69 69 20 73 70 29 20 |) (= (as|cii sp) |
|000050a0| 37 38 29 29 20 28 2b 20 | 28 61 73 63 69 69 20 73 |78)) (+ |(ascii s|
|000050b0| 70 29 20 32 29 20 28 2b | 20 28 61 73 63 69 69 20 |p) 2) (+| (ascii |
|000050c0| 73 70 29 20 31 fe 29 04 | 0d 0a fe 20 03 29 29 0d |sp) 1.).|... .)).|
|000050d0| 0a fe 20 03 28 70 72 6f | 67 6e 0d 0a fe 20 03 28 |.. .(pro|gn... .(|
|000050e0| 77 68 69 6c 65 20 28 3c | 3d 20 28 61 74 6f 69 20 |while (<|= (atoi |
|000050f0| 73 70 29 20 28 61 74 6f | 69 20 65 70 29 29 0d 0a |sp) (ato|i ep))..|
|00005100| fe 20 03 28 73 83 1d ff | 65 74 71 20 6e 6c 20 28 |. .(s...|etq nl (|
|00005110| 63 6f 6e 73 20 73 70 20 | 6e 6c 29 29 0d 0a ff 20 |cons sp |nl))... |
|00005120| 03 28 73 65 74 71 20 73 | 70 20 28 69 74 6f 61 20 |.(setq s|p (itoa |
|00005130| 28 31 2b 20 28 61 74 6f | 69 20 73 70 ff 29 04 0d |(1+ (ato|i sp.)..|
|00005140| 0a ff 20 03 29 0d 0a ff | 20 03 29 29 0d 0a 29 0d |.. .)...| .))..).|
|00005150| 0a 0d 0a 28 64 65 66 75 | 6e 20 6b 6a 73 28 61 78 |...(defu|n kjs(ax|
|00005160| 6e 20 2f 20 6c 30 20 6c | 31 20 61 78 20 6e 6c 29 |n / l0 l|1 ax nl)|
|00005170| 0d 0a ff 20 03 28 73 65 | 74 71 20 61 78 6e 20 28 |... .(se|tq axn (|
|00005180| 73 74 72 63 61 73 65 20 | 61 78 6e 29 20 61 78 6e |strcase |axn) axn|
|00005190| 6c 20 6e 69 6c 29 0d 0a | ff 20 03 28 69 66 20 28 |l nil)..|. .(if (|
|000051a0| 61 6e 64 20 28 3d 20 28 | 69 6e 73 74 72 20 31 20 |and (= (|instr 1 |
|000051b0| 61 78 6e 20 22 2c 22 29 | 20 30 29 20 28 3e 20 28 |axn ",")| 0) (> (|
|000051c0| 73 74 72 6c 65 6e 20 61 | 78 6e 29 20 30 29 29 0d |strlen a|xn) 0)).|
|000051d0| 0a ff 20 03 28 70 72 6f | 67 6e 0d 0a ff 20 03 28 |.. .(pro|gn... .(|
|000051e0| 69 66 20 28 3e 20 28 69 | 6e 73 74 72 20 31 20 61 |if (> (i|nstr 1 a|
|000051f0| 78 6e 20 22 2d 22 29 20 | 30 29 0d 0a ff 20 07 28 |xn "-") |0)... .(|
|00005200| 70 72 6f 67 6e 0d 0a ff | 20 07 28 61 5f 66 20 61 |progn...| .(a_f a|
|00005210| 78 6e 29 0d 0a ff 20 07 | 28 73 65 74 71 20 61 78 |xn)... .|(setq ax|
|00005220| 6e 6c 20 6e 6c 29 29 0d | 0a ff 20 07 28 73 65 74 |nl nl)).|.. .(set|
|00005230| 71 20 61 78 6e 6c 20 61 | 78 6e 29 0d 0a ff 20 03 |q axnl a|xn)... .|
|00005240| 29 0d 0a ff 20 03 29 0d | 0a ff 20 03 28 70 72 6f |)... .).|.. .(pro|
|00005250| 67 6e 0d 0a ff 20 03 28 | 73 65 74 71 20 6c 30 20 |gn... .(|setq l0 |
|00005260| 30 20 6c 31 20 28 69 6e | 73 74 72 20 31 20 61 78 |0 l1 (in|str 1 ax|
|00005270| 6e 20 22 2c 22 29 29 0d | 0a ff 20 03 28 77 68 69 |n ",")).|.. .(whi|
|00005280| 6c 65 20 28 3e 20 28 69 | 6e 73 74 72 20 28 2b 20 |le (> (i|nstr (+ |
|00005290| 6c 30 20 31 29 20 61 78 | 6e 20 22 2c 22 29 20 30 |l0 1) ax|n ",") 0|
|000052a0| 29 0d 0a ff 20 05 28 73 | 65 74 71 20 61 78 20 28 |)... .(s|etq ax (|
|000052b0| 73 75 62 73 74 72 20 61 | 78 6e 20 28 2b 20 6c 30 |substr a|xn (+ l0|
|000052c0| 20 31 29 20 28 2d 20 6c | 31 20 6c 30 20 31 ff 29 | 1) (- l|1 l0 1.)|
|000052d0| 03 0d 0a ff 20 05 28 69 | 66 20 28 3e 20 28 69 6e |.... .(i|f (> (in|
|000052e0| 73 74 72 20 31 20 61 78 | 20 22 2d 22 29 20 30 29 |str 1 ax| "-") 0)|
|000052f0| 20 28 70 72 6f 67 6e 0d | 0a ff 20 05 28 61 5f 66 | (progn.|.. .(a_f|
|00005300| 20 61 78 29 0d 0a ff 20 | 05 28 73 65 74 71 20 61 | ax)... |.(setq a|
|00005310| 78 6e 6c 20 28 61 70 70 | 65 6e 64 20 6e 6c 20 61 |xnl (app|end nl a|
|00005320| 78 6e 6c 29 29 0d 0a ff | 20 05 29 0d 0a ff 20 05 |xnl))...| .)... .|
|00005330| 28 73 65 74 71 20 61 78 | 6e 6c 20 28 63 6f 6e 73 |(setq ax|nl (cons|
|00005340| 20 61 78 20 61 78 6e 6c | 29 29 0d 0a ff 20 05 29 | ax axnl|))... .)|
|00005350| 0d 0a ff 20 05 28 73 65 | 74 71 20 6c 30 20 6c 31 |... .(se|tq l0 l1|
|00005360| 20 6c 31 20 28 69 6e 73 | 74 72 20 28 2b 20 6c 30 | l1 (ins|tr (+ l0|
|00005370| 20 31 29 20 61 78 6e 20 | 22 2c 22 29 29 0d 0a ff | 1) axn |","))...|
|00005380| 20 03 29 0d 0a ff 20 03 | 28 73 65 74 71 20 61 78 | .)... .|(setq ax|
|00005390| 20 28 73 75 62 73 74 72 | 20 61 78 6e 20 28 2b 20 | (substr| axn (+ |
|000053a0| 6c 30 20 31 ff 29 03 0d | 0a ff 20 03 28 69 66 20 |l0 1.)..|.. .(if |
|000053b0| 28 3e 20 28 69 6e 73 74 | 72 20 31 20 61 78 20 22 |(> (inst|r 1 ax "|
|000053c0| 2d 22 29 20 30 29 20 28 | 70 72 6f 67 6e 0d 0a ff |-") 0) (|progn...|
|000053d0| 20 03 28 61 5f 66 20 61 | 78 29 0d 0a ff 20 03 28 | .(a_f a|x)... .(|
|000053e0| 73 65 74 71 20 61 78 6e | 6c 20 28 61 70 70 65 6e |setq axn|l (appen|
|000053f0| 64 20 6e 6c 20 61 78 6e | 6c 29 29 0d 0a ff 20 03 |d nl axn|l))... .|
|00005400| 29 0d 0a ff 20 03 28 73 | 65 74 71 20 61 78 6e 6c |)... .(s|etq axnl|
|00005410| 20 28 63 6f 6e 73 20 61 | 78 20 61 78 6e 6c 29 29 | (cons a|x axnl))|
|00005420| 0d 0a ff 20 03 29 0d 0a | ff 20 03 29 29 0d 0a ff |... .)..|. .))...|
|00005430| 20 03 28 73 65 74 71 20 | 61 78 6e 6c 20 28 72 65 | .(setq |axnl (re|
|00005440| 76 65 72 73 65 20 61 78 | 6e 6c 29 29 0d 0a 29 0d |verse ax|nl))..).|
|00005450| 0a 0d 0a 28 64 65 66 75 | 6e 20 ff 64 03 28 61 66 |...(defu|n .d.(af|
|00005460| 20 2f 20 6c 30 20 73 70 | 20 65 70 29 0d 0a ff 20 | / l0 sp| ep)... |
|00005470| 03 28 73 65 74 71 20 6c | 30 20 28 69 6e 73 74 72 |.(setq l|0 (instr|
|00005480| 20 31 20 61 66 20 22 2a | 22 29 20 6e 6c 20 6e 69 | 1 af "*|") nl ni|
|00005490| 6c 29 0d 0a ff 20 03 28 | 73 65 74 71 20 73 70 20 |l)... .(|setq sp |
|000054a0| 28 73 75 62 73 74 72 20 | 61 66 20 31 20 28 2d 20 |(substr |af 1 (- |
|000054b0| 6c 30 20 31 29 29 20 65 | 70 20 28 73 75 62 73 74 |l0 1)) e|p (subst|
|000054c0| 72 20 61 66 20 28 2b 20 | 6c 30 20 31 ff 29 03 0d |r af (+ |l0 1.)..|
|000054d0| 0a ff 20 03 28 72 65 70 | 65 61 74 20 28 61 74 6f |.. .(rep|eat (ato|
|000054e0| 69 20 73 70 29 0d 0a ff | 20 06 28 73 65 74 71 20 |i sp)...| .(setq |
|000054f0| 6e 6c 20 28 63 6f 6e 73 | 20 28 2a 20 28 61 74 6f |nl (cons| (* (ato|
|00005500| 66 20 65 70 29 20 31 ff | 30 03 2e 30 29 20 6e 6c |f ep) 1.|0..0) nl|
|00005510| 29 29 0d 0a ff 20 03 29 | 0d 0a 29 0d 0a 0d 0a 28 |))... .)|..)....(|
|00005520| 64 65 66 75 6e 20 ff 65 | 03 28 61 78 64 20 2f 20 |defun .e|.(axd / |
|00005530| 6c 30 20 6c 31 20 61 78 | 20 6e 6c 29 0d 0a ff 20 |l0 l1 ax| nl)... |
|00005540| 03 28 73 65 74 71 20 61 | 78 64 6c 20 6e 69 6c 29 |.(setq a|xdl nil)|
|00005550| 0d 0a ff 20 03 28 69 66 | 20 28 61 6e 64 20 28 3d |... .(if| (and (=|
|00005560| 20 28 69 6e 73 74 72 20 | 31 20 61 78 64 20 22 2c | (instr |1 axd ",|
|00005570| 22 29 20 30 29 20 28 3e | 20 28 73 74 72 6c 65 6e |") 0) (>| (strlen|
|00005580| 20 61 78 64 29 20 30 29 | 29 0d 0a ff 20 03 28 70 | axd) 0)|)... .(p|
|00005590| 72 6f 67 6e 0d 0a ff 20 | 03 28 69 66 20 28 3e 20 |rogn... |.(if (> |
|000055a0| 28 69 6e 73 74 72 20 31 | 20 61 78 64 20 22 2a 22 |(instr 1| axd "*"|
|000055b0| 29 20 30 29 0d 0a ff 20 | 07 28 70 72 6f 67 6e 0d |) 0)... |.(progn.|
|000055c0| 0a ff 20 07 28 ff 64 03 | 20 61 78 64 29 0d 0a ff |.. .(.d.| axd)...|
|000055d0| 20 07 28 73 65 74 71 20 | 61 78 64 6c 20 6e 6c 29 | .(setq |axdl nl)|
|000055e0| 29 0d 0a ff 20 07 28 73 | 65 74 71 20 61 78 64 6c |)... .(s|etq axdl|
|000055f0| 20 28 63 6f 6e 73 20 28 | 2a 20 28 61 74 6f 66 20 | (cons (|* (atof |
|00005600| 61 78 64 29 20 31 ff 30 | 03 2e 30 29 20 61 78 64 |axd) 1.0|..0) axd|
|00005610| 6c 29 29 0d 0a ff 20 03 | 29 0d 0a ff 20 03 29 0d |l))... .|)... .).|
|00005620| 0a ff 20 03 28 70 72 6f | 67 6e 0d 0a ff 20 03 28 |.. .(pro|gn... .(|
|00005630| 73 65 74 71 20 6c 30 20 | 30 20 6c 31 20 28 69 6e |setq l0 |0 l1 (in|
|00005640| 73 74 72 20 31 20 61 78 | 64 20 22 2c 22 29 29 0d |str 1 ax|d ",")).|
|00005650| 0a ff 20 03 28 77 68 69 | 6c 65 20 28 3e 20 28 69 |.. .(whi|le (> (i|
|00005660| 6e 73 74 72 20 28 2b 20 | 6c 30 20 31 29 20 61 78 |nstr (+ |l0 1) ax|
|00005670| 64 20 22 2c 22 29 20 30 | 29 0d 0a ff 20 05 28 73 |d ",") 0|)... .(s|
|00005680| 65 74 71 20 61 78 20 28 | 73 75 62 73 74 72 20 61 |etq ax (|substr a|
|00005690| 78 64 20 28 2b 20 6c 30 | 20 31 29 20 28 2d 20 6c |xd (+ l0| 1) (- l|
|000056a0| 31 20 6c 30 20 31 ff 29 | 03 0d 0a ff 20 05 28 69 |1 l0 1.)|.... .(i|
|000056b0| 66 20 28 3e 20 28 69 6e | 73 74 72 20 31 20 61 78 |f (> (in|str 1 ax|
|000056c0| 20 22 2a 22 29 20 30 29 | 20 28 70 72 6f 67 6e 0d | "*") 0)| (progn.|
|000056d0| 0a ff 20 05 28 ff 64 03 | 20 61 78 29 0d 0a ff 20 |.. .(.d.| ax)... |
|000056e0| 05 28 73 65 74 71 20 61 | 78 64 6c 20 28 61 70 70 |.(setq a|xdl (app|
|000056f0| 65 6e 64 20 6e 6c 20 61 | 78 64 6c 29 29 0d 0a ff |end nl a|xdl))...|
|00005700| 20 05 29 0d 0a ff 20 05 | 28 73 65 74 71 20 61 78 | .)... .|(setq ax|
|00005710| 64 6c 20 28 63 6f 6e 73 | 20 28 2a 20 28 61 74 6f |dl (cons| (* (ato|
|00005720| 66 20 61 78 29 20 31 ff | 30 03 2e 30 29 20 61 78 |f ax) 1.|0..0) ax|
|00005730| 64 6c 29 29 0d 0a ff 20 | 05 29 0d 0a ff 20 05 28 |dl))... |.)... .(|
|00005740| 73 65 74 71 20 6c 30 20 | 6c 31 20 6c 31 20 28 69 |setq l0 |l1 l1 (i|
|00005750| 6e 73 74 72 20 28 2b 20 | 6c 30 20 31 29 20 61 78 |nstr (+ |l0 1) ax|
|00005760| 64 20 22 2c 22 29 29 0d | 0a ff 20 03 29 0d 0a ff |d ",")).|.. .)...|
|00005770| 20 03 28 73 65 74 71 20 | 61 78 20 28 73 75 62 73 | .(setq |ax (subs|
|00005780| 74 72 20 61 78 64 20 28 | 2b 20 6c 30 20 31 ff 29 |tr axd (|+ l0 1.)|
|00005790| 03 0d 0a ff 20 03 28 69 | 66 20 28 3e 20 28 69 6e |.... .(i|f (> (in|
|000057a0| 73 74 72 20 31 20 61 78 | 20 22 2a 22 29 20 30 29 |str 1 ax| "*") 0)|
|000057b0| 20 28 70 72 6f 67 6e 0d | 0a ff 20 03 28 ff 64 03 | (progn.|.. .(.d.|
|000057c0| 20 61 78 29 0d 0a ff 20 | 03 28 73 65 74 71 20 61 | ax)... |.(setq a|
|000057d0| 78 64 6c 20 28 61 70 70 | 65 6e 64 20 6e 6c 20 61 |xdl (app|end nl a|
|000057e0| 78 64 6c 29 29 0d 0a ff | 20 03 29 0d 0a ff 20 03 |xdl))...| .)... .|
|000057f0| 28 73 65 74 71 20 61 78 | 64 6c 20 28 63 6f 6e 73 |(setq ax|dl (cons|
|00005800| 20 28 2a 20 28 61 74 6f | 66 20 61 78 29 20 31 ff | (* (ato|f ax) 1.|
|00005810| 30 03 2e 30 29 20 61 78 | 64 6c 29 29 0d 0a ff 20 |0..0) ax|dl))... |
|00005820| 03 29 0d 0a ff 20 03 29 | 29 0d 0a ff 20 03 28 73 |.)... .)|)... .(s|
|00005830| 65 74 71 20 61 78 64 6c | 20 28 72 65 76 65 72 73 |etq axdl| (revers|
|00005840| 65 20 61 78 64 6c 29 29 | 0d 0a 29 0d 0a 0d 0a 28 |e axdl))|..)....(|
|00005850| 64 65 66 75 6e 20 63 6f | 6d 62 69 6e 28 63 62 20 |defun co|mbin(cb |
|00005860| 63 63 20 2f 20 6c 20 6c | 30 20 64 79 29 0d 0a ff |cc / l l|0 dy)...|
|00005870| 20 03 28 73 65 74 71 20 | 6c 20 28 6c 65 6e 67 74 | .(setq |l (lengt|
|00005880| 68 20 63 62 29 20 6c 30 | 20 30 20 64 79 20 30 20 |h cb) l0| 0 dy 0 |
|00005890| 61 78 6e 64 6c 20 6e 69 | 6c 29 0d 0a ff 20 03 28 |axndl ni|l)... .(|
|000058a0| 69 66 20 28 3d 20 6c 20 | 28 2b 20 28 6c 65 6e 67 |if (= l |(+ (leng|
|000058b0| 74 68 20 63 63 29 20 31 | 29 29 20 28 70 72 6f 67 |th cc) 1|)) (prog|
|000058c0| 6e 0d 0a ff 20 03 28 72 | 65 70 65 61 74 20 6c 0d |n... .(r|epeat l.|
|000058d0| 0a ff 20 06 28 73 65 74 | 71 20 61 78 6e 64 6c 20 |.. .(set|q axndl |
|000058e0| 28 63 6f 6e 73 20 28 63 | 6f 6e 73 20 28 6e 74 68 |(cons (c|ons (nth|
|000058f0| 20 6c 30 20 63 62 29 20 | 64 79 29 20 61 78 6e 64 | l0 cb) |dy) axnd|
|00005900| 6c 29 29 0d 0a ff 20 06 | 28 69 66 20 28 3c 20 6c |l))... .|(if (< l|
|00005910| 30 20 28 6c 65 6e 67 74 | 68 20 63 63 29 29 20 28 |0 (lengt|h cc)) (|
|00005920| 73 65 74 71 20 64 79 20 | 28 2b 20 64 79 20 28 6e |setq dy |(+ dy (n|
|00005930| 74 68 20 6c 30 20 63 63 | ff 29 04 0d 0a ff 20 06 |th l0 cc|.).... .|
|00005940| 28 73 65 74 71 20 6c 30 | 20 28 31 2b 20 6c 30 29 |(setq l0| (1+ l0)|
|00005950| 29 0d 0a ff 20 03 29 0d | 0a ff 20 03 28 73 65 74 |)... .).|.. .(set|
|00005960| 71 20 61 78 6e 64 6c 20 | 28 72 65 76 65 72 73 65 |q axndl |(reverse|
|00005970| 20 61 78 6e 64 6c 29 20 | 66 67 65 72 72 20 6e 69 | axndl) |fgerr ni|
|00005980| 6c 29 0d 0a ff 20 03 29 | 0d 0a ff 20 03 28 70 72 |l)... .)|... .(pr|
|00005990| 6f 67 6e 0d 0a ff 20 03 | 28 70 72 69 6e 63 20 22 |ogn... .|(princ "|
|000059a0| 2a d6 e1 ba c5 d3 eb d6 | e1 be e0 b8 f6 ca fd b2 |*.......|........|
|000059b0| bb c6 a5 c5 e4 2a 22 29 | 0d 0a ff 20 03 28 73 65 |.....*")|... .(se|
|000059c0| 74 71 20 66 67 65 72 72 | 20 74 29 29 0d 0a ff 20 |tq fgerr| t))... |
|000059d0| 03 29 0d 0a 29 0d 0a 0d | 0a 28 64 65 66 75 6e 20 |.)..)...|.(defun |
|000059e0| 63 68 6b 65 72 72 28 61 | 20 2f 20 6c 29 0d 0a ff |chkerr(a| / l)...|
|000059f0| 20 03 28 73 65 74 71 20 | 6c 20 28 69 6e 73 74 72 | .(setq |l (instr|
|00005a00| 20 31 20 61 20 22 2c 22 | 29 29 0d 0a ff 20 03 28 | 1 a ","|))... .(|
|00005a10| 69 66 20 28 6f 72 20 28 | 3d 20 6c 20 30 29 20 28 |if (or (|= l 0) (|
|00005a20| 3d 20 6c 20 31 29 20 28 | 3d 20 6c 20 28 73 74 72 |= l 1) (|= l (str|
|00005a30| 6c 65 6e 20 61 ff 29 03 | 0d 0a ff 20 07 28 70 72 |len a.).|... .(pr|
|00005a40| 6f 67 6e 0d 0a ff 20 07 | 28 70 72 69 6e 63 20 22 |ogn... .|(princ "|
|00005a50| 2a ca e4 c8 eb b4 ed ce | f3 2a 22 29 0d 0a ff 20 |*.......|.*")... |
|00005a60| 07 28 73 65 74 71 20 66 | 67 65 72 72 20 74 29 29 |.(setq f|gerr t))|
|00005a70| 0d 0a ff 20 07 28 73 65 | 74 71 20 66 67 65 72 72 |... .(se|tq fgerr|
|00005a80| 20 6e 69 6c 29 29 0d 0a | 29 0d 0a 0d 0a 28 73 65 | nil))..|)....(se|
|00005a90| 74 71 20 73 64 20 32 35 | 30 29 0d 0a 0d 0a 28 64 |tq sd 25|0)....(d|
|00005aa0| 65 66 75 6e 20 43 3a 4f | 54 48 4f 41 58 28 2f 20 |efun C:O|THOAX(/ |
|00005ab0| 65 61 73 74 20 73 6f 75 | 74 68 20 77 65 73 74 20 |east sou|th west |
|00005ac0| 6e 6f 72 74 68 20 65 64 | 69 73 74 20 73 64 69 73 |north ed|ist sdis|
|00005ad0| 74 20 77 64 69 73 74 20 | 6e 64 69 73 74 20 6a 73 |t wdist |ndist js|
|00005ae0| 31 20 6a 73 32 20 6b 6a | 31 20 6b 6a 32 20 66 67 |1 js2 kj|1 kj2 fg|
|00005af0| 65 72 72 20 78 20 61 78 | 64 6c 20 61 78 6e 6c 20 |err x ax|dl axnl |
|00005b00| 61 78 6e 64 6c 20 6b 77 | 20 78 6f 66 66 20 79 6f |axndl kw| xoff yo|
|00005b10| 66 66 20 78 6d 61 78 20 | 79 6d 61 78 20 6c 74 6f |ff xmax |ymax lto|
|00005b20| 66 66 20 72 74 6f 66 66 | 20 75 70 6f 66 66 20 64 |ff rtoff| upoff d|
|00005b30| 6e 6f 66 66 20 73 6e 20 | 64 34 35 20 73 6e 34 35 |noff sn |d45 sn45|
|00005b40| 20 64 32 32 35 20 6c 6c | 20 75 72 20 6c 6c 35 20 | d225 ll| ur ll5 |
|00005b50| 75 72 35 20 6c 6c 36 20 | 75 72 36 20 6c 6c 32 20 |ur5 ll6 |ur6 ll2 |
|00005b60| 75 72 32 20 6c 6c 33 20 | 75 72 33 20 6c 6c 38 20 |ur2 ll3 |ur3 ll8 |
|00005b70| 75 72 38 0d 0a ff 20 03 | 78 30 30 20 79 30 30 20 |ur8... .|x00 y00 |
|00005b80| 78 30 32 20 79 30 32 20 | 78 30 33 20 79 30 33 20 |x02 y02 |x03 y03 |
|00005b90| 78 31 30 20 79 31 30 20 | 78 31 32 20 79 31 32 20 |x10 y10 |x12 y12 |
|00005ba0| 78 31 33 20 79 31 33 20 | 78 30 35 20 79 30 35 20 |x13 y13 |x05 y05 |
|00005bb0| 78 31 35 20 79 31 35 20 | 78 30 36 20 79 30 36 20 |x15 y15 |x06 y06 |
|00005bc0| 78 31 36 20 79 31 36 20 | 78 30 38 20 79 30 38 20 |x16 y16 |x08 y08 |
|00005bd0| 78 31 38 20 79 31 38 20 | 6f 6c 64 63 20 6f 65 72 |x18 y18 |oldc oer|
|00005be0| 20 69 20 6c 30 20 77 64 | 74 20 73 64 74 29 0d 0a | i l0 wd|t sdt)..|
|00005bf0| ff 20 03 28 73 65 74 76 | 61 72 20 22 62 6c 69 70 |. .(setv|ar "blip|
|00005c00| 6d 6f 64 65 22 20 30 29 | 0d 0a ff 20 03 28 73 65 |mode" 0)|... .(se|
|00005c10| 74 76 61 72 20 22 63 6d | 64 65 63 68 6f 22 20 30 |tvar "cm|decho" 0|
|00005c20| 29 0d 0a ff 20 03 28 73 | 65 74 76 61 72 20 22 72 |)... .(s|etvar "r|
|00005c30| 65 67 65 6e 6d 6f 64 65 | 22 20 30 29 0d 0a ff 20 |egenmode|" 0)... |
|00005c40| 03 28 73 65 74 71 20 6f | 6c 64 63 20 28 67 65 74 |.(setq o|ldc (get|
|00005c50| 76 61 72 20 22 63 65 63 | 6f 6c 6f 72 22 29 29 0d |var "cec|olor")).|
|00005c60| 0a ff 20 03 28 63 6f 6d | 6d 61 6e 64 20 22 63 6f |.. .(com|mand "co|
|00005c70| 6c 6f 72 22 20 22 62 79 | 6c 61 79 65 72 22 29 0d |lor" "by|layer").|
|00005c80| 0a ff 20 03 28 73 65 74 | 71 20 6f 65 72 20 2a 65 |.. .(set|q oer *e|
|00005c90| 72 72 6f 72 2a 20 2a 65 | 72 72 6f 72 2a 20 61 78 |rror* *e|rror* ax|
|00005ca0| 65 72 72 29 0d 0a ff 20 | 03 28 73 65 74 71 20 65 |err)... |.(setq e|
|00005cb0| 61 73 74 20 6e 69 6c 20 | 73 6f 75 74 68 20 6e 69 |ast nil |south ni|
|00005cc0| 6c 20 77 65 73 74 20 6e | 69 6c 20 6e 6f 72 74 68 |l west n|il north|
|00005cd0| 20 6e 69 6c 29 0d 0a ff | 20 03 28 69 66 20 28 2f | nil)...| .(if (/|
|00005ce0| 3d 20 28 2b 20 66 68 37 | 38 20 66 68 36 35 20 66 |= (+ fh7|8 fh65 f|
|00005cf0| 68 37 32 20 66 68 38 35 | 20 66 68 37 30 29 20 33 |h72 fh85| fh70) 3|
|00005d00| 37 30 29 20 28 74 73 74 | 29 29 0d 0a ff 20 03 28 |70) (tst|))... .(|
|00005d10| 70 72 69 6e 63 20 22 5c | 6e d7 f3 b1 df d6 e1 be |princ "\|n.......|
|00005d20| e0 20 3c 22 29 0d 0a ff | 20 03 28 70 72 69 6e 63 |. <")...| .(princ|
|00005d30| 20 22 34 2a 32 2e 34 22 | 29 0d 0a ff 20 03 28 73 | "4*2.4"|)... .(s|
|00005d40| 65 74 71 20 77 64 69 73 | 74 20 28 67 65 74 73 74 |etq wdis|t (getst|
|00005d50| 72 69 6e 67 20 22 3e 3a | 22 29 29 0d 0a ff 20 03 |ring ">:|"))... .|
|00005d60| 28 69 66 20 28 3d 20 77 | 64 69 73 74 20 22 22 29 |(if (= w|dist "")|
|00005d70| 20 28 73 65 74 71 20 77 | 64 69 73 74 20 22 34 2a | (setq w|dist "4*|
|00005d80| 32 2e 34 22 29 29 0d 0a | ff 20 03 28 ff 65 03 20 |2.4"))..|. .(.e. |
|00005d90| 77 64 69 73 74 29 0d 0a | ff 20 03 28 73 65 74 71 |wdist)..|. .(setq|
|00005da0| 20 6a 73 31 20 28 2b 20 | 28 6c 65 6e 67 74 68 20 | js1 (+ |(length |
|00005db0| 61 78 64 6c 29 20 31 29 | 20 66 67 65 72 72 20 74 |axdl) 1)| fgerr t|
|00005dc0| 29 0d 0a ff 20 03 28 73 | 65 74 71 20 69 20 31 29 |)... .(s|etq i 1)|
|00005dd0| 0d 0a ff 20 03 28 77 68 | 69 6c 65 20 28 3c 3d 20 |... .(wh|ile (<= |
|00005de0| 69 20 6a 73 31 29 20 28 | 69 66 20 28 6f 72 20 28 |i js1) (|if (or (|
|00005df0| 3d 20 28 2b 20 36 34 20 | 69 29 20 37 33 29 20 28 |= (+ 64 |i) 73) (|
|00005e00| 3d 20 28 2b 20 36 34 20 | 69 29 20 37 39 29 29 20 |= (+ 64 |i) 79)) |
|00005e10| 28 73 65 74 71 20 6a 73 | 31 20 28 2b 20 6a 73 31 |(setq js|1 (+ js1|
|00005e20| 20 31 ff 29 03 20 28 73 | 65 74 71 20 69 20 28 31 | 1.). (s|etq i (1|
|00005e30| 2b 20 69 ff 29 03 0d 0a | ff 20 03 28 77 68 69 6c |+ i.)...|. .(whil|
|00005e40| 65 20 66 67 65 72 72 0d | 0a ff 20 03 28 70 72 69 |e fgerr.|.. .(pri|
|00005e50| 6e 63 20 22 5c 6e d7 f3 | b1 df d6 e1 ba c5 20 3c |nc "\n..|...... <|
|00005e60| 22 29 0d 0a ff 20 03 28 | 70 72 69 6e 63 20 28 73 |")... .(|princ (s|
|00005e70| 74 72 63 61 74 20 28 73 | 65 74 71 20 77 65 73 74 |trcat (s|etq west|
|00005e80| 20 28 73 74 72 63 61 74 | 20 22 41 2d 22 20 28 63 | (strcat| "A-" (c|
|00005e90| 68 72 20 28 2b 20 36 34 | 20 6a 73 31 ff 29 04 20 |hr (+ 64| js1.). |
|00005ea0| 22 3e 3a 22 29 29 0d 0a | ff 20 03 28 73 65 74 71 |">:"))..|. .(setq|
|00005eb0| 20 78 20 28 67 65 74 73 | 74 72 69 6e 67 29 20 77 | x (gets|tring) w|
|00005ec0| 65 73 74 20 28 69 66 20 | 28 2f 3d 20 78 20 22 22 |est (if |(/= x ""|
|00005ed0| 29 20 78 20 77 65 73 74 | 29 29 0d 0a ff 20 03 28 |) x west|))... .(|
|00005ee0| 6b 6a 73 20 77 65 73 74 | 29 0d 0a ff 20 03 28 63 |kjs west|)... .(c|
|00005ef0| 6f 6d 62 69 6e 20 61 78 | 6e 6c 20 61 78 64 6c 29 |ombin ax|nl axdl)|
|00005f00| 0d 0a ff 20 03 29 0d 0a | ff 20 03 28 73 65 74 71 |... .)..|. .(setq|
|00005f10| 20 77 65 73 74 20 61 78 | 6e 64 6c 20 77 64 74 20 | west ax|ndl wdt |
|00005f20| 77 64 69 73 74 20 77 64 | 69 73 74 20 61 78 64 6c |wdist wd|ist axdl|
|00005f30| 29 0d 0a ff 20 03 28 70 | 72 69 6e 63 20 22 5c 6e |)... .(p|rinc "\n|
|00005f40| cf c2 b1 df d6 e1 be e0 | 20 3c 22 29 0d 0a ff 20 |........| <")... |
|00005f50| 03 28 70 72 69 6e 63 20 | 22 36 2a 33 2e 36 22 29 |.(princ |"6*3.6")|
|00005f60| 0d 0a ff 20 03 28 73 65 | 74 71 20 73 64 69 73 74 |... .(se|tq sdist|
|00005f70| 20 28 67 65 74 73 74 72 | 69 6e 67 20 22 3e 3a 22 | (getstr|ing ">:"|
|00005f80| 29 29 0d 0a ff 20 03 28 | 69 66 20 28 3d 20 73 64 |))... .(|if (= sd|
|00005f90| 69 73 74 20 22 22 29 20 | 28 73 65 74 71 20 73 64 |ist "") |(setq sd|
|00005fa0| 69 73 74 20 22 36 2a 33 | 2e 36 22 29 29 0d 0a ff |ist "6*3|.6"))...|
|00005fb0| 20 03 28 ff 65 03 20 73 | 64 69 73 74 29 0d 0a ff | .(.e. s|dist)...|
|00005fc0| 20 03 28 73 65 74 71 20 | 6b 6a 31 20 28 2b 20 28 | .(setq |kj1 (+ (|
|00005fd0| 6c 65 6e 67 74 68 20 61 | 78 64 6c 29 20 31 29 20 |length a|xdl) 1) |
|00005fe0| 66 67 65 72 72 20 74 29 | 0d 0a ff 20 03 28 77 68 |fgerr t)|... .(wh|
|00005ff0| 69 6c 65 20 66 67 65 72 | 72 0d 0a ff 20 03 28 70 |ile fger|r... .(p|
|00006000| 72 69 6e 63 20 22 5c 6e | cf c2 b1 df d6 e1 ba c5 |rinc "\n|........|
|00006010| 20 3c 22 29 0d 0a ff 20 | 03 28 70 72 69 6e 63 20 | <")... |.(princ |
|00006020| 28 73 74 72 63 61 74 20 | 28 73 65 74 71 20 73 6f |(strcat |(setq so|
|00006030| 75 74 68 20 28 73 74 72 | 63 61 74 20 22 31 2d 22 |uth (str|cat "1-"|
|00006040| 20 28 69 74 6f 61 20 6b | 6a 31 ff 29 03 20 22 3e | (itoa k|j1.). ">|
|00006050| 3a 22 29 29 0d 0a ff 20 | 03 28 73 65 74 71 20 78 |:"))... |.(setq x|
|00006060| 20 28 67 65 74 73 74 72 | 69 6e 67 29 20 73 6f 75 | (getstr|ing) sou|
|00006070| 74 68 20 28 69 66 20 28 | 2f 3d 20 78 20 22 22 29 |th (if (|/= x "")|
|00006080| 20 78 20 73 6f 75 74 68 | 29 29 0d 0a ff 20 03 28 | x south|))... .(|
|00006090| 6b 6a 73 20 73 6f 75 74 | 68 29 0d 0a ff 20 03 28 |kjs sout|h)... .(|
|000060a0| 63 6f 6d 62 69 6e 20 61 | 78 6e 6c 20 61 78 64 6c |combin a|xnl axdl|
|000060b0| 29 0d 0a ff 20 03 29 0d | 0a ff 20 03 28 73 65 74 |)... .).|.. .(set|
|000060c0| 71 20 73 6f 75 74 68 20 | 61 78 6e 64 6c 20 73 64 |q south |axndl sd|
|000060d0| 74 20 73 64 69 73 74 20 | 73 64 69 73 74 20 61 78 |t sdist |sdist ax|
|000060e0| 64 6c 29 0d 0a ff 20 03 | 28 69 6e 69 74 67 65 74 |dl)... .|(initget|
|000060f0| 20 22 59 65 73 20 4e 6f | 22 29 0d 0a ff 20 03 28 | "Yes No|")... .(|
|00006100| 73 65 74 71 20 78 20 28 | 67 65 74 6b 77 6f 72 64 |setq x (|getkword|
|00006110| 20 22 5c 6e b6 d4 b3 c6 | 20 3c 59 3e 22 29 20 6b | "\n....| <Y>") k|
|00006120| 77 20 28 69 66 20 28 2f | 3d 20 78 20 22 22 29 20 |w (if (/|= x "") |
|00006130| 78 20 22 59 65 73 22 29 | 29 0d 0a ff 20 03 28 69 |x "Yes")|)... .(i|
|00006140| 66 20 28 3d 20 6b 77 20 | 22 4e 6f 22 29 20 28 70 |f (= kw |"No") (p|
|00006150| 72 6f 67 6e 0d 0a ff 20 | 03 28 73 65 74 71 20 66 |rogn... |.(setq f|
|00006160| 67 65 72 72 20 74 29 0d | 0a ff 20 03 28 77 68 69 |gerr t).|.. .(whi|
|00006170| 6c 65 20 66 67 65 72 72 | 0d 0a ff 20 03 28 70 72 |le fgerr|... .(pr|
|00006180| 69 6e 63 20 22 5c 6e b6 | d4 b3 c6 d6 e1 ce bb d2 |inc "\n.|........|
|00006190| c6 20 3c 30 2c 30 3e 3a | 22 29 0d 0a ff 20 03 28 |. <0,0>:|")... .(|
|000061a0| 73 65 74 71 20 78 20 28 | 67 65 74 73 74 72 69 6e |setq x (|getstrin|
|000061b0| 67 29 29 0d 0a ff 20 03 | 28 69 66 20 28 3d 20 78 |g))... .|(if (= x|
|000061c0| 20 22 22 29 20 28 73 65 | 74 71 20 78 20 22 30 2c | "") (se|tq x "0,|
|000061d0| 30 22 29 29 0d 0a ff 20 | 03 28 63 68 6b 65 72 72 |0"))... |.(chkerr|
|000061e0| 20 78 29 0d 0a ff 20 03 | 29 0d 0a ff 20 03 28 73 | x)... .|)... .(s|
|000061f0| 65 74 71 20 78 6f 66 66 | 20 28 2a 20 31 ff 30 03 |etq xoff| (* 1.0.|
|00006200| 2e 30 20 28 61 74 6f 66 | 20 28 73 75 62 73 74 72 |.0 (atof| (substr|
|00006210| 20 78 20 31 20 28 2d 20 | 28 73 65 74 71 20 6c 30 | x 1 (- |(setq l0|
|00006220| 20 28 69 6e 73 74 72 20 | 31 20 78 20 22 2c 22 29 | (instr |1 x ",")|
|00006230| 29 20 31 ff 29 05 0d 0a | ff 20 03 28 73 65 74 71 |) 1.)...|. .(setq|
|00006240| 20 79 6f 66 66 20 28 2a | 20 31 ff 30 03 2e 30 20 | yoff (*| 1.0..0 |
|00006250| 28 61 74 6f 66 20 28 73 | 75 62 73 74 72 20 78 20 |(atof (s|ubstr x |
|00006260| 28 2b 20 6c 30 20 31 ff | 29 05 0d 0a ff 20 03 28 |(+ l0 1.|).... .(|
|00006270| 70 72 69 6e 63 20 22 5c | 6e d3 d2 b1 df d6 e1 be |princ "\|n.......|
|00006280| e0 20 3c 22 29 0d 0a ff | 20 03 28 70 72 69 6e 63 |. <")...| .(princ|
|00006290| 20 77 64 74 29 0d 0a ff | 20 03 28 73 65 74 71 20 | wdt)...| .(setq |
|000062a0| 65 64 69 73 74 20 28 67 | 65 74 73 74 72 69 6e 67 |edist (g|etstring|
|000062b0| 20 22 3e 3a 22 29 29 0d | 0a ff 20 03 28 69 66 20 | ">:")).|.. .(if |
|000062c0| 28 3d 20 65 64 69 73 74 | 20 22 22 29 20 28 73 65 |(= edist| "") (se|
|000062d0| 74 71 20 65 64 69 73 74 | 20 77 64 74 29 29 0d 0a |tq edist| wdt))..|
|000062e0| ff 20 03 28 ff 65 03 20 | 65 64 69 73 74 29 0d 0a |. .(.e. |edist)..|
|000062f0| ff 20 03 28 73 65 74 71 | 20 6a 73 32 20 28 2b 20 |. .(setq| js2 (+ |
|00006300| 28 6c 65 6e 67 74 68 20 | 61 78 64 6c 29 20 31 29 |(length |axdl) 1)|
|00006310| 20 66 67 65 72 72 20 74 | 29 0d 0a ff 20 03 28 73 | fgerr t|)... .(s|
|00006320| 65 74 71 20 69 20 31 29 | 0d 0a ff 20 03 28 77 68 |etq i 1)|... .(wh|
|00006330| 69 6c 65 20 28 3c 3d 20 | 69 20 6a 73 32 29 20 28 |ile (<= |i js2) (|
|00006340| 69 66 20 28 6f 72 20 28 | 3d 20 28 2b 20 36 34 20 |if (or (|= (+ 64 |
|00006350| 69 29 20 37 33 29 20 28 | 3d 20 28 2b 20 36 34 20 |i) 73) (|= (+ 64 |
|00006360| 69 29 20 37 39 29 29 20 | 28 73 65 74 71 20 6a 73 |i) 79)) |(setq js|
|00006370| 32 20 28 2b 20 6a 73 32 | 20 31 ff 29 03 20 28 73 |2 (+ js2| 1.). (s|
|00006380| 65 74 71 20 69 20 28 31 | 2b 20 69 ff 29 03 0d 0a |etq i (1|+ i.)...|
|00006390| ff 20 03 28 77 68 69 6c | 65 20 66 67 65 72 72 0d |. .(whil|e fgerr.|
|000063a0| 0a ff 20 03 28 70 72 69 | 6e 63 20 22 5c 6e d3 d2 |.. .(pri|nc "\n..|
|000063b0| b1 df d6 e1 ba c5 20 3c | 22 29 0d 0a ff 20 03 28 |...... <|")... .(|
|000063c0| 70 72 69 6e 63 20 28 73 | 74 72 63 61 74 20 28 73 |princ (s|trcat (s|
|000063d0| 65 74 71 20 65 61 73 74 | 20 28 73 74 72 63 61 74 |etq east| (strcat|
|000063e0| 20 22 41 2d 22 20 28 63 | 68 72 20 28 2b 20 36 34 | "A-" (c|hr (+ 64|
|000063f0| 20 6a 73 32 ff 29 04 20 | 22 3e 3a 22 29 29 0d 0a | js2.). |">:"))..|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
