00000000: 43 50 4D 32 37 31 20 69 73 20 61 6E 20 75 70 64 |CPM271 is an upd|
00000010: 61 74 65 64 20 76 65 72 73 69 6F 6E 20 6F 66 20 |ated version of |
00000020: 61 20 43 50 2F 4D 20 66 69 6C 65 20 74 72 61 6E |a CP/M file tran|
00000030: 73 66 65 72 20 75 74 69 6C 69 74 79 20 6F 72 69 |sfer utility ori|
00000040: 67 69 6E 61 6C 6C 79 0D 0A 77 72 69 74 74 65 6E |ginally..written|
00000050: 20 62 79 20 4D 69 63 68 61 65 6C 20 4D 63 4C 61 | by Michael McLa|
00000060: 77 68 6F 72 6E 2C 20 6D 6F 64 69 66 69 65 64 20 |whorn, modified |
00000070: 62 79 20 44 65 65 70 61 6B 20 4D 69 64 68 61 20 |by Deepak Midha |
00000080: 66 6F 72 20 32 20 31 35 34 31 73 20 61 6E 64 0D |for 2 1541s and.|
00000090: 0A 6E 6F 77 20 63 6F 6E 76 65 72 74 65 64 20 74 |.now converted t|
000000A0: 6F 20 72 75 6E 20 6F 6E 20 74 68 65 20 43 6F 6D |o run on the Com|
000000B0: 6D 6F 64 6F 72 65 20 31 32 38 20 69 6E 20 43 31 |modore 128 in C1|
000000C0: 32 38 20 6D 6F 64 65 2C 20 77 69 74 68 20 32 20 |28 mode, with 2 |
000000D0: 31 35 34 31 20 61 6E 64 2F 6F 72 0D 0A 31 35 37 |1541 and/or..157|
000000E0: 31 73 2E 0D 0A 0D 0A 54 68 65 20 70 72 6F 67 72 |1s.....The progr|
000000F0: 61 6D 20 69 73 20 77 72 69 74 74 65 6E 20 69 6E |am is written in|
00000100: 20 62 61 73 69 63 2C 20 62 75 74 20 75 73 65 73 | basic, but uses|
00000110: 20 61 62 6F 75 74 20 31 32 4B 20 6F 66 20 73 74 | about 12K of st|
00000120: 6F 72 61 67 65 20 61 74 20 74 68 65 20 74 6F 70 |orage at the top|
00000130: 20 6F 66 0D 0A 76 61 72 69 61 62 6C 65 20 73 74 | of..variable st|
00000140: 6F 72 61 67 65 20 69 6E 20 62 61 6E 6B 20 31 20 |orage in bank 1 |
00000150: 74 6F 20 73 74 6F 72 65 20 69 6E 66 6F 72 6D 61 |to store informa|
00000160: 74 69 6F 6E 20 61 62 6F 75 74 20 74 68 65 20 64 |tion about the d|
00000170: 69 73 6B 20 74 72 61 63 6B 2F 73 65 63 74 6F 72 |isk track/sector|
00000180: 0D 0A 73 63 68 65 6D 65 20 75 73 65 64 20 6F 6E |..scheme used on|
00000190: 20 74 68 65 20 43 50 2F 4D 20 64 69 73 6B 2E 20 | the CP/M disk. |
000001A0: 20 54 68 65 20 63 75 72 72 65 6E 74 20 76 65 72 | The current ver|
000001B0: 73 69 6F 6E 20 73 75 70 70 6F 72 74 73 20 4F 4E |sion supports ON|
000001C0: 4C 59 20 74 68 65 20 43 36 34 20 73 69 6E 67 6C |LY the C64 singl|
000001D0: 65 0D 0A 73 69 64 65 64 20 66 6F 72 6D 61 74 20 |e..sided format |
000001E0: 43 50 2F 4D 20 64 69 73 6B 20 66 6F 72 20 69 6E |CP/M disk for in|
000001F0: 70 75 74 20 61 6E 64 20 6F 75 74 70 75 74 2E 20 |put and output. |
00000200: 20 57 68 65 6E 20 64 61 74 61 20 62 65 63 6F 6D | When data becom|
00000210: 65 73 20 61 76 61 69 6C 61 62 6C 65 20 6F 6E 0D |es available on.|
00000220: 0A 74 68 65 20 74 72 61 63 6B 2F 73 65 63 74 6F |.the track/secto|
00000230: 72 20 73 6B 65 77 69 6E 67 20 73 63 68 65 6D 65 |r skewing scheme|
00000240: 20 66 6F 72 20 74 68 65 20 6F 74 68 65 72 20 43 | for the other C|
00000250: 6F 6D 6D 6F 64 6F 72 65 20 43 50 2F 4D 20 66 6F |ommodore CP/M fo|
00000260: 72 6D 61 74 73 2C 20 69 74 20 77 69 6C 6C 0D 0A |rmats, it will..|
00000270: 62 65 20 75 70 64 61 74 65 64 20 74 6F 20 69 6E |be updated to in|
00000280: 63 6C 75 64 65 20 74 68 65 6D 2C 20 69 66 20 74 |clude them, if t|
00000290: 68 65 20 75 74 69 6C 69 74 79 20 69 73 20 73 74 |he utility is st|
000002A0: 69 6C 6C 20 6E 65 65 64 65 64 2E 0D 0A 0D 0A 54 |ill needed.....T|
000002B0: 68 69 73 20 75 74 69 6C 69 74 79 20 73 68 6F 75 |his utility shou|
000002C0: 6C 64 20 62 65 20 75 73 65 64 20 69 6E 20 6C 69 |ld be used in li|
000002D0: 65 75 20 6F 66 20 43 31 32 38 20 6D 65 6D 6F 72 |eu of C128 memor|
000002E0: 79 20 74 72 61 6E 73 66 65 72 73 20 74 6F 20 43 |y transfers to C|
000002F0: 50 2F 4D 20 6D 6F 64 65 20 69 6E 0D 0A 74 68 65 |P/M mode in..the|
00000300: 20 66 6F 6C 6C 6F 77 69 6E 67 20 63 69 72 63 75 | following circu|
00000310: 6D 73 74 61 6E 63 65 73 3A 0D 0A 0D 0A 31 20 2D |mstances:....1 -|
00000320: 20 69 66 20 74 68 65 20 43 50 2F 4D 20 66 69 6C | if the CP/M fil|
00000330: 65 20 64 6F 77 6E 6C 6F 61 64 65 64 20 69 73 20 |e downloaded is |
00000340: 61 6E 20 41 53 43 49 49 20 74 65 78 74 2D 74 79 |an ASCII text-ty|
00000350: 70 65 20 66 69 6C 65 2E 0D 0A 20 0D 0A 32 20 2D |pe file... ..2 -|
00000360: 20 69 66 20 74 68 65 20 43 50 2F 4D 20 66 69 6C | if the CP/M fil|
00000370: 65 20 64 6F 77 6E 6C 6F 61 64 65 64 20 69 73 20 |e downloaded is |
00000380: 61 20 42 49 4E 41 52 59 20 66 69 6C 65 20 67 72 |a BINARY file gr|
00000390: 65 61 74 65 72 20 74 68 61 6E 20 35 30 6B 20 69 |eater than 50k i|
000003A0: 6E 20 73 69 7A 65 2E 0D 0A 0D 0A 54 68 65 20 70 |n size.....The p|
000003B0: 72 6F 67 72 61 6D 20 69 73 20 6D 65 6E 75 20 64 |rogram is menu d|
000003C0: 72 69 76 65 6E 20 61 66 74 65 72 20 74 68 65 20 |riven after the |
000003D0: 64 69 73 6B 73 20 61 72 65 20 69 6E 69 74 69 61 |disks are initia|
000003E0: 6C 69 7A 65 64 20 61 6E 64 20 66 61 69 72 6C 79 |lized and fairly|
000003F0: 20 73 65 6C 66 0D 0A 65 78 70 6C 61 6E 61 74 6F | self..explanato|
00000400: 72 79 2E 20 20 54 68 65 20 66 6F 6C 6C 6F 77 69 |ry. The followi|
00000410: 6E 67 20 75 73 61 67 65 20 6E 6F 74 65 73 20 6D |ng usage notes m|
00000420: 61 79 20 62 65 20 69 6D 70 6F 72 74 61 6E 74 20 |ay be important |
00000430: 69 66 20 73 6F 6D 65 20 71 75 65 73 74 69 6F 6E |if some question|
00000440: 73 0D 0A 63 6F 6D 65 20 75 70 20 77 68 69 6C 65 |s..come up while|
00000450: 20 75 73 69 6E 67 20 74 68 65 20 75 74 69 6C 69 | using the utili|
00000460: 74 79 2E 0D 0A 0D 0A 4E 6F 74 65 20 31 3A 20 41 |ty.....Note 1: A|
00000470: 74 20 70 72 65 73 65 6E 74 2C 20 74 68 69 73 20 |t present, this |
00000480: 75 74 69 6C 69 74 79 20 77 69 6C 6C 20 6F 6E 6C |utility will onl|
00000490: 79 20 72 65 61 64 2F 77 72 69 74 65 20 74 6F 20 |y read/write to |
000004A0: 61 20 43 50 2F 4D 20 64 69 73 6B 20 66 6F 72 6D |a CP/M disk form|
000004B0: 61 74 74 65 64 0D 0A 20 20 20 20 20 20 20 20 61 |atted.. a|
000004C0: 73 20 27 43 36 34 20 46 4F 52 4D 41 54 27 20 62 |s 'C64 FORMAT' b|
000004D0: 79 20 74 68 65 20 43 50 2F 4D 20 66 6F 72 6D 61 |y the CP/M forma|
000004E0: 74 20 75 74 69 6C 69 74 79 20 63 6F 6D 6D 61 6E |t utility comman|
000004F0: 64 2E 0D 0A 0D 0A 4E 6F 74 65 20 32 3A 20 4D 6F |d.....Note 2: Mo|
00000500: 73 74 20 41 53 43 49 49 20 66 69 6C 65 73 2C 20 |st ASCII files, |
00000510: 77 68 65 6E 20 64 6F 77 6E 6C 6F 61 64 65 64 20 |when downloaded |
00000520: 69 6E 20 43 36 34 20 6F 72 20 43 31 32 38 20 66 |in C64 or C128 f|
00000530: 6F 72 6D 61 74 2C 20 77 69 6C 6C 20 68 61 76 65 |ormat, will have|
00000540: 20 61 6C 6C 0D 0A 20 20 20 20 20 20 20 20 6C 69 | all.. li|
00000550: 6E 65 66 65 65 64 73 20 72 65 6D 6F 76 65 64 20 |nefeeds removed |
00000560: 61 66 74 65 72 20 63 61 72 72 69 61 67 65 20 72 |after carriage r|
00000570: 65 74 75 72 6E 73 2E 20 20 53 69 6E 63 65 20 43 |eturns. Since C|
00000580: 50 2F 4D 20 72 65 71 75 69 72 65 73 20 74 68 65 |P/M requires the|
00000590: 73 65 0D 0A 20 20 20 20 20 20 20 20 6C 69 6E 65 |se.. line|
000005A0: 66 65 65 64 73 20 66 6F 72 20 70 72 6F 70 65 72 |feeds for proper|
000005B0: 20 6F 75 74 70 75 74 20 74 6F 20 74 68 65 20 63 | output to the c|
000005C0: 6F 6E 73 6F 6C 65 20 6F 72 20 70 72 69 6E 74 65 |onsole or printe|
000005D0: 72 2C 20 79 6F 75 20 73 68 6F 75 6C 64 0D 0A 20 |r, you should.. |
000005E0: 20 20 20 20 20 20 20 61 6E 73 77 65 72 20 79 20 | answer y |
000005F0: 6F 72 20 74 68 65 20 70 72 6F 6D 70 74 20 77 68 |or the prompt wh|
00000600: 69 63 68 20 61 73 6B 20 69 66 20 79 6F 75 20 77 |ich ask if you w|
00000610: 69 73 68 20 74 6F 20 61 64 64 20 6C 66 20 61 66 |ish to add lf af|
00000620: 74 65 72 20 63 72 2E 0D 0A 20 20 20 20 20 20 20 |ter cr... |
00000630: 20 44 4F 20 4E 4F 54 20 61 6E 73 77 65 72 20 79 | DO NOT answer y|
00000640: 20 69 66 20 74 68 65 20 66 69 6C 65 20 69 73 20 | if the file is |
00000650: 64 6F 77 6E 6C 6F 61 64 65 64 20 61 73 20 61 20 |downloaded as a |
00000660: 42 49 4E 41 52 59 20 66 69 6C 65 2E 0D 0A 0D 0A |BINARY file.....|
00000670: 4E 6F 74 65 20 33 3A 20 59 6F 75 20 6D 61 79 20 |Note 3: You may |
00000680: 61 64 64 20 61 64 64 69 74 69 6F 6E 61 6C 20 43 |add additional C|
00000690: 50 2F 4D 20 66 69 6C 65 20 6E 61 6D 65 20 65 78 |P/M file name ex|
000006A0: 74 65 6E 73 69 6F 6E 73 20 66 6F 72 20 76 61 6C |tensions for val|
000006B0: 69 64 69 74 79 20 63 68 65 63 6B 69 6E 67 0D 0A |idity checking..|
000006C0: 20 20 20 20 20 20 20 20 62 79 20 63 68 61 6E 67 | by chang|
000006D0: 69 6E 67 20 74 68 65 20 64 61 74 61 20 73 74 61 |ing the data sta|
000006E0: 74 65 6D 65 6E 74 73 20 61 74 20 74 68 65 20 76 |tements at the v|
000006F0: 65 72 79 20 65 6E 64 20 6F 66 20 74 68 65 20 70 |ery end of the p|
00000700: 72 6F 67 72 61 6D 2E 0D 0A 0D 0A 4E 6F 74 65 20 |rogram.....Note |
00000710: 34 3A 20 59 6F 75 20 6D 61 79 20 75 73 65 20 65 |4: You may use e|
00000720: 69 74 68 65 72 20 31 35 34 31 20 28 6F 72 20 63 |ither 1541 (or c|
00000730: 6F 6D 70 61 74 61 62 6C 65 29 20 6F 72 20 31 35 |ompatable) or 15|
00000740: 37 31 20 64 72 69 76 65 73 20 66 6F 72 20 65 69 |71 drives for ei|
00000750: 74 68 65 72 20 64 69 73 6B 0D 0A 20 20 20 20 20 |ther disk.. |
00000760: 20 20 20 62 75 74 20 6F 6E 6C 79 20 74 68 65 20 | but only the |
00000770: 43 42 4D 20 64 69 73 6B 20 69 74 73 65 6C 66 20 |CBM disk itself |
00000780: 6D 61 79 20 62 65 20 64 6F 75 62 6C 65 20 73 69 |may be double si|
00000790: 64 65 64 20 66 6F 72 6D 61 74 74 65 64 20 69 6E |ded formatted in|
000007A0: 20 31 35 37 31 0D 0A 20 20 20 20 20 20 20 20 6D | 1571.. m|
000007B0: 6F 64 65 2E 0D 0A 0D 0A 4E 6F 74 65 20 35 3A 20 |ode.....Note 5: |
000007C0: 49 66 20 79 6F 75 20 62 72 69 6E 67 20 75 70 20 |If you bring up |
000007D0: 74 68 65 20 43 31 32 38 20 73 79 73 74 65 6D 20 |the C128 system |
000007E0: 69 6E 20 38 30 20 63 6F 6C 75 6D 6E 20 6D 6F 64 |in 80 column mod|
000007F0: 65 2C 20 74 68 65 20 70 72 6F 67 72 61 6D 20 72 |e, the program r|
00000800: 75 6E 73 20 69 6E 0D 0A 20 20 20 20 20 20 20 20 |uns in.. |
00000810: 66 61 73 74 20 6D 6F 64 65 2C 20 6F 74 68 65 72 |fast mode, other|
00000820: 77 69 73 65 20 74 68 65 20 70 72 6F 67 72 61 6D |wise the program|
00000830: 20 72 75 6E 73 20 69 6E 20 73 6C 6F 77 20 6D 6F | runs in slow mo|
00000840: 64 65 20 6F 6E 20 74 68 65 20 43 31 32 38 2E 0D |de on the C128..|
00000850: 0A 0D 0A 4E 6F 74 65 20 36 3A 20 44 6F 6E 27 74 |...Note 6: Don't|
00000860: 20 65 78 70 65 63 74 20 61 20 66 61 73 74 20 74 | expect a fast t|
00000870: 72 61 6E 73 66 65 72 20 6F 66 20 6C 61 72 67 65 |ransfer of large|
00000880: 20 66 69 6C 65 73 2E 20 20 41 20 67 6F 6F 64 20 | files. A good |
00000890: 65 73 74 69 6D 61 74 65 20 69 73 20 61 62 6F 75 |estimate is abou|
000008A0: 74 0D 0A 20 20 20 20 20 20 20 20 34 30 6B 2F 68 |t.. 40k/h|
000008B0: 72 20 69 6E 20 66 61 73 74 20 6D 6F 64 65 2E 0D |r in fast mode..|
000008C0: 0A 0D 0A 49 66 20 79 6F 75 20 68 61 76 65 20 61 |...If you have a|
000008D0: 64 64 69 74 69 6F 6E 61 6C 20 71 75 65 73 74 69 |dditional questi|
000008E0: 6F 6E 73 20 61 62 6F 75 74 20 75 73 69 6E 67 20 |ons about using |
000008F0: 74 68 69 73 20 75 74 69 6C 69 74 79 2C 20 79 6F |this utility, yo|
00000900: 75 20 6D 61 79 20 6C 65 61 76 65 20 6D 65 20 61 |u may leave me a|
00000910: 0D 0A 6D 65 73 73 61 67 65 20 6F 6E 20 50 43 53 |..message on PCS|
00000920: 2D 31 31 36 20 6F 72 20 50 43 53 2D 34 34 20 73 |-116 or PCS-44 s|
00000930: 69 67 73 20 6F 72 20 76 69 61 20 45 61 73 79 70 |igs or via Easyp|
00000940: 6C 65 78 2E 0D 0A 0D 0A 4D 69 63 68 61 65 6C 20 |lex.....Michael |
00000950: 4C 2E 20 4D 63 4C 61 77 68 6F 72 6E 0D 0A 37 31 |L. McLawhorn..71|
00000960: 35 33 35 2C 20 34 30 33 0D 0A 1A 1A 1A 1A 1A 1A |535, 403........|
00000970: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A |................|
CPM271 IS AN UPDATED VERSION OF A CP/M F
ILE TRANSFER UTILITY ORIGINALLY..WRITTEN
BY MICHAEL MCLAWHORN, MODIFIED BY DEEPA
K MIDHA FOR 2 1541S AND..NOW CONVERTED T
O RUN ON THE COMMODORE 128 IN C128 MODE,
WITH 2 1541 AND/OR..1571S.....THE PROGR
AM IS WRITTEN IN BASIC, BUT USES ABOUT 1
2K OF STORAGE AT THE TOP OF..VARIABLE ST
ORAGE IN BANK 1 TO STORE INFORMATION ABO
UT THE DISK TRACK/SECTOR..SCHEME USED ON
THE CP/M DISK. THE CURRENT VERSION SUP
PORTS ONLY THE C64 SINGLE..SIDED FORMAT
CP/M DISK FOR INPUT AND OUTPUT. WHEN DA
TA BECOMES AVAILABLE ON..THE TRACK/SECTO
R SKEWING SCHEME FOR THE OTHER COMMODORE
CP/M FORMATS, IT WILL..BE UPDATED TO IN
CLUDE THEM, IF THE UTILITY IS STILL NEED
ED.....THIS UTILITY SHOULD BE USED IN LI
EU OF C128 MEMORY TRANSFERS TO CP/M MODE
IN..THE FOLLOWING CIRCUMSTANCES:....1 -
IF THE CP/M FILE DOWNLOADED IS AN ASCII
TEXT-TYPE FILE... ..2 - IF THE CP/M FIL
E DOWNLOADED IS A BINARY FILE GREATER TH
AN 50K IN SIZE.....THE PROGRAM IS MENU D
RIVEN AFTER THE DISKS ARE INITIALIZED AN
D FAIRLY SELF..EXPLANATORY. THE FOLLOWI
NG USAGE NOTES MAY BE IMPORTANT IF SOME
QUESTIONS..COME UP WHILE USING THE UTILI
TY.....NOTE 1: AT PRESENT, THIS UTILITY
WILL ONLY READ/WRITE TO A CP/M DISK FORM
ATTED.. AS 'C64 FORMAT' BY THE CP
/M FORMAT UTILITY COMMAND.....NOTE 2: MO
ST ASCII FILES, WHEN DOWNLOADED IN C64 O
R C128 FORMAT, WILL HAVE ALL.. LI
NEFEEDS REMOVED AFTER CARRIAGE RETURNS.
SINCE CP/M REQUIRES THESE.. LINE
FEEDS FOR PROPER OUTPUT TO THE CONSOLE O
R PRINTER, YOU SHOULD.. ANSWER Y
OR THE PROMPT WHICH ASK IF YOU WISH TO A
DD LF AFTER CR... DO NOT ANSWER Y
IF THE FILE IS DOWNLOADED AS A BINARY F
ILE.....NOTE 3: YOU MAY ADD ADDITIONAL C
P/M FILE NAME EXTENSIONS FOR VALIDITY CH
ECKING.. BY CHANGING THE DATA STA
TEMENTS AT THE VERY END OF THE PROGRAM..
...NOTE 4: YOU MAY USE EITHER 1541 (OR C
OMPATABLE) OR 1571 DRIVES FOR EITHER DIS
K.. BUT ONLY THE CBM DISK ITSELF
MAY BE DOUBLE SIDED FORMATTED IN 1571..
MODE.....NOTE 5: IF YOU BRING UP
THE C128 SYSTEM IN 80 COLUMN MODE, THE P
ROGRAM RUNS IN.. FAST MODE, OTHER
WISE THE PROGRAM RUNS IN SLOW MODE ON TH
E C128.....NOTE 6: DON'T EXPECT A FAST T
RANSFER OF LARGE FILES. A GOOD ESTIMATE
IS ABOUT.. 40K/HR IN FAST MODE..
...IF YOU HAVE ADDITIONAL QUESTIONS ABOU
T USING THIS UTILITY, YOU MAY LEAVE ME A
..MESSAGE ON PCS-116 OR PCS-44 SIGS OR V
IA EASYPLEX.....MICHAEL L. MCLAWHORN..71
535, 403........................
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL