CONFIGER
FILE INFORMATION
FILENAME(S): CONFIGER
FILE TYPE(S): DEL
FILE SIZE: 3.8K
FIRST SEEN: 2025-12-01 01:48:44
APPEARS ON: 1 disk(s)
FILE HASH
b63866c8228779ed2e17eb0cea77f6c93db7d25bdb7c61782eb8a1de0cfeacb4
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| CADPAK 128 C | CONFIGER | DEL | hedning, Mattias H00r | 27 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 22 20 20 20 20 20 20 20 20 20 20 20 20 3C 2D 2D |" <--|
00000010: 2D 57 49 44 54 48 2D 2D 2D 2D 2D 3E 00 27 26 90 |-WIDTH----->.'&.|
00000020: 79 99 22 20 46 4F 52 20 53 49 44 45 3A 20 20 20 |y." FOR SIDE: |
00000030: 2D B0 C3 C3 C3 C3 C3 C3 C3 C3 AE 00 46 26 9A 79 |-...........F&.y|
00000040: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 5E |." ^|
00000050: C2 20 20 20 20 20 20 20 20 C2 00 65 26 A4 79 99 |. ..e&.y.|
00000060: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 C2 C2 |" ..|
00000070: 20 20 20 20 20 20 20 20 C2 00 84 26 A9 79 99 22 | ...&.y."|
00000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 C2 C2 20 | .. |
00000090: 20 20 20 20 20 20 20 C2 00 A3 26 AE 79 99 22 20 | ...&.y." |
000000A0: 20 20 57 49 44 54 48 2D 2D 2D 2D 3E C2 C2 20 20 | WIDTH---->.. |
000000B0: 3C 2D 20 20 20 20 C2 00 C2 26 B4 79 99 22 20 20 |<- ...&.y." |
000000C0: 20 20 20 20 20 20 20 20 20 20 20 C2 C2 20 20 55 | .. U|
000000D0: 50 20 20 20 20 C2 00 E1 26 B8 79 99 22 20 20 20 |P ...&.y." |
000000E0: 20 20 20 20 20 20 20 20 20 20 C2 C2 20 20 20 20 | .. |
000000F0: 20 20 20 20 C2 00 00 27 C2 79 99 22 20 20 20 20 | ...'.y." |
00000100: 20 20 20 20 20 20 20 20 20 56 C2 20 20 20 20 20 | V. |
00000110: 20 20 20 C2 00 1F 27 CC 79 99 22 20 20 20 20 20 | ...'.y." |
00000120: 20 20 20 20 20 20 20 20 2D AD C3 C3 C3 C3 C3 C3 | -.......|
00000130: C3 C3 BD 00 3E 27 D6 79 99 22 20 20 20 20 20 20 |....>'.y." |
00000140: 20 20 20 20 20 20 20 20 C2 3C 48 45 49 47 48 54 | .<HEIGHT|
00000150: 3E C2 00 5C 27 00 7D 85 22 20 12 3C 52 45 54 55 |>..\'.}." .<RETU|
00000160: 52 4E 3E 20 46 4F 52 20 4D 4F 52 45 22 3B 41 24 |RN> FOR MORE";A$|
00000170: 00 62 27 E8 80 8E 00 79 27 40 9C E7 30 2C 32 3A |.b'....y'@..0,2:|
00000180: 8F 20 50 41 52 54 20 42 20 57 4F 52 4B 00 98 27 |. PART B WORK..'|
00000190: 54 9C 99 22 93 1F 20 11 43 4F 4E 46 49 47 55 52 |T..".. .CONFIGUR|
000001A0: 41 54 49 4F 4E 20 50 41 52 54 20 42 00 C6 27 68 |ATION PART B..'h|
000001B0: 9C 44 24 B2 22 22 3A 85 22 20 4D 45 41 53 55 52 |.D$."":." MEASUR|
000001C0: 45 20 49 4E 20 43 4D 20 4F 52 20 49 4E 43 48 45 |E IN CM OR INCHE|
000001D0: 53 28 43 2F 49 29 22 3B 44 24 00 E5 27 7C 9C 8B |S(C/I)";D$..'|..|
000001E0: 28 44 24 B3 B1 22 43 22 29 AF 28 44 24 B3 B1 22 |(D$.."C").(D$.."|
000001F0: 49 22 29 A7 34 30 30 34 30 00 0C 28 A4 9C 99 22 |I").40040..(..."|
00000200: 93 20 12 53 45 4C 45 43 54 20 41 20 57 49 4E 44 |. .SELECT A WIND|
00000210: 4F 57 20 46 4F 52 4D 41 54 20 54 4F 20 45 4E 44 |OW FORMAT TO END|
00000220: 00 55 28 A9 9C 41 33 B2 31 3A 99 22 11 20 53 45 |.U(..A3.1:.". SE|
00000230: 4C 45 43 54 20 46 4F 52 4D 41 54 20 54 4F 20 43 |LECT FORMAT TO C|
00000240: 48 41 4E 47 45 3A 22 3A 81 49 B2 30 A4 31 34 3A |HANGE:":.I.0.14:|
00000250: 8B 50 4F 24 28 49 29 B2 22 2A 22 A7 49 B2 31 34 |.PO$(I)."*".I.14|
00000260: 3A 82 3A 89 34 30 31 32 30 00 69 28 AE 9C 41 33 |:.:.40120.i(..A3|
00000270: B2 49 3A 99 2C 50 4F 24 28 49 29 3A 82 00 88 28 |.I:.,PO$(I):...(|
00000280: B8 9C 41 34 B2 31 3A FE 02 31 3A 4B 32 B2 C2 28 |..A4.1:..1:K2..(|
00000290: 34 38 31 33 31 29 3A 8D 39 30 30 30 00 A4 28 C2 |48131):.9000..(.|
000002A0: 9C 8B C8 28 50 4F 24 28 4B 32 29 2C 31 29 B2 22 |...(PO$(K2),1)."|
000002B0: 2D 22 A7 34 38 30 30 30 00 C9 28 CC 9C 99 22 50 |-".48000..(..."P|
000002C0: 52 45 53 45 4E 54 20 44 45 53 43 52 49 50 54 49 |RESENT DESCRIPTI|
000002D0: 4F 4E 3A 22 3A 99 50 4F 24 28 4B 32 29 00 FB 28 |ON:":.PO$(K2)..(|
000002E0: D6 9C 99 22 4E 45 57 20 44 45 53 43 52 49 50 54 |..."NEW DESCRIPT|
000002F0: 49 4F 4E 20 3C 52 45 54 55 52 4E 20 46 4F 52 20 |ION <RETURN FOR |
00000300: 53 41 4D 45 3E 22 3A 85 50 4F 24 28 4B 32 29 00 |SAME>":.PO$(K2).|
00000310: 0D 29 DB 9C 8B 44 24 B2 22 49 22 A7 34 30 32 36 |.)...D$."I".4026|
00000320: 30 00 39 29 E0 9C 99 22 50 52 45 53 45 4E 54 20 |0.9)..."PRESENT |
00000330: 57 49 44 54 48 20 28 43 4D 29 3A 22 3A 42 B2 50 |WIDTH (CM):":B.P|
00000340: 57 25 28 4B 32 29 AD 31 30 30 3A 99 42 00 6C 29 |W%(K2).100:.B.l)|
00000350: EA 9C 85 22 4E 45 57 20 57 49 44 54 48 20 3C 52 |..."NEW WIDTH <R|
00000360: 45 54 55 52 4E 20 46 4F 52 20 53 41 4D 45 3E 22 |ETURN FOR SAME>"|
00000370: 3B 42 3A 50 57 25 28 4B 32 29 B2 42 AC 31 30 30 |;B:PW%(K2).B.100|
00000380: 00 99 29 F4 9C 99 22 50 52 45 53 45 4E 54 20 48 |..)..."PRESENT H|
00000390: 45 49 47 48 54 20 28 43 4D 29 3A 22 3A 42 B2 50 |EIGHT (CM):":B.P|
000003A0: 48 25 28 4B 32 29 AD 31 30 30 3A 99 42 00 CD 29 |H%(K2).100:.B..)|
000003B0: FE 9C 85 22 4E 45 57 20 48 45 49 47 48 54 20 3C |..."NEW HEIGHT <|
000003C0: 52 45 54 55 52 4E 20 46 4F 52 20 53 41 4D 45 3E |RETURN FOR SAME>|
000003D0: 22 3B 42 3A 50 48 25 28 4B 32 29 B2 42 AC 31 30 |";B:PH%(K2).B.10|
000003E0: 30 00 D8 29 03 9D 89 34 30 31 30 30 00 26 2A 44 |0..)...40100.&*D|
000003F0: 9D 99 22 50 52 45 53 45 4E 54 20 57 49 44 54 48 |.."PRESENT WIDTH|
00000400: 20 28 49 4E 43 48 45 53 20 2B 20 2F 33 32 4E 44 | (INCHES + /32ND|
00000410: 53 29 3A 22 3A 42 B2 50 57 25 28 4B 32 29 AD 32 |S):":B.PW%(K2).2|
00000420: 35 34 3A 43 B2 B5 28 42 29 3A 44 B2 B5 28 2E 35 |54:C..(B):D..(.5|
00000430: AA 28 42 AB 43 29 AC 33 32 29 00 36 2A 45 9D 99 |.(B.C).32).6*E..|
00000440: 43 22 2B 22 44 22 2F 33 32 22 00 63 2A 4E 9D 85 |C"+"D"/32".c*N..|
00000450: 22 4E 45 57 20 57 49 44 54 48 3A 20 12 57 48 4F |"NEW WIDTH: .WHO|
00000460: 4C 45 20 49 4E 43 48 45 53 92 3C 52 45 54 3D 53 |LE INCHES.<RET=S|
00000470: 41 4D 45 3E 22 3B 43 00 9B 2A 4F 9D 85 22 20 20 |AME>";C..*O.." |
00000480: 20 20 20 20 20 20 20 20 20 12 2F 33 32 20 4F 46 | ./32 OF|
00000490: 20 49 4E 43 48 92 3C 52 45 54 3D 53 41 4D 45 3E | INCH.<RET=SAME>|
000004A0: 22 3B 44 3A 8B 44 B1 33 32 A7 34 30 32 37 31 00 |";D:.D.32.40271.|
000004B0: B6 2A 50 9D 50 57 25 28 4B 32 29 B2 32 35 34 AC |.*P.PW%(K2).254.|
000004C0: 28 43 AA 28 44 AD 33 32 29 29 00 05 2B 58 9D 99 |(C.(D.32))..+X..|
000004D0: 22 50 52 45 53 45 4E 54 20 48 45 49 47 48 54 20 |"PRESENT HEIGHT |
000004E0: 28 49 4E 43 48 45 53 20 2B 20 2F 33 32 4E 44 53 |(INCHES + /32NDS|
000004F0: 29 3A 22 3A 42 B2 50 48 25 28 4B 32 29 AD 32 35 |):":B.PH%(K2).25|
00000500: 34 3A 43 B2 B5 28 42 29 3A 44 B2 B5 28 2E 35 AA |4:C..(B):D..(.5.|
00000510: 28 42 AB 43 29 AC 33 32 29 00 15 2B 59 9D 99 43 |(B.C).32)..+Y..C|
00000520: 22 2B 22 44 22 2F 33 32 22 00 43 2B 62 9D 85 22 |"+"D"/32".C+b.."|
00000530: 4E 45 57 20 48 45 49 47 48 54 3A 20 12 57 48 4F |NEW HEIGHT: .WHO|
00000540: 4C 45 20 49 4E 43 48 45 53 92 3C 52 45 54 3D 53 |LE INCHES.<RET=S|
00000550: 41 4D 45 3E 22 3B 43 00 7C 2B 63 9D 85 22 20 20 |AME>";C.|+c.." |
00000560: 20 20 20 20 20 20 20 20 20 20 12 2F 33 32 20 4F | ./32 O|
00000570: 46 20 49 4E 43 48 92 3C 52 45 54 3D 53 41 4D 45 |F INCH.<RET=SAME|
00000580: 3E 22 3B 44 3A 8B 44 B1 33 32 A7 34 30 32 39 31 |>";D:.D.32.40291|
00000590: 00 97 2B 64 9D 50 48 25 28 4B 32 29 B2 32 35 34 |..+d.PH%(K2).254|
000005A0: AC 28 43 AA 28 44 AD 33 32 29 29 00 A2 2B 67 9D |.(C.(D.32))..+g.|
000005B0: 89 34 30 31 30 30 00 BD 2B 80 BB 85 22 20 11 12 |.40100..+..." ..|
000005C0: 46 49 4E 49 53 48 45 44 28 59 2F 4E 29 22 3B 41 |FINISHED(Y/N)";A|
000005D0: 24 00 D8 2B 8A BB 8B 41 24 B3 B1 22 59 22 AF 41 |$..+...A$.."Y".A|
000005E0: 24 B3 B1 22 4E 22 A7 34 38 30 30 30 00 F1 2B 94 |$.."N".48000..+.|
000005F0: BB 8B 41 24 B2 22 59 22 A7 34 39 30 30 30 3A D5 |..A$."Y".49000:.|
00000600: 34 30 31 30 30 00 10 2C 68 BF 8F 20 57 52 49 54 |40100..,h.. WRIT|
00000610: 45 20 4F 55 54 20 4E 45 57 20 44 45 53 43 52 20 |E OUT NEW DESCR |
00000620: 46 49 4C 45 00 1F 2C 72 BF F2 22 4F 4C 44 2E 50 |FILE..,r.."OLD.P|
00000630: 52 44 22 00 34 2C 7C BF F5 28 4E 44 24 29 A4 22 |RD".4,|..(ND$)."|
00000640: 4F 4C 44 2E 50 52 44 22 00 4A 2C 86 BF FE 0D 23 |OLD.PRD".J,....#|
00000650: 38 2C 28 4E 44 24 AA 22 2C 50 22 29 2C 57 00 5E |8,(ND$.",P"),W.^|
00000660: 2C 90 BF 98 38 2C C7 28 30 29 3B C7 28 32 35 33 |,...8,.(0);.(253|
00000670: 29 3B 00 76 2C 9A BF 98 38 2C 22 12 22 AA 50 4F |);.v,...8,".".PO|
00000680: 24 28 30 29 3B C7 28 30 29 3B 00 8C 2C A4 BF 98 |$(0);.(0);..,...|
00000690: 38 2C C7 28 30 29 3B 3A 98 38 2C C7 28 30 29 3B |8,.(0);:.8,.(0);|
000006A0: 00 A2 2C AE BF 98 38 2C C7 28 30 29 3B 3A 98 38 |..,...8,.(0);:.8|
000006B0: 2C C7 28 30 29 3B 00 C1 2C C2 BF 98 38 2C C7 28 |,.(0);..,...8,.(|
000006C0: 30 29 3B 3A 98 38 2C C7 28 30 29 3B 3A 98 38 2C |0);:.8,.(0);:.8,|
000006D0: C7 28 30 29 3B 00 CD 2C CC BF 81 4A B2 31 A4 31 |.(0);..,...J.1.1|
000006E0: 34 00 E1 2C D6 BF 98 38 2C 50 4F 24 28 4A 29 3B |4..,...8,PO$(J);|
000006F0: C7 28 30 29 3B 00 F3 2C E0 BF 98 38 2C C7 28 50 |.(0);..,...8,.(P|
00000700: 4F 25 28 4A 29 29 3B 00 05 2D EA BF 98 38 2C C7 |O%(J));..-...8,.|
00000710: 28 50 51 25 28 4A 29 29 3B 00 17 2D F4 BF 98 38 |(PQ%(J));..-...8|
00000720: 2C C7 28 50 4D 25 28 4A 29 29 3B 00 3A 2D FE BF |,.(PM%(J));.:-..|
00000730: 48 B2 B5 28 50 57 25 28 4A 29 AD 32 35 36 29 3A |H..(PW%(J).256):|
00000740: 4C B2 50 57 25 28 4A 29 AB 32 35 36 AC 48 00 50 |L.PW%(J).256.H.P|
00000750: 2D 08 C0 98 38 2C C7 28 4C 29 3B 3A 98 38 2C C7 |-...8,.(L);:.8,.|
00000760: 28 48 29 3B 00 73 2D 12 C0 48 B2 B5 28 50 48 25 |(H);.s-..H..(PH%|
00000770: 28 4A 29 AD 32 35 36 29 3A 4C B2 50 48 25 28 4A |(J).256):L.PH%(J|
00000780: 29 AB 32 35 36 AC 48 00 89 2D 1C C0 98 38 2C C7 |).256.H..-...8,.|
00000790: 28 4C 29 3B 3A 98 38 2C C7 28 48 29 3B 00 90 2D |(L);:.8,.(H);..-|
000007A0: 26 C0 82 4A 00 99 2D 30 C0 FE 0F 23 38 00 9F 2D |&..J..-0...#8..-|
000007B0: 4F C3 8E 00 A5 2D 1E D7 8F 00 CC 2D 28 D7 81 5A |O....-.....-(..Z|
000007C0: 5A B2 31 A4 31 30 3A A1 41 24 3A 82 3A 99 22 12 |Z.1.10:.A$:.:.".|
000007D0: 20 41 4E 59 20 4B 45 59 22 3A A1 F9 41 24 3A 8E | ANY KEY":..A$:.|
000007E0: 00 E1 2D 90 E2 8F 20 43 4F 4E 46 49 47 2F 50 52 |..-... CONFIG/PR|
000007F0: 49 4E 54 45 52 00 F9 2D 9A E2 8F 20 52 45 41 44 |INTER..-... READ|
00000800: 49 4E 20 43 4F 4E 46 49 47 20 52 45 43 00 35 2E |IN CONFIG REC.5.|
00000810: A4 E2 FE 0D 23 38 2C 22 43 44 50 4B 2E 43 4F 4E |....#8,"CDPK.CON|
00000820: 46 49 47 22 3A 8B 44 53 B3 B1 30 A7 FE 0F 23 38 |FIG":.DS..0...#8|
00000830: 3A FE 02 31 3A 97 34 38 31 33 31 2C 31 3A FE 02 |:..1:.48131,1:..|
00000840: 31 35 3A 89 35 38 32 30 30 00 66 2E AE E2 84 38 |15:.58200.f....8|
00000850: 2C 4E 50 24 3A 84 38 2C 4E 44 24 3A 81 49 B2 31 |,NP$:.8,ND$:.I.1|
00000860: A4 35 3A 84 38 2C 41 3A FE 02 31 3A 97 34 38 31 |.5:.8,A:..1:.481|
00000870: 32 38 AB 31 AA 49 2C 41 3A 82 00 90 2E B8 E2 FE |28.1.I,A:.......|
00000880: 0F 23 38 3A 8B 44 53 B3 B1 30 A7 99 22 43 4F 4E |.#8:.DS..0.."CON|
00000890: 46 49 47 20 46 49 4C 45 20 45 52 52 22 3A 89 35 |FIG FILE ERR":.5|
000008A0: 38 32 30 30 00 9F 2E C2 E2 8D 35 38 31 30 30 3A |8200......58100:|
000008B0: 89 32 30 00 D5 2E F4 E2 FE 11 28 4E 44 24 29 2C |.20.......(ND$),|
000008C0: 42 31 2C 50 28 D1 28 22 37 43 30 30 22 29 29 3A |B1,P(.("7C00")):|
000008D0: FE 11 28 4E 50 24 29 2C 42 31 2C 50 28 D1 28 22 |..(NP$),B1,P(.("|
000008E0: 35 30 30 30 22 29 29 3A 8E 00 47 2F 58 E3 E7 30 |5000")):..G/X..0|
000008F0: 2C 32 3A 99 22 93 11 20 1F 43 41 44 50 41 4B 20 |,2:.".. .CADPAK |
00000900: 31 32 38 20 50 52 49 4E 54 45 52 20 43 4F 4E 46 |128 PRINTER CONF|
00000910: 49 47 20 50 52 4F 43 45 44 55 52 45 22 3A 99 2C |IG PROCEDURE":.,|
00000920: 22 11 20 3E 3E 20 12 50 41 52 54 20 41 92 20 3C |". >> .PART A. <|
00000930: 3C 20 20 20 22 3A 99 22 11 11 20 42 45 20 53 55 |< ":.".. BE SU|
00000940: 52 45 20 54 48 41 54 20 54 48 45 20 43 41 44 50 |RE THAT THE CADP|
00000950: 41 4B 2D 31 32 38 20 44 49 53 4B 00 96 2F 62 E3 |AK-128 DISK../b.|
00000960: 99 22 1D 49 53 20 49 4E 20 54 48 45 20 44 52 49 |.".IS IN THE DRI|
00000970: 56 45 20 41 4E 44 20 54 48 45 20 57 52 49 54 45 |VE AND THE WRITE|
00000980: 2D 22 3A 99 22 20 50 52 4F 54 45 43 54 20 4E 4F |-":." PROTECT NO|
00000990: 54 43 48 20 49 53 20 12 55 4E 92 43 4F 56 45 52 |TCH IS .UN.COVER|
000009A0: 45 44 22 3A 8D 35 35 30 38 30 00 CE 2F 6C E3 FE |ED":.55080../l..|
000009B0: 0D 23 38 2C 22 43 44 50 4B 2E 50 52 49 4E 54 45 |.#8,"CDPK.PRINTE|
000009C0: 52 53 22 3A 8B 44 53 B3 B1 30 A7 FE 0F 23 38 3A |RS":.DS..0...#8:|
000009D0: 99 44 53 24 3A 8D 35 35 30 38 30 3A 89 35 38 32 |.DS$:.55080:.582|
000009E0: 30 30 00 2E 30 76 E3 41 33 B2 31 35 3A 81 49 B2 |00..0v.A3.15:.I.|
000009F0: 31 A4 31 35 3A 84 38 2C 50 52 24 28 49 2C 30 29 |1.15:.8,PR$(I,0)|
00000A00: 3A 84 38 2C 50 52 24 28 49 2C 31 29 3A 84 38 2C |:.8,PR$(I,1):.8,|
00000A10: 50 52 24 28 49 2C 32 29 3A 84 38 2C 54 59 25 28 |PR$(I,2):.8,TY%(|
00000A20: 49 29 3A 8B 50 52 24 28 49 2C 30 29 B2 22 2A 22 |I):.PR$(I,0)."*"|
00000A30: A7 41 33 B2 49 AB 31 3A 89 35 38 32 34 30 3A D5 |.A3.I.1:.58240:.|
00000A40: 3A 82 00 51 30 80 E3 FE 0F 23 38 3A 8B 44 53 B3 |:..Q0....#8:.DS.|
00000A50: B1 30 A7 99 44 53 24 3A 8D 35 35 30 38 30 3A 89 |.0..DS$:.55080:.|
00000A60: 35 38 32 30 30 00 B7 30 8A E3 99 22 93 11 20 53 |58200..0...".. S|
00000A70: 45 4C 45 43 54 20 50 52 49 4E 54 45 52 3A 22 3A |ELECT PRINTER:":|
00000A80: 81 49 B2 31 A4 41 33 3A 99 2C 50 52 24 28 49 2C |.I.1.A3:.,PR$(I,|
00000A90: 30 29 3A 82 3A 41 34 B2 31 3A 4B 32 B2 31 3A 8D |0):.:A4.1:K2.1:.|
00000AA0: 39 30 30 30 3A 4E 50 24 B2 50 52 24 28 4B 32 2C |9000:NP$.PR$(K2,|
00000AB0: 31 29 3A 4E 44 24 B2 50 52 24 28 4B 32 2C 32 29 |1):ND$.PR$(K2,2)|
00000AC0: 3A 54 59 B2 54 59 25 28 4B 32 29 00 C8 30 94 E3 |:TY.TY%(K2)..0..|
00000AD0: 8D 35 38 31 30 30 3A 8D 38 30 30 30 00 07 31 9E |.58100:.8000..1.|
00000AE0: E3 FE 02 31 3A 4B B2 C2 28 34 38 31 32 38 29 3A |...1:K..(48128):|
00000AF0: 99 22 20 44 45 56 49 43 45 20 23 20 3A 22 4B 3A |." DEVICE # :"K:|
00000B00: 85 4B 3A FE 02 31 3A 97 34 38 31 32 38 2C 4B 3A |.K:..1:.48128,K:|
00000B10: 8B 54 59 B2 30 A7 35 38 33 30 30 00 40 31 A8 E3 |.TY.0.58300.@1..|
00000B20: FE 02 31 3A 4B B2 C2 28 34 38 31 32 39 29 3A 99 |..1:K..(48129):.|
00000B30: 22 20 47 52 41 50 48 49 43 20 53 45 43 20 41 44 |" GRAPHIC SEC AD|
00000B40: 44 52 22 4B 3A 85 4B 3A FE 02 31 3A 97 34 38 31 |DR"K:.K:..1:.481|
00000B50: 32 39 2C 4B 00 68 31 B2 E3 FE 02 31 3A 8B 28 C2 |29,K.h1....1:.(.|
00000B60: 28 34 38 31 33 30 29 29 B3 B1 30 A7 4E 56 24 B2 |(48130))..0.NV$.|
00000B70: 22 59 22 3A D5 4E 56 24 B2 22 4E 22 00 A0 31 B4 |"Y":.NV$."N"..1.|
00000B80: E3 99 22 20 41 53 43 49 49 20 54 52 41 4E 53 4C |.." ASCII TRANSL|
00000B90: 41 54 45 A0 28 59 2F 4E 29 3A 22 4E 56 24 3A 85 |ATE.(Y/N):"NV$:.|
00000BA0: 4E 56 24 3A 4B B2 30 3A 8B 4E 56 24 B2 22 59 22 |NV$:K.0:.NV$."Y"|
00000BB0: A7 4B B2 31 00 B1 31 B6 E3 FE 02 31 3A 97 34 38 |.K.1..1....1:.48|
00000BC0: 31 33 30 2C 4B 00 E3 31 BC E3 85 22 11 20 12 44 |130,K..1...". .D|
00000BD0: 4F 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 44 4F |O YOU WANT TO DO|
00000BE0: 20 50 41 52 54 20 42 28 53 49 5A 49 4E 47 28 59 | PART B(SIZING(Y|
00000BF0: 2F 4E 29 22 3B 41 24 00 02 32 BD E3 8B 28 41 24 |/N)";A$..2...(A$|
00000C00: B3 B1 22 59 22 29 AF 28 41 24 B3 B1 22 4E 22 29 |.."Y").(A$.."N")|
00000C10: A7 35 38 33 30 30 00 14 32 C1 E3 8B 41 24 B2 22 |.58300..2...A$."|
00000C20: 4E 22 A7 35 38 33 35 30 00 1F 32 C6 E3 8D 34 30 |N".58350..2...40|
00000C30: 30 30 30 00 2A 32 EE E3 8D 35 38 35 30 30 00 4A |000.*2...58500.J|
00000C40: 32 F3 E3 F2 22 43 44 50 4B 2E 43 4F 4E 46 49 47 |2..."CDPK.CONFIG|
00000C50: 22 3A 8B 44 53 B1 31 39 A7 35 38 39 30 30 00 7D |":.DS.19.58900.}|
00000C60: 32 F8 E3 FE 0D 23 38 2C 22 43 44 50 4B 2E 43 4F |2....#8,"CDPK.CO|
00000C70: 4E 46 49 47 22 2C 57 3A 8B 44 53 B3 B1 30 A7 8D |NFIG",W:.DS..0..|
00000C80: 35 38 39 37 30 3A FE 0F 23 38 3A 89 35 38 33 36 |58970:..#8:.5836|
00000C90: 30 00 B0 32 02 E4 FE 02 30 3A 98 38 2C 4E 50 24 |0..2....0:.8,NP$|
00000CA0: 3A 98 38 2C 4E 44 24 3A 81 49 B2 31 A4 35 3A FE |:.8,ND$:.I.1.5:.|
00000CB0: 02 31 3A 98 38 2C C2 28 34 38 31 32 38 AB 31 AA |.1:.8,.(48128.1.|
00000CC0: 49 29 3A 82 00 E3 32 0C E4 FE 0F 23 38 3A 8B 44 |I):...2....#8:.D|
00000CD0: 53 B3 B1 30 A7 99 22 43 4F 4E 46 49 47 20 46 49 |S..0.."CONFIG FI|
00000CE0: 4C 45 20 45 52 52 4F 52 22 3A 8D 35 35 30 38 30 |LE ERROR":.55080|
00000CF0: 3A 89 35 38 33 35 30 00 34 33 16 E4 99 22 4E 4F |:.58350.43..."NO|
00000D00: 57 20 50 55 54 20 54 41 50 45 20 42 41 43 4B 20 |W PUT TAPE BACK |
00000D10: 4F 4E 20 57 52 49 54 45 2D 50 52 4F 54 45 43 54 |ON WRITE-PROTECT|
00000D20: 22 3A 99 22 4E 4F 54 43 48 22 3A 99 22 11 20 43 |":."NOTCH":.". C|
00000D30: 4F 4E 46 49 47 55 52 41 54 49 4F 4E 20 46 49 4E |ONFIGURATION FIN|
00000D40: 49 53 48 45 44 22 3A 80 00 5F 33 52 20 99 22 11 |ISHED":.._3R .".|
00000D50: 20 12 50 52 45 53 53 20 53 50 41 43 45 20 42 41 | .PRESS SPACE BA|
00000D60: 52 20 54 4F 20 41 42 4F 52 54 20 50 52 49 4E 54 |R TO ABORT PRINT|
00000D70: 4F 55 54 00 9E 33 84 E4 41 33 B2 31 3A 99 22 11 |OUT..3..A3.1:.".|
00000D80: 20 53 45 4C 45 43 54 20 46 4F 52 4D 41 54 3A 22 | SELECT FORMAT:"|
00000D90: 3A 81 49 B2 30 A4 31 34 3A 8B 50 4F 24 28 49 29 |:.I.0.14:.PO$(I)|
00000DA0: B2 22 2A 22 A7 49 B2 31 34 3A 82 3A 89 35 38 35 |."*".I.14:.:.585|
00000DB0: 32 30 00 B2 33 8E E4 41 33 B2 49 3A 99 2C 50 4F |20..3..A3.I:.,PO|
00000DC0: 24 28 49 29 3A 82 00 E1 33 98 E4 41 34 B2 31 3A |$(I):...3..A4.1:|
00000DD0: FE 02 31 3A 4B 32 B2 C2 28 34 38 31 33 31 29 3A |..1:K2..(48131):|
00000DE0: 8D 39 30 30 30 3A FE 02 31 3A 97 34 38 31 33 31 |.9000:..1:.48131|
00000DF0: 2C 4B 32 3A 8E 00 17 34 14 E6 8B 44 53 B2 32 36 |,K2:...4...DS.26|
00000E00: A7 99 22 57 52 49 54 45 2D 50 52 4F 54 20 4E 4F |.."WRITE-PROT NO|
00000E10: 54 43 48 20 20 4F 56 45 52 45 44 22 3B 3A 8D 35 |TCH OVERED";:.5|
00000E20: 35 30 37 30 3A 89 35 38 33 35 30 00 29 34 46 E6 |5070:.58350.)4F.|
00000E30: 8D 35 38 39 37 30 3A 89 35 38 33 35 20 00 48 34 |.58970:.5835 .H4|
00000E40: 5A E6 99 22 44 49 53 4B 20 45 52 52 4F 52 22 44 |Z.."DISK ERROR"D|
00000E50: 53 24 3B 3A 8D 35 35 30 37 30 3A 8E 00 66 34 60 |S$;:.55070:..f4`|
00000E60: EA E7 30 2C 20 3A E7 31 2C 37 3A DE 31 3A DE 30 |..0, :.1,7:.1:.0|
00000E70: 3A 8F 20 53 54 41 52 54 55 50 00 7C 34 61 EA 97 |:. STARTUP.|4a..|
00000E80: 35 38 2C 31 36 3A 9C 3A 4E 24 B2 C7 20 31 33 29 |58,16:.:N$.. 13)|
00000E90: 00 8A 34 64 EA FE 11 22 4E 46 22 2C 42 30 00 98 |..4d..."NF",B0..|
00000EA0: 34 65 EA FE 11 22 4E 32 22 2C 42 30 00 A6 34 66 |4e..."N2",B0..4f|
00000EB0: EA FE 11 22 20 39 22 2C 42 31 00 C1 34 67 EA FE |..." 9",B1..4g..|
00000EC0: 11 22 4E 44 22 2C 42 31 2C 50 28 D1 28 22 32 34 |."ND",B1,P(.("24|
00000ED0: 30 30 22 29 29 00 D5 34 74 EA FE 02 20 35 3A 9E |00"))..4t... 5:.|
00000EE0: D1 28 22 31 36 38 30 22 29 00 0A 35 88 EA 86 50 |.("1680")..5...P|
00000EF0: 4F 24 28 31 34 29 2C 50 4F 25 28 31 34 29 2C 50 |O$(14),PO%(14),P|
00000F00: 51 25 28 31 20 29 2C 50 4D 25 28 31 34 29 2C 50 |Q%(1 ),PM%(14),P|
00000F10: 57 25 28 31 34 29 2C 50 48 25 28 31 34 29 00 1B |W%(14),PH%(14)..|
00000F20: 35 48 EE 8F 20 57 41 52 4D 20 53 54 20 52 54 00 |5H.. WARM ST RT.|
00000F30: 3B 35 52 EE 81 49 B2 31 A4 38 3A F9 49 2C 22 43 |;5R..I.1.8:.I,"C|
00000F40: 48 52 24 28 49 2B 31 33 32 29 3A 4E 45 58 54 00 |HR$(I+132):NEXT.|
00000F50: 46 35 AB EE 20 35 38 30 30 30 00 00 00 |F5.. 58000... |
" <---WIDTH----->.'&.Y." FOR
SIDE: -.CCCCCCCC..F&.Y." ^
B B.E&.Y." BB
B..&.Y." BB B..&.Y."
WIDTH---->BB <- B.B&.Y."
BB UP B..&.Y." BB
B..'BY." VB B..'L
Y." -.CCCCCCCC..>'VY."
B<HEIGHT>B.\'.}." .<RETURN> FOR
MORE";A$.B'....Y'@..0,2:. PART B WORK..'
T..".. .CONFIGURATION PART B.F'H.D$."":.
" MEASURE IN CM OR INCHES(C/I)";D$..'|..
(D$.."C").(D$.."I").40040..(...". .SELEC
T A WINDOW FORMAT TO END.U(..A3.1:.". SE
LECT FORMAT TO CHANGE:":.I.0.14:.PO$(I).
"*".I.14:.:.40120.I(..A3.I:.,PO$(I):...(
..A4.1:..1:K2.B(48131):.9000..(B..H(PO$(
K2),1)."-".48000.I(L.."PRESENT DESCRIPTI
ON:":.PO$(K2)..(V.."NEW DESCRIPTION <RET
URN FOR SAME>":.PO$(K2)..)...D$."I".4026
0.9)..."PRESENT WIDTH (CM):":B.PW%(K2).1
00:.B.L)..."NEW WIDTH <RETURN FOR SAME>"
;B:PW%(K2).B.100..)..."PRESENT HEIGHT (C
M):":B.PH%(K2).100:.B.M)..."NEW HEIGHT <
RETURN FOR SAME>";B:PH%(K2).B.100.X)...4
0100.&*D.."PRESENT WIDTH (INCHES + /32ND
S):":B.PW%(K2).254:C..(B):D..(.5.(B.C).3
2).6*E..C"+"D"/32".C*N.."NEW WIDTH: .WHO
LE INCHES.<RET=SAME>";C..*O.."
./32 OF INCH.<RET=SAME>";D:.D.32.40271.
.*P.PW%(K2).254.(C.(D.32))..+X.."PRESENT
HEIGHT (INCHES + /32NDS):":B.PH%(K2).25
4:C..(B):D..(.5.(B.C).32)..+Y..C"+"D"/32
".C+B.."NEW HEIGHT: .WHOLE INCHES.<RET=S
AME>";C.|+C.." ./32 OF INCH.<
RET=SAME>";D:.D.32.40291..+D.PH%(K2).254
.(C.(D.32))..+G..40100..+..." ..FINISHED
(Y/N)";A$.X+...A$.."Y".A$.."N".48000..+.
..A$."Y".49000:U40100..,H.. WRITE OUT NE
W DESCR FILE..,R.."OLD.PRD".4,|..(ND$)."
OLD.PRD".J,....#8,(ND$.",P"),W.^,...8,G(
0);G(253);.V,...8,".".PO$(0);G(0);..,...
8,G(0);:.8,G(0);..,...8,G(0);:.8,G(0);.A
,B..8,G(0);:.8,G(0);:.8,G(0);.M,L..J.1.1
4..,V..8,PO$(J);G(0);..,...8,G(PO%(J));.
.-...8,G(PQ%(J));..-...8,G(PM%(J));.:-..
H..(PW%(J).256):L.PW%(J).256.H.P-...8,G(
L);:.8,G(H);.S-..H..(PH%(J).256):L.PH%(J
).256.H..-...8,G(L);:.8,G(H);..-&..J..-0
...#8..-OC...-.W..L-(W.ZZ.1.10:.A$:.:.".
ANY KEY":..A$:...-... CONFIG/PRINTER..-
... READIN CONFIG REC.5.....#8,"CDPK.CON
FIG":.DS..0...#8:..1:.48131,1:..15:.5820
0.F....8,NP$:.8,ND$:.I.1.5:.8,A:..1:.481
28.1.I,A:........#8:.DS..0.."CONFIG FILE
ERR":.58200...B..58100:.20.U.....(ND$),
B1,P(Q("7C00")):..(NP$),B1,P(Q("5000")):
..G/X..0,2:.".. .CADPAK 128 PRINTER CONF
IG PROCEDURE":.,". >> .PART A. << ":."
.. BE SURE THAT THE CADPAK-128 DISK../B.
.".IS IN THE DRIVE AND THE WRITE-":." PR
OTECT NOTCH IS .UN.COVERED":.55080.N/L..
.#8,"CDPK.PRINTERS":.DS..0...#8:.DS$:.55
080:.58200..0V.A3.15:.I.1.15:.8,PR$(I,0)
:.8,PR$(I,1):.8,PR$(I,2):.8,TY%(I):.PR$(
I,0)."*".A3.I.1:.58240:U:..Q0....#8:.DS.
.0..DS$:.55080:.58200..0...".. SELECT PR
INTER:":.I.1.A3:.,PR$(I,0):.:A4.1:K2.1:.
9000:NP$.PR$(K2,1):ND$.PR$(K2,2):TY.TY%(
K2).H0...58100:.8000..1....1:K.B(48128):
." DEVICE # :"K:.K:..1:.48128,K:.TY.0.58
300.@1....1:K.B(48129):." GRAPHIC SEC AD
DR"K:.K:..1:.48129,K.H1....1:.(B(48130))
..0.NV$."Y":UNV$."N". 1..." ASCII TRANSL
ATE (Y/N):"NV$:.NV$:K.0:.NV$."Y".K.1..1.
...1:.48130,K..1...". .DO YOU WANT TO DO
PART B(SIZING(Y/N)";A$..2...(A$.."Y").(
A$.."N").58300..2A..A$."N".58350..2F..40
000.*2...58500.J2..."CDPK.CONFIG":.DS.19
.58900.}2....#8,"CDPK.CONFIG",W:.DS..0..
58970:..#8:.58360..2....0:.8,NP$:.8,ND$:
.I.1.5:..1:.8,B(48128.1.I):...2....#8:.D
S..0.."CONFIG FILE ERROR":.55080:.58350.
43..."NOW PUT TAPE BACK ON WRITE-PROTECT
":."NOTCH":.". CONFIGURATION FINISHED":.
._3R .". .PRESS SPACE BAR TO ABORT PRINT
OUT..3..A3.1:.". SELECT FORMAT:":.I.0.14
:.PO$(I)."*".I.14:.:.58520..3..A3.I:.,PO
$(I):...3..A4.1:..1:K2.B(48131):.9000:..
1:.48131,K2:...4...DS.26.."WRITE-PROT NO
TCH OVERED";:.55070:.58350.)4F..58970:.
5835 .H4Z.."DISK ERROR"DS$;:.55070:..F4`
..0, :.1,7:.1:.0:. STARTUP.|4A..58,16:.:
N$.G 13)..4D..."NF",B0..4E..."N2",B0..4F
..." 9",B1.A4G..."ND",B1,P(Q("2400")).U4
T... 5:.Q("1680")..5...PO$(14),PO%(14),P
Q%(1 ),PM%(14),PW%(14),PH%(14)..5H.. WAR
M ST RT.;5R..I.1.8:.I,"CHR$(I+132):NEXT.
F5.. 58000...
> CLICK IMAGE PREVIEW FOR FULL MODAL