changeset 1556:fc61a936d77d

Added ccdisk patch
author boisy
date Thu, 13 May 2004 13:15:34 +0000
parents 12fd53e49347
children 11e689c23028
files level1/coco/diskfix.pat
diffstat 1 files changed, 124 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/level1/coco/diskfix.pat	Thu May 13 13:15:34 2004 +0000
@@ -0,0 +1,124 @@
+* Patches Level I Ver. 2
+* CCDisk to read, write
+* and format both single
+* and double sided disks
+* Rainbow, Oct '88, p 157
+t
+tmode .1 -pause
+save /d0/ccdisk ccdisk
+debug
+lccdisk
+. .+7
+=80
+$load ccdisk
+lccdisk
+. .+3
+=82
+lccdisk
+. .+1c9
+=16
+=01
+=84
+lccdisk
+. .+1f8
+=5f
+=17
+=01
+=76
+lccdisk
+. .+2ae
+=e6
+=c9
+=00
+=a9
+=16
+=00
+=8c
+=12
+=23
+=02
+lccdisk
+. .+2dd
+=40
+=12
+=12
+=12
+=17
+=00
+=90
+. .+3
+=5f
+=16
+=00
+=81
+lccdisk
+. .+341
+=a6
+=07
+=85
+=01
+=26
+=02
+=ca
+=40
+=a6
+=09
+=81
+=15
+=16
+=ff
+=66
+=a6
+=88
+=10
+=85
+=01
+=27
+=0e
+=64
+=e4
+=24
+=0a
+=a6
+=c9
+=00
+=a9
+=8a
+=40
+=a7
+=c9
+=00
+=a9
+=35
+=02
+=81
+=15
+=16
+=fe
+=61
+=ea
+=a8
+=22
+=16
+=ff
+=01
+=cb
+=10
+=ea
+=a8
+=22
+=34
+=02
+=17
+=fe
+=f7
+=35
+=02
+=39
+q
+del /d0/ccdisk
+save /d0/temp ccdisk
+verify u</d0/temp >/d0/ccdisk
+del temp
+tmode .1 pause
+-t