Members/kono/nitros9-code: level1/cmds/os9gen.asm annotate

annotate level1/cmds/os9gen.asm @ 917:06b4b630cbaf

Added comments

author	boisy
date	Sun, 19 Jan 2003 06:02:43 +0000
parents	38fac79788e3
children	617c1b90e623

rev	line source
0 6641a883d6b0 Initial revision boisy parents: diff changeset	1 ********************************************************************
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	2 * OS9Gen - OS-9 bootfile generator
0 6641a883d6b0 Initial revision boisy parents: diff changeset	3 *
6641a883d6b0 Initial revision boisy parents: diff changeset	4 * $Id$
6641a883d6b0 Initial revision boisy parents: diff changeset	5 *
6641a883d6b0 Initial revision boisy parents: diff changeset	6 * Ed. Comments Who YY/MM/DD
6641a883d6b0 Initial revision boisy parents: diff changeset	7 * ------------------------------------------------------------------
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	8 * 9 From OS-9 Level Two Vr. 2.00.01
0 6641a883d6b0 Initial revision boisy parents: diff changeset	9
6641a883d6b0 Initial revision boisy parents: diff changeset	10 nam OS9gen
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	11 ttl OS-9 bootfile generator
0 6641a883d6b0 Initial revision boisy parents: diff changeset	12
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	13 * Disassembled 02/07/06 13:11:11 by Disasm v1.6 (C) 1988 by RML
0 6641a883d6b0 Initial revision boisy parents: diff changeset	14
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	15 BTrack set 34
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	16
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	17 IFP1
122 b381d07d9b78 Text strings instead of FCB roug parents: 0 diff changeset	18 use defsfile
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	19 use rbfdefs
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	20 ENDC
200 e9ce43cc215e Made major changes to headers for consistency and identification boisy parents: 172 diff changeset	21
0 6641a883d6b0 Initial revision boisy parents: diff changeset	22 tylg set Prgrm+Objct
6641a883d6b0 Initial revision boisy parents: diff changeset	23 atrv set ReEnt+rev
6641a883d6b0 Initial revision boisy parents: diff changeset	24 rev set $01
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	25 edition set 9
262 dd9e2f44b5f0 Incorporated bug fix from January 1987 Rainbow, pg 203 boisy parents: 213 diff changeset	26
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	27 os9l1start equ $EF00
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	28 os9l1size equ $0F80
200 e9ce43cc215e Made major changes to headers for consistency and identification boisy parents: 172 diff changeset	29
0 6641a883d6b0 Initial revision boisy parents: diff changeset	30 mod eom,name,tylg,atrv,start,size
200 e9ce43cc215e Made major changes to headers for consistency and identification boisy parents: 172 diff changeset	31
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	32 org 0
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	33 statptr rmb 2
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	34 bfpath rmb 1
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	35 devpath rmb 1
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	36 parmpath rmb 1
0 6641a883d6b0 Initial revision boisy parents: diff changeset	37 u0005 rmb 1
6641a883d6b0 Initial revision boisy parents: diff changeset	38 u0006 rmb 2
6641a883d6b0 Initial revision boisy parents: diff changeset	39 u0008 rmb 1
6641a883d6b0 Initial revision boisy parents: diff changeset	40 u0009 rmb 2
6641a883d6b0 Initial revision boisy parents: diff changeset	41 u000B rmb 2
6641a883d6b0 Initial revision boisy parents: diff changeset	42 u000D rmb 2
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	43 u000F rmb 2
1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	44 u0011 rmb 2
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	45 u0013 rmb 2
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	46 u0015 rmb 2
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	47 u0017 rmb 7
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	48 devopts rmb 20
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	49 u0032 rmb 2
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	50 u0034 rmb 10
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	51 u003E rmb 2
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	52 sngldrv rmb 1
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	53 u0041 rmb 32
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	54 lsn0 rmb 16
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	55 u0071 rmb 10
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	56 u007B rmb 2
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	57 u007D rmb 1
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	58 sectbuff rmb 1024
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	59 u047E rmb 16
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	60 u048E rmb 1
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	61 u048F rmb 7
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	62 u0496 rmb 7018
0 6641a883d6b0 Initial revision boisy parents: diff changeset	63 size equ .
200 e9ce43cc215e Made major changes to headers for consistency and identification boisy parents: 172 diff changeset	64
e9ce43cc215e Made major changes to headers for consistency and identification boisy parents: 172 diff changeset	65 name fcs /OS9gen/
e9ce43cc215e Made major changes to headers for consistency and identification boisy parents: 172 diff changeset	66 fcb edition
e9ce43cc215e Made major changes to headers for consistency and identification boisy parents: 172 diff changeset	67
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	68 Help fcb C$LF
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	69 fcc "Use (CAUTION): OS9GEN </devname> [-s]"
1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	70 fcb C$LF
1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	71 fcc " ..reads (std input) pathnames until EOF,"
1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	72 fcb C$LF
1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	73 fcc " merging paths into New OS9Boot file."
1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	74 fcb C$LF
1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	75 fcc " -s = single drive operation"
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	76 fcb C$LF,C$CR
122 b381d07d9b78 Text strings instead of FCB roug parents: 0 diff changeset	77 fcc "Can't find: "
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	78 ErrWrit fcb C$LF
122 b381d07d9b78 Text strings instead of FCB roug parents: 0 diff changeset	79 fcc "Error writing kernel track"
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	80 fcb C$CR
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	81 HDGen fcb C$LF
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	82 fcc "Error - cannot gen to hard disk"
1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	83 fcb C$CR
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	84 IFGT Level-1
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	85 CantRel fcb C$LF
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	86 fcc "Error - can't link to Rel module"
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	87 fcb C$CR
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	88 ENDC
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	89 CarRet fcb C$CR
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	90 TheBell fcb C$BELL
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	91 TWarn fcb C$LF
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	92 fcc "Warning - file(s) present"
1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	93 fcb C$LF
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	94 fcc "on track "
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	95 IFEQ BTrack-34
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	96 fcc "34"
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	97 ELSE
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	98 fcc "??"
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	99 ENDC
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	100 fcc " - this track"
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	101 fcb C$LF
1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	102 fcc "not rewritten."
1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	103 fcb C$CR
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	104 BootFrag fcb C$LF
122 b381d07d9b78 Text strings instead of FCB roug parents: 0 diff changeset	105 fcc "Error - OS9boot file fragmented"
b381d07d9b78 Text strings instead of FCB roug parents: 0 diff changeset	106 fcb C$CR
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	107 Source fcc "Ready SOURCE, hit C to continue: "
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	108 SourceL equ *-Source
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	109 Destin fcc "Ready DESTINATION, hit C to continue: "
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	110 DestinL equ *-Destin
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	111 Rename fcc "RENAME "
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	112 TempBoot fcc "TempBoot "
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	113 fcb $FF
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	114 OS9Boot fcc "OS9Boot"
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	115 fcb C$CR
1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	116 fcb $FF
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	117 IFGT Level-1
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	118 TheRel fcc "Rel"
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	119 fcb $FF
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	120 ENDC
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	121
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	122 start clrb
0 6641a883d6b0 Initial revision boisy parents: diff changeset	123 stb <u0005
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	124 stb <sngldrv assume multi-drive
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	125 stu <statptr
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	126 leas >u047E,u
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	127 pshs u
1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	128 tfr y,d
1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	129 subd ,s++
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	130 subd #$047E
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	131 clrb
1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	132 std <u0011
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	133 lda #PDELIM
0 6641a883d6b0 Initial revision boisy parents: diff changeset	134 cmpa ,x
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	135 lbne BadName
0 6641a883d6b0 Initial revision boisy parents: diff changeset	136 os9 F$PrsNam
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	137 lbcs ShowHelp
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	138 lda #PDELIM
0 6641a883d6b0 Initial revision boisy parents: diff changeset	139 cmpa ,y
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	140 lbeq BadName
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	141 pshs b,a
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	142 L0216 lda ,y+
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	143 cmpa #'-
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	144 beq L0222
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	145 cmpa #C$CR
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	146 beq L0234
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	147 bra L0216
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	148 L0222 ldd ,y+
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	149 eora #'S
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	150 anda #$DF
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	151 lbne SoftExit
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	152 cmpb #$30
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	153 lbcc SoftExit
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	154 inc <sngldrv set single drive flag
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	155 L0234 puls b,a
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	156 leay <u0041,u
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	157 L0239 sta ,y+
0 6641a883d6b0 Initial revision boisy parents: diff changeset	158 lda ,x+
6641a883d6b0 Initial revision boisy parents: diff changeset	159 decb
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	160 bpl L0239
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	161 sty <u003E
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	162 lda #PENTIR
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	163 ldb #C$SPAC
0 6641a883d6b0 Initial revision boisy parents: diff changeset	164 std ,y++
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	165 lbsr GetDest
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	166 leax <u0041,u
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	167 lda #UPDAT.
0 6641a883d6b0 Initial revision boisy parents: diff changeset	168 os9 I$Open
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	169 sta <devpath
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	170 lbcs ShowHelp
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	171 leax <devopts,u
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	172 ldb #SS.Opt
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	173 os9 I$GetStt
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	174 lbcs Bye
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	175 leax <devopts,u
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	176 lda <(PD.TYP-PD.OPT)+devopts,u get type byte
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	177 bpl L0276 branch if not hard drive
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	178 clrb
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	179 leax >HDGen,pcr else tell user can't do hard drive
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	180 lbra WritExit
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	181 L0276 ldx <u003E
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	182 leay >TempBoot,pcr
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	183 lda #PDELIM
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	184 L027E sta ,x+
0 6641a883d6b0 Initial revision boisy parents: diff changeset	185 lda ,y+
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	186 bpl L027E
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	187 * Copy OS9Boot string to buffer
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	188 leay >OS9Boot,pcr
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	189 L0288 lda ,y+
0 6641a883d6b0 Initial revision boisy parents: diff changeset	190 sta ,x+
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	191 bpl L0288
0 6641a883d6b0 Initial revision boisy parents: diff changeset	192 tfr x,d
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	193 leax <u0041,u
0 6641a883d6b0 Initial revision boisy parents: diff changeset	194 pshs x
6641a883d6b0 Initial revision boisy parents: diff changeset	195 subd ,s++
6641a883d6b0 Initial revision boisy parents: diff changeset	196 std <u000D
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	197 lda #WRITE.
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	198 ldb #READ.+WRITE.
0 6641a883d6b0 Initial revision boisy parents: diff changeset	199 os9 I$Create
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	200 sta <bfpath
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	201 lbcs Bye
0 6641a883d6b0 Initial revision boisy parents: diff changeset	202 ldx #$0000
6641a883d6b0 Initial revision boisy parents: diff changeset	203 stx <u0006
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	204 ldu #$3000
169 2748e53f293c Changed SS.SIZ to SS.Size boisy parents: 168 diff changeset	205 ldb #SS.Size
0 6641a883d6b0 Initial revision boisy parents: diff changeset	206 os9 I$SetStt
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	207 lbcs Bye
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	208 ldu <statptr
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	209 bsr L032F
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	210 L02BB leax <sectbuff,u
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	211 ldy #256
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	212 clra standard input
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	213 os9 I$ReadLn read line
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	214 bcs L0312 branch if error
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	215 lda ,x else get byte in A
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	216 ldb #E$EOF and EOF error in B
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	217 cmpa #C$CR CR?
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	218 beq L0312 branch if so
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	219 cmpa #'* comment?
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	220 beq L02BB continue reading if so
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	221 lda #READ. else use read perms
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	222 os9 I$Open open file at X (line we read)
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	223 bcs L031A branch if error
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	224 sta <parmpath save path
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	225 L02DD ldx <u0015
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	226 ldd <u0011
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	227 subd <u0013
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	228 tfr d,y
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	229 lda <parmpath
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	230 os9 I$Read
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	231 bcc L02F9
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	232 cmpb #E$EOF
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	233 lbne Bye
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	234 os9 I$Close
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	235 clr <parmpath
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	236 bra L02BB
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	237 L02F9 tfr y,d
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	238 leax d,x
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	239 stx <u0015
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	240 addd <u0013
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	241 std <u0013
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	242 cmpd <u0011
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	243 bcs L030C
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	244 bsr L032B
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	245 bcs L0328
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	246 L030C tst <parmpath
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	247 bne L02DD
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	248 bra L02BB
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	249 L0312 cmpb #E$EOF end of file?
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	250 bne L0328 branch if not
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	251 bsr L033D
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	252 bra L0377
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	253 L031A pshs b
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	254 leax <sectbuff,u
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	255 ldy #256
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	256 lda #$02 standard error
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	257 os9 I$WritLn write
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	258 L0328 lbra Bye
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	259 L032B bsr L033D
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	260 bcs L033C
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	261 L032F lbsr GetSrc
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	262 clra
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	263 clrb
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	264 std <u0013
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	265 leax >u047E,u
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	266 stx <u0015
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	267 L033C rts
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	268 L033D lbsr GetDest
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	269 ldd <u0013
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	270 beq L033C
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	271 tst <sngldrv single drive?
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	272 beq L0361 branch if not
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	273 lda <devpath
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	274 ldx #$0000
1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	275 ldu #$0000
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	276 os9 I$Seek seek to LSN0
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	277 ldu <statptr +BGP+ added
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	278 bcs L033C
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	279 leax <sectbuff,u
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	280 ldy #256
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	281 os9 I$Read read LSN0
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	282 bcs L033C
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	283 L0361 lda <bfpath
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	284 leax >u047E,u
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	285 ldy <u0013
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	286 os9 I$Write
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	287 bcs L033C
0 6641a883d6b0 Initial revision boisy parents: diff changeset	288 tfr y,d
6641a883d6b0 Initial revision boisy parents: diff changeset	289 addd <u0006
6641a883d6b0 Initial revision boisy parents: diff changeset	290 std <u0006
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	291 clrb
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	292 rts
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	293 L0377 leax <devopts,u
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	294 ldb #SS.Opt
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	295 lda <bfpath
0 6641a883d6b0 Initial revision boisy parents: diff changeset	296 os9 I$GetStt
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	297 lbcs Bye
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	298 lda <bfpath
0 6641a883d6b0 Initial revision boisy parents: diff changeset	299 ldx #$0000
6641a883d6b0 Initial revision boisy parents: diff changeset	300 ldu <u0006
169 2748e53f293c Changed SS.SIZ to SS.Size boisy parents: 168 diff changeset	301 ldb #SS.Size
0 6641a883d6b0 Initial revision boisy parents: diff changeset	302 os9 I$SetStt
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	303 lbcs Bye
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	304 ldu <statptr
0 6641a883d6b0 Initial revision boisy parents: diff changeset	305 os9 I$Close
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	306 lbcs ShowHelp
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	307 ldx <u0032,u
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	308 lda <u0034,u
0 6641a883d6b0 Initial revision boisy parents: diff changeset	309 clrb
6641a883d6b0 Initial revision boisy parents: diff changeset	310 tfr d,u
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	311 lda <devpath
0 6641a883d6b0 Initial revision boisy parents: diff changeset	312 os9 I$Seek
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	313 ldu <statptr
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	314 lbcs Bye
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	315 leax >u047E,u
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	316 ldy #256
0 6641a883d6b0 Initial revision boisy parents: diff changeset	317 os9 I$Read
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	318 lbcs Bye
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	319 ldd >u047E+(FD.SEG+FDSL.S+FDSL.B),u
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	320 lbne ItsFragd if not zero, file is fragmented
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	321 lda <devpath
0 6641a883d6b0 Initial revision boisy parents: diff changeset	322 ldx #$0000
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	323 ldu #DD.BT
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	324 os9 I$Seek seek to DD.BT
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	325 ldu <statptr
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	326 lbcs Bye
0 6641a883d6b0 Initial revision boisy parents: diff changeset	327 leax u0008,u
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	328 ldy #DD.DAT-DD.BT
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	329 os9 I$Read read bootstrap sector and bootfile size
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	330 lbcs Bye
0 6641a883d6b0 Initial revision boisy parents: diff changeset	331 ldd <u000B
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	332 beq L040D
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	333 ldx <u003E
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	334 leay >OS9Boot,pcr
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	335 lda #PDELIM
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	336 L03F3 sta ,x+
0 6641a883d6b0 Initial revision boisy parents: diff changeset	337 lda ,y+
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	338 bpl L03F3
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	339 leax <u0041,u
0 6641a883d6b0 Initial revision boisy parents: diff changeset	340 os9 I$Delete
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	341 ldx <u003E
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	342 leay >TempBoot,pcr
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	343 lda #PDELIM
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	344 L0407 sta ,x+
0 6641a883d6b0 Initial revision boisy parents: diff changeset	345 lda ,y+
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	346 bpl L0407
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	347 L040D tst <sngldrv
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	348 beq L042E
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	349 clra
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	350 leax >Rename,pcr
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	351 os9 F$Link
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	352 bcc L0428
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	353 lbsr GetSrc
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	354 os9 F$Load
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	355 lbcs Bye
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	356 lbsr GetDest
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	357 L0428 tfr u,d
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	358 ldu <statptr
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	359 std u000F,u
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	360 L042E lda #$01
0 6641a883d6b0 Initial revision boisy parents: diff changeset	361 clrb
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	362 leax >Rename,pcr
0 6641a883d6b0 Initial revision boisy parents: diff changeset	363 ldy <u000D
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	364 leau <u0041,u
0 6641a883d6b0 Initial revision boisy parents: diff changeset	365 os9 F$Fork
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	366 lbcs Bye
0 6641a883d6b0 Initial revision boisy parents: diff changeset	367 os9 F$Wait
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	368 lbcs Bye
0 6641a883d6b0 Initial revision boisy parents: diff changeset	369 tstb
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	370 lbne Bye
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	371 tst <sngldrv
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	372 beq L045F
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	373 ldu <statptr
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	374 ldd u000F,u
1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	375 tfr d,u
1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	376 os9 F$UnLink
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	377 lbcs Bye
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	378 L045F ldu <statptr
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	379 ldb >u048E,u
0 6641a883d6b0 Initial revision boisy parents: diff changeset	380 stb <u0008
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	381 ldd >u048F,u
0 6641a883d6b0 Initial revision boisy parents: diff changeset	382 std <u0009
6641a883d6b0 Initial revision boisy parents: diff changeset	383 ldd <u0006
6641a883d6b0 Initial revision boisy parents: diff changeset	384 std <u000B
6641a883d6b0 Initial revision boisy parents: diff changeset	385 ldx #$0000
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	386 ldu #DD.BT
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	387 lda <devpath
0 6641a883d6b0 Initial revision boisy parents: diff changeset	388 os9 I$Seek
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	389 ldu <statptr
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	390 lbcs Bye
0 6641a883d6b0 Initial revision boisy parents: diff changeset	391 leax u0008,u
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	392 ldy #DD.DAT-DD.BT
0 6641a883d6b0 Initial revision boisy parents: diff changeset	393 os9 I$Write
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	394 lbcs Bye
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	395 pshs u
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	396 clra
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	397 clrb
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	398 tfr d,x
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	399 tfr d,u
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	400 lda <devpath
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	401 os9 I$Seek seek to LSN0
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	402 lbcs Bye
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	403 puls u
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	404 leax <lsn0,u
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	405 ldy #DD.DAT
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	406 lda <devpath
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	407 os9 I$Read read first part of LSN0
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	408 lbcs Bye
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	409 lda #$00
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	410 ldb #$01
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	411 lbsr Seek2LSN
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	412 leax <sectbuff,u
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	413 ldy <lsn0+DD.MAP,u get number of bytes in device's bitmap
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	414 lda <devpath
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	415 os9 I$Read
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	416 lbcs Bye
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	417 lda #BTrack boot track
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	418 clrb sector 1
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	419 ldy #$0004 four bits
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	420 lbsr ABMClear
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	421 bcc L0520
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	422 lda #BTrack boot track
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	423 ldb #$00 sector 1
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	424 lbsr Seek2LSN seek to it
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	425 leax <u0017,u
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	426 ldy #$0007
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	427 lda <devpath
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	428 os9 I$Read read first seven bytes of boot track
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	429 lbcs Bye
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	430 leax <u0017,u
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	431 ldd ,x
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	432 cmpa #'O
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	433 lbne WarnUser
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	434 cmpb #'S
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	435 lbne WarnUser
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	436 lda $04,x
1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	437 cmpa #$12
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	438 beq L0512
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	439 lda #BTrack boot track
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	440 ldb #15 sector 16
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	441 ldy #$0003 sectors 16-18
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	442 lbsr ABMClear
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	443 lbcs WarnUser
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	444 L0512 clra
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	445 ldb <lsn0+DD.TKS,u get number of tracks in D
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	446 tfr d,y
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	447 lda #BTrack boot track
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	448 clrb sector 1
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	449 lbsr ABMSet
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	450 bra L0531
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	451 L0520 lda #BTrack boot track
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	452 ldb #$04 sector 5
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	453 ldy #$000E sectors 5-18
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	454 lbsr ABMClear
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	455 lbcs WarnUser
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	456 bra L0512
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	457
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	458 L0531 clra
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	459 ldb #$01
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	460 lbsr Seek2LSN
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	461 leax <sectbuff,u
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	462 ldy <lsn0+DD.MAP,u get number of bytes in device's bitmap
38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	463 lda <devpath
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	464 os9 I$Write write out the bitmap
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	465 lbcs Bye
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	466
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	467 IFGT Level-1
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	468 * OS-9 Level Two: Link to Rel, which brings in boot code
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	469 pshs u
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	470 lda #Systm+Objct
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	471 leax >TheRel,pcr
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	472 os9 F$Link
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	473 lbcs L0724
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	474 tfr u,d
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	475 puls u
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	476 subd #$0006
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	477 std <u007B,u
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	478 lda #$E0
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	479 anda <u007B,u
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	480 ora #$1E
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	481 ldb #$FF
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	482 subd <u007B,u
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	483 addd #$0001
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	484 tfr d,y
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	485 lda #BTrack boot track
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	486 ldb #$00 sector 1
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	487 lbsr Seek2LSN
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	488 lda <devpath
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	489 ldx <u007B,u
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	490
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	491 ELSE
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	492
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	493 * OS-9 Level One: Write out boot track data
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	494 lda #BTrack boot track
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	495 ldb #$00 sector 1
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	496 lbsr Seek2LSN
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	497 lda <devpath
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	498 ldx #os9l1start
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	499 ldy #os9l1size
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	500
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	501 ENDC
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	502
0 6641a883d6b0 Initial revision boisy parents: diff changeset	503 os9 I$Write
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	504 lbcs WriteErr
0 6641a883d6b0 Initial revision boisy parents: diff changeset	505 os9 I$Close
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	506 lbcs Bye
0 6641a883d6b0 Initial revision boisy parents: diff changeset	507 clrb
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	508 lbra Bye
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	509
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	510 * Convert Track/Sector to absolute LSN
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	511 * Entry: A = track, B = sector
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	512 * Returns in D
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	513 AbsLSN pshs b
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	514 ldb <lsn0+DD.FMT,u get format byte
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	515 andb #FMT.SIDE test sides bit
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	516 beq L059C branch if 1
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	517 ldb #$02 else 2 sides
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	518 bra L059E
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	519 L059C ldb #$01 1 side
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	520 L059E mul multiply sides times track
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	521 lda <lsn0+DD.TKS,u get device tracks
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	522 mul multiply by (sides * track)
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	523 addb ,s add in sector
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	524 adca #$00
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	525 leas $01,s
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	526 rts
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	527
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	528 * Bitmap conversion from bit to byte
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	529 * Entry: X = pointer to bitmap
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	530 * D = bit
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	531 * Exit: A = bit mask
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	532 * X = pointer to byte represented by bit D
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	533 L05AA pshs y,b
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	534 lsra divide D by 8
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	535 rorb
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	536 lsra
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	537 rorb
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	538 lsra
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	539 rorb
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	540 leax d,x
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	541 puls b
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	542 leay <BitMask,pcr
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	543 andb #$07
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	544 lda b,y
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	545 puls pc,y
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	546
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	547 BitMask fcb $80,$40,$20,$10,$08,$04,$02,$01
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	548
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	549 * Clear bits in the allocation bitmap
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	550 * Entry: A = Track, B = Sector, Y = number of bits to clear
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	551 ABMClear pshs x,y,b,a
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	552 bsr AbsLSN convert A:B to LSN
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	553 leax <sectbuff,u
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	554 bsr L05AA
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	555 sta ,-s
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	556 bmi L05EA
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	557 L05D3 lda ,x get byte in bitmap
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	558 sta <u007D,u
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	559 L05D9 anda ,s and with byte on stack
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	560 bne L0616
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	561 leay -1,y
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	562 beq L0612
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	563 lda <u007D,u
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	564 lsr ,s
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	565 bcc L05D9
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	566 leax $01,x
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	567 L05EA lda #$FF
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	568 sta ,s
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	569 bra L05FA
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	570 L05F0 lda ,x
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	571 anda ,s
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	572 bne L0616
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	573 leax $01,x
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	574 leay -$08,y
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	575 L05FA cmpy #$0008
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	576 bhi L05F0
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	577 beq L060C
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	578 lda ,s
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	579 L0604 lsra
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	580 leay -$01,y
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	581 bne L0604
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	582 coma
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	583 sta ,s
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	584 L060C lda ,x
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	585 anda ,s
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	586 bne L0616
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	587 L0612 andcc #^Carry
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	588 bra L0618
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	589 L0616 orcc #Carry
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	590 L0618 leas $01,s
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	591 puls pc,y,x,b,a
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	592
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	593 * Set bits in the allocation bitmap
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	594 * Entry: A = Track, B = Sector, Y = number of bits to set
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	595 ABMSet pshs y,x,b,a
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	596 lbsr AbsLSN
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	597 leax <sectbuff,u
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	598 bsr L05AA
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	599 sta ,-s
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	600 bmi L063A
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	601 lda ,x
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	602 L062C ora ,s
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	603 leay -$01,y
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	604 beq L0658
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	605 lsr ,s
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	606 bcc L062C
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	607 sta ,x
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	608 leax $01,x
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	609 L063A lda #$FF
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	610 bra L0644
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	611 L063E sta ,x
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	612 leax $01,x
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	613 leay -$08,y
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	614 L0644 cmpy #$0008
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	615 bhi L063E
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	616 beq L0658
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	617 L064C lsra
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	618 leay -$01,y
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	619 bne L064C
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	620 coma
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	621 sta ,s
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	622 lda ,x
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	623 ora ,s
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	624 L0658 sta ,x
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	625 leas $01,s
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	626 puls pc,y,x,b,a
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	627
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	628 Seek2LSN pshs u,y,x,b,a
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	629 lbsr AbsLSN
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	630 pshs a
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	631 tfr b,a
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	632 clrb
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	633 tfr d,u
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	634 puls b
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	635 clra
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	636 tfr d,x
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	637 lda <devpath
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	638 os9 I$Seek
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	639 lbcs WriteErr
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	640 puls pc,u,y,x,b,a
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	641
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	642 clra
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	643 clrb
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	644 tfr d,x
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	645 tfr d,u
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	646 lda <devpath
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	647 os9 I$Seek
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	648 leax <lsn0,u
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	649 ldy #DD.DAT
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	650 lda <devpath
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	651 os9 I$Write
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	652 bcs Bye
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	653 rts
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	654
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	655 * Routine to write various error messages then exiting
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	656 WriteErr leax >ErrWrit,pcr
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	657 bra WritExit
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	658 BadName ldb #E$BPNam
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	659 ShowHelp leax >Help,pcr
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	660 WritExit pshs b
0 6641a883d6b0 Initial revision boisy parents: diff changeset	661 lda #$02
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	662 ldy #256
0 6641a883d6b0 Initial revision boisy parents: diff changeset	663 os9 I$WritLn
6641a883d6b0 Initial revision boisy parents: diff changeset	664 puls b
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	665 Bye os9 F$Exit
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	666
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	667 * Source/Destination Disk Switch Routine
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	668 GetSrc pshs u,y,x,b,a
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	669 clra
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	670 bra TstSingl
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	671 GetDest pshs u,y,x,b,a
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	672 lda #$01
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	673 TstSingl tst <sngldrv
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	674 beq L06FD
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	675 AskUser pshs a
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	676 tsta
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	677 bne Ask4Dst
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	678 Ask4Src leax >Source,pcr
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	679 ldy #SourceL
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	680 bra L06D4
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	681 Ask4Dst leax >Destin,pcr
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	682 ldy #DestinL
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	683 L06D4 bsr DoWrite
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	684 leax ,-s
1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	685 ldy #$0001
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	686 lda #$02 read from stderr
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	687 os9 I$Read read one char
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	688 lda ,s+
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	689 eora #'C
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	690 anda #$DF
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	691 beq L06F9 branch if it's a C
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	692 leax >TheBell,pcr
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	693 ldy #$0001
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	694 bsr DoWrite else ring the error bell
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	695 bsr WriteCR
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	696 puls a
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	697 bne AskUser
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	698 L06F9 bsr WriteCR
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	699 puls a
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	700 L06FD puls pc,u,y,x,b,a
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	701
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	702 DoWrite lda #$01
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	703 os9 I$WritLn
1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	704 rts
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	705
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	706 WriteCR pshs y,x,a
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	707 lda #$01
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	708 leax >CarRet,pcr
03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	709 ldy #80
172 1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	710 os9 I$WritLn
1cd7548b534f Moved dragon64 specific commands to have _d64 as part of name, CoCo commands boisy parents: 169 diff changeset	711 puls pc,y,x,a
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	712
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	713 ItsFragd leax >BootFrag,pcr
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	714 SoftExit ldb #$01
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	715 bra WritExit
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	716 WarnUser leax >TWarn,pcr
07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	717 bra SoftExit
168 3a847d2b4492 Cobbler, OS9Gen and format are all hardware dependent. roug parents: 124 diff changeset	718
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	719 IFGT Level-1
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	720 L0724 leax >CantRel,pcr
283 07d1ec67d1d2 Made extensive comment improvements, fixed minor bug related to wiping out boisy parents: 266 diff changeset	721 lbra WritExit
912 38fac79788e3 Added comments, improved code readability boisy parents: 283 diff changeset	722 ENDC
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	723
0 6641a883d6b0 Initial revision boisy parents: diff changeset	724 emod
6641a883d6b0 Initial revision boisy parents: diff changeset	725 eom equ *
266 03af31c2d39d Migrated OS-9 Level Two version over to OS-9 Level One with modifications boisy parents: 262 diff changeset	726 end

Mercurial > hg > Members > kono > nitros9-code

annotate level1/cmds/os9gen.asm @ 917:06b4b630cbaf