--- a/3rdparty/utils/makefile	Sat Feb 04 18:54:49 2017 +0100
+++ b/3rdparty/utils/makefile	Sat Feb 04 18:55:39 2017 +0100
@@ -1,6 +1,6 @@
 include ../../rules.mak
 
-dirs	= boisy dasm smartwatch supercomm dladd winfo gene tlindner fpgarom
+dirs	= boisy dasm smartwatch supercomm dladd winfo gene tlindner fpgarom sleuth3
 
 # Make all components
 all:

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/3rdparty/utils/sleuth3/cssauxil3.asm	Sat Feb 04 18:55:39 2017 +0100
@@ -0,0 +1,223 @@
+
+***************************************
+**
+auxino lbsr xcrlf get aux file info
+ leax altnm,pcr
+ lbsr xpdat
+ leax disim,pcr
+ lbsr xpdat
+ leax axfile,u
+ lbsr inbufr get file name to line buffer
+ cmpa #$0d
+ bne strtin process input aux file
+ lbsr xcrlf
+ leax altnm,pcr
+ lbsr xpdat
+ leax disom,pcr
+ lbsr xpdat
+ leax otfile,u
+ lbsr inbufr get file name to line buffer
+ cmpa #$0d
+ lbne statoa process output aux file
+ rts
+**
+strtin bsr stopin start aux input file
+ lda #READ. open input axfile
+ clrb
+ leax axfile,u
+ os9 I$Open
+ bcs strtie
+ exg a,b
+ std axblok+iobfd,u file desc
+ ldd #bufaux buffer length
+ std axblok+iobbl,u
+ ldd #$0000
+ std axblok+iobcc,u
+ leax axbuff,u
+ stx axblok+iobba,u
+ stx axblok+iobca,u
+ lda #READ. mode
+ sta axblok+iobfc,u
+ inc getfl,u set aux flag
+ bra strtix
+strtie lda #$02 error
+ leax errarz,pcr
+ ldy #errarl
+ os9 I$WritLn
+ clr axfile,u
+ ldd #$0000
+ std axblok+iobfd,u file desc
+strtix rts
+**
+stopin pshs x stop aux input
+ tst getfl,u
+ beq stopix
+ clr getfl,u reset aux flag
+ clr axfile,u close file
+ lda axblok+iobfd+1,u file desc
+ os9 I$Close
+ bcc stopie
+ lda #$02 error
+ leax errarz,pcr
+ ldy #errarl
+ os9 I$WritLn
+stopie ldd #$0000
+ std axblok+iobfd,u
+stopix puls x,pc
+**
+statoa leax otfile,u open output otfile
+ ldd #(WRITE.*256)+(READ.+WRITE.+PREAD.) access and attributes
+ os9 I$Create
+ bcc statof
+ cmpb #218 files exists?
+ bne stater
+ ldd #(WRITE.*256)+(UPDAT.+PREAD.) about the same attr's
+ os9 I$Open
+ bcc statof
+* lda #$02 error
+* leax errarz,pcr
+* ldy #errarl
+* os9 I$WritLn
+stater os9 F$PErr
+ clr otfile,u
+ rts
+statof clrb file desc
+ exg a,b
+ std otblok+iobfd,u
+ ldd #buflen buffer length
+ std otblok+iobbl,u
+ std otblok+iobcc,u
+ ldd otblok+iobba,u buffer addr
+ std otblok+iobca,u
+ clr confl,u don't output to console
+ inc dskfl,u output to disk
+statra lda #$73 #'s=partial reset
+ lbsr xoute
+ lbsr xouts
+ lbsr xcrlf
+ lda #$6f #'o offset
+ lbsr xoute
+ lbsr xouts
+ tst os9flx,u chk for OS/9
+ beq stata1
+ lda #$30 #'0
+ lbsr xoute
+ lbsr xoute
+ lbsr xoute
+ lbsr xoute
+ bra stata2
+stata1 leax oaddr,u
+ lbsr xot4h
+stata2 tst disif,u chk for input file
+ beq statrb
+ lbsr xcrlf
+ lda #$73 an s
+ lbsr xoute
+ lbsr xouts
+ leax infile,u
+ lbsr dmptav
+statrb ldx typem,u
+statrc cmpx typee,u
+ bhs statre
+statrd stx caddr,u output a line
+ lbsr xcrlf
+ ldx caddr,u
+ lda ,x
+ cmpa #'Z was #$5a chk 'Z
+ beq statr2
+ ora #$20
+ lbsr xoute type
+ lbsr xouts space
+ leax $01,x
+ lbsr xot4s start
+ lbsr xot4s end
+ leax $01,x
+statr1 leax $02,x
+ bra statrc
+statr2 ldd $01,x chk start/end
+ cmpd $03,x
+ bne statr4
+ lda #$6d make 'm
+ lbsr xoute type
+ lbsr xouts space
+ leax $03,x
+statr3 lbsr xot4s end
+ lbsr xot2s value
+ bra statr1
+statr4 lda #$74 make 't
+ lbsr xoute type
+ lbsr xouts space
+ leax $01,x
+ lbsr xot4s start
+ bra statr3
+statre lbsr xcrlf print parms
+ ldx faddr,u
+ leax $01,x
+ beq statrf
+ tst os9flx,u chk for OS/9
+ beq state1
+ tst infile,u chk for file
+ bne statrf
+state1 lda #$6e make 'n
+ lbsr xoute
+ lbsr xouts
+ tst os9flx,u
+ beq state2
+ leax oaddr,u OS/9
+ lbsr xot4s
+ ldd taddr,u
+ addd oaddr,u
+ pshs d
+ tfr s,x
+ lbsr xot4s
+ puls d
+ bra state9
+state2 leax faddr,u flex
+ lbsr xot4s
+ lbsr xot4s
+ leax xaddr,u
+ lbsr xot4h
+state9 lbsr xcrlf
+statrf tst equfl,u
+ beq statrh
+ lda #$65 #'e
+ lbsr xoute
+ lbsr xcrlf
+statrh tst posfl,u
+ beq statri
+ lda #$70 #'p
+ lbsr xoute
+ lbsr xcrlf
+statri lda #$7a #'z
+ lbsr xoute
+ lbsr xouts
+ lda pmode,u
+ bpl statrj
+ lda #$09
+statrj adda #$30 #'0
+ lbsr xoute
+ lbsr xcrlf
+statrk tst crofl,u
+ bne statcl
+ lda #$62 b
+ lbsr xoute
+ lbsr xcrlf
+statcl inc confl,u output to console
+ clr dskfl,u don't output to disk
+ leax otblok,u force output
+ lbsr fob
+ bcc static
+ lda #$02 error
+ leax errarz,pcr
+ ldy #errarl
+ os9 I$WritLn
+static lda otblok+iobfd+1,u file desc
+ os9 I$Close
+ bcc statie
+ lda #$02 error
+ leax errarz,pcr
+ ldy #errarl
+ os9 I$WritLn
+statie ldd #$0000
+ std otblok+iobfd,u
+statrx rts
\ No newline at end of file

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/3rdparty/utils/sleuth3/csschgdf.txt	Sat Feb 04 18:55:39 2017 +0100
@@ -0,0 +1,42 @@
+
+/x0020/D.FMBM/
+/x0024/D.MLIM/
+/x0026/D.MODD/
+/x002A/D.BASE/
+/x002C/D.SWI3/
+/x002E/D.SWI2/
+/x0030/D.FIRQ/
+/x0032/D.IRQ/
+/x0034/D.SWI/
+/x0036/D.NMI/
+/x0038/D.ISVC/
+/x003A/D.POLL/
+/x003C/D.UIRQ/
+/x003E/D.SIRQ/
+/x0040/D.UREQ/
+/x0042/D.SREQ/
+/x0044/D.USVC/
+/x0046/D.SSVC/
+/x0048/D.SLIC/
+/x0049/D.PRDB/
+/x004B/D.PROC/
+/x004D/D.APRQ/
+/x004F/D.WPRQ/
+/x0051/D.SPRQ/
+/x0033/D.TIME/
+/x0053/D.YEAR/
+/x0054/D.MNTH/
+/x0055/D.DAY/
+/x0056/D.HOUR/
+/x0057/D.MIN/
+/x0058/D.SEC/
+/x0059/D.TIC/
+/x005A/D.TSEC/
+/x005B/D.TSLC/
+/x005C/D.IOML/
+/x005E/D.IOMH/
+/x0060/D.DEVT/
+/x0062/D.POLT/
+/x0064/D.PDBT/
+/x0066/D.BTLO/
+/x0068/D.BTHI/

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/3rdparty/utils/sleuth3/csschge1.txt	Sat Feb 04 18:55:39 2017 +0100
@@ -0,0 +1,103 @@
+
+lnbuff equ $7000
+ttybsp equ $7080
+ttydel equ $7081
+ttyeol equ $7082
+ttydep equ $7083
+ttywid equ $7084
+ttynlc equ $7085
+ttytab equ $7086
+ttydpx equ $7087
+ttyejc equ $7088
+ttypau equ $7089
+ttyesc equ $708a
+sysdrv equ $708b
+wrkdrv equ $708c
+syssc1 equ $708d
+smonth equ $708e
+sdaymn equ $708f
+syearn equ $7090
+lsttrm equ $7091
+uctaba equ $7092
+lnbufp equ $7094
+escrtn equ $7096
+syssc2 equ $7098
+syssc3 equ $7098
+prvchr equ $709a
+curlin equ $709b
+loadof equ $709c
+trflag equ $709e
+traddr equ $709f
+aciafl equ $70a1
+errtyp equ $70a2
+outswt equ $70a3
+syssc4 equ $70a4
+comflg equ $70a5
+crotcl equ $70a6
+syssc5 equ $70a7
+syssc6 equ $70b5
+coldst equ $7100
+warmst equ $7103
+renter equ $7106
+inchar equ $7109
+outchr equ $710c
+getchr equ $710f
+putchr equ $7112
+inbuff equ $7115
+pstrng equ $7118
+clasfy equ $711b
+prcrlf equ $711e
+nxtchr equ $7121
+rstrio equ $7124
+getfil equ $7127
+loadfl equ $712a
+setext equ $712d
+addb2x equ $7130
+outdec equ $7133
+outch2 equ $7136
+outhex equ $7139
+rpterr equ $713c
+gethex equ $713f
+docmnd equ $7142
+startr equ $7600
+sffunc equ $7740
+sferor equ $7741
+sfactv equ $7742
+sfdriv equ $7743
+sfname equ $7744
+sfextn equ $774c
+sfattr equ $774f
+sfres1 equ $7750
+sfsadr equ $7751
+sfeadr equ $7753
+sfsize equ $7755
+sffscm equ $7757
+sfres2 equ $7758
+sfdmon equ $7759
+sfdday equ $775a
+sfdyer equ $775b
+sflist equ $775c
+sfcrpo equ $775e
+sfcrec equ $7760
+sfindx equ $7762
+sfrinx equ $7763
+sfnwbf equ $7764
+sfcdir equ $776f
+sfdelp equ $7772
+sfrenm equ $7775
+sfcomp equ $777b
+sfbuff equ $7780
+fmsint equ $7800
+fmscls equ $7803
+fmscal equ $7806
+fcbbas equ $7809
+fcbcur equ $780b
+verflg equ $782d
+dreadr equ $7f80
+dwrite equ $7f83
+dverfy equ $7f86
+drstor equ $7f89
+ddselr equ $7f8c
+dcheck equ $7f8f
+dqchek equ $7f92
+sstack equ $a07f

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/3rdparty/utils/sleuth3/csschge2.txt	Sat Feb 04 18:55:39 2017 +0100
@@ -0,0 +1,230 @@
+
+* 
+* flex 2 addresses and constants
+*
+flxorg equ $a000
+*
+sstack equ flxorg+$007f flex stack
+lnbuff equ flxorg+$0080 line buffer
+startr equ flxorg+$0100 utility area
+*
+sffunc equ flxorg+$0840 fcb function code
+sferor equ flxorg+$0841 fcb error status
+sfactv equ flxorg+$0842 fcb activity status
+sfdriv equ flxorg+$0843 fcb drive number
+sfname equ flxorg+$0844 fcb name
+sfextn equ flxorg+$084c fcb extension
+sfattr equ flxorg+$084f fcb file attributes
+sfres1 equ flxorg+$0850 fcb reserved
+sfsadr equ flxorg+$0851 fcb starting disk address
+sfeadr equ flxorg+$0853 fcb ending disk address
+sfsize equ flxorg+$0855 fcb file size
+sffscm equ flxorg+$0857 fcb file sector map indicator
+sfres2 equ flxorg+$0858 fcb reserved
+sfdmon equ flxorg+$0859 fcb creation month
+sfdday equ flxorg+$085a fcb creation day
+sfdyer equ flxorg+$085b fcb creation year
+sflist equ flxorg+$085c fcb list pointer
+sfcrpo equ flxorg+$085e fcb current position
+sfcrec equ flxorg+$0860 fcb current record number
+sfindx equ flxorg+$0862 fcb data index
+sfrinx equ flxorg+$0863 fcb random index
+sfnwbf equ flxorg+$0864 fcb name work buffer
+sfcdir equ flxorg+$086f fcb current directory address
+sfdelp equ flxorg+$0872 fcb first deleted directory pointer
+sfrenm equ flxorg+$0875 fcb rename work area
+sfcomp equ flxorg+$087b fcb space compression flag
+sfbuff equ flxorg+$0880 fcb sector buffer
+*
+ttybsp equ flxorg+$0c00 ttyset backspace
+ttydel equ flxorg+$0c01 ttyset delete
+ttyeol equ flxorg+$0c02 ttyset end of line
+ttydep equ flxorg+$0c03 ttyset depth count
+ttywid equ flxorg+$0c04 ttyset width count
+ttynlc equ flxorg+$0c05 ttyset null count
+ttytab equ flxorg+$0c06 ttyset tab
+ttybec equ flxorg+$0c07 ttyset backspace echo
+ttyejc equ flxorg+$0c08 ttyset eject count
+ttypau equ flxorg+$0c09 ttyset pause control
+ttyesc equ flxorg+$0c0a ttyset escape
+sysdrv equ flxorg+$0c0b system drive number
+wrkdrv equ flxorg+$0c0c working drive number
+syssc1 equ flxorg+$0c0d system scratch
+smonth equ flxorg+$0c0e system month
+sdaymn equ flxorg+$0c0f system day
+syearn equ flxorg+$0c10 system year
+lsttrm equ flxorg+$0c11 last terminator
+uctaba equ flxorg+$0c12 user command table
+lnbufp equ flxorg+$0c14 line buffer pointer
+escrtn equ flxorg+$0c16 escape return
+curchr equ flxorg+$0c18 current character
+prvchr equ flxorg+$0c19 previous character
+curlin equ flxorg+$0c1a current line number
+loadof equ flxorg+$0c1b loader address offset
+trflag equ flxorg+$0c1d transfer flag
+traddr equ flxorg+$0c1e transfer address
+errtyp equ flxorg+$0c20 error type
+spciof equ flxorg+$0c21 special i/o flag
+outswt equ flxorg+$0c22 output switch
+inswtc equ flxorg+$0c23 input switch
+foaddr equ flxorg+$0c24 file output address
+fiaddr equ flxorg+$0c26 file input address
+comflg equ flxorg+$0c28 command flag
+crotcl equ flxorg+$0c29 current output column
+syssc2 equ flxorg+$0c2a system scratch
+memend equ flxorg+$0c2b memory end
+errvec equ flxorg+$0c2d error name vector
+fieflg equ flxorg+$0c2f file input echo flag
+syssc3 equ flxorg+$0c30 system scratch
+syssc4 equ flxorg+$0c31 system scratch
+syssc5 equ flxorg+$0c32 system scratch
+respra equ flxorg+$0c35 reserved printer area pointer
+resprl equ flxorg+$0c37 reserved printer area length
+prtadr equ flxorg+$0cc9 printer device address
+prinit equ flxorg+$0cc0 printer initialization
+prdych equ flxorg+$0cd8 printer ready check
+proutr equ flxorg+$0ce4 printer output
+syssc6 equ flxorg+$0cf8 system scratch
+*
+coldst equ flxorg+$0d00 cold start
+warmst equ flxorg+$0d03 warm start
+renter equ flxorg+$0d06 re-entry
+inchar equ flxorg+$0d09 basic input character
+incha2 equ flxorg+$0d0c basic input character
+outchr equ flxorg+$0d0f basic output character
+outch2 equ flxorg+$0d12 basic output character
+getchr equ flxorg+$0d15 get character
+putchr equ flxorg+$0d18 put character
+inbuff equ flxorg+$0d1b input into line buffer
+pstrng equ flxorg+$0d1e print string
+clasfy equ flxorg+$0d21 classify character
+prcrlf equ flxorg+$0d24 print crlf
+nxtchr equ flxorg+$0d27 get next buffer character
+rstrio equ flxorg+$0d2a restore i/o vectors
+getfil equ flxorg+$0d2d get file specs
+loadfl equ flxorg+$0d30 load binary file
+setext equ flxorg+$0d33 set extension
+addb2x equ flxorg+$0d36 add b to x
+outdec equ flxorg+$0d39 output decimal number
+outhex equ flxorg+$0d3c output hexadecimal number
+rpterr equ flxorg+$0d3f report error
+gethex equ flxorg+$0d42 get hexadecimal number
+outadr equ flxorg+$0d45 output hexadecimal address
+indecm equ flxorg+$0d48 input decimal number
+docmnd equ flxorg+$0d4b call dos as a suboutine
+ctstat equ flxorg+$0d4e check terminal status
+*
+fmsint equ flxorg+$1400 fms initialization
+fmscls equ flxorg+$1403 fms close files
+fmscal equ flxorg+$1406 fms call
+fcbbas equ flxorg+$1409 fcb base pointer
+fcbcur equ flxorg+$140b fcb current address
+verflg equ flxorg+$1435 verify flag
+*
+dreadr equ flxorg+$1e80 basic read disk
+dwrite equ flxorg+$1e83 basic write disk
+dverfy equ flxorg+$1e86 basic verify disk
+drstor equ flxorg+$1e89 basic restore disk
+ddselr equ flxorg+$1e8c basic select drive
+dcheck equ flxorg+$1e8f basic check drive ready
+dqchek equ flxorg+$1e92 basic quick drive check
+*
+fmgnxb equ $00 get next byte
+fmpnxb equ $00 put next byte
+fmopni equ $01 open for input
+fmopno equ $02 open for output
+fmopnu equ $03 open for update
+fmclsi equ $04 close for input
+fmclso equ $04 close for output
+fmclsu equ $04 close for update
+fmrewf equ $05 rewind file
+fmopdi equ $06 open directory
+fmgeti equ $07 get information record
+fmputi equ $08 put information record
+fmrdss equ $09 read single sector
+fmwtss equ $0a write single sector
+fmresd equ $0b reserved
+fmdelt equ $0c delete file
+fmrenm equ $0d rename file
+fmrese equ $0e reserved
+fmnxsq equ $0f get next sequential sector
+fmopir equ $10 open system information record
+fmgtrb equ $11 get random byte from sector
+fmptrb equ $12 put random byte into sector
+fmresf equ $13 reserved
+fmnxdr equ $14 find next drive
+fmrecn equ $15 position to record n
+fmback equ $16 back up one record
+*
+fcfunc equ $00 fcb function code
+fceror equ $01 fcb error status
+fcactv equ $02 fcb activity status
+fcdriv equ $03 fcb drive number
+fcname equ $04 fcb name
+fcextn equ $0c fcb extension
+fcattr equ $0f fcb file attributes
+fcres1 equ $10 fcb reserved
+fcsadr equ $11 fcb starting disk address
+fceadr equ $13 fcb ending disk address
+fcsize equ $15 fcb file size
+fcfscm equ $17 fcb file sector map indicator
+fcres2 equ $18 fcb reserved
+fcdmon equ $19 fcb creation month
+fcdday equ $1a fcb creation day
+fcdyer equ $1b fcb creation year
+fclist equ $1c fcb list pointer
+fccrpo equ $1e fcb current position
+fccrec equ $20 fcb current record number
+fcindx equ $22 fcb data index
+fcrinx equ $23 fcb random index
+fcnwbf equ $24 fcb name work buffer
+fccdir equ $2f fcb current directory address
+fcdelp equ $32 fcb first deleted directory pointer
+fcrenm equ $35 fcb rename work area
+fccomp equ $3b fcb space compression flag
+fcbuff equ $40 fcb sector buffer
+*
+frillg equ 01 illegal fms function code encountered
+frinus equ 02 the requested file is in use
+frexis equ 03 the file specified already exists
+frabsn equ 04 the specified file could not be found
+frsysd equ 05 system directory error - reboot system
+frfuld equ 06 the system directory space is full
+frnosp equ 07 all available disk space has been used
+frendf equ 08 read past end of file
+frrder equ 09 disk file read error
+frwter equ 10 disk file write error
+frwrpr equ 11 the file or disk is write protected!
+frprot equ 12 the file is protected - file not deleted
+frbfcb equ 13 illegal file control block specified
+frbadr equ 14 illegal disk address encountered
+frbdrv equ 15 an illegal drive number was specified
+frdrnr equ 16 drives not ready
+frflpr equ 17 the file is protected - access denied
+frsyss equ 18 system file status error
+frdtix equ 19 fms data index range error
+frfmse equ 20 fms inactive - reboot system
+frilfl equ 21 illegal file specification
+frsysc equ 22 system file close error
+frsmap equ 23 sector map overflow - disk too segmented
+frbrno equ 24 nonexistent record number specified
+frbfil equ 25 record number match error - file damaged
+frsntx equ 26 command syntax error - retype command
+frprnt equ 27 that command is not allowed while printing
+frhard equ 28 wrong hardware configuration
+frundf equ 29 undefined
+*
+extbin equ $00 .bin
+exttxt equ $01 .txt
+extcmd equ $02 .cmd
+extbas equ $03 .bas
+extsys equ $04 .sys
+extbak equ $05 .bak
+extscr equ $06 .scr
+extdat equ $07 .dat
+extbac equ $08 .bac
+extdir equ $09 .dir
+extprt equ $0a .prt
+extout equ $0b .out
+*
+*

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/3rdparty/utils/sleuth3/csschge9.txt	Sat Feb 04 18:55:39 2017 +0100
@@ -0,0 +1,258 @@
+
+* 
+* flex 9 addresses and constants
+*
+flxorg equ $c000
+*
+sstack equ flxorg+$007f flex stack
+lnbuff equ flxorg+$0080 line buffer
+startr equ flxorg+$0100 utility area
+*
+sysfcb equ flxorg+$0840 fcb function code
+sferor equ flxorg+$0841 fcb error status
+sfactv equ flxorg+$0842 fcb activity status
+sfdriv equ flxorg+$0843 fcb drive number
+sfname equ flxorg+$0844 fcb name
+sfextn equ flxorg+$084c fcb extension
+sfattr equ flxorg+$084f fcb file attributes
+sfres1 equ flxorg+$0850 fcb reserved
+sfsadr equ flxorg+$0851 fcb starting disk address
+sfeadr equ flxorg+$0853 fcb ending disk address
+sfsize equ flxorg+$0855 fcb file size
+sffscm equ flxorg+$0857 fcb file sector map indicator
+sfres2 equ flxorg+$0858 fcb reserved
+sfdmon equ flxorg+$0859 fcb creation month
+sfdday equ flxorg+$085a fcb creation day
+sfdyer equ flxorg+$085b fcb creation year
+sflist equ flxorg+$085c fcb list pointer
+sfcrpo equ flxorg+$085e fcb current position
+sfcrec equ flxorg+$0860 fcb current record number
+sfindx equ flxorg+$0862 fcb data index
+sfrinx equ flxorg+$0863 fcb random index
+sfnwbf equ flxorg+$0864 fcb name work buffer
+sfcdir equ flxorg+$086f fcb current directory address
+sfdelp equ flxorg+$0872 fcb first deleted directory pointer
+sfrenm equ flxorg+$0875 fcb rename work area
+sfcomp equ flxorg+$087b fcb space compression flag
+sfbuff equ flxorg+$0880 fcb sector buffer
+*
+ttybsp equ flxorg+$0c00 ttyset backspace
+ttydel equ flxorg+$0c01 ttyset delete
+ttyeol equ flxorg+$0c02 ttyset end of line
+ttydep equ flxorg+$0c03 ttyset depth count
+ttywid equ flxorg+$0c04 ttyset width count
+ttynlc equ flxorg+$0c05 ttyset null count
+ttytab equ flxorg+$0c06 ttyset tab
+ttybec equ flxorg+$0c07 ttyset backspace echo
+ttyejc equ flxorg+$0c08 ttyset eject count
+ttypau equ flxorg+$0c09 ttyset pause control
+ttyesc equ flxorg+$0c0a ttyset escape
+sysdrv equ flxorg+$0c0b system drive number
+wrkdrv equ flxorg+$0c0c working drive number
+sysflg equ flxorg+$0c0d use system drive flag
+smonth equ flxorg+$0c0e system month
+sdaymn equ flxorg+$0c0f system day
+syearn equ flxorg+$0c10 system year
+lsttrm equ flxorg+$0c11 last terminator
+uctaba equ flxorg+$0c12 user command table
+lnbufp equ flxorg+$0c14 line buffer pointer
+escrtn equ flxorg+$0c16 escape return
+curchr equ flxorg+$0c18 current character
+prvchr equ flxorg+$0c19 previous character
+curlin equ flxorg+$0c1a current line number
+loadof equ flxorg+$0c1b loader address offset
+trflag equ flxorg+$0c1d transfer flag
+traddr equ flxorg+$0c1e transfer address
+errtyp equ flxorg+$0c20 error type
+spciof equ flxorg+$0c21 special i/o flag
+outswt equ flxorg+$0c22 output switch
+inswtc equ flxorg+$0c23 input switch
+foaddr equ flxorg+$0c24 file output address
+fiaddr equ flxorg+$0c26 file input address
+comflg equ flxorg+$0c28 command flag
+crotcl equ flxorg+$0c29 current output column
+syssc2 equ flxorg+$0c2a system scratch
+memend equ flxorg+$0c2b memory end
+errvec equ flxorg+$0c2d error name vector
+fieflg equ flxorg+$0c2f file input echo flag
+syssc3 equ flxorg+$0c30 system scratch
+syssc4 equ flxorg+$0c31 system scratch
+syssc5 equ flxorg+$0c32 system scratch
+cputyp equ flxorg+$0c33 cpu type flag
+cp2mhz equ $80 2mh clock
+cpslow equ $40 memory stretch
+cp50hz equ $20 50 hz power
+cpramf equ $10 cpu ram available
+cprtck equ $08 6819 rtc available
+cpiobx equ $04 4 addr/port
+cptime equ $02 6840 timer available
+cpxmem equ $01 extended memory used
+ptrrap equ flxorg+$0c35 reserved printer area pointer
+ptrral equ flxorg+$0c37 reserved printer area length
+ptrdev equ flxorg+$0c39 printer device address
+retadr equ flxorg+$0c43 docmd return address
+ulcflg equ flxorg+$0c49 upper/lower case flag
+prompt equ flxorg+$0c4e pointer to prompt string
+prinit equ flxorg+$0cc0 printer initialization
+prterm equ flxorg+$0cd0 printer close routine
+prdych equ flxorg+$0cd8 printer ready check
+ptrout equ flxorg+$0ce4 printer output
+prcflg equ flxorg+$0cfc active spooling flag
+syssc6 equ flxorg+$0cf8 system scratch
+*
+coldst equ flxorg+$0d00 cold start
+warmst equ flxorg+$0d03 warm start
+renter equ flxorg+$0d06 re-entry
+inchar equ flxorg+$0d09 basic input character
+incha2 equ flxorg+$0d0c basic input character
+outchr equ flxorg+$0d0f basic output character
+outch2 equ flxorg+$0d12 basic output character
+getchr equ flxorg+$0d15 get character
+putchr equ flxorg+$0d18 put character
+inbuff equ flxorg+$0d1b input into line buffer
+pstrng equ flxorg+$0d1e print string
+clasfy equ flxorg+$0d21 classify character
+prcrlf equ flxorg+$0d24 print crlf
+nxtchr equ flxorg+$0d27 get next buffer character
+rstrio equ flxorg+$0d2a restore i/o vectors
+getfil equ flxorg+$0d2d get file specs
+loadfl equ flxorg+$0d30 load binary file
+setext equ flxorg+$0d33 set extension
+addb2x equ flxorg+$0d36 add b to x
+outdec equ flxorg+$0d39 output decimal number
+outhex equ flxorg+$0d3c output hexadecimal number
+rpterr equ flxorg+$0d3f report error
+gethex equ flxorg+$0d42 get hexadecimal number
+outadr equ flxorg+$0d45 output hexadecimal address
+indecm equ flxorg+$0d48 input decimal number
+docmnd equ flxorg+$0d4b call dos as a suboutine
+ctstat equ flxorg+$0d4e check terminal status
+*
+tapptr equ flxorg+$13de vector for input tap
+tapdum equ flxorg+$13e0 dummy rts for rm
+setirq equ flxorg+$13e1 clear irq vector
+clrirq equ flxorg+$13e3 set irq vector
+trminp equ flxorg+$13e5 terminal input without echo
+timoff equ flxorg+$13ed timer off
+timron equ flxorg+$13ef timer on
+timint equ flxorg+$13f1 timer init
+trmint equ flxorg+$13f5 terminal init
+trmchk equ flxorg+$13f7 terminal check
+trmout equ flxorg+$13f9 terminal output
+trmine equ flxorg+$13fb terminal input with echo
+*
+fmsint equ flxorg+$1400 fms initialization
+fmscls equ flxorg+$1403 fms close files
+fmscal equ flxorg+$1406 fms call
+fcbbas equ flxorg+$1409 fcb base pointer
+fcbcur equ flxorg+$140b fcb current address
+verflg equ flxorg+$1435 verify flag
+*
+dreadr equ flxorg+$1e00 basic read disk
+dwrite equ flxorg+$1e03 basic write disk
+dverfy equ flxorg+$1e06 basic verify disk
+drstor equ flxorg+$1e09 basic restore disk
+ddselr equ flxorg+$1e0c basic select drive
+dcheck equ flxorg+$1e0f basic check drive ready
+dqchek equ flxorg+$1e12 basic quick drive check
+dseekt equ flxorg+$1e1b basic drive seek-to-sector
+*
+fmgnxb equ $00 get next byte
+fmpnxb equ $00 put next byte
+fmopni equ $01 open for input
+fmopno equ $02 open for output
+fmopnu equ $03 open for update
+fmclsi equ $04 close for input
+fmclso equ $04 close for output
+fmclsu equ $04 close for update
+fmrewf equ $05 rewind file
+fmopdi equ $06 open directory
+fmgeti equ $07 get information record
+fmputi equ $08 put information record
+fmrdss equ $09 read single sector
+fmwtss equ $0a write single sector
+fmresd equ $0b reserved
+fmdelt equ $0c delete file
+fmrenm equ $0d rename file
+fmrese equ $0e reserved
+fmnxsq equ $0f get next sequential sector
+fmopir equ $10 open system information record
+fmgtrb equ $11 get random byte from sector
+fmptrb equ $12 put random byte into sector
+fmresf equ $13 reserved
+fmnxdr equ $14 find next drive
+fmrecn equ $15 position to record n
+fmback equ $16 back up one record
+*
+fcfunc equ $00 fcb function code
+fceror equ $01 fcb error status
+fcactv equ $02 fcb activity status
+fcdriv equ $03 fcb drive number
+fcname equ $04 fcb name
+fcextn equ $0c fcb extension
+fcattr equ $0f fcb file attributes
+fcres1 equ $10 fcb reserved
+fcsadr equ $11 fcb starting disk address
+fceadr equ $13 fcb ending disk address
+fcsize equ $15 fcb file size
+fcfscm equ $17 fcb file sector map indicator
+fcres2 equ $18 fcb reserved
+fcdmon equ $19 fcb creation month
+fcdday equ $1a fcb creation day
+fcdyer equ $1b fcb creation year
+fclist equ $1c fcb list pointer
+fccrpo equ $1e fcb current position
+fccrec equ $20 fcb current record number
+fcindx equ $22 fcb data index
+fcrinx equ $23 fcb random index
+fcnwbf equ $24 fcb name work buffer
+fccdir equ $2f fcb current directory address
+fcdelp equ $32 fcb first deleted directory pointer
+fcrenm equ $35 fcb rename work area
+fccomp equ $3b fcb space compression flag
+fcbuff equ $40 fcb sector buffer
+*
+frillg equ 01 illegal fms function code encountered
+frinus equ 02 the requested file is in use
+frexis equ 03 the file specified already exists
+frabsn equ 04 the specified file could not be found
+frsysd equ 05 system directory error - reboot system
+frfuld equ 06 the system directory space is full
+frnosp equ 07 all available disk space has been used
+frendf equ 08 read past end of file
+frrder equ 09 disk file read error
+frwter equ 10 disk file write error
+frwrpr equ 11 the file or disk is write protected!
+frprot equ 12 the file is protected - file not deleted
+frbfcb equ 13 illegal file control block specified
+frbadr equ 14 illegal disk address encountered
+frbdrv equ 15 an illegal drive number was specified
+frdrnr equ 16 drives not ready
+frflpr equ 17 the file is protected - access denied
+frsyss equ 18 system file status error
+frdtix equ 19 fms data index range error
+frfmse equ 20 fms inactive - reboot system
+frilfl equ 21 illegal file specification
+frsysc equ 22 system file close error
+frsmap equ 23 sector map overflow - disk too segmented
+frbrno equ 24 nonexistent record number specified
+frbfil equ 25 record number match error - file damaged
+frsntx equ 26 command syntax error - retype command
+frprnt equ 27 that command is not allowed while printing
+frhard equ 28 wrong hardware configuration
+frundf equ 29 undefined
+*
+extbin equ $00 .bin
+exttxt equ $01 .txt
+extcmd equ $02 .cmd
+extbas equ $03 .bas
+extsys equ $04 .sys
+extbak equ $05 .bak
+extscr equ $06 .scr
+extdat equ $07 .dat
+extbac equ $08 .bac
+extdir equ $09 .dir
+extprt equ $0a .prt
+extout equ $0b .out
+*
+*

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/3rdparty/utils/sleuth3/csschgf1.txt	Sat Feb 04 18:55:39 2017 +0100
@@ -0,0 +1,163 @@
+
+.z7000.lnbuff.
+.z7080.ttybsp.
+.z7081.ttydel.
+.z7082.ttyeol.
+.z7083.ttydep.
+.z7084.ttywid.
+.z7085.ttynlc.
+.z7086.ttytab.
+.z7087.ttydpx.
+.z7088.ttyejc.
+.z7089.ttypau.
+.z708a.ttyesc.
+.z708b.sysdrv.
+.z708c.wrkdrv.
+.z708d.syssc1.
+.z708e.smonth.
+.z708f.sdaymn.
+.z7090.syearn.
+.z7091.lsttrm.
+.z7092.uctaba.
+.z7093.uctaba+1.
+.z7094.lnbufp.
+.z7095.lnbufp+1.
+.z7096.escrtn.
+.z7097.escrtn+1.
+.z7098.syssc2.
+.z7099.syssc3.
+.z709a.prvchr.
+.z709b.curlin.
+.z709c.loadof.
+.z709d.loadof+1.
+.z709e.trflag.
+.z709f.traddr.
+.z70a0.traddr+1.
+.z70a1.aciafl.
+.z70a2.errtyp.
+.z70a3.outswt.
+.z70a4.syssc4.
+.z70a5.comflg.
+.z70a6.crotcl.
+.z70a7.syssc5.
+.z70b5.syssc6.
+.z7100.coldst.
+.z7103.warmst.
+.z7106.renter.
+.z7109.inchar.
+.z710c.outchr.
+.z710f.getchr.
+.z7112.putchr.
+.z7115.inbuff.
+.z7118.pstrng.
+.z711b.clasfy.
+.z711e.prcrlf.
+.z7121.nxtchr.
+.z7124.rstrio.
+.z7127.getfil.
+.z712a.loadfl.
+.z712d.setext.
+.z7130.addb2x.
+.z7133.outdec.
+.z7136.outch2.
+.z7139.outhex.
+.z713c.rpterr.
+.z713f.gethex.
+.z7142.docmnd.
+.z7600.startr.
+.z7740.sffunc.
+.z7741.sferor.
+.z7742.sfactv.
+.z7743.sfdriv.
+.z7744.sfname.
+.z7745.sfname+1.
+.z7746.sfname+2.
+.z7747.sfname+3.
+.z7748.sfname+4.
+.z7749.sfname+5.
+.z774a.sfname+6.
+.z774b.sfname+8.
+.z774c.sfextn.
+.z774d.sfextn+1.
+.z774e.sfextn+2.
+.z774f.sfattr.
+.z7750.sfres1.
+.z7751.sfsadr.
+.z7752.sfsadr+1.
+.z7753.sfeadr.
+.z7754.sfeadr+1.
+.z7755.sfsize.
+.z7756.sfsize+1.
+.z7757.sffscm.
+.z7758.sfres2.
+.z7759.sfdmon.
+.z775a.sfdday.
+.z775b.sfdyer.
+.z775c.sflist.
+.z775d.sflist+1.
+.z775e.sfcrpo.
+.z775f.sfcrpo+1.
+.z7760.sfcrec.
+.z7761.sfcrec+1.
+.z7762.sfindx.
+.z7763.sfrinx.
+.z7764.sfnwbf.
+.z7765.sfnwbf+1.
+.z7766.sfnwbf+2.
+.z7767.sfnwbf+3.
+.z7768.sfnwbf+4.
+.z7769.sfnwbf+5.
+.z776a.sfnwbf+6.
+.z776b.sfnwbf+7.
+.z776c.sfnwbf+8.
+.z776d.sfnwbf+9.
+.z776e.sfnwbf+10.
+.z776f.sfcdir.
+.z7770.sfcdir+1.
+.z7771.sfcdir+2.
+.z7772.sfdelp.
+.z7773.sfdelp+1.
+.z7774.sfdelp+2.
+.z7775.sfrenm.
+.z7776.sfrenm+1.
+.z7777.sfrenm+2.
+.z7778.sfrenm+3.
+.z7779.sfrenm+4.
+.z777a.sfrenm+5.
+.z777b.sfcomp.
+.z777c.sfrenm+7.
+.z777d.sfrenm+8.
+.z777e.sfrenm+9.
+.z777f.sfrenm+10.
+.z7780.sfbuff.
+.z7800.fmsint.
+.z7803.fmscls.
+.z7806.fmscal.
+.z7809.fcbbas.
+.z780a.fcbbas+1.
+.z780b.fcbcur.
+.z780c.fcbcur+1.
+.z782d.verflg.
+.z7f80.dreadr.
+.z7f83.dwrite.
+.z7f86.dverfy.
+.z7f89.drstor.
+.z7f8c.ddselr.
+.z7f8f.dcheck.
+.z7f92.dqchek.
+.za07f.sstack.
+.za07e.sstack-1.
+.za07d.sstack-2.
+.za07c.sstack-3.
+.za07b.sstack-4.
+.za07a.sstack-5.
+.za079.sstack-6.
+.za078.sstack-7.
+.za077.sstack-8.
+.za076.sstack-9.
+.za075.sstack-10.
+.za074.sstack-11.
+.za073.sstack-12.
+.za072.sstack-13.
+.za071.sstack-14.
+.za070.sstack-15.

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/3rdparty/utils/sleuth3/csschgf2.txt	Sat Feb 04 18:55:39 2017 +0100
@@ -0,0 +1,180 @@
+
+.za07f.sstack.
+.za07e.sstack-1.
+.za07d.sstack-2.
+.za07c.sstack-3.
+.za07b.sstack-4.
+.za07a.sstack-5.
+.za079.sstack-6.
+.za078.sstack-7.
+.za077.sstack-8.
+.za076.sstack-9.
+.za075.sstack-10.
+.za074.sstack-11.
+.za073.sstack-12.
+.za072.sstack-13.
+.za071.sstack-14.
+.za070.sstack-15.
+.za080.lnbuff.
+.za100.startr.
+.za840.sffunc.
+.za841.sferor.
+.za842.sfactv.
+.za843.sfdriv.
+.za844.sfname.
+.za845.sfname+1.
+.za846.sfname+2.
+.za847.sfname+3.
+.za848.sfname+4.
+.za849.sfname+5.
+.za84a.sfname+6.
+.za84b.sfname+8.
+.za84c.sfextn.
+.za84d.sfextn+1.
+.za84e.sfextn+2.
+.za84f.sfattr.
+.za850.sfres1.
+.za851.sfsadr.
+.za852.sfsadr+1.
+.za853.sfeadr.
+.za854.sfeadr+1.
+.za855.sfsize.
+.za856.sfsize+1.
+.za857.sffscm.
+.za858.sfres2.
+.za859.sfdmon.
+.za85a.sfdday.
+.za85b.sfdyer.
+.za85c.sflist.
+.za85d.sflist+1.
+.za85e.sfcrpo.
+.za85f.sfcrpo+1.
+.za860.sfcrec.
+.za861.sfcrec+1.
+.za862.sfindx.
+.za863.sfrinx.
+.za864.sfnwbf.
+.za865.sfnwbf+1.
+.za866.sfnwbf+2.
+.za867.sfnwbf+3.
+.za868.sfnwbf+4.
+.za869.sfnwbf+5.
+.za86a.sfnwbf+6.
+.za86b.sfnwbf+7.
+.za86c.sfnwbf+8.
+.za86d.sfnwbf+9.
+.za86e.sfnwbf+10.
+.za86f.sfcdir.
+.za870.sfcdir+1.
+.za871.sfcdir+2.
+.za872.sfdelp.
+.za873.sfdelp+1.
+.za874.sfdelp+2.
+.za875.sfrenm.
+.za876.sfrenm+1.
+.za877.sfrenm+2.
+.za878.sfrenm+3.
+.za879.sfrenm+4.
+.za87a.sfrenm+5.
+.za87b.sfcomp.
+.za87c.sfrenm+7.
+.za87d.sfrenm+8.
+.za87e.sfrenm+9.
+.za87f.sfrenm+10.
+.za880.sfbuff.
+.zac00.ttybsp.
+.zac01.ttydel.
+.zac02.ttyeol.
+.zac03.ttydep.
+.zac04.ttywid.
+.zac05.ttynlc.
+.zac06.ttytab.
+.zac07.ttybec.
+.zac08.ttyejc.
+.zac09.ttypau.
+.zac0a.ttyesc.
+.zac0b.sysdrv.
+.zac0c.wrkdrv.
+.zac0d.syssc1.
+.zac0e.smonth.
+.zac0f.sdaymn.
+.zac10.syearn.
+.zac11.lsttrm.
+.zac12.uctaba.
+.zac13.uctaba+1.
+.zac14.lnbufp.
+.zac15.lnbufp+1.
+.zac16.escrtn.
+.zac17.escrtn+1.
+.zac18.curchr.
+.zac19.prvchr.
+.zac1a.curlin.
+.zac1b.loadof.
+.zac1c.loadof+1.
+.zac1d.trflag.
+.zac1e.traddr.
+.zac1f.traddr+1.
+.zac20.errtyp.
+.zac21.spciof.
+.zac22.outswt.
+.zac23.inswtc.
+.zac24.foaddr.
+.zac25.foaddr+1.
+.zac26.fiaddr.
+.zac27.fiaddr+1.
+.zac28.comflg.
+.zac29.crotcl.
+.zac2a.syssc2.
+.zac2b.memend.
+.zac2c.memend+1.
+.zac2d.errvec.
+.zac2e.errvec+1.
+.zac2f.fieflg.
+.zac30.syssc3.
+.zac4e.syssc4.
+.zacc0.prinit.
+.zacd8.prdych.
+.zace4.proutr.
+.zacf8.syssc5.
+.zad00.coldst.
+.zad03.warmst.
+.zad06.renter.
+.zad09.inchar.
+.zad0c.incha2.
+.zad0f.outchr.
+.zad12.outch2.
+.zad15.getchr.
+.zad18.putchr.
+.zad1b.inbuff.
+.zad1e.pstrng.
+.zad21.clasfy.
+.zad24.prcrlf.
+.zad27.nxtchr.
+.zad2a.rstrio.
+.zad2d.getfil.
+.zad30.loadfl.
+.zad33.setext.
+.zad36.addb2x.
+.zad39.outdec.
+.zad3c.outhex.
+.zad3f.rpterr.
+.zad42.gethex.
+.zad45.outadr.
+.zad48.indecm.
+.zad4b.docmnd.
+.zad4e.ctstat.
+.zb400.fmsint.
+.zb403.fmscls.
+.zb406.fmscal.
+.zb409.fcbbas.
+.zb40a.fcbbas+1.
+.zb40b.fcbcur.
+.zb40c.fcbcur+1.
+.zb435.verflg.
+.zbe80.dreadr.
+.zbe83.dwrite.
+.zbe86.dverfy.
+.zbe89.drstor.
+.zbe8c.ddselr.
+.zbe8f.dcheck.
+.zbe92.dqchek.

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/3rdparty/utils/sleuth3/csschgf9.txt	Sat Feb 04 18:55:39 2017 +0100
@@ -0,0 +1,196 @@
+
+.zc07f.sstack.
+.zc080.lnbuff.
+.zc100.startr.
+.zc840.sysfcb.
+.zc841.sferor.
+.zc842.sfactv.
+.zc843.sfdriv.
+.zc844.sfname.
+.zc845.sfname+1.
+.zc846.sfname+2.
+.zc847.sfname+3.
+.zc848.sfname+4.
+.zc849.sfname+5.
+.zc84a.sfname+6.
+.zc84b.sfname+8.
+.zc84c.sfextn.
+.zc84d.sfextn+1.
+.zc84e.sfextn+2.
+.zc84f.sfattr.
+.zc850.sfres1.
+.zc851.sfsadr.
+.zc852.sfsadr+1.
+.zc853.sfeadr.
+.zc854.sfeadr+1.
+.zc855.sfsize.
+.zc856.sfsize+1.
+.zc857.sffscm.
+.zc858.sfres2.
+.zc859.sfdmon.
+.zc85a.sfdday.
+.zc85b.sfdyer.
+.zc85c.sflist.
+.zc85d.sflist+1.
+.zc85e.sfcrpo.
+.zc85f.sfcrpo+1.
+.zc860.sfcrec.
+.zc861.sfcrec+1.
+.zc862.sfindx.
+.zc863.sfrinx.
+.zc864.sfnwbf.
+.zc865.sfnwbf+1.
+.zc866.sfnwbf+2.
+.zc867.sfnwbf+3.
+.zc868.sfnwbf+4.
+.zc869.sfnwbf+5.
+.zc86a.sfnwbf+6.
+.zc86b.sfnwbf+7.
+.zc86c.sfnwbf+8.
+.zc86d.sfnwbf+9.
+.zc86e.sfnwbf+10.
+.zc86f.sfcdir.
+.zc870.sfcdir+1.
+.zc871.sfcdir+2.
+.zc872.sfdelp.
+.zc873.sfdelp+1.
+.zc874.sfdelp+2.
+.zc875.sfrenm.
+.zc87b.sfcomp.
+.zc880.sfbuff.
+.zcc00.ttybsp.
+.zcc01.ttydel.
+.zcc02.ttyeol.
+.zcc03.ttydep.
+.zcc04.ttywid.
+.zcc05.ttynlc.
+.zcc06.ttytab.
+.zcc07.ttybec.
+.zcc08.ttyejc.
+.zcc09.ttypau.
+.zcc0a.ttyesc.
+.zcc0b.sysdrv.
+.zcc0c.wrkdrv.
+.zcc0d.sysflg.
+.zcc0e.smonth.
+.zcc0f.sdaymn.
+.zcc10.syearn.
+.zcc11.lsttrm.
+.zcc12.uctaba.
+.zcc13.uctaba+1.
+.zcc14.lnbufp.
+.zcc15.lnbufp+1.
+.zcc16.escrtn.
+.zcc17.escrtn+1.
+.zcc18.curchr.
+.zcc19.prvchr.
+.zcc1a.curlin.
+.zcc1b.loadof.
+.zcc1c.loadof+1.
+.zcc1d.trflag.
+.zcc1e.traddr.
+.zcc1f.traddr+1.
+.zcc20.errtyp.
+.zcc21.spciof.
+.zcc22.outswt.
+.zcc23.inswtc.
+.zcc24.foaddr.
+.zcc25.foaddr+1.
+.zcc26.fiaddr.
+.zcc27.fiaddr+1.
+.zcc28.comflg.
+.zcc29.crotcl.
+.zcc2a.syssc2.
+.zcc2b.memend.
+.zcc2c.memend+1.
+.zcc2d.errvec.
+.zcc2e.errvec+1.
+.zcc2f.fieflg.
+.zcc30.syssc3.
+.zcc33.cputyp.
+.zcc35.ptrrap.
+.zcc36.ptrrap+1.
+.zcc37.ptrral.
+.zcc38.ptrral+1.
+.zcc39.ptrdev.
+.zcc3a.ptrdev+1.
+.zcc43.retadr.
+.zcc44.retadr+1.
+.zcc49.ulcflg.
+.zcc4e.prompt.
+.zcc4f.prompt+1.
+.zccc0.prinit.
+.zccc1.prinit+1.
+.zccd0.prterm.
+.zccd1.prterm+1.
+.zccd8.prdych.
+.zccd9.prdych+1.
+.zcce4.proutr.
+.zcce5.proutr+1.
+.zccfc.prcflg.
+.zccf8.syssc5.
+.zcd00.coldst.
+.zcd03.warmst.
+.zcd06.renter.
+.zcd09.inchar.
+.zcd0c.incha2.
+.zcd0f.outchr.
+.zcd12.outch2.
+.zcd15.getchr.
+.zcd18.putchr.
+.zcd1b.inbuff.
+.zcd1e.pstrng.
+.zcd21.clasfy.
+.zcd24.prcrlf.
+.zcd27.nxtchr.
+.zcd2a.rstrio.
+.zcd2d.getfil.
+.zcd30.loadfl.
+.zcd33.setext.
+.zcd36.addb2x.
+.zcd39.outdec.
+.zcd3c.outhex.
+.zcd3f.rpterr.
+.zcd42.gethex.
+.zcd45.outadr.
+.zcd48.indecm.
+.zcd4b.docmnd.
+.zcd4e.ctstat.
+.zd3de.tapptr.
+.zd3df.tapptr+1.
+.zd3e0.rmdumy.
+.zd3e1.setirq.
+.zd3e2.setirq+1.
+.zd3e3.clrirq.
+.zd3e4.clrirq+1.
+.zd3e5.trminp.
+.zd3e6.trminp+1.
+.zd3ed.timoff.
+.zd3ee.timoff+1.
+.zd3ef.timron.
+.zd3f0.timron+1.
+.zd3f1.timint.
+.zd3f2.timint+1.
+.zd3f5.trmint.
+.zd3f6.trmint+1.
+.zd3f7.trmchk.
+.zd3f8.trmchk+1.
+.zd3f9.timout.
+.zd3fa.timout+1.
+.zd3fb.timine.
+.zd3fc.timine+1.
+.zd400.fmsint.
+.zd403.fmscls.
+.zd406.fmscal.
+.zd409.fcbbas.
+.zd40b.fcbcur.
+.zd435.verflg.
+.zd436.surflg.
+.zde00.dreadr.
+.zde03.dwrite.
+.zde06.dverfy.
+.zde09.drstor.
+.zde0c.ddselr.
+.zde0f.dcheck.
+.zde12.dqchek.
+.zde1b.dseekt.

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/3rdparty/utils/sleuth3/cssconst3.asm	Sat Feb 04 18:55:39 2017 +0100
@@ -0,0 +1,303 @@
+***************************************
+**
+idlin fcc "OS/9 Super Sleuth (CC) "
+ fcb $04
+ fcc " c1982 by CSC, Conyers GA 30207"
+ fcb $04
+ fcc " enter ? for help"
+ fcb $04,$00
+helps fcc " operational commands:"
+ fcb $04
+ fcc "  d/v-disassemble/view program"
+ fcb $04
+ fcc "  f-exit to OS/9"
+ fcb $04
+ fcc "  q/m-query/modify object code"
+ fcb $04
+ fcc "  t-fill addresses with value"
+ fcb $04
+ fcc "  u-enter OS/9 command"
+ fcb $04
+ fcc "  w-write new object code path"
+ fcb $04
+ fcc "  y-find hex string in code"
+ fcb $04
+ fcc " address range commands:"
+ fcb $04
+ fcc "  a=fdb,c=fcc,h=fcb,i=instr,"
+ fcc "j=instr+chr,k=kill,r=rmb"
+ fcb $04
+ fcc " mode change commands:"
+ fcb $04
+croil equ *+8
+ fcc "  b-flip x-assembler switch"
+ fcb $04
+equil equ *+8
+ fcc "  e-flip separate-label switch"
+ fcb $04
+posil equ *+8
+ fcc "  p-flip position-ind. switch"
+ fcb $04
+cpuil equ *+10
+ fcc "  z-change cpu mode"
+ fcb $04
+ fcc " miscellaneous commands:"
+ fcb $04
+ fcc "  g-specify auxiliary i/o path"
+ fcb $04
+ fcc "  l-list control information"
+ fcb $04
+ fcc "  n-new range or memory module"
+ fcb $04
+offil equ *+7
+ fcc "  o-set offset load value "
+ fcb $04
+disim equ *+11
+ fcc "  s-specify input path "
+ fcb $07,$04
+lxfer equ *+7
+ fcc "  x-set xfer-address "
+ fcb $07,$04,$00
+shotab fcc "     "
+ fcc ".0 .1 .2 .3 .4 .5 .6 .7 "
+ fcb $04
+ fcc ".8 .9 .a .b .c .d .e .f "
+ fcb $04
+shota1 fcc " 01234567"
+ fcb $04
+ fcc "89abcdef"
+ fcb $04
+shota2 fcc "/start/=</end/=>"
+ fcc "/adr=!/chr=#/hex=(/ins=)/inc=*/kil=+/rmb="
+ fcb $22
+ fcc "/scrn/quit/prev/addr/ ?"
+ fcb $00
+loss9 fcc " OS/9"
+ fcb $04
+lflex fcc " Flex"
+ fcb $04
+phace fcc " Phase "
+ fcb $07,$04
+disom fcc " output path name "
+ fcb $07,$04
+prtnm fcc " printer path name "
+ fcb $07,$04
+altnm fcc " auxiliary"
+ fcb $07,$04
+lenter fcc " enter"
+ fcc " p(printer), t(terminal),"
+ fcc " b(both), n(no output) "
+ fcb $07,$04
+lmode fcc " 0=6800/2/8,1=6801/3,2=6502,5=[14]6805,9=6809 "
+ fcb $04
+lon fcc " on"
+ fcb $04
+loff fcc " off"
+ fcb $04
+ltext fcc "module "
+ fcb $04
+ldata fcc "storage"
+ fcb $04
+lxtnt fcc "extent "
+lstar fcc " start="
+ fcb $04
+lendr fcc " end="
+ fcb $04
+lvalue fcc " value="
+ fcb $04
+vshell fcs "shell"
+badfil fcc " bad format!"
+ fcb $07,$04
+tabov fcc " table overflow!"
+ fcb $07,$04
+invrg fcc " bad range!"
+beeps fcb $07,$04 bell
+errirz fcc "error on input path"
+errirl equ *-errirz+1
+ fcb $07,$04
+errorz fcc "error on output path"
+errorl equ *-errorz+1
+ fcb $07,$04
+errarz fcc "error on auxiliary path"
+errarl equ *-errarz+1
+ fcb $07,$04
+errprz fcc "error on printer path"
+errprl equ *-errprz+1
+ fcb $07,$04
+errexc fcc "error in OS/9 call"
+errexl equ *-errexc+1
+ fcb $07,$04
+bequb fcb $03
+ fcc "equ"
+ fcb $05,$04
+bequa fcc "*+"
+ fcb $04
+orges fcb $03
+ fcc "org"
+ fcb $05,$24,$04 $
+rmbes fcb $03
+ fcc "rmb"
+ fcb $05,$24,$04 $
+sysdef fcb $03
+ fcc "ifp1"
+ fcb $0d,$03
+ fcc "use"
+ fcb $05
+ fcc "/DD/DEFS/"
+ fcc "defsfile" level 1.2/2.x
+ fcb $0d,$03
+ fcc "endc"
+ fcb $0d,$03
+ fcc "ttl Code by CSC OS/9 Super Sleuth3 "
+ fcb $0d
+lverso fcb $02
+ fcc "verson"
+ fcb $03
+ fcc "equ"
+ fcb $05,$24,$30,$04 $0
+lnamem fcb $02
+ fcc "namemd"
+ fcb $03
+ fcc "equ"
+ fcb $05,$04
+lxfera fcb $02
+ fcc "xferad"
+ fcb $03
+ fcc "equ"
+ fcb $05,$04
+lmodul fcc "0000"
+ fcb $03
+ fcc "mod"
+ fcb $05
+ fcc "endmod,namemd,"
+ fcb $04
+llangs fcc "+Objct,"
+ fcb $04
+lreent fcc "ReEnt+"
+ fcb $04
+lversi fcc "verson,xferad,endmem"
+ fcb $04
+lemmod fcb $02
+ fcc "endmem"
+ fcb $04,$03
+ fcc "equ"
+ fcb $05,$2e,$04 .
+endos9 fcb $03
+ fcc "emod"
+ fcb $0d,$02
+ fcc "endmod equ"
+ fcb $05,$2a,$0d,$04 *
+endes fcb $03
+ fcc "end"
+ fcb $05,$04
+lcpcr fcc ",pcr" ,pcr
+ fcb $04
+lposr fcc "pshs]*,a,b%"
+ fcc "[lea*](($ffff-(!))+1),pcr%"
+ fcc "[tfr]*,d%"
+ fcc "[addd]2,s%"
+ fcc "[puls]*,a,b"
+ fcb $00
+lposs fcc "pshs]u,a,b%"
+ fcc "[leau]($fffa-(!)),pcr%"
+ fcc "[pshs]u%"
+ fcc "[tfr]s,d%"
+ fcc "[addd],s++%"
+ fcc "[puls]u,a,b"
+ fcb $00
+ltypes fcb $04,$04,$04,$04,$04,$04,$04,$04
+ fcc "Prgrm"
+ fcb $04,$04,$04
+ fcc "Sbrtn"
+ fcb $04,$04,$04
+ fcc "Multi"
+ fcb $04,$04,$04
+ fcc "Data"
+ fcb $04,$04,$04,$04
+ fcb $04,$04,$04,$04,$04,$04,$04,$04
+ fcb $04,$04,$04,$04,$04,$04,$04,$04
+ fcb $04,$04,$04,$04,$04,$04,$04,$04
+ fcb $04,$04,$04,$04,$04,$04,$04,$04
+ fcb $04,$04,$04,$04,$04,$04,$04,$04
+ fcb $04,$04,$04,$04,$04,$04,$04,$04
+ fcb $04,$04,$04,$04,$04,$04,$04,$04
+ fcc "Systm"
+ fcb $04,$04,$04
+ fcc "FlMgr"
+ fcb $04,$04,$04
+ fcc "Drivr"
+ fcb $04,$04,$04
+ fcc "Devic"
+ fcb $04
+**
+predef equ *
+pfcbxx fcb $03
+ fcc "fcb"
+ fcb $05,$24,$04 $
+pfccxx fcb $03
+ fcc "fcc"
+ fcb $05,$22 "
+pinst1 fcb $00,$00,$00,$00,$00
+ fcc "                                "
+pfdbxx fcb $03
+ fcc "fdb"
+ fcb $05,$04
+pzlabel fcb $7a,$04 z
+pulabel fcb $75,$04 u
+pxlabel fcb $78,$04 x
+plnames fcc " title   "
+ fcb $04
+pnames fcb $03
+ fcc "nam"
+ fcb $05
+ fcc "                                "
+ploptes fcc " options "
+ fcb $04
+poptes fcb $03
+ fcc "opt"
+ fcb $05
+ fcc "                                "
+* pshpul contains 6809 reg names for psh and pul
+ppshpu fcb $70,$63,$73,$00,$79,$00,$78,$00 pc s  y  x
+ fcb $64,$70,$62,$00,$61,$00,$63,$63 dp b  a  cc
+preend equ *
+* ifeq h6309-1
+* wpshpu cintains 6309 reg name for pshxw and pulxw
+*wpshpu
+* fcb $77,$00 w 
+*wpshend equ *
+* ldst309 contains reg names for 6309 load store ops
+*ldst309 fcb $77,$00,$71,$00,$66,$00,$65,$00 w q f e
+*ldstend equ *
+* endc
+*
+** command table for command interpreter
+coman equ * command table
+ fdb helpme-coman ?
+ fdb gtype-coman a
+ fdb fcrof-coman b
+ fdb gtype-coman c
+ fdb disas-coman d
+ fdb fequf-coman e
+ fdb fexit-coman f
+ fdb auxino-coman g
+ fdb gtype-coman h
+ fdb gtype-coman i
+ fdb gtype-coman j
+ fdb gtype9-coman k
+ fdb dmptab-coman l
+ fdb examin-coman m
+ fdb newrng-coman n
+ fdb oload-coman o
+ fdb fposf-coman p
+ fdb showaa-coman q
+ fdb gtype9-coman r
+ fdb diskd-coman s
+ fdb fillup-coman t
+ fdb doscom-coman u
+ fdb disas-coman v
+ fdb writem-coman w
+ fdb sxfer-coman x
+ fdb findst-coman y
+ fdb setmod-coman z
+**
\ No newline at end of file

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/3rdparty/utils/sleuth3/cssdisas3.asm	Sat Feb 04 18:55:39 2017 +0100
@@ -0,0 +1,660 @@
+
+***************************************
+**
+disas ldx faddr,u disassemble program code
+ leax $01,x
+ bne disro
+ lbsr newrng get range
+disro lda #$24 $
+ sta ulabel,u
+ sta xlabel,u
+ sta zlabel,u
+ sta zulabe,u
+ lda comand,u chk view
+ cmpa #$56 v
+ beq disvx
+ lda #$75 u
+ sta ulabel,u
+ lda #$7a z
+ sta zlabel,u
+ sta zulabe,u
+ sta xlabel,u
+ lda pmode,u chk for 6809
+ bpl disxz
+ tst os9flx,u chk for OS/9
+ beq disxz
+ lda #$78 x
+ sta xlabel,u
+disxz ldx xaddr,u chk xfer addr
+ leax $01,x
+ bne disxf
+ lbsr sxfer get xfer addr
+disxf lbsr dikni get output file name
+disvx lda #$04 fix nam and opt
+ sta names+5,u
+ sta optes+5,u
+ lbsr xcrlf get options
+ clr crtfl,u
+ clr prnfl,u
+ leax lenter,pcr enter p(printer), etc.
+ lbsr xpdat
+ lbsr xinee
+ anda #$5f
+ cmpa #$42 b
+ beq disqb
+ cmpa #$50 p
+ beq disqp
+ cmpa #$54 t
+ beq disqt
+ tst disof,u chk disk output
+ beq disqt t by default
+ bra disor
+disqb inc crtfl,u both t and p
+disqp inc prnfl,u p
+ lbsr xcrlf
+ leax prtnm,pcr get printer file name
+ lbsr xpdat
+ leax prfile,u
+ lbsr inbufr
+ cmpa #$0d
+ bne disor
+ clr prnfl,u no file name
+ clr prfile,u
+ bra disor
+disqt inc crtfl,u t
+disor lbsr xcrlf get nam and opt
+ tst disof,u chk disk output
+ bne disxn
+ lda comand,u chk view
+ cmpa #$56 v
+ beq disp0
+ tst prnfl,u chk printer
+ beq disp0
+disxn leax lnames,u
+ lbsr xpdat
+ leax names+5,u
+ lbsr rdline
+ lbsr xcrlf
+disxo leax loptes,u
+ lbsr xpdat
+ leax optes+5,u
+ lbsr rdline
+ lbsr xcrlf
+disp0 ldx taddr,u set addrs
+ stx eaddr,u
+ ldx typee,u
+ stx addre,u
+ sts stkadr,u
+ lbsr dmptae print parms
+ tst disof,u chk output file
+ beq dis0b
+ leax otfile,u open output otfile
+ ldd #(WRITE.*256)+(READ.+WRITE.+PREAD.) access and attributes
+ os9 I$Create
+ bcc dis0a
+ lda #$02 error
+ leax errorz,pcr
+ ldy #errorl
+ os9 I$WritLn
+ clr otfile,u
+ clr disof,u
+ clr prfile,u
+ clr prtfl,u
+ rts could not open
+dis0a clrb file desc
+ exg a,b
+ std otblok+iobfd,u file desc
+ ldd #buflen buffer length
+ std otblok+iobbl,u
+ std otblok+iobcc,u
+ ldd otblok+iobba,u buffer addr
+ std otblok+iobca,u
+dis0b tst prnfl,u chk printer file
+ beq disp1
+ leax prfile,u open output prfile
+ ldd #(WRITE.*256)+(READ.+WRITE.+PREAD.) access and attributes
+ os9 I$Create
+ bcc dis0d
+ lda #$02 error
+ leax errprz,pcr
+ ldy #errprl
+ os9 I$WritLn
+ tst disof,u chk output file
+ beq dis0c
+ lda otblok+iobfd+1,u
+ clr otblok+iobfd,u
+ clr otblok+iobfd+1,u
+ os9 I$Close
+ clr otfile,u
+ clr disof,u
+dis0c clr prfile,u
+ clr prnfl,u
+ rts could not open
+dis0d clrb file desc
+ exg a,b
+ std prblok+iobfd,u file desc
+ ldd #buflen buffer length
+ std prblok+iobbl,u
+ std prblok+iobcc,u
+ ldd prblok+iobba,u buffer addr
+ std prblok+iobca,u
+disp1 clr phase,u phase 1
+ clr svcflg,u
+ lbsr lastty restore pause option
+ lda comand,u chk view
+ cmpa #$56 v
+ beq disp2
+ lbsr reset
+ ldd faddr,u label program entry addr
+ lbsr adal0
+ tst os9flx,u chk for OS/9
+ beq dis1a
+ ldd #$0000 label program start addr
+ lbsr adal0
+ ldd obstor,u chk for storage
+ beq dis1a
+ ldd #$0000 label storage start addr
+ lbsr adalu
+dis1a bsr ckend chk end
+ bhi dis1b
+ bsr decod decode instruction
+ tst flabl,u chk label
+ beq dis1a
+ lbsr adald add a label
+ bra dis1a
+dis1b ldd xaddr,u chk xfer addr
+ cmpd #$ffff
+ beq disp2
+ lbsr adal0 enter into label table
+disp2 inc phase,u phase 2
+ lbsr reset
+ lbsr headr output nam/opt/data/mod
+dis2a bsr ckend chk end
+ bhi disp3
+ bsr decod decode instruction
+ lbsr ckequ chk equ's
+ lbsr outpt print instruction
+ bra dis2a
+disp3 lbra ender put out end
+**
+ckend ldd daddr,u chk for higher than end
+ cmpd eaddr,u
+ bhi ckenz
+ ldd faddr,u chk for less than start
+ cmpd daddr,u
+ckenz rts
+**
+decod leax insbeg,u decode instruction
+ lda instr,u remember instr
+ ldb insty,u remember type
+ ldy #(insend-insbeg)
+decoe clr ,x+ clear variables
+ leay -$01,y
+ bne decoe
+ sta instr,u restore instr
+ sta inst1,u
+ sta flopc,u
+ stb insty,u restore type
+ stb instx,u
+ leax inst1,u
+ stx iaddr,u
+ ldx saddr,u
+ leax -$01,x
+ stx caddr,u current instruction addr
+ cmpb #$43 chk fcc
+ bne pnfcc
+ ldb #$20 32 byte limit
+ lbra iafcc
+pnfcc cmpb #$48 chk fcb
+ bne pnfcb
+ ldb #$08 8 byte limit
+ lbra iafcc
+pnfcb cmpb #$4b chk ign
+ lbeq next2
+ cmpb #$52 chk rmb
+ lbeq iafcc
+pnins inc flisw,u start saving bytes
+ cmpb #$41 chk fdb
+ bne pnfdb
+ lbsr getin
+ lbra inpie
+pnfdb tfr a,b compute addr of opcode
+ clra
+ aslb
+ rola
+ addd aintab,u
+ std raddr,u
+ tfr d,x
+ lda zlabel,u init label prefix z
+ sta zulabe,u
+insp9 lda ,x get table entry
+ beq yecc9 chk for invalid optr
+ cmpa #$ff chk for page 2/3
+ beq inspg
+ tfr a,b
+ lsra
+ anda #$7e
+ sta worka,u optabx pointer
+ andb #$03
+ tst pmode,u chk cpu mode
+ bpl insx9
+ lda inst1,u chk for page 2/3
+ anda #$fe
+ cmpa #$10
+ bne insx9
+ incb
+insx9 stb fllts,u length
+ lda $01,x
+ tfr a,b
+ lsra
+ lsra
+ lsra
+ lsra
+ sta flsuf,u suffix
+ tfr b,a
+ anda modmsk,u
+ sta flmod,u mode
+ tst pmode,u chk cpu mode
+ bne insnv
+ andb #$08 chk 6801 instruction
+ bne yecc9
+ bra insnv
+inspg ldb $01,x page 2/3
+ andb #$08
+ stb flmod,u
+ lbsr getin next instruction
+ sta flopc,u
+ leax intpg9,pcr point to page 2/3 table
+ ldy #(intpx9-intpg9)
+inpal cmpa $02,x look up in page 2/3 table
+ bne inpar
+ ldb $01,x chk page 2/3
+ andb #$08
+ cmpb flmod,u check for proper page
+ bne inpar
+ bra insp9 found match
+inpar leax $03,x
+ leay -$03,y
+ bne inpal
+yecc9 lbra yecch invalid optr
+insnv lbsr insnm get instruction name
+ tst pmode,u chk for 6809
+ bpl inpww
+ ldd inam3,u chk for swi2
+ cmpd #$6932 i2
+ bne inpww
+ tst os9flx,u chk for OS/9
+ beq inpww
+ ldb #$ff
+ stb svcflg,u set svc flag
+ inc fllts,u get call number
+inpww ldb fllts,u get fixed portion of instruction
+ decb
+ cmpb fllth,u
+ beq inpwx
+ lbsr getin
+ bra inpww
+inpwx ldx iaddr,u point to last instruction byte
+ ldb ,x
+ stb flinx,u
+ tst svcflg,u check for OS/9 call
+ lbmi inswi3 handle it
+ lda flmod,u chk addr mode
+inpn0 cmpa #$01 chk inh
+ bne inpn1
+ tst flspc,u chk special flag
+ beq inpwz
+ lda flopc,u retrieve op code
+ cmpa #$20
+ bpl inpwz not tfr or exg
+ tfr b,a
+ anda #$88 chk reg numbers
+ beq inpi1
+ cmpa #$88
+ beq inpi1
+inpyc lbra yecch bad codes
+inpi1 tfr b,a chk dest reg
+ anda #$0f
+ cmpa #$06
+ bmi inpi2
+ cmpa #$08
+ bmi inpyc
+ cmpa #$0c
+ bpl inpyc
+inpi2 tfr b,a chk source regs
+ anda #$f0
+ cmpa #$60
+ bmi inpwz
+ cmpa #$80
+ bmi inpyc
+ cmpa #$c0
+ bpl inpyc
+inpwz lbra next2 ok, exit
+inpn1 cmpa #$02 chk dir
+ bne inpn2
+ tst os9flx,u chk for OS/9
+ beq inp1x
+ tst pmode,u chk for 6809
+ bpl inp1x
+ lda xlabel,u change to x
+ sta zulabe,u
+inp1x lbra dirct
+inpn2 cmpa #$03 chk ext
+ bne inpn3
+inpie leax -$01,x point to addr
+ lda pmode,u chk cpu mode
+ cmpa #$02
+ bne inpif
+ ldd ,x rev ext addr for 6502
+ exg a,b
+ bra inpih
+inpif bpl inpig chk for 6809
+ lda os9flx,u chk for OS/9
+ beq inpig
+ lda xlabel,u change to x
+ sta zulabe,u
+inpig ldd ,x get ext addr
+inpih lbra nextd
+inpn3 cmpa #$04 chk imm
+ bne inpn4
+ lda pmode,u chk cpu mode
+ cmpa #$05
+ beq inpq4
+ lda inam4,u chk suffix
+ cmpa #$64 for 'd'
+ blt inpq4
+ bne inpie
+ dec flabl,u
+ bra inpie
+inpq4 tfr b,a
+ clrb
+ dec flabl,u
+ lbra nextd
+inpn4 cmpa #$05 chk inx
+ beq inpx1
+ lbra inpn5
+inpx1 lda pmode,u chk cpu mode
+ bmi inpx5
+ cmpa #$05 chk 6805
+ bne inpxy
+ lbra dirct force direct
+inpx5 tfr b,a addr mode
+ anda #$0f
+ sta flamf,u
+ tfr b,a indir addr
+ anda #$10
+ sta flind,u
+ tfr b,a reg
+ anda #$60
+ lsra
+ lsra
+ lsra
+ lsra
+ sta flreg,u reg*2
+ cmpa #$04 chk for u
+ bne inpxu
+ tst os9flx,u chk for OS/9
+ beq inpxu
+ ldb flamf,u chk addr mode
+ cmpb #$0c
+ beq inpxu
+ cmpb #$0d
+ beq inpxu
+ ldb ulabel,u set label prefix u
+ stb zulabe,u
+inpxu ldb ,x chk postfix first bit
+ bmi inpx2
+ tst os9flx,u chk for OS/9
+ beq inpxy
+ andb #$f0
+ cmpb #$40 chk for +n,u
+ bne inpxy
+ ldb flamf,u get offset
+ clra
+ lbra nextd label it
+inpx2 lda flind,u
+ andb #$0f chk amf
+ cmpb #$07
+ bne inpx7
+inpxg lbra yecch bad amf
+inpx7 cmpb #$0a
+ beq inpxg
+ cmpb #$0e
+ beq inpxg
+ cmpb #$01
+ beq inpxy
+ cmpb #$03
+ bne inpx3
+ tsta chk indir
+ bne inpxg
+inpxy lbra next2 ok, exit
+inpx3 cmpb #$0f
+ bne inpxf
+ tsta chk indir
+ beq inpxg
+ tst flreg,u chk register
+ bne inpxg
+inpxf cmpb #$08 chk for more bytes
+ bmi inpxy
+ beq inpx8
+ cmpb #$0b
+ beq inpxy
+ cmpb #$0c
+ beq inpx8
+ pshs b
+ lbsr getin need two
+ puls b
+inpx8 pshs b
+ lbsr getin need one or two
+ puls b
+ cmpb #$0f
+ lbeq inpie ext addr
+inpxe cmpb #$0c
+ bne inpxc
+ tfr a,b pc+-8bits
+ lbra reltv
+inpxc cmpb #$0d
+ bne inpxd
+ tfr a,b pc+-16bits
+ lda ,-x
+ lbra relad
+inpxd cmpb #$09
+ bne inpx9
+ tfr a,b r+-16bits
+ lda ,-x
+ tst os9flx,u chk for OS/9
+ beq inpxz
+ tst pmode,u chk for 6809
+ bpl inpxz
+ pshs a
+ lda flreg,u chk for u-reg
+ cmpa #$04
+ puls a
+ lbeq nextd label it
+inpxz dec flabl,u don't label it
+ lbra nextd
+inpx9 cmpb #$08
+ bne inpxh
+ tfr a,b r+-8bits
+ tst os9flx,u chk for OS/9
+ beq inpxz
+ tst pmode,u chk for 6809
+ bpl inpxz
+ tstb chk for positive
+ bmi inpxz
+ pshs a
+ lda flreg,u chk for u-reg
+ cmpa #$04
+ puls a
+ bne inpxz
+ clra
+ lbra nextd label it
+inpxh bra yecch bad
+inpn5 cmpa #$06 chk rel
+ beq relat
+ ldb pmode,u chk cpu mode
+ cmpb #$02
+ bmi yecch
+ bne inpn7
+ lda inst1,u check for lbra (ind)
+ cmpa #$6c
+ bne inpyd 6502 ixi,ini
+ lbra inpie
+inpn7 cmpb #$05
+ bne yecch
+ cmpa #$07 chk ix0
+ beq next2
+ cmpa #$08 chk ix2
+ bne inpn8
+ lbra inpie
+inpn8 cmpa #$09 chk btb
+ bne inpn9
+ ldb inst3,u comp rel addr
+ sex
+inpyr addd saddr,u
+ std zaddr,u save it
+ lda comand,u chk for view only
+ cmpa #$56 v
+ beq inpyd
+ tst phase,u chk phase
+ bne inpyd
+ ldd zaddr,u
+ lbsr adal0 add label
+inpyd ldb inst2,u restore dir addr
+ bra dirct
+inpn9 cmpa #$0a chk bsc
+ beq inpyd
+**
+yecch com instx,u invalid opcode
+yeccc clr fllth,u back pointers up
+ ldx caddr,u
+ stx daddr,u
+ leax $01,x
+ stx saddr,u
+ bra next2 make inv optr into fcb
+**
+dirct clra dir
+ bra nextd
+relat lda inam0,u chk long branch
+ cmpa #$6c l
+ bne reltv
+ ldx iaddr,u long branch
+ lda ,-x
+ bra relad
+reltv sex compute rel addr
+relad addd saddr,u
+nextd std raddr,u
+nextl inc flabl,u labelled
+**
+next2 clr flisw,u reset instruction save switch
+ lbra getin get next instruction
+**
+insnm ldd aoptab,u get instruction name
+ addb worka,u
+ adca #$00
+ tfr d,x
+ lda ,x
+ lsra
+ lsra
+ lsra
+ ora #$60
+ sta inam1,u
+ ldd ,x
+ rolb
+ rolb
+ rolb
+ andb #$03
+ asla
+ asla
+ anda #$1f
+ ora #$60
+ pshs b
+ adda ,s+
+ sta inam2,u
+ clrb
+ lda $01,x
+ lsra
+ rorb
+ stb flspc,u special flag
+ anda #$1f
+ beq insns
+ ora #$60
+ sta inam3,u
+insns ldb flsuf,u get suffix
+ aslb
+ clra
+ addd asuftb,u
+ tfr d,x
+ ldd ,x
+ std inam4,u
+ ldb pmode,u chk cpu mode
+ bpl inpwk
+ cmpa #$6c chk 6809 l.branch
+ bne inpkw
+ clr inam4,u
+ sta inam0,u put l first
+ bra inpkw
+inpwk cmpb #$02 chk 6502
+ bne inpkl
+ sta inam5,u fix 6502 suffix
+ suba #$78 x
+ asla
+ sta flreg,u
+ lda #$04
+ sta inam4,u
+ bra inpkw
+inpkl cmpb #$05 chk 6805
+ bne inpkw
+ lda inst1,u fix 6805 instructions
+ cmpa #$1f
+ bhi inpkw
+ ldb #$62 b
+ stb inam0,u
+ cmpa #$0f
+ bhi inpkw
+ ldx inam2,u
+ stx inam3,u
+ lda inam1,u
+ sta inam2,u
+ lda #$72 r
+ sta inam1,u
+inpkw lda #$04
+ sta inamx,u
+ rts
+**
+inswi3 ldb #(4+(2*2)) handle os9 call
+ mul get index into table
+ leax svctab,pcr
+ leax d,x
+ clr flmod,u remember count
+ stx flinx,u remember pointer to name
+inswr3 ldd #$6f73 change swi2 to os9
+ std inam1,u
+ ldd #$3904
+ std inam3,u
+ tst phase,u chk phase
+ bne inswx3
+ ldb #$0f fix svc flag
+ stb svcflg,u
+inswx3 lbra next2 get next instruction
+**
+reset ldx faddr,u reset addrs
+ tst os9flx,u chk for OS/9
+ beq resos
+ leax M$Mem+2,x was m$stak+2,x skip module header
+resos stx saddr,u
+ stx daddr,u
+ clr dorgs,u
+ clr flisw,u
+ lbsr xcrlf
+ lda comand,u chk view
+ cmpa #$56 v
+ beq resex
+ leax phace,pcr print phase
+ lbsr xpdat
+ lda phase,u
+ adda #$31
+ lbsr xoute
+resex leax toblok,u force text out
+ lbsr fob
+ bra getin

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/3rdparty/utils/sleuth3/cssdkdsk3.asm	Sat Feb 04 18:55:39 2017 +0100
@@ -0,0 +1,111 @@
+
+***************************************
+**
+diskd lbsr xcrlf input file name
+ leax disim,pcr
+ lbsr xpdat
+ leax locstk,u
+ lbsr inbufr get file name
+ cmpa #$2a chk for *
+ bne dikkd
+ tst os9flx,u chk for OS/9
+ beq dikkd
+ tst disif,u chk input flag
+ beq dikkd
+ ldy nxtmod+1,u set up seek
+ sty curmod+1,u
+ ldb nxtmod,u
+ stb curmod,u
+ clra
+ tfr d,x
+ lda inblok+iobfd+1,u file desc
+ pshs u
+ tfr y,u
+ os9 I$Seek seek
+ puls u reset stack
+ lbcc dikib get next module
+ lda #$02 error
+ leax errirz,pcr
+ ldy #errirl
+ os9 I$WritLn
+ lbra dikfc error exit
+dikkd pshs a
+ clr defalt,u
+ ldd #$ffff reset indices
+ std curmod,u
+ std nxtmod,u
+ std inlrec,u
+ sta curmod+2,u
+ sta nxtmod+2,u
+ sta inlrec+2,u
+ lbsr maprt
+ puls a
+ cmpa #$0d chk first char in buffer
+ lbeq dikii no file name entered
+ tst disif,u chk input flag
+ beq dikia already open?
+ clr disif,u clr input flag
+ lda inblok+iobfd+1,u
+ os9 I$Close
+dikia leax locstk,u copy file name
+ leay infile,u
+dikco lda ,x+
+ sta ,y+
+ bne dikco
+ leax infile,u open input infile
+ lda #READ. was #(read.+exec.)=error
+ clrb
+ os9 I$Open
+ bcc dikok
+ pshs d,cc
+ os9 F$PErr
+ pshs x
+ ldx #$00FF
+ os9 F$Sleep
+ puls x
+ puls d,cc restore it too
+dikok exg a,b
+ bcc dikib
+ clr infile,u error
+ lda #$02
+ leax errirz,pcr
+ ldy #errirl
+ os9 I$WritLn
+ ldd #$0000
+ std inblok+iobfd,u
+ rts
+dikib std inblok+iobfd,u file desc
+ ldd #buflen buffer length
+ std inblok+iobbl,u
+ ldd #$0000
+ std inblok+iobcc,u
+ ldd inblok+iobba,u buffer addr
+ std inblok+iobca,u
+ ldd curmod,u reset log rec ctr
+ std inlrec,u
+ lda curmod+2,u
+ sta inlrec+2,u
+dikre lbsr mapdk open, map it
+ bcc dikti chk error
+dikfc lbsr fmsclo close it and exit
+dikie lbra stopin turn off aux input
+dikti lda #$4b default type=k
+ sta defalt,u
+ inc disif,u
+ ldx typee,u set map addr
+ stx typem,u
+dikii rts
+**
+dikni lbsr xcrlf output file name
+ clr disof,u
+ leax disom,pcr
+ lbsr xpdat
+ leax otfile,u
+ lbsr inbufr get file name into line buffer
+ cmpa #$0d get first char in buffer
+ beq dikno no file name was entered
+ ldd #$0000
+ sta -$01,y change cr to null
+ std otblok+iobfd,u file desc
+ inc disof,u
+dikno rts

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/3rdparty/utils/sleuth3/cssdmptb3.asm	Sat Feb 04 18:55:39 2017 +0100
@@ -0,0 +1,127 @@
+
+***************************************
+**
+dmptab lbsr xcrlf dump tables
+ ldx typem,u
+dmptac cmpx typee,u
+ bhs dmptae
+dmptad stx caddr,u print a line
+ lbsr xcrlf
+ ldx caddr,u
+ lda ,x
+ cmpa #$5a chk 'Z
+ beq dmpta2
+ ora #$20
+ lbsr xoute type
+ lbsr xouts space
+ leax $01,x
+ lbsr xot4s start
+ lbsr xot4s end
+ leax $01,x
+dmpta1 leax $02,x
+ bra dmptac
+dmpta2 ldd $01,x chk start/end
+ cmpd $03,x
+ bne dmpta4
+ lda #$6d make m
+ lbsr xoute type
+ lbsr xouts space
+ leax $03,x
+dmpta3 lbsr xot4s end
+ lbsr xot2s value
+ bra dmpta1
+dmpta4 lda #$74 make 't
+ lbsr xoute type
+ lbsr xouts space
+ leax $01,x
+ lbsr xot4s start
+ bra dmpta3
+dmptae lbsr xcrlf print parms
+ ldx faddr,u
+ leax $01,x
+ beq dmptag
+ leax loss9,pcr OS/9 or Flex
+ tst os9flx,u
+ bne dmpte1
+ leax lflex,pcr
+dmpte1 lbsr xpdat
+ leax lstar,pcr x-->" start="
+ lbsr xpdat
+ leax faddr,u
+ lbsr xot4h
+ leax lendr,pcr x-->" end="
+ lbsr xpdat
+ leax taddr,u
+ lbsr xot4h
+dmptaf ldx xaddr,u
+ leax $01,x
+ beq dmptag
+ leax lxfer,pcr x-->" xfer="
+ lbsr xpdat
+ leax xaddr,u
+ lbsr xot4h
+dmptag lbsr xcrlf
+ ldx oaddr,u
+ beq dmptah
+ tst os9flx,u chk for OS/9
+ bne dmptah
+ leax offil,pcr offset
+ lbsr xpdat
+ lbsr xouts
+ leax oaddr,u
+ lbsr xot4h
+ lbsr xcrlf
+dmptah leax equil,pcr equ flag
+ lbsr xpdat
+ leax lon,pcr
+ tst equfl,u
+ bne dmptai
+ leax loff,pcr
+dmptai lbsr xpdat
+ lbsr xcrlf
+ leax cpuil,pcr cpu mode
+ lbsr xpdat
+ lbsr xouts
+ lda #$36
+ lbsr xoute
+ ldb pmode,u
+ bpl dmptaj
+ ldb #$09
+dmptaj addb #$30
+ lda #$38
+ cmpb #$32 chk 2
+ bne dmptak
+ lda #$35
+dmptak lbsr xoute
+ lda #$30
+ lbsr xoute
+ tfr b,a
+ lbsr xoute
+ lbsr xcrlf
+ leax posil,pcr position flag
+ lbsr xpdat
+ leax lon,pcr
+ tst posfl,u
+ bne dmptal
+ leax loff,pcr
+dmptal lbsr xpdat
+ lbsr xcrlf
+ leax croil,pcr cross-assembler flag
+ lbsr xpdat
+ leax lon,pcr
+ tst crofl,u
+ bne dmptan
+ leax loff,pcr
+dmptan lbsr xpdat
+ lbsr xcrlf
+ tst disif,u chk for input file
+ beq dmptaw
+ leax disim,pcr
+ lbsr xpdat
+ leax infile,u
+dmptav lda ,x+ print file info
+ cmpa #$20
+ blo dmptaw
+ lbsr xoute
+ bra dmptav
+dmptaw rts exit

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/3rdparty/utils/sleuth3/cssgetcd3.asm	Sat Feb 04 18:55:39 2017 +0100
@@ -0,0 +1,125 @@
+
+***************************************
+**
+getin pshs y get next instr
+ ldx #$ffff
+ stx maddr,u
+ lbsr getty get type
+ clra clear instr
+ cmpb #$4b chk ign
+ lbeq getjk
+ cmpb #$52 chk rmb
+ lbeq getjk
+ ldx maddr,u chk for m/z
+ tst disif,u chk source
+ bne getdk
+ cmpx #$ffff from memory
+ beq getmz
+ lda $05,x get desired data
+ ldb ,x chk type
+ cmpb #$5a for z
+ lbeq getjk
+getmz ldd saddr,u compute addr
+ addd oaddr,u offset
+ lbra getid
+getdk cmpx #$ffff from disk
+ lbeq getjk
+ lda $05,x get desired locn/data
+ ldb ,x chk type
+ cmpb #$5a
+ lbeq getjk skip if z
+ ldd saddr,u data addr
+ subd $01,x start addr
+ addd $06,x add extent byte address
+ tfr a,b
+ lda $05,x
+ adca #$00
+ andb #$fe truncate to 512 bytes
+ cmpd inlrec,u chk curr locn
+ beq getsl
+getss std inlrec,u set curr locn
+ pshs y,u
+ exg a,b
+ tfr d,x
+ clrb byte addr=0
+ tfr d,y
+ tfr x,d
+ clra
+ tfr d,x
+ lda inblok+iobfd+1,u file desc
+ tfr y,u
+ os9 I$Seek seek
+ puls u,y reset stack
+ bcc getts
+geter lda #$02 return error
+ leax errirz,pcr
+ ldy #errirl
+ os9 I$WritLn
+ lbsr ende3 close files
+ lbsr stopin stop input
+ clr escswt,u
+ lbra askin abort
+getts ldx inblok+iobba,u read the block
+ ldy #buflen
+ lda inblok+iobfd+1,u
+ os9 I$Read
+ bcs geter error
+ cmpy #$0000
+ bcs geter eof
+ ldx maddr,u restore map ptr
+getsl ldd saddr,u data addr
+ subd $01,x start addr
+ addd $06,x disk byte address
+ anda #$01 mask to 512 bytes
+ leax inbuff,u input buffer addr
+ pshs x
+ addd ,s++
+getid std maddr,u disk and memory
+ lda [maddr,u]
+getjk ldx saddr,u update pointers
+ stx daddr,u
+ leax $01,x
+ stx saddr,u
+ sta instr,u
+ inc fllth,u update length
+ tst flisw,u save instrs?
+ beq getxx
+ ldx iaddr,u
+ leax $01,x
+ sta ,x
+ stx iaddr,u
+getxx puls y,pc
+**
+getty pshs y return memory type
+ ldx types,u
+ lda defalt,u default type
+ sta insty,u
+ ldd saddr,u
+getnx cmpx typee,u
+ beq gettx
+ cmpd $01,x
+ beq getn4
+getn1 bls getix
+getn2 cmpd $03,x
+ beq getn4
+getn3 bhi getix
+getn4 pshs b have table hit
+ ldb ,x
+ cmpb #$4d chk m
+ bne getn5
+ stx maddr,u save table location
+ clrb and set type
+ bra getn9
+getn5 cmpb #$5a chk z
+ bne getn9
+ stx maddr,u save table location
+ ldb insty,u chk type
+ cmpb #$4b
+ bne getn9
+ clrb
+getn9 stb insty,u
+ puls b
+getix leax $08,x
+ bra getnx
+gettx ldb insty,u
+ puls y,pc

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/3rdparty/utils/sleuth3/csshelps.txt	Sat Feb 04 18:55:39 2017 +0100
@@ -0,0 +1,277 @@
+OS/9 SUPER SLEUTH
+
+A PROGRAM ANALYSIS AND DEBUGGING TOOL
+by Edgar M.\ (Bud) Pass, Ph.D.
+Computer Systems Consultants, Inc.
+1454 Latta Lane, Conyers, GA 30207
+Telephone Number 404-483-1717/4570
+
+OS/9* SUPER SLEUTH is a set of programs which enables the user to examine
+and/or modify object program files on disk or in memory on 6809
+systems running under OS/9*.  Programs may be disassembled
+into source code format and the source may be displayed, printed, or
+saved on disk.  Labels produced by SLEUTH can be changed to labels
+of the user's preference.  Cross-reference listings of labels in any
+Motorola assembler-formatted source file may be produced to aid in
+debugging or modifying the program.  Programs in ROM may be "altered"
+with the revised program being saved on disk; the resultant program
+could then be used to program a new ROM.  Object code for 6800, 01,
+02, 03, 05, 08, 09, or 6502 may be processed.  6800, 01, 02, 08, 09
+object code may be easily converted to 6809 position-independent code.
+A detailed operating manual is included.
+
+All programs are supplied in source form on disk - assembly is required.
+The system is available on 5" or 8" diskette for FLEX* or OS/9*,
+or on 8" diskette for UNIFLEX*.  The OS/9* version is capable of
+processing programs in OS/9* or FLEX* format, the UNIFLEX* verison
+is capable of processing programs in UNIFLEX* or FLEX* format, and
+the FLEX* version is capable of processing only FLEX* programs.
+Only the OS/9* version is described here, although the others are
+similar.  The operating system must be specified when SLEUTH is ordered.
+
+
+OS/9* SLEUTH
+
+OS/9* SLEUTH has been designed to run under OS/9*.
+The object program it analyzes may reside on diskette or
+in memory.  The output files it produces may be sent to diskette.
+Programs in either FLEX* or OS/9* format may be analyzed by the OS/9*
+version of the program; the same format is output as was input.
+SLEUTH is self-instructive and has two levels of help files,
+in addition to a printed manual.  It is a disassembler and object file
+editor for 6800, 01, 02, 03, 05, 08, 09, and 6502 CPU's.
+
+SLEUTH has been designed for session-oriented use.  All indicators are
+reset to their default values, as indicated below.  The user may then
+issue various commands.  All SLEUTH commands are single letters.
+If any other input is found when a command is expected, the command
+menu is displayed.  Because of the interdependence of many of the
+commands, they should be issued in the proper sequence and at the
+proper times.  The explanation below is intended to serve as a quick
+guide to elementary operation of the SLEUTH. A more complete
+explanation may be found in the printed manual.
+
+SLEUTH is capable of processing 6800, 01, 02, 03, 05, 08, 09, and 6502
+programs.  By default, it assumes that the program is a 6809 program.
+The 'Z' command may be used at any time to set the CPU mode.
+
+The user may need to determine the current indicator settings and
+control table contents.  The 'L' command may be used at any time to
+list the indicators and tables.
+
+If the user desires to process a program currently on disk, the 'S'
+command may be used.  'S' will prompt for an input file name.  Since
+the 'S' command resets many indicators and tables, it should be
+issued only near the beginning of a session.  If 'S' is not issued,
+or 'S' is issued but no file name is entered, then SLEUTH assumes
+that the object program resides in memory.  Under OS/9, if '*' is
+entered rather than a file name, SLEUTH will attempt to load the
+next module of a multi-module program.
+
+One command which should be used before an 'S' command, if desired, is
+the 'O' command.  This command provides an offset value which is added
+to each address in the program being processed.  If the program is
+to be processed from disk, the offset value is applied when the map
+is created (when the input file name is specified).  If the program is
+to be processed from main memory, the offset value may be changed as
+often as desired, since the offset value is applied during the actual
+process of acquiring the data from memory.  The offset
+value is ignored during loading and processing of OS/9* modules.
+
+If the program is being processed from disk, the starting and ending
+addresses will be set automatically.  The transfer address will be set if
+it is present in the file. For FLEX* programs, the 'N' command may be used
+to set or change the start, end and transfer addresses, and the 'X'
+command may be used to set or change the transfer address. If the transfer
+transfer address is set to FFFF, no transfer address will be
+generated in the output file.  If an output is attempted and no start,
+end, or transfer address has been provided, they will be requested.
+
+For OS/9 modules, the 'N' command may be used to provide the address
+of the module header, with ending address past the end of the header.
+Once recognized, an OS/9 module in memory is logically loaded just
+as if it were found on disk.  It is the user's responsibility to ensure
+that the module remains in memory while it is being processed by SLEUTH.
+The starting address of an OS/9* module is always 0000, and the
+ending and transfer addresses are always determined from the
+module header, whether found in memory or on disk.
+
+Labels are usually placed on the same line as the assembler code.
+If a label is to be placed other than at the beginning of a line of
+code, it is entered in one of the following formats:
+
+  label EQU *   or
+  label EQU *+n where n=1,2,3,4
+
+The 'E' command may be used to flip a switch which will force those
+labels normally printed on the same line as the code to be printed in
+the format as specified above.  Data labels always appear on the line
+with the corresponding RMB.
+
+Normally, the disassembled code is generated such that the reassembled
+code will resemble as closely as possible the original object file.
+The 'B' command assists in producing such code by flagging all short
+address instructions with '<' and all long address instructions with
+'>'.  The 'P' command specifies the generation of 6809 position-
+independent source code from 6800, 01, 02, 03, 08, or 09 object code,
+although it is does not produce position-independent data used by OS/9.
+In the latter case, no particular attempt is made to produce code
+corresponding to the original object program.  The 'B'
+(cross-assembler) switch is set by default and the 'P'
+(position-independent) switch is reset by default.
+
+At any point after start and end addresses have been defined, the 'Q'
+command may be used to format the program and display it on the
+terminal.  Each page of the display shows 256 bytes of the program.
+The first page of the display begins at the address represented by the
+starting address with the low-order byte zeroed.  Then the display may
+be paged forward, backward, set to an arbitrary 256-byte sector of
+memory, or terminated.
+Each page of the display may also be modified in a full-screen edit
+manner.  Data may be entered in either hexadecimal or alpha format,
+depending upon the area of the screen to which the cursor is pointing.
+The displayed data represents the true resolved contents of the object
+program in main memory or on disk.  If the input program file is
+composed of multiple redefinitions or the 'Q', 'M' or 'T' command has
+been used to change the value of the byte at a given address,
+only the last definition of a particular byte will be displayed.
+
+The 'V' command is used to request a listing of the program code
+between the then-defined starting and ending addresses.  This listing
+is produced in instruction, FCB, FCC, FDB, and RMB formats.  The
+readability of the listed program code may be improved substantially
+in many cases thru the 'typing' of memory ranges.  The 'Q' command may
+be used to help determine how to split memory into contigous ranges
+of instructions, constants, ignored areas, etc.
+
+The 'D' command is used to perform a disassembly.  If a start, end,
+or transfer address has not already been provided, they are requested.
+Output may be optionally sent to the terminal and printer and disk files.
+A reassembleable source file (with labels) is generated and output
+as requested.  All memory changes and memory types specified are
+honored.  Thus, the interpretation of memory ranges as instructions
+may be overridden and FCB's, FDB's, FCC's, etc. may also be generated.
+For OS/9* modules, the data storage section, module header, and
+module trailer are generated automatically, and OS/9* system calls
+are recognized and output in mnemonic format.
+
+Once an area of memory has been 'typed', the following commands may be
+used to improve the output display, printout, and disk source file:
+
+     A-FDB address range
+     C-FCC address range
+     H-FCB address range
+     I-instruction address range
+     J-instruction+ASCII address range
+     K-ignored address range
+     R-RMB address range
+
+Each command above will request a memory range for the given type
+of memory.  The last definition of a given byte is used in each case.
+The 'K' and 'R' commands may not be used with OS/9 modules, since OS/9
+modules must be contigous and these commands specify discontiguous
+address ranges.
+
+The 'M' command may be used to examine and change program code.  When
+a 'M' is entered, a starting address is requested.  The object code
+byte at this location is displayed.  If the user desires to change the
+byte to another value, the new value may be entered.  In this case,
+and in most other cases, the byte at the next location is displayed.
+If '^' is entered, the byte at the previous location is displayed.
+If carriage-return is entered, the command is terminated.  Since the
+specified memory location is not actually changed, object programs
+from any source (even disk or ROM) may be logically altered.
+
+The 'T' command may be used to fill an entire range of program
+addresses with the same one-byte hex string.  When this command is
+entered, the starting and ending addresses and one-byte hex string
+are requested.
+
+The 'Y' command is used to scan for a hex string of bytes between
+a given range of addresses.  The beginning addresses of the matching
+strings are printed in response. When the 'Y' command is entered,
+the starting and ending addresses and matching string are requested.
+A carriage return is used to terminate the matching string.
+
+The 'W' command is used to output the resulting object program to a
+disk file.  If no output file name has been defined, one is requested.
+If the start, end and transfer addresses have not been provided, they
+are requested.  The output file reflects only that program code
+between the start and end addresses, exclusive of ignored address
+ranges.  For FLEX*, ignored address ranges may be generated
+explicitly (thru the 'K' command) or implicitly by not being
+defined in an input file, and, after the (potentially)
+revised program code has been written to the output file,
+the transfer address is output if it is not equal to FFFF.
+For OS/9*, the output file is created in object module format,
+according to the contents of the module header already loaded.
+
+Although most of the SLEUTH commands are simple, repeated entry of a
+large number of them may become tedious and time-consuming, especially
+when a large program is being processed in an iterative fashion.  The
+'G' command allows the user to store commands such as 'A', 'C', 'H', 'I',
+'J', 'K', 'R', 'T', 'M' in a text file and input them later to SLEUTH.
+It may be used whenever the '?' prompt is displayed.  Any errors
+detected in the input text file cause the immediate termination of
+the reading of the file and return control to the terminal.  The state
+of SLEUTH at a given time may thus be saved for a later execution.
+
+The 'U' command may be used to execute an OS/9* command
+while in SLEUTH.  Any command which does not interfere with SLEUTH may
+be used.  No check is made to determine whether a command is valid.
+
+The 'F' command may be used to return to OS/9*.
+
+
+OS/9* NAME CHANGER
+
+The name-changer program is essentially a word substitution program.
+A table of words and substitutes is read into memory and the input
+file is read.  All words in the input file are checked against the
+substitution table and, if a match is found, the appropriate change
+is made.  The principal use of this facility lies in changing the
+machine-generated labels produced by SLEUTH into more mnemonic names.
+
+To run the name changer :
+
+chgnam3 infile outfile wordlist #32k
+
+The format of each record in the substitution file is as follows:
+
+     /old-string/new-string/
+
+where '/' may be any delimiter not in either string, new-string may
+be null, and old-string may not be null.
+
+Several substitution files are included on the program disk.  They are
+intended to be used with SLEUTH to help in the commenting of programs
+initially running under various versions of FLEX*.  Associated with
+each control file is an equate file providing standard names and
+comments for the corresponding version of FLEX*.  By using the control
+file for one version of FLEX* and the equate file for another, most
+references may be automatically changed.  The files are as follows:
+
+   CSSCHGF1  CSSCHGE1  - MINI-FLEX*
+   CSSCHGF2  CSSCHGE2  - FLEX* 2
+   CSSCHGF9  CSSCHGE9  - FLEX* 9
+
+
+
+OS/9* CROSS-REFERENCER
+
+The cross-reference program processes an assembly language source file
+and produces an alphabetically-sorted list of labels in that file,
+the line number where each label is defined, and all line numbers on
+which that label appears.  Any source program formatted according to
+Motorola or OS/9 assembler source code formats may be processed.
+USE library calls may be optionally expanded or ignored, as required.
+
+To run the XRefs3:
+
+xrefs3 <infile >outfile #32k
+
+If "outfile" is ommitted, the output will be displayed on the screen.
+
+    * FLEX and UNIFLEX trademarks of Technical Systems Consultants.
+    * OS/9 trademark of Microware.
+

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/3rdparty/utils/sleuth3/cssiafcb3.asm	Sat Feb 04 18:55:39 2017 +0100
@@ -0,0 +1,541 @@
+
+***************************************
+**
+iafcc stb maxln,u fcc,fcb,rmb
+ tst phase,u chk phase and
+ beq iafcx exit if 1
+ leax inst1,u
+ stx gaddr,u
+iafc0 ldb instx,u
+ cmpb #$43 fcc
+ bne iafc5
+ anda #$7f mask off parity bit
+ cmpa #$1f control chars
+ bls iafc2
+ cmpa #maxprn max printable
+ bhi iafc2
+ cmpa #$22 "
+ bne iafc8
+iafc2 ldb instx,u
+ leax inst1,u
+ cmpx gaddr,u
+ bne iafc3
+ cmpb #$43 c
+ bne iafcx
+ ldb #$48 fcc->fcb
+ stb instx,u
+iafcx lbra next2 get next and return
+iafc3 ldx gaddr,u
+ cmpb #$43
+ bne iafc4
+ ldd #$2204 fcc/fcs "..."
+ std ,x
+iafc4 rts return for fcc
+iafc5 cmpb #$52 r
+ bne iafc8
+ ldd saddr,u
+ pshs d
+iafc6 lbsr getin get next byte
+ ldb insty,u
+ cmpb #$52 r
+ bne iafc7
+ ldy daddr,u chk labeled
+ lbsr adalx
+ bcs iafc7
+ lbsr ckend chk end of program
+ bls iafc6
+iafc7 ldd saddr,u end of rmb range
+ subd ,s++
+ std rmblth,u set rmb length
+ rts
+iafc8 leax inst1,u
+ cmpx gaddr,u
+ beq iafc9
+ ldy daddr,u
+ lbsr adalx chk label
+ bcs iafc2
+iafc9 ldx gaddr,u
+ sta ,x+
+ stx gaddr,u
+ cmpa instr,u check for fcs
+ beq iafca
+ lda fccxx+3,u c->s
+ ora #$10
+ sta fccxx+3,u fcs
+ lbsr getin
+ lbra iafc2
+iafca lbsr getin
+ ldb fllth,u
+ cmpb maxln,u
+ lbeq iafc2
+ ldb instx,u
+ cmpb insty,u
+ lbne iafc2
+ lbra iafc0
+**
+adald ldd raddr,u add a data label
+adale pshs a flag as data
+ lda zulabe,u prefix u/z
+ sta lauorz,u
+ puls a
+ bra adalv
+adalw ldd raddr,u add a data label
+adalu pshs a flag as data
+ lda ulabel,u prefix u
+ sta lauorz,u
+ puls a
+ bra adalv
+adalb ldd raddr,u add a prog label
+adal0 pshs a flag as label
+ lda zlabel,u prefix z
+ sta lauorz,u
+ puls a
+adalv pshs d,y
+ tfr d,y
+ bsr adall chk labels
+ bcs adatx branch if there
+ lda lauorz,u
+ ldx addre,u
+ cmpx alimit,u chk for overflow
+ lbhs tablab
+ sty ,x++ add to list
+ sta ,x+
+ stx addre,u
+ leax -$03,x bubble sort
+adal1 cmpx typee,u back up
+ bls adatx
+ leax -$03,x
+adal2 ldy ,x compare
+ lda $02,x
+ cmpy $03,x
+ bls adatx
+ pshs a,y
+ ldy $03,x swap
+ lda $05,x
+ sty ,x
+ sta $02,x
+ puls a,y
+ sty $03,x
+ sta $05,x
+ bra adal1
+adatx puls d,y,pc
+**
+adalx pshs a chk prog labels
+ lda zlabel,u prefix z
+ sta lauorz,u
+ puls a
+ bra adall
+adaly pshs a chk data labels
+ lda ulabel,u prefix u
+ sta lauorz,u
+ puls a
+adall ldx typee,u chk labels
+ pshs d
+ lda lauorz,u
+adalp cmpx addre,u
+ bhs adanf
+ leax $03,x
+ cmpy -$03,x
+ bne adaix
+ cmpa -$01,x
+ bne adalp
+adafo orcc #$01 successful, c=1
+ leax -$03,x back up
+ puls d,pc
+adaix bhi adalp
+adanf andcc #$fe unsuccessful, c=0
+ puls d,pc
+**
+ckequ lda instx,u chk org's
+ cmpa #$4b
+ beq cktno
+ tst dorgs,u
+ beq cktno
+ clr dorgs,u
+ckeqw tst os9flx,u chk for OS/9
+ bne cktno
+ leax caddr,u xxxx
+ lbsr xot4h
+ leax orges,pcr org $
+ lbsr xpdat
+ leax caddr,u xxxx
+ lbsr xot4h
+ lbsr xcrlf
+cktno ldx daddr,u chk equ's
+ clr baddr,u
+ dec fllth,u
+ lda fllth,u
+ ldb instx,u
+ cmpb #$43 c
+ beq ckeqa
+ cmpb #$48 h
+ beq ckeqa
+ cmpb #$52 r
+ bne ckeso
+ckeqa ldx caddr,u
+ clra
+ckesx stx gaddr,u
+ sta worka,u
+ ldy gaddr,u
+ lbsr adalx
+ bcc ckenf
+ tst worka,u chk offset
+ beq ckexo
+ leax gaddr,u xxxx
+ lbsr xot4h
+ lda #$02
+ lbsr xoute
+ lda zlabel,u z
+ lbsr xoute
+ leax gaddr,u xxxx
+ lbsr xot4h
+ leax bequb,pcr equ
+ lbsr xpdat
+ lbsr xpdat *+
+ lda worka,u x
+ adda #$30
+ lbsr xoute
+ lbsr xcrlf
+ckenf lda worka,u
+ beq ckext
+ ldx gaddr,u
+ deca
+ckeso leax -$01,x
+ bra ckesx
+ckexo ldb instx,u chk ign
+ cmpb #$4b
+ bne ckexe
+ leax gaddr,u
+ lda zlabel,u prefix z
+ lbra gnpea xxxx zxxxx equ $xxxx
+ckexe tst equfl,u check equ flag
+ beq ckexs
+ leax caddr,u xxxx
+ lbsr xot4h
+ lda #$02
+ lbsr xoute
+ lda zlabel,u z
+ lbsr xoute
+ leax caddr,u xxxx
+ lbsr xot4h
+ leax bequb,pcr equ
+ lbsr xpdat
+ lda #$2a *
+ lbsr xoute
+ lbsr xcrlf
+ bra ckext
+ckexs inc baddr,u
+ckext lda instx,u chk ign
+ cmpa #$4b k
+ beq ckexz
+ leax caddr,u xxxx
+ lbsr xot4h
+ lda instx,u chk rmb
+ cmpa #$52 r
+ beq ckexy
+ lda #$01 hex object
+ lbsr xoute
+ lda fllth,u
+ inca
+ beq ckexy
+ cmpa #$06
+ blo ckexu
+ lda #$05
+ckexu sta worka,u
+ leax inst1,u
+ckexv lbsr xot2h
+ dec worka,u
+ bne ckexv
+ckexy lda #$02 label tab
+ lbsr xoute
+ tst baddr,u
+ beq ckexz
+ lda zlabel,u z
+ lbsr xoute
+ leax caddr,u xxxx
+ lbsr xot4h
+ckexz rts
+**
+headr lbsr xcrlf start program file
+ ldx crtfl,u
+ stx confl,u
+ lda disof,u
+ sta dskfl,u
+ lda names+5,u chk nam
+ cmpa #$04
+ beq headc
+ leax names,u nam
+ lbsr xpdat
+ lbsr xcrlf
+headc lda optes+5,u chk opt
+ cmpa #$04
+ beq headg
+ leax optes,u opt
+ lbsr xpdat
+ lbsr xcrlf
+headg clr column,u
+ tst os9flx,u chk for OS/9
+ lbeq headt
+ lda comand,u chk view
+ cmpa #$56 v
+ lbeq headt
+ leax sysdef,pcr system definitions
+ lbsr xpdat
+ lda obatre,u version
+ lbsr xothr
+ lbsr xcrlf
+ ldd obname,u module name offset
+ lbsr adal0
+ leax lmodul,pcr mod endmod,namemd,
+ lbsr xpdat
+ lda obtyla,u type and language
+ anda #$f0
+ lsra
+ leax ltypes,pcr type
+ leax a,x
+ lbsr xpdat
+ leax llangs,pcr +objct,
+ lbsr xpdat
+ lda obatre,u attributes and version
+ bpl headq
+ leax lreent,pcr reent+
+ lbsr xpdat
+headq leax lversi,pcr version,xferad,endmem
+ lbsr xpdat
+ lbsr xcrlf
+ ldd #$0000 xxxx
+ pshs d
+ tfr s,x
+ lbsr xot4h
+ leax orges,pcr org $0000 for storage
+ lbsr xpdat
+ tfr s,x
+ lbsr xot4h xxxx
+ puls d
+ lbsr xcrlf
+ lbsr gendat generate data rmb's and equ's
+headh leax lemmod,pcr module header
+ lbsr xpdat endmem
+ lbsr xpdat equ .
+ lbsr xcrlf
+ lda names+5,u chk nam
+ cmpa #$04
+ beq headn
+ leax names,u nam
+ lbsr xpdat
+ lbsr xcrlf
+headn ldx #$ffff gen absolute equ's
+ stx caddr,u
+ ldx #$0000
+ stx raddr,u
+ lda xlabel,u prefiz x
+ sta zulabe,u
+ lbsr gnequ
+ ldx #$000c gen equ's in header
+ stx caddr,u
+ ldx #$0000
+ stx raddr,u
+ lda zlabel,u prefiz z
+ sta zulabe,u
+ lbsr gnequ
+ lda ulabel,u prefiz u
+ sta zulabe,u
+headt ldd curmod,u reset curr locn
+ std inlrec,u zap curr locn
+ lda curmod+2,u
+ sta inlrec+2,u
+ ldx faddr,u gen out-of-range equ's
+ beq headx
+ leax -$01,x
+ stx caddr,u
+ ldx #$0000
+ stx raddr,u
+ lda zlabel,u prefiz z
+ sta zulabe,u
+ lbsr gnequ
+headx inc dorgs,u
+ rts
+**
+gendat equ * generate data rmb's and equ's
+ lda ulabel,u prefix u
+ sta zulabe,u
+ ldx obstor,u
+ lbeq gendeq
+ leax -$01,x
+ stx caddr,u
+ ldx #$0000
+ stx raddr,u
+ stx zaddr,u
+ ldx typee,u gen data rmb's
+genrm1 stx gaddr,u
+ cmpx addre,u
+ beq genrm5
+ bhi gendeq
+ ldy $00,x
+ cmpy raddr,u
+ beq genrm6
+genrm2 blo genrm4
+ cmpy caddr,u
+genrm3 bls genrm6
+genrm4 leax $03,x
+ bra genrm1
+genrm5 ldy obstor,u force last rmb
+ bra genrm7
+genrm6 lda zulabe,u prefix u/z
+ cmpa $02,x
+ bne genrm8
+genrm7 stx gaddr,u
+ tfr y,d
+ subd zaddr,u compute rmb offset
+ bls genrm8 chk for non-positive
+ pshs d
+ leax zaddr,u xxxx
+ lbsr xot4h
+ lda #$02
+ lbsr xoute
+ lda zulabe,u prefix u
+ lbsr xoute
+ leax zaddr,u xxxx
+ lbsr xot4h
+ leax rmbes,pcr rmb $
+ lbsr xpdat
+ tfr s,x
+ lbsr xot4h
+ lbsr xcrlf
+ puls d
+ sty zaddr,u remember current address
+genrm8 ldx gaddr,u get next label
+ bra genrm4
+gendeq ldx obstor,u gen out-of-range data equ's
+ stx raddr,u
+ ldx #$ffff
+ stx caddr,u
+ lbsr gnequ
+ rts
+**
+ender ldx daddr,u end text file
+ beq ende0 gen out-of-range equ's
+ stx raddr,u
+ ldx #$ffff
+ stx caddr,u
+ lda zlabel,u prefix z
+ sta zulabe,u
+ lbsr gnequ
+ende0 lda comand,u chk view
+ cmpa #$56 v
+ beq ende3
+ tst os9flx,u chk for OS/9
+ beq ende1
+ leax endos9,pcr emod
+ lbsr xpdat endmod equ *
+ leax lnamem,pcr namemd equ
+ lbsr xpdat
+ lda zlabel,u z
+ lbsr xoute z/$
+ leax obname,u
+ lbsr xot4h xxxx
+ lbsr xcrlf
+ leax lxfera,pcr xferad equ
+ lbsr xpdat
+ lda zlabel,u z
+ lbsr xoute z/$
+ leax obxfer,u xfer offset
+ lbsr xot4h xxxx
+ lbsr xcrlf
+ende1 leax endes,pcr end
+ lbsr xpdat
+ tst os9flx,u chk for OS/9
+ bne ende2
+ ldx xaddr,u chk xfer addr
+ leax $01,x
+ beq ende2
+ lda zlabel,u z
+ lbsr xoute
+ leax xaddr,u xxxx
+ lbsr xot4h
+ende2 lbsr xcrlf
+**
+ende3 lda #$01 reset flags and close files
+ sta confl,u
+ clr phase,u
+ tst prtfl,u chk for printer output
+ beq endep
+ clr prtfl,u close printer file
+ clr prfile,u
+ leax prblok,u force last block
+ lbsr fob
+ bcc endpe
+ lda #$02 error
+ leax errprz,pcr
+ ldy #errprl
+ os9 I$WritLn
+endpe lda prblok+iobfd+1,u close it
+ clr prblok+iobfd,u
+ clr prblok+iobfd+1,u
+ os9 I$Close
+ bcc endep
+ lda #$02
+ leax errprz,pcr
+ ldy #errprl
+ os9 I$WritLn
+endep tst dskfl,u chk for disk output
+ beq endex
+ clr disof,u close output file
+ clr dskfl,u
+ clr otfile,u
+ leax otblok,u force last block
+ lbsr fob
+ bcc endxe
+ lda #$02 error
+ leax errorz,pcr
+ ldy #errorl
+ os9 I$WritLn
+endxe lda otblok+iobfd+1,u close it
+ clr otblok+iobfd,u
+ clr otblok+iobfd+1,u
+ os9 I$Close
+ bcc endex
+ lda #$02
+ leax errorz,pcr
+ ldy #errorl
+ os9 I$WritLn
+endex lbra xcrlf
+**
+gnequ ldx typee,u out-of-range equ's
+gneq1 stx gaddr,u
+ cmpx addre,u
+ beq gneqx
+ ldd $00,x
+ cmpd raddr,u
+ beq gneq6
+gneq2 blo gneq4
+ cmpd caddr,u
+gneq3 bls gneq6
+gneq4 leax $03,x
+ bra gneq1
+gneq6 stx gaddr,u
+ lda zulabe,u prefix u/z
+ cmpa $02,x
+ bne gneq7
+ bsr gnpea
+gneq7 ldx gaddr,u
+ bra gneq4
+gneqx rts
+**
+gnpea pshs a gen xxxx zxxxx equ $xxxx
+ stx baddr,u xxxx
+ lbsr xot4h
+ lda #$02
+ lbsr xoute
+ puls a label prefix
+ lbsr xoute
+ ldx baddr,u xxxx
+ lbsr xot4h
+ leax bequb,pcr equ
+ lbsr xpdat
+ lda #$24 $
+ lbsr xoute
+ ldx baddr,u xxxx
+ lbsr xot4h
+ lbra xcrlf
+**

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/3rdparty/utils/sleuth3/cssinitz3.asm	Sat Feb 04 18:55:39 2017 +0100
@@ -0,0 +1,201 @@
+
+***************************************
+**
+start equ * starting address
+**
+initz leax temps,u clear work area
+ ldy #(tempe-temps)
+clear clr ,x+
+ leay -$01,y
+ bne clear
+ leax predef,pcr init data
+ leay prermb,u
+ ldb #prelen
+cleard lda ,x+
+ sta ,y+
+ decb
+ bne cleard
+**
+clears sts mystk,u beginning stack pointer
+ leax -$0200,s table address limit
+ stx alimit,u
+ lbsr fixesc fix escape addr, pg 7
+ lbsr initty initialize tty paras, pg 7
+ lbsr inifil initialize file buffers, pg 8
+ lda #$09 set 6809 mode
+ lbsr setmoi set cpu mode, pg 10
+ lbsr maprt fix addrs, pg 10
+ inc confl,u set crt flag
+ lbsr xcrlf print heading, pg 83
+ leax clrscn,pcr
+ lbsr outcur clear the screen, pg24
+ leax idlin,pcr
+ lbsr xpdat output logo, pg 83
+ lda #$30+vn
+ lbsr xoute output version, pg 83
+ lbsr helpyu output rest of heading, pg 10
+**
+askin lds mystk,u look at input
+ tst ttyswt,u check tty switch
+ beq askin0
+ bsr initty initialize tty params, pg 7
+askin0 lbsr inrtty reset tty paras
+ lbsr xcrlf ,pg 83 
+ leax beeps,pcr beep bell
+ lbsr xpdat , pg 83
+ lda #$3f print a ?
+ lbsr xoute , pg 83
+askin1 lbsr xinee read command, pg 81
+ cmpa #$20 chk cntrl char
+ bgt askin2 its printable
+ cmpa #$0d chk cr
+ bne askin
+ tst getfl,u chk get flag
+ bne askin1 ignore if so
+ bra askin
+askin2 leax coman,pcr command table
+ anda #$5f to upper case
+ sta comand,u
+ pshs a offset
+ clrb
+ cmpa #'A A?
+ blo rdjmp
+ cmpa #'Z Z?
+ bhi rdjmp
+ tfr a,b
+ subb #$40 sub ascii bias
+ aslb dbl it
+rdjmp ldd b,x jump to routine
+ leax d,x
+ puls a get offset back
+ jsr ,x
+ bra askin end of this routine
+**
+fixesc equ * fix escape action
+ leax xcrlr,pcr interrupt handler
+ os9 F$Icpt catch interrupts
+ rts
+**
+initty ldd #$0000 set up tty paras
+ leax scfolg,u point to scf orig area
+ os9 I$GetStt get tty info
+ ldd #$0100 set up tty paras
+ leax scfolp,u point to scf orig area
+ os9 I$GetStt get tty info
+ lda scfolg+PD.PAU-PD.OPT,u
+ ldb scfolp+PD.PAU-PD.OPT,u
+ sta scfopg,u
+ stb scfopp,u
+ clr scfolg+PD.PAU-PD.OPT,u
+ clr scfolp+PD.PAU-PD.OPT,u
+ clr ttyswt,u clear tty switch
+ bra inrtty set up tty paras
+**
+wtftty lda #write reset write paras
+ sta toblok+iobfc,u
+ rts
+**
+wlftty lda #wrln reset write paras
+ sta toblok+iobfc,u
+ rts
+**
+scstty lda #write reset write paras
+ sta toblok+iobfc,u
+ bra fcstty
+**
+csctty bsr ingtty copy tty paras
+ clr scfwkg+PD.BSP-PD.OPT,u
+ clr scfwkg+PD.DEL-PD.OPT,u
+ clr scfwkg+PD.EOF-PD.OPT,u
+ clr scfwkg+PD.RPR-PD.OPT,u
+ clr scfwkg+PD.DUP-PD.OPT,u
+ clr scfwkg+PD.INT-PD.OPT,u
+ clr scfwkg+PD.QUT-PD.OPT,u
+ clr scfwkg+PD.EKO-PD.OPT,u echo
+ lda #wrln reset write paras
+ sta toblok+iobfc,u
+**
+fcstty com scfwkg+PD.EKO-PD.OPT,u echo
+**
+instty ldd #$0000 set tty paras
+ leax scfwkg,u point to scf work
+ os9 I$SetStt set tty info
+ rts
+**
+lastty lda scfopg,u restore pause
+ ldb scfopp,u
+ sta scfolg+PD.PAU-PD.OPT,u
+ stb scfolp+PD.PAU-PD.OPT,u
+ lda #$ff set tty switch
+ sta ttyswt,u
+**
+inrtty lda #read reset read paras
+ sta tiblok+iobfc,u
+**
+inftty lda #wrln reset write paras
+ sta toblok+iobfc,u
+**
+fintty ldd #$0000 final reset tty paras
+ leax scfolg,u point to scf orig area
+ os9 I$SetStt set tty info
+ ldd #$0100 reset tty paras
+ leax scfolp,u point to scf orig
+ os9 I$SetStt set tty info
+**
+ingtty ldd #$0000 get tty paras
+ leax scfwkg,u point to scf work
+ os9 I$GetStt get tty info
+ ldd #$0100 get tty paras
+ leax scfwkp,u point to scf work
+ os9 I$GetStt get tty info
+ rts
+**
+inbtty lda #rdln set tty paras for buffer
+ sta tiblok+iobfc,u
+ bra inftty
+**
+inifil lda #read set up i/o blocks
+ sta inblok+iobfc,u
+ sta tiblok+iobfc,u
+ lda #write
+ sta otblok+iobfc,u
+ lda #wrln
+ sta prblok+iobfc,u
+ sta toblok+iobfc,u
+ ldd #buftrm
+ std tiblok+iobbl,u
+ std toblok+iobbl,u
+ std toblok+iobcc,u
+ ldd #buflen
+ std inblok+iobbl,u
+ std otblok+iobbl,u
+ std otblok+iobcc,u
+ std prblok+iobbl,u
+ std prblok+iobcc,u
+ ldd #$0001
+ std toblok+iobfd,u
+ incb
+ leax inbuff,u
+ stx inblok+iobba,u
+ stx inblok+iobca,u
+ leax otbuff,u
+ stx otblok+iobba,u
+ stx otblok+iobca,u
+ leax tibuff,u
+ stx tiblok+iobba,u
+ stx tiblok+iobca,u
+ leax tobuff,u
+ stx toblok+iobba,u
+ stx toblok+iobca,u
+ leax prbuff,u
+ stx prblok+iobba,u
+ stx prblok+iobca,u
+ ldd #$0000
+ std inlrec,u
+ sta inlrec+2,u
+ ldd #$ffff
+ std curmod,u
+ std nxtmod,u
+ sta curmod+2,u
+ sta nxtmod+2,u
+ rts

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/3rdparty/utils/sleuth3/cssinput3.asm	Sat Feb 04 18:55:39 2017 +0100
@@ -0,0 +1,97 @@
+
+***************************************
+**
+gtype9 tst os9flx,u chk for OS/9 rmb/kill
+ bne badrg
+gtype ldx typee,u get type and range
+ cmpx alimit,u chk for overflow
+ bhs tabovf
+ sta ,x+
+ bsr gadrs get range
+ bhi badrg
+ lda comand,u chk for t
+ cmpa #$54 check for a T
+ beq gotyx
+gotyp lbsr xinee end of line
+gotyx ldx eaddr,u update pointer
+ clr ,x+ clear map locns
+ clr ,x+
+ clr ,x+
+ stx typee,u
+ rts
+**
+tablab lbsr ende3 terminate disassembly
+tabovf lbsr xcrlf table overflow
+ leax tabov,pcr
+ lbsr xpdat
+ lbsr stopin reset get flag
+ lbsr xcrlf
+ lbra askin
+**
+badrg lbsr xcrlf bad range
+ leax invrg,pcr
+ lbsr xpdat
+ lbsr stopin reset get flag
+ lbra xcrlf
+**
+gadrs stx eaddr,u get addr range
+ leax lstar,pcr print start=
+ lbsr xpdat
+ lbsr xbadr read low limit
+ ldx eaddr,u
+ ldd baddr,u
+ std ,x++
+ stx eaddr,u
+ pshs d
+ leax lendr,pcr print end=
+ lbsr xpdat
+ lbsr xbadr read high limit
+ ldx eaddr,u
+ ldd baddr,u
+ std ,x++
+ stx eaddr,u
+ puls d chk negative range
+ cmpd -$02,x
+ rts
+**
+rdline bsr inbufr get input line
+rdlinx lda #$04 put eot after input
+ leax -$01,y
+ sta ,x
+ stx raddr,u
+ rts
+**
+inbufr tfr x,y input buffer
+ lbsr inbtty set tty parameters
+ tfr y,x
+ ldb #fnmlen was $1e
+ bra inbuf1
+inbufd tfr x,y input command
+ lbsr inbtty set tty parameters
+ tfr y,x
+ ldb #$fe
+inbuf1 lbsr xinee drop leading spaces
+ cmpa #$20
+ beq inbuf1
+ bra inbuf5
+inbuf3 lbsr xinee scan test to cr
+inbuf5 cmpa #$0d
+ beq inbufx
+ cmpa #$03 chk for cntrl-c
+ beq inbuf7
+ cmpa #$20
+ blo inbuf3
+ tstb
+ beq inbuf3
+ sta ,y+
+ decb
+ bra inbuf3
+inbuf7 tfr x,y reset buffer
+inbufx clr ,y+ ending null
+ pshs x
+ lbsr inrtty reset tty parameters
+ puls x
+ lda ,x
+ bne inbufz
+ lda #$0d fake a cr
+inbufz rts