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

annotate level1/cmds/xmode.asm @ 2898:28ed72477814 lwtools-port

Dummy merge of default branch into lwtools hg -y merge --tool=internal:fail default hg revert --all --no-backup --rev . hg resolve -a -m This dummy merge discards any changes from the default branch so that the result is the same as what lwtools already had. When merging back to default branch later, the discarded changes will be discarded there also, so the result will be that the default branch will contain what the lwtools branch had before these merges. Only scripts/burst was "rescued" from default branch.

author	Tormod Volden <debian.tormod@gmail.com>
date	Sat, 11 Jan 2014 18:40:44 +0100
parents	40322608e006
children

rev	line source
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	1 ********************************************************************
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	2 * XMode/TMode - SCF device/path descriptor utility
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	3 *
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	4 * $Id$
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	5 *
1325 84ea83668304 Redid comments, reset all rev nibbles that weren't explictly set to 0 boisy parents: 1264 diff changeset	6 * Edt/Rev YYYY/MM/DD Modified by
84ea83668304 Redid comments, reset all rev nibbles that weren't explictly set to 0 boisy parents: 1264 diff changeset	7 * Comment
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	8 * ------------------------------------------------------------------
1325 84ea83668304 Redid comments, reset all rev nibbles that weren't explictly set to 0 boisy parents: 1264 diff changeset	9 * 1 1989/06/21 Bruce Isted
84ea83668304 Redid comments, reset all rev nibbles that weren't explictly set to 0 boisy parents: 1264 diff changeset	10 * Released to public domain.
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	11 *
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	12 * 2 2004/07/29 Boisy G. Pitre
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	13 * Revamped to also assemble as tmode
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	14
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	15 nam XMode/TMode
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	16 ttl SCF device/path descriptor utility
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	17
1655 22c82cfcb1f5 Added DOHELP equate to cut down on size of module by optionally opting out the boisy parents: 1325 diff changeset	18 DOHELP set 0
22c82cfcb1f5 Added DOHELP equate to cut down on size of module by optionally opting out the boisy parents: 1325 diff changeset	19
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	20 ifp1
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	21 use defsfile
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	22 endc
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	23
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	24 BuffSize equ 34 max. CHAR string length
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	25 Edtn equ 2
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	26 MaxSize equ $80 maximum module size
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	27 NameSize equ 4 maximum module name length
1325 84ea83668304 Redid comments, reset all rev nibbles that weren't explictly set to 0 boisy parents: 1264 diff changeset	28 rev equ 0
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	29
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	30 org 0
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	31 Count rmb 1 number of option bytes
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	32 DataPtr rmb 2 current option ptr
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	33 HexIn rmb 2 2 byte hex number
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	34 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	35 ModAddr rmb 2 module address
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	36 ModSize rmb 2 module size
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	37 OptEnd rmb 2 option table end offset
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	38 ENDC
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	39 PathNmbr rmb 1 file path
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	40 ParmPtr rmb 2 next name DataPtr
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	41 TxtPtr rmb 2 option name ptr
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	42 Buffer rmb BuffSize miscellaneous output buffer
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	43 ModBuff rmb MaxSize module work copy buffer
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	44 stack rmb $0200 stack and parameter space
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	45 MemSize equ .
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	46
1325 84ea83668304 Redid comments, reset all rev nibbles that weren't explictly set to 0 boisy parents: 1264 diff changeset	47 mod Size,Name,Prgrm+Objct,ReEnt+rev,Entry,MemSize
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	48
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	49 Name equ *
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	50 IFNE XMODE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	51 fcc "X"
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	52 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	53 fcc "T"
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	54 ENDC
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	55 fcs "Mode"
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	56 fcb Edtn edition number
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	57
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	58 OptTable
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	59 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	60 fcc " nam" option name
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	61 fcb Sign+M$Name,NameSize offset to string offset & max. byte count to change
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	62 fcc " mgr"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	63 fcb Sign+M$FMgr,0 offset to string offset & no changes allowed
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	64 fcc " ddr"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	65 fcb Sign+M$PDev,0
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	66 fcc " hpn"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	67 fcb M$Port,1 option offset & byte count
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	68 fcc " hpa"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	69 fcb M$Port+1,2
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	70 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	71 fcc " upc"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	72 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	73 fcb IT.UPC,1
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	74 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	75 fcb PD.UPC-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	76 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	77 fcc " bso"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	78 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	79 fcb IT.BSO,1
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	80 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	81 fcb PD.BSO-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	82 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	83 fcc " dlo"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	84 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	85 fcb IT.DLO,1
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	86 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	87 fcb PD.DLO-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	88 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	89 fcc " eko"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	90 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	91 fcb IT.EKO,1
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	92 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	93 fcb PD.EKO-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	94 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	95 fcc " alf"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	96 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	97 fcb IT.ALF,1
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	98 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	99 fcb PD.ALF-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	100 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	101 fcc " nul"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	102 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	103 fcb IT.NUL,1
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	104 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	105 fcb PD.NUL-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	106 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	107 fcc " pau"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	108 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	109 fcb IT.PAU,1
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	110 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	111 fcb PD.PAU-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	112 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	113 fcc " pag"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	114 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	115 fcb IT.PAG,1
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	116 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	117 fcb PD.PAG-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	118 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	119 fcc " bsp"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	120 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	121 fcb IT.BSP,1
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	122 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	123 fcb PD.BSP-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	124 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	125 fcc " del"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	126 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	127 fcb IT.DEL,1
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	128 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	129 fcb PD.DEL-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	130 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	131 fcc " eor"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	132 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	133 fcb IT.EOR,1
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	134 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	135 fcb PD.EOR-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	136 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	137 fcc " eof"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	138 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	139 fcb IT.EOF,1
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	140 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	141 fcb PD.EOF-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	142 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	143 fcc " rpr"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	144 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	145 fcb IT.RPR,1
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	146 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	147 fcb PD.RPR-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	148 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	149 fcc " dup"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	150 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	151 fcb IT.DUP,1
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	152 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	153 fcb PD.DUP-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	154 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	155 fcc " psc"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	156 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	157 fcb IT.PSC,1
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	158 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	159 fcb PD.PSC-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	160 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	161 fcc " int"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	162 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	163 fcb IT.INT,1
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	164 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	165 fcb PD.INT-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	166 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	167 fcc " qut"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	168 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	169 fcb IT.QUT,1
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	170 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	171 fcb PD.QUT-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	172 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	173 fcc " bse"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	174 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	175 fcb IT.BSE,1
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	176 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	177 fcb PD.BSE-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	178 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	179 fcc " ovf"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	180 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	181 fcb IT.OVF,1
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	182 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	183 fcb PD.OVF-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	184 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	185 fcc " par"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	186 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	187 fcb IT.PAR,1
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	188 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	189 fcb PD.PAR-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	190 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	191 fcc " bau"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	192 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	193 fcb IT.BAU,1
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	194 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	195 fcb PD.BAU-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	196 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	197 fcc " xon"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	198 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	199 fcb IT.XON,1
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	200 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	201 fcb PD.XON-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	202 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	203 fcc " xof"
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	204 IFNE XMODE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	205 fcb IT.XOFF,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	206 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	207 fcb PD.XOFF-PD.OPT,1
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	208 ENDC
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	209 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	210 fcc " col"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	211 fcb IT.COL,1
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	212 fcc " row"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	213 fcb IT.ROW,1
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	214 IFGT Level-1
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	215 fcc " xtp"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	216 fcb IT.XTYP,1
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	217 fcc " wnd"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	218 fcb IT.WND,1
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	219 fcc " val"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	220 fcb IT.VAL,1
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	221 fcc " sty"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	222 fcb IT.STY,1
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	223 fcc " cpx"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	224 fcb IT.CPX,1
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	225 fcc " cpy"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	226 fcb IT.CPY,1
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	227 fcc " fgc"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	228 fcb IT.FGC,1
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	229 fcc " bgc"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	230 fcb IT.BGC,1
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	231 fcc " bdc"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	232 fcb IT.BDC,1
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	233 ENDC
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	234 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	235 TablOpts equ (*-OptTable)/6 number of table entries
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	236 fcb $80 end of option table
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	237
1655 22c82cfcb1f5 Added DOHELP equate to cut down on size of module by optionally opting out the boisy parents: 1325 diff changeset	238 IFNE DOHELP
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	239 UseMsg
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	240 fcb C$LF
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	241 fcc "Usage: XMode [/<device> \|\| -<pathlist> \|\| -?] [option] [option] [...]"
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	242 fcb C$LF,C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	243 fcc "Purpose: To report or alter current option settings of SCF device"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	244 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	245 fcc " descriptors in memory or on disk in single module files."
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	246 fcb C$LF,C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	247 fcc "Options: nam, mgr, ddr, hpn, hpa, upc, bso, dlo, eko, alf, nul, pau,"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	248 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	249 fcc " pag, bsp, del, eor, eof, rpr, dup, psc, int, qut, bse, ovf,"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	250 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	251 fcc " par, bau, xon, xof, col, row, xtp, wnd, val, sty, cpx, cpy,"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	252 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	253 fcc " fgc, bgc, bdc"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	254 fcb C$LF,C$LF
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	255 fcc "Examples: xmode /t2"
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	256 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	257 fcc " Prints the current option settings of the /T2 descriptor"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	258 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	259 fcc " in memory."
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	260 fcb C$LF
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	261 fcc " xmode -modules/t4.dd nam=T2 bau=6 hpa=ff6c eof=1B"
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	262 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	263 fcc " Changes the module name in the MODULES/T4.dd file to T2,"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	264 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	265 fcc " sets the baud rate code to 6, the hardware port address"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	266 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	267 fcc " to $FF6C, and the end of file character to $1B."
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	268 fcb C$LF
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	269 fcc " xmode -?"
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	270 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	271 fcc " Prints more complete information on all of the options."
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	272 fcb C$CR
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	273 UseLen equ *-UseMsg
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	274
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	275 HelpMsg
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	276 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	277 fcc "The NAM option accepts only a legal OS-9 module name with a maximum of"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	278 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	279 fcc "4 characters. It is up to the user to ensure that there is adequate"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	280 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	281 fcc "room for the module name, and if required to rename the disk file to"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	282 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	283 fcc "suit the new module name. The MGR and DDR options can't be changed."
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	284 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	285 fcc "All other options require hexadecimal numbers (0 through FFFF). XTP is"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	286 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	287 fcc "for certain ACIA descriptors only. WND, VAL, STY, CPX, CPY, FGC, BGC,"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	288 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	289 fcc "and BDC are for window descriptors only."
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	290 fcb C$LF,C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	291 fcc "nam Device Name mgr File Manager Name ddr Device Driver Name"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	292 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	293 fcc "hpn H'ware Page Number hpa H'ware Port Address upc Case Lock Flag"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	294 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	295 fcc "bso Backspace Method dlo Delete Line Method eko Screen Echo Flag"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	296 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	297 fcc "alf Auto Linefeed Flag nul End Of Line Nulls pau Page Pause Flag"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	298 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	299 fcc "pag Page Length bsp Backspace Character del Delete Line Char"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	300 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	301 fcc "eor End Of Record Char eof End Of File Char rpr Reprint Line Char"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	302 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	303 fcc "dup Duplicate Line Char psc Pause Character int Interrupt Character"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	304 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	305 fcc "qut Quit Character bse Backspace Echo Char ovf Overflow Character"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	306 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	307 fcc "par Type (Parity) Code bau Baud Rate Code xon XON Character"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	308 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	309 fcc "xof XOFF Character col Display Columns row Display Rows"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	310 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	311 fcc "xtp Extended Type Code wnd Window Number val Valid Window Flag"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	312 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	313 fcc "sty Window Screen Type cpx X Corner Position cpy Y Corner Position"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	314 fcb C$LF
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	315 fcc "fgc Foreground Colour bgc Background Colour bdc Border Colour"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	316 fcb C$CR
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	317 HelpLen equ *-HelpMsg
1655 22c82cfcb1f5 Added DOHELP equate to cut down on size of module by optionally opting out the boisy parents: 1325 diff changeset	318 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	319
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	320 Equal fcc "="
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	321
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	322 TypeMsg
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	323 fcc "Not an SCF "
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	324 IFNE XMODE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	325 fcc "descriptor!"
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	326 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	327 fcc "path!"
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	328 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	329 CR fcb C$CR
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	330 TypeLen equ *-TypeMsg
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	331
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	332 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	333 Sizemsg
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	334 fcc "Module size out of range!"
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	335 fcb C$CR
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	336 Sizelen equ *-Sizemsg
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	337 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	338
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	339 SynMsg
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	340 fcc "Syntax error: "
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	341 SynLen equ *-SynMsg
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	342
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	343 ****************
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	344 * miscellaneous error and help routines
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	345
1655 22c82cfcb1f5 Added DOHELP equate to cut down on size of module by optionally opting out the boisy parents: 1325 diff changeset	346 IFNE DOHELP
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	347 MuchHelp
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	348 leax HelpMsg,pc
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	349 ldy #HelpLen
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	350 bra Helpprnt
1655 22c82cfcb1f5 Added DOHELP equate to cut down on size of module by optionally opting out the boisy parents: 1325 diff changeset	351 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	352
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	353 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	354 BadSize
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	355 leax Sizemsg,pc
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	356 ldy #Sizelen
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	357 bra AddHelp
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	358 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	359
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	360 BadType
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	361 leax TypeMsg,pc
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	362 ldy #TypeLen
1655 22c82cfcb1f5 Added DOHELP equate to cut down on size of module by optionally opting out the boisy parents: 1325 diff changeset	363
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	364 AddHelp
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	365 lda #2
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	366 os9 I$WritLn
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	367 Help
1655 22c82cfcb1f5 Added DOHELP equate to cut down on size of module by optionally opting out the boisy parents: 1325 diff changeset	368 IFNE DOHelp
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	369 leax UseMsg,pc
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	370 ldy #UseLen
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	371 Helpprnt
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	372 lda #2
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	373 os9 I$WritLn
1655 22c82cfcb1f5 Added DOHELP equate to cut down on size of module by optionally opting out the boisy parents: 1325 diff changeset	374 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	375 lbra OkayEnd2
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	376
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	377 ****************
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	378 Entry
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	379 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	380 ldd #0
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	381 std <ModAddr zero mod flag
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	382 sta <PathNmbr zero file flag
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	383 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	384 ldd ,x+ check for device name
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	385 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	386 cmpa #'- file option?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	387 bne Link
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	388 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	389 stx <ParmPtr
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	390 clr <PathNmbr
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	391 cmpa #'. dot? (for path specification)
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	392 bne Process if not, process as option
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	393 subb #$30
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	394 lbmi Syntax
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	395 cmpb #$02
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	396 lbgt Syntax
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	397 stb <PathNmbr
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	398 leax 2,x point passed char after '.'
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	399 ENDC
1655 22c82cfcb1f5 Added DOHELP equate to cut down on size of module by optionally opting out the boisy parents: 1325 diff changeset	400 IFNE DOHELP
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	401 cmpb #'? help option?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	402 beq MuchHelp
1655 22c82cfcb1f5 Added DOHELP equate to cut down on size of module by optionally opting out the boisy parents: 1325 diff changeset	403 ENDC
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	404 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	405 * Use Filename to Get Desc:
1264 64a0273a846a Case fixes, etc. boisy parents: 963 diff changeset	406 lda #UPDAT. open path to module file
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	407 os9 I$Open
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	408 bcs Help
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	409 stx <ParmPtr
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	410 sta <PathNmbr save path number
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	411 ldy #MaxSize max size
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	412 leax ModBuff,u module buff
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	413 os9 I$Read get it
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	414 lbcs Error
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	415 ldb M$Opt,x
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	416 clra [D] = option table size
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	417 addd #M$DTyp add options start offset
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	418 std <OptEnd save options end offset
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	419 ldd M$Size,x get module size
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	420 cmpd #MaxSize module size OK?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	421 bhi BadSize no, go return error...
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	422 std <ModSize
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	423 bra GotIt
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	424 Link
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	425 cmpa #'/ else must be /<devicename>
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	426 bne Help
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	427 pshs u
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	428 lda #Devic
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	429 os9 F$Link link to module
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	430 bcs Help
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	431 stx <ParmPtr update after name
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	432 tfr u,x
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	433 puls u
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	434 stx <ModAddr
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	435 ldb M$Opt,x
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	436 clra [D] = option table size
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	437 addd #M$DTyp add options start offset
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	438 std <OptEnd save options end offset
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	439 ldd M$Size,x get module size
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	440 cmpd #MaxSize module size OK?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	441 lbhi BadSize no, go report error...
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	442 std <ModSize
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	443 tfr d,y copy module size...
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	444 pshs u save data area pointer
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	445 leau ModBuff,u
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	446
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	447 GetModLp
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	448 lda ,x+
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	449 sta ,u+
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	450 leay -1,y
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	451 bne GetModLp
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	452 puls u recover data area pointer
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	453
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	454 GotIt
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	455 ldd <OptEnd get option table end offset
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	456 cmpd <ModSize is option table size OK?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	457 lbhs BadSize no, go report error...
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	458 leax ModBuff,u
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	459 lda M$DTyp,x get device type
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	460 lbne BadType SCF = $00
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	461 ldx <ParmPtr point to input parms
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	462 lbsr SkipSpac go skip leading spaces...
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	463 cmpa #C$CR no options?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	464 lbeq Info ..yes, give info
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	465 leax -1,x
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	466 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	467 Process
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	468 leax -1,x
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	469 stx <ParmPtr save for syntax error use
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	470 leax ModBuff,u
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	471 lda <PathNmbr
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	472 clrb
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	473 os9 I$GetStt
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	474 tst ,x
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	475 lbne BadType
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	476 ldx <ParmPtr
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	477 lbsr SkipSpac go skip leading spaces...
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	478 cmpa #C$CR no options?
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	479 lbeq Info ..yes, give info
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	480 leax -1,x
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	481 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	482
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	483 ****************
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	484 * X=ParmPtr
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	485 * Find and Set Options:
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	486
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	487 FindLp10
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	488 lbsr SkipSpac get next input param
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	489 stx <ParmPtr save for syntax error use
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	490 cmpa #C$CR end?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	491 lbeq Verify ..yes, update module CRC
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	492 leay OptTable-6,pc ready option table ptr
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	493 pshs u
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	494 ldu ,x++ get next two chars
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	495 ora #$20 convert 1st param char to lower case
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	496 exg d,u move [U] where we can convert param chars
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	497 ora #$20 convert 2nd param char...
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	498 orb #$20 convert 3rd...
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	499 exg d,u move back again
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	500
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	501 FindLp20
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	502 leay 6,y next option entry
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	503 tst ,y last entry?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	504 bmi Syntax ..yes, bad option
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	505 cmpa 1,y
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	506 bne FindLp20 same name?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	507 cmpu 2,y
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	508 bne FindLp20 ..no, loop
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	509 * Found Option
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	510 puls u
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	511 sty <TxtPtr
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	512 ldd ,x+ must be followed by "=", leave [X] pointing at char after "="
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	513 cmpa #'=
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	514 bne Syntax
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	515 cmpb #C$CR rest of option missing?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	516 beq Syntax yes, go report error
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	517 cmpb #C$SPAC rest of option missing?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	518 beq Syntax yes, go report error
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	519 ldb 5,y get # of bytes
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	520 beq Syntax 0 bytes, not allowed to change this option
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	521 stb <Count
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	522 ldb 4,y get option offset or offset to option offset
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	523 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	524 bpl NumOpt option offset, go set hexadecimal option
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	525 * Get CHAR input and set option:
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	526 andb #^Sign clear sign bit of offset to string offset
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	527 clra [D] = offset to string offset within module
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	528 cmpd <ModSize is it OK?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	529 bhs Syntax no, go report error...
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	530 leay ModBuff,u point to module
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	531 ldd b,y get offset to string
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	532 cmpd <ModSize is it OK?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	533 bhs Syntax no, go report error...
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	534 leay d,y point to option
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	535 pshs y save option pointer
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	536 os9 F$PrsNam valid OS-9 name?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	537 puls y recover option pointer (end of name pointer lost)
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	538 bcs Syntax no, go report error
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	539 cmpa #C$SPAC space delimiter char?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	540 beq ChkLen yes, go check name length...
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	541 cmpa #C$CR <CR> delimiter char?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	542 bne Syntax no, go report error
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	543
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	544 ChkLen
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	545 cmpb <Count name length OK?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	546 bhi Syntax no, go report error...
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	547
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	548 SetChrLp
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	549 lda ,x+ get character
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	550 sta ,y+ save it to module copy
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	551 decb done yet?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	552 bne SetChrLp no, go copy another char...
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	553 lda -1,y get last char
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	554 ora #Sign set sign bit
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	555 sta -1,y save last char
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	556 lbra FindLp10 go do next...
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	557 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	558 lbra NumOpt option offset, go set hexadecimal option
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	559 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	560
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	561 * Syntax Error:
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	562 Syntax
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	563 leax SynMsg,pc
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	564 ldy #SynLen
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	565 lda #2
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	566 os9 I$Write
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	567 ldx <ParmPtr
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	568 leax -1,x
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	569 pshs x
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	570 ldy #0
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	571
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	572 CntLoop
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	573 leay 1,y
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	574 lda ,x+
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	575 cmpa #C$CR
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	576 beq SynSay
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	577 cmpa #C$SPAC
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	578 bne CntLoop
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	579
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	580 SynSay
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	581 puls x
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	582 lda #2
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	583 os9 I$Write output err
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	584 lbra OkayEnd
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	585
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	586 * Get Hex Input and Set Option:
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	587 NumOpt
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	588 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	589 clra [D] = option offset within module
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	590 cmpd <OptEnd is it OK?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	591 bhs Syntax no, go report error...
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	592 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	593 clr <HexIn zero hex input bytes
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	594 clr <HexIn+1
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	595
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	596 SetNumLp
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	597 lda ,x+ get next #
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	598 cmpa #C$SPAC end of number?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	599 beq SetNum2 ..yes, set option
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	600 cmpa #C$CR end of line?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	601 beq SetNum1 ..yes, set option
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	602 * Convert ASCII Hex-->Byte:
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	603 suba #$30 make number from ASCII
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	604 bmi Syntax
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	605 cmpa #10 is it number?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	606 bcs Num
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	607 anda #$5F make uppercase
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	608 suba #$11-$0A make hex $A-$F
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	609 cmpa #$0A
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	610 bcs Syntax
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	611 cmpa #$10 not hex char?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	612 bcc Syntax
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	613
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	614 Num
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	615 ldb #16 fancy asl *4
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	616 mul
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	617 pshs b save top 4 bits
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	618 ldd <HexIn
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	619 rol ,s
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	620 rolb
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	621 rola
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	622 rol ,s
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	623 rolb
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	624 rola
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	625 rol ,s
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	626 rolb
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	627 rola
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	628 rol ,s
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	629 rolb
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	630 rola
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	631 std <HexIn
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	632 puls b drop temp
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	633 bra SetNumLp ..loop
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	634
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	635 SetNum1
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	636 leax -1,x reset so can find <CR>
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	637
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	638 SetNum2
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	639 ldb 4,y get option offset
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	640 leay ModBuff,u point to module
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	641 leay b,y point to option
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	642 ldd <HexIn pick up hex input
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	643 dec <Count
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	644 beq SetOne
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	645 std ,y set two byte option
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	646 lbra FindLp10
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	647
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	648 SetOne
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	649 tsta
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	650 lbne Syntax
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	651 stb ,y set one byte option
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	652
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	653 SetNDone
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	654 lbra FindLp10
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	655
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	656 * --------------
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	657 * Skip Spaces:
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	658 SkipSpac
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	659 lda ,x+
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	660 cmpa #C$SPAC
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	661 beq SkipSpac
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	662 rts
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	663
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	664 * --------------
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	665 * Update Module CRC:
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	666 Verify
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	667 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	668 pshs u save data ptr
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	669 leau ModBuff,u
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	670 tfr u,x X is mod address
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	671 ldy M$Size,x Y is mod size
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	672 leay -3,y beginning of chksum
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	673 tfr y,d Y is byte count
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	674 leau d,u set U to chksum
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	675 lda #$FF init chksum
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	676 sta ,u
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	677 sta 1,u
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	678 sta 2,u
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	679 pshs u
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	680 os9 F$CRC calc new crc
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	681 puls u
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	682 com ,u+ fix it up right
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	683 com ,u+
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	684 com ,u
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	685 lda <PathNmbr was it file?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	686 beq MemMod ..no, in memory
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	687 ldx #0
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	688 tfr x,u
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	689 os9 I$Seek go back to file begin
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	690 bcs Error
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	691 puls u
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	692 leax ModBuff,u
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	693 ldy <ModSize
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	694 os9 I$Write update module file
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	695 ELSE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	696 leax ModBuff,u
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	697 lda <PathNmbr
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	698 clrb
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	699 os9 I$SetStt
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	700 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	701 bra OkayEnd
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	702
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	703 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	704 MemMod
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	705 ldu ,s get data area pointer
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	706 leax ModBuff,u
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	707 ldy <ModSize
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	708 ldu <ModAddr
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	709
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	710 PutModLp
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	711 lda ,x+
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	712 sta ,u+
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	713 leay -1,y
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	714 bne PutModLp
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	715 puls u recover data area pointer
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	716 bra OkayEnd2
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	717 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	718
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	719 OkayEnd
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	720 * bsr OutCR
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	721
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	722 OkayEnd2
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	723 clrb okay
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	724 Error
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	725 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	726 pshs b,cc
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	727 ldu <ModAddr
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	728 beq Bye
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	729 os9 F$UnLink
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	730
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	731 Bye
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	732 puls b,cc
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	733 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	734 os9 F$Exit we're done...
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	735
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	736 * --------------
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	737 * Print a <CR>:
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	738 OutCR
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	739 leax CR,pc
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	740 ldy #1
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	741 lda #1
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	742 os9 I$WritLn
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	743 rts
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	744
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	745 ****************
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	746 * Output Current Desc Info:
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	747 Info
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	748 IFNE TMODE
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	749 lda <PathNmbr
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	750 leax Buffer,u
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	751 ldb #PDELIM
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	752 stb ,x+
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	753 ldb #SS.DevNm
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	754 os9 I$GetStt
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	755 go@ ldb ,x+
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	756 bpl go@
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	757 andb #$7F
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	758 stb -1,x
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	759 ldb #C$CR
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	760 stb ,x
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	761 leax Buffer,u
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	762 ldy #80
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	763 lda #$01
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	764 os9 I$WritLn
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	765 ENDC
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	766
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	767 leax OptTable,pc point to text table
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	768 stx <TxtPtr
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	769
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	770 clr ,-s
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	771 InfoLoop
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	772 ldx <TxtPtr
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	773 ldy #4
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	774 lbsr OutPut print option name
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	775 leax Equal,pc
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	776 ldy #1
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	777 lbsr OutPut print =
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	778 ldx <TxtPtr
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	779 ldb 4,x get offset to HEX option; if minus, offset to option offset
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	780 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	781 bpl PrintHex go do simple offset to HEX option
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	782 andb #^Sign clear sign bit
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	783 clra [D] = offset to string offset within module
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	784 cmpd <ModSize is it OK?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	785 bhs MovePtr no, skip this option...
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	786 leay ModBuff,u point [Y] to module work copy
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	787 ldd b,y get string offset within module
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	788 cmpd <ModSize is string offset OK?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	789 bhs MovePtr no, skip this option...
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	790 leay d,y point [Y] to CHAR string
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	791 lda #BuffSize get max. chars to print
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	792 leax Buffer,u point [X] to CHAR string buffer
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	793 clr <Count init counter
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	794
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	795 CharCopy ldb ,y+ get char
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	796 bpl NotLast sign bit clear so not last, go on...
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	797 andb #^Sign clear sign bit
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	798 lda #1 set up as last char
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	799
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	800 NotLast stb ,x+
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	801 inc <Count count chars in string
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	802 deca done yet?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	803 bne CharCopy no, go do another char...
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	804 ldb <Count get chars in string ([A]=0, so [D]=char count)
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	805 tfr d,y module name length into [Y]
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	806 leax Buffer,u point [X] to CHAR string copy
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	807 bsr OutPut print CHAR string
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	808 bra MovePtr skip HEX output routine
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	809 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	810
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	811 * Print Hex Option Values:
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	812 PrintHex
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	813 ldx <TxtPtr
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	814 ldb 5,x get # of digits
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	815 stb <Count
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	816 ldb 4,x get option offset in module
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	817 IFNE XMODE
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	818 clra [D] = option offset within module
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	819 cmpd <OptEnd is option offset OK?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	820 bhs MovePtr no, skip this option...
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	821 ENDC
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	822 leax ModBuff,u point [X] to module work copy
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	823 abx point [X] to option
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	824 stx <DataPtr
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	825
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	826 * Print One Byte:
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	827 NumLoop
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	828 ldx <DataPtr
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	829 lda ,x+
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	830 stx <DataPtr
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	831 pshs a
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	832 lsra
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	833 lsra
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	834 lsra
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	835 lsra
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	836 bsr OutOne
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	837 puls a
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	838 anda #$0F
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	839 bsr OutOne
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	840 dec <Count
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	841 bne NumLoop
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	842
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	843 MovePtr
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	844 ldx <TxtPtr
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	845 leax 6,x
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	846 stx <TxtPtr
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	847 ldb ,s+
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	848 incb
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	849 cmpb #TablOpts
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	850 lbeq OkayEnd done...
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	851 pshs b
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	852 bitb #$07 # of options remaining evenly divisible by eight?
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	853 lbne InfoLoop no, go print next option on same line
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	854 lbsr OutCR <CR> after every 8th option
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	855 lbra InfoLoop ..loop
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	856
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	857 * --------------
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	858 * Print 1/2 Byte Hex Char:
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	859 OutOne
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	860 cmpa #10
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	861 bcs Number
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	862 adda #$11-10 make alpha
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	863
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	864 Number
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	865 adda #$30 make ASCII
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	866 sta <Buffer
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	867 leax Buffer,u
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	868 ldy #1
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	869
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	870 OutPut
1678 40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	871 lda #$01
40322608e006 tmode is now made from xmode, dsave modified to handle new tmode parameter boisy parents: 1655 diff changeset	872 os9 I$Write
963 7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	873 lbcs Error
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	874 rts
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	875
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	876 emod
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	877 Size equ *
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	878 end
7cecd837bcab Added new commands as part of standard CMDS distribution boisy parents: diff changeset	879

Mercurial > hg > Members > kono > nitros9-code

annotate level1/cmds/xmode.asm @ 2898:28ed72477814 lwtools-port