From dbb0b816ce8a00e72a8b5d7da14bee3b6afaa5b0 Mon Sep 17 00:00:00 2001 From: doug Date: Sat, 16 Feb 2013 07:09:45 +0000 Subject: [PATCH] delete dynamically generated stuff --- branches/dwg/Apps/crossdev/ASMIFACE.O | Bin 512 -> 0 bytes branches/dwg/Apps/crossdev/BDOSCALL.O | Bin 256 -> 0 bytes branches/dwg/Apps/crossdev/BIOSCALL.O | Bin 256 -> 0 bytes branches/dwg/Apps/crossdev/CBANNER.ASM | 208 --- branches/dwg/Apps/crossdev/CBANNER.O | Bin 1280 -> 0 bytes branches/dwg/Apps/crossdev/CHARS.ASM | 970 ---------- branches/dwg/Apps/crossdev/CLEAR.ASM | 44 - branches/dwg/Apps/crossdev/CLOGICAL.ASM | 159 -- branches/dwg/Apps/crossdev/CLOGICAL.O | Bin 768 -> 0 bytes branches/dwg/Apps/crossdev/CMEMORY.O | Bin 768 -> 0 bytes branches/dwg/Apps/crossdev/CNAMEPT1.ASM | 527 ------ branches/dwg/Apps/crossdev/CNAMEPT1.O | Bin 2304 -> 0 bytes branches/dwg/Apps/crossdev/CNAMEPT2.ASM | 480 ----- branches/dwg/Apps/crossdev/CNAMEPT2.O | Bin 2560 -> 0 bytes branches/dwg/Apps/crossdev/CNAMEPT3.ASM | 794 -------- branches/dwg/Apps/crossdev/CNAMEPT3.O | Bin 3328 -> 0 bytes branches/dwg/Apps/crossdev/CNAMEPT4.ASM | 742 -------- branches/dwg/Apps/crossdev/CNAMEPT4.O | Bin 3072 -> 0 bytes branches/dwg/Apps/crossdev/CPMNAME.ASM | 164 -- branches/dwg/Apps/crossdev/CPMNAME.O | Bin 1024 -> 0 bytes branches/dwg/Apps/crossdev/CTERMCAP.ASM | 334 ---- branches/dwg/Apps/crossdev/CTERMCAP.O | Bin 1024 -> 0 bytes branches/dwg/Apps/crossdev/DIAGNOSE.O | Bin 256 -> 0 bytes branches/dwg/Apps/crossdev/FLIP.ASM | 428 ----- branches/dwg/Apps/crossdev/FORM.ASM | 646 ------- branches/dwg/Apps/crossdev/MAP.ASM | 1649 ----------------- branches/dwg/Apps/crossdev/MAP.O | Bin 5376 -> 0 bytes branches/dwg/Apps/crossdev/META.ASM | 750 -------- branches/dwg/Apps/crossdev/META.O | Bin 3072 -> 0 bytes branches/dwg/Apps/crossdev/METADATA.ASM | 523 ------ branches/dwg/Apps/crossdev/MULTIFMT.ASM | 1319 ------------- branches/dwg/Apps/crossdev/MULTIFMT.O | Bin 5120 -> 0 bytes branches/dwg/Apps/crossdev/N8CHARS.ASM | 2056 --------------------- branches/dwg/Apps/crossdev/N8VIDTST.ASM | 609 ------- branches/dwg/Apps/crossdev/PUTC.ASM | 185 -- branches/dwg/Apps/crossdev/README.1ST | 20 - branches/dwg/Apps/crossdev/REMOTE.ASM | 246 --- branches/dwg/Apps/crossdev/SECTORIO.ASM | 117 -- branches/dwg/Apps/crossdev/SYSGEN.ASM | 982 ---------- branches/dwg/Apps/crossdev/TERMTYPE.ASM | 448 ----- branches/dwg/Apps/crossdev/TMS9918.ASM | 1463 --------------- branches/dwg/Apps/crossdev/VIDEO.ASM | 500 ----- branches/dwg/Apps/crossdev/VIEW.ASM | 2233 ----------------------- 43 files changed, 18596 deletions(-) delete mode 100644 branches/dwg/Apps/crossdev/ASMIFACE.O delete mode 100644 branches/dwg/Apps/crossdev/BDOSCALL.O delete mode 100644 branches/dwg/Apps/crossdev/BIOSCALL.O delete mode 100644 branches/dwg/Apps/crossdev/CBANNER.ASM delete mode 100644 branches/dwg/Apps/crossdev/CBANNER.O delete mode 100644 branches/dwg/Apps/crossdev/CHARS.ASM delete mode 100644 branches/dwg/Apps/crossdev/CLEAR.ASM delete mode 100644 branches/dwg/Apps/crossdev/CLOGICAL.ASM delete mode 100644 branches/dwg/Apps/crossdev/CLOGICAL.O delete mode 100644 branches/dwg/Apps/crossdev/CMEMORY.O delete mode 100644 branches/dwg/Apps/crossdev/CNAMEPT1.ASM delete mode 100644 branches/dwg/Apps/crossdev/CNAMEPT1.O delete mode 100644 branches/dwg/Apps/crossdev/CNAMEPT2.ASM delete mode 100644 branches/dwg/Apps/crossdev/CNAMEPT2.O delete mode 100644 branches/dwg/Apps/crossdev/CNAMEPT3.ASM delete mode 100644 branches/dwg/Apps/crossdev/CNAMEPT3.O delete mode 100644 branches/dwg/Apps/crossdev/CNAMEPT4.ASM delete mode 100644 branches/dwg/Apps/crossdev/CNAMEPT4.O delete mode 100644 branches/dwg/Apps/crossdev/CPMNAME.ASM delete mode 100644 branches/dwg/Apps/crossdev/CPMNAME.O delete mode 100644 branches/dwg/Apps/crossdev/CTERMCAP.ASM delete mode 100644 branches/dwg/Apps/crossdev/CTERMCAP.O delete mode 100644 branches/dwg/Apps/crossdev/DIAGNOSE.O delete mode 100644 branches/dwg/Apps/crossdev/FLIP.ASM delete mode 100644 branches/dwg/Apps/crossdev/FORM.ASM delete mode 100644 branches/dwg/Apps/crossdev/MAP.ASM delete mode 100644 branches/dwg/Apps/crossdev/MAP.O delete mode 100644 branches/dwg/Apps/crossdev/META.ASM delete mode 100644 branches/dwg/Apps/crossdev/META.O delete mode 100644 branches/dwg/Apps/crossdev/METADATA.ASM delete mode 100644 branches/dwg/Apps/crossdev/MULTIFMT.ASM delete mode 100644 branches/dwg/Apps/crossdev/MULTIFMT.O delete mode 100644 branches/dwg/Apps/crossdev/N8CHARS.ASM delete mode 100644 branches/dwg/Apps/crossdev/N8VIDTST.ASM delete mode 100644 branches/dwg/Apps/crossdev/PUTC.ASM delete mode 100644 branches/dwg/Apps/crossdev/README.1ST delete mode 100644 branches/dwg/Apps/crossdev/REMOTE.ASM delete mode 100644 branches/dwg/Apps/crossdev/SECTORIO.ASM delete mode 100644 branches/dwg/Apps/crossdev/SYSGEN.ASM delete mode 100644 branches/dwg/Apps/crossdev/TERMTYPE.ASM delete mode 100644 branches/dwg/Apps/crossdev/TMS9918.ASM delete mode 100644 branches/dwg/Apps/crossdev/VIDEO.ASM delete mode 100644 branches/dwg/Apps/crossdev/VIEW.ASM diff --git a/branches/dwg/Apps/crossdev/ASMIFACE.O b/branches/dwg/Apps/crossdev/ASMIFACE.O deleted file mode 100644 index fa0de31b4f95149af3402a132fe8c665fb40205e..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 512 zcmZRPVt|4`Fs;Yf#$dw8z$74;z#wq8m_a~M$s&P4)G|&v?6s0&HG?5gzzQx<4wAQl zb1OhxJ2f0{o`=Iv9Z}DvDCm6XSuVbTC1A vNy+g@yp&XAUPewl15*dcp2XtZ%ru}rrUpA8FF7$MCozSAfzbgZH=F=L0tR8A0;2*30i|LFq3k3jpj2jpQXzxLN01%{_6|m%(J4i#>51_SKpqp6 tmy{fj#7jv<=4Ir>Gca|4T$EElTFr1Zs1|;Rr$~_b0W;m<(Ot69Btje>q z((2D1UOf2mBv9Q~twIJN7hkO+2BDBxtzrfNCB-rZLjkJ-2H~@;3`PY&fno-s>?9?i zg3JV^LI#nKK&>Yk*gF`3mSz^ErYFWT0C`MMUQ%*A5-%kcnU|3h&%o3Ha%*~ONp5OM fVmwoaI*^x?nO~fon3KcQUv;taq}xr%nwA*hBBZK2u4!8lGF12v6-}nN zpSVMc<=gpWe79DL=XT_5CY>UCrm9=6u91B!qUjDPmG?5JP?@4=_ePFswEN^*af_sr zaw-*1rOB?nZ*&?isVNsp$+opdrvqUPLK7E4G@94oeBsH}>Ss!INQP&VL%1@X(ywbX z8iE=1;YK3M33*P}q41poCfW9HVvxLw$}3*7Ij2EZf|}ZEPc;1)a|y)KT7vJatPuiY zY7*0wn2ekK2^8;^E7-5>H7uINnPoBbK?3I;WP%V1x4Z$i2N1>%4bl1rwjRy579&Ng z!xn55W|L>YnFj(shYQmgJqOeI!FfkV=zqUS@!`!=&ks8~tv?*evX3l>OicUV?%?m>TrRJSqEmz?V8r#Pi+bIw0z^&QjF-8z7OED4n2C?HUp zqq72K5J}^Ah}>qwvUI2Jz20+7tKX_4cgqJLDAAeQchugfzCs<{S|G*XjjcGf(Z^ek i@BxflJXUx-#OS;E@`UAooI0Q2d(u&t$F~^&@AVT%2Mn_S diff --git a/branches/dwg/Apps/crossdev/CHARS.ASM b/branches/dwg/Apps/crossdev/CHARS.ASM deleted file mode 100644 index 47bae2f6..00000000 --- a/branches/dwg/Apps/crossdev/CHARS.ASM +++ /dev/null @@ -1,970 +0,0 @@ - extrn .begin,.chl,.swt - extrn csave,cret,.move - global pDPHMAP_,2 - global pDPHVEC_,24 - DSEG - public pSYSCFG_ -pSYSCFG_: - DW -16384 - CSEG - DSEG - public map_ -map_: - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 1 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 1 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - DB 0 - CSEG - DSEG - public attroff_ -attroff_: - DB 27 - DB 91 - DB 109 - DB 0 - CSEG - DSEG - public attrbold_ -attrbold_: - DB 27 - DB 91 - DB 49 - DB 109 - DB 0 - CSEG - DSEG - public attrlow_ -attrlow_: - DB 27 - DB 91 - DB 50 - DB 109 - DB 0 - CSEG - DSEG - public attrundr_ -attrundr_: - DB 27 - DB 91 - DB 52 - DB 109 - DB 0 - CSEG - DSEG - public attrblnk_ -attrblnk_: - DB 27 - DB 91 - DB 53 - DB 109 - DB 0 - CSEG - DSEG - public attrrevs_ -attrrevs_: - DB 27 - DB 91 - DB 55 - DB 109 - DB 0 - CSEG - DSEG - public attrinvs_ -attrinvs_: - DB 27 - DB 91 - DB 56 - DB 109 - DB 0 - CSEG - DSEG - public graphon_ -graphon_: - DB 27 - DB 70 - DB 0 - CSEG - DSEG - public graphoff_ -graphoff_: - DB 27 - DB 71 - DB 0 - CSEG - DSEG - public atreset_ -atreset_: - DB 48 - DB 0 - CSEG - DSEG - public atbold_ -atbold_: - DB 49 - DB 0 - CSEG - DSEG - public atdim_ -atdim_: - DB 50 - DB 0 - CSEG - DSEG - public atundrsc_ -atundrsc_: - DB 52 - DB 0 - CSEG - DSEG - public atblink_ -atblink_: - DB 53 - DB 0 - CSEG - DSEG - public atrevs_ -atrevs_: - DB 55 - DB 0 - CSEG - DSEG - public athidden_ -athidden_: - DB 56 - DB 0 - CSEG - DSEG - public fgblack_ -fgblack_: - DB 51 - DB 48 - DB 0 - CSEG - DSEG - public fgred_ -fgred_: - DB 51 - DB 49 - DB 0 - CSEG - DSEG - public fggreen_ -fggreen_: - DB 51 - DB 50 - DB 0 - CSEG - DSEG - public fgyellow_ -fgyellow_: - DB 51 - DB 51 - DB 0 - CSEG - DSEG - public fgblue_ -fgblue_: - DB 51 - DB 52 - DB 0 - CSEG - DSEG - public fgmagent_ -fgmagent_: - DB 51 - DB 53 - DB 0 - CSEG - DSEG - public fgcyan_ -fgcyan_: - DB 51 - DB 54 - DB 0 - CSEG - DSEG - public fgwhite_ -fgwhite_: - DB 51 - DB 55 - DB 0 - CSEG - DSEG - public bgblack_ -bgblack_: - DB 52 - DB 48 - DB 0 - CSEG - DSEG - public bgred_ -bgred_: - DB 52 - DB 49 - DB 0 - CSEG - DSEG - public bggreen_ -bggreen_: - DB 52 - DB 50 - DB 0 - CSEG - DSEG - public bgyellow_ -bgyellow_: - DB 52 - DB 51 - DB 0 - CSEG - DSEG - public bgblue_ -bgblue_: - DB 52 - DB 52 - DB 0 - CSEG - DSEG - public bgmagent_ -bgmagent_: - DB 52 - DB 53 - DB 0 - CSEG - DSEG - public bgcyan_ -bgcyan_: - DB 52 - DB 54 - DB 0 - CSEG - DSEG - public bgwhite_ -bgwhite_: - DB 52 - DB 55 - DB 0 - CSEG - PUBLIC dispattr_ -dispattr_: lxi d,.2 - call csave - LXI H,12-.2 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,12-.2 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,12-.2 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,27 - PUSH H - LXI H,.1+0 - PUSH H - CALL printf_ - XCHG - LXI H,10 - DAD SP - SPHL - RET -.2 EQU 0 -.1: - DB 37,99,91,37,115,59,37,115,59,37,115,109,0 - PUBLIC main_ -main_: lxi d,.4 - call csave - LXI H,1 - XCHG - LXI H,8-.4 - DAD SP - MOV A,M - INX H - MOV H,M - MOV L,A - CALL .lt - JZ .5 - LXI H,1 - XCHG - LXI H,2-.4 - DAD SP - MOV M,E - INX H - MOV M,D - JMP .7 -.6: - LXI H,2-.4 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D -.7: - LXI H,2-.4 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,8-.4 - DAD SP - MOV A,M - INX H - MOV H,M - MOV L,A - CALL .lt - JZ .8 - LXI H,2-.4 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - DAD H - XCHG - LXI H,10-.4 - DAD SP - MOV A,M - INX H - MOV H,M - MOV L,A - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - CALL atoi_ - POP D - PUSH H - LXI H,.3+0 - PUSH H - CALL printf_ - POP D - POP D - JMP .6 -.8: - JMP .9 -.5: - LXI H,-4096 - SHLD hregbc_ - LXI H,-16384 - SHLD hregde_ - CALL diagnose_ - LXI H,-16384 - SHLD pSYSCFG_ - LHLD pSYSCFG_ - LXI D,68 - DAD D - MOV E,M - MVI D,0 - PUSH D - CALL crtinit_ - POP D - CALL crtclr_ - LXI H,0 - PUSH H - LXI H,0 - PUSH H - CALL crtlc_ - POP D - POP D - LXI H,bgblack_ - PUSH H - LXI H,fggreen_ - PUSH H - LXI H,atbold_ - PUSH H - CALL dispattr_ - POP D - POP D - POP D - LXI H,.3+3 - PUSH H - CALL banner_ - POP D - LXI H,attroff_ - PUSH H - LXI H,.3+9 - PUSH H - CALL printf_ - POP D - POP D - LXI H,bgblack_ - PUSH H - LXI H,fgcyan_ - PUSH H - LXI H,atbold_ - PUSH H - CALL dispattr_ - POP D - POP D - POP D - LXI H,0 - XCHG - LXI H,-4-.4 - DAD SP - MOV M,E - INX H - MOV M,D - JMP .11 -.10: - LXI H,-4-.4 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D -.11: - LXI H,-4-.4 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,16 - CALL .lt - JZ .12 - LXI H,-4-.4 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - DAD H - DAD H - LXI D,9 - DAD D - PUSH H - LXI H,6 - PUSH H - CALL crtlc_ - POP D - POP D - LXI H,-4-.4 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,.3+12 - PUSH H - CALL printf_ - POP D - POP D - JMP .10 -.12: - LXI H,attroff_ - PUSH H - LXI H,.3+17 - PUSH H - CALL printf_ - POP D - POP D - LXI H,0 - XCHG - LXI H,-6-.4 - DAD SP - MOV M,E - INX H - MOV M,D - JMP .14 -.13: - LXI H,-6-.4 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D -.14: - LXI H,-6-.4 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,16 - CALL .lt - JZ .15 - LXI H,4 - PUSH H - LXI H,-4-.4 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,7 - DAD D - PUSH H - CALL crtlc_ - POP D - POP D - LXI H,bgblack_ - PUSH H - LXI H,fgcyan_ - PUSH H - LXI H,atbold_ - PUSH H - CALL dispattr_ - POP D - POP D - POP D - LXI H,-6-.4 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,.3+20 - PUSH H - CALL printf_ - POP D - POP D - LXI H,attroff_ - PUSH H - LXI H,.3+25 - PUSH H - CALL printf_ - POP D - POP D - LXI H,0 - XCHG - LXI H,-4-.4 - DAD SP - MOV M,E - INX H - MOV M,D - JMP .17 -.16: - LXI H,-4-.4 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D -.17: - LXI H,-4-.4 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,16 - CALL .lt - JZ .18 - LXI H,-4-.4 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - DAD H - DAD H - LXI D,10 - DAD D - PUSH H - LXI H,-4-.4 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,7 - DAD D - PUSH H - CALL crtlc_ - POP D - POP D - LXI H,-6-.4 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - DAD H - DAD H - DAD H - DAD H - XCHG - LXI H,-4-.4 - DAD SP - MOV A,M - INX H - MOV H,M - MOV L,A - DAD D - LXI D,map_ - DAD D - MOV E,M - MVI D,0 - PUSH D - LXI H,1 - POP D - CALL .eq - JZ .19 - LXI H,.3+28 - PUSH H - CALL printf_ - POP D - JMP .20 -.19: - LXI H,-6-.4 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - DAD H - DAD H - DAD H - DAD H - XCHG - LXI H,-4-.4 - DAD SP - MOV A,M - INX H - MOV H,M - MOV L,A - DAD D - PUSH H - LXI H,.3+30 - PUSH H - CALL printf_ - POP D - POP D -.20: - JMP .16 -.18: - LXI H,bgblack_ - PUSH H - LXI H,fgcyan_ - PUSH H - LXI H,atbold_ - PUSH H - CALL dispattr_ - POP D - POP D - POP D - LXI H,-6-.4 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,.3+33 - PUSH H - CALL printf_ - POP D - POP D - LXI H,attroff_ - PUSH H - LXI H,.3+40 - PUSH H - CALL printf_ - POP D - POP D - JMP .13 -.15: -.9: - LXI H,0 - RET -.4 EQU -10 -.3: - DB 37,99,0,67,72,65,82,83,0,37,115,0,91,37,120 - DB 93,0,37,115,0,91,37,120,93,0,37,115,0,46,0 - DB 37,99,0,32,32,91,37,120,93,0,37,115,0 - extrn atoi_ - extrn printf_ - extrn banner_ - extrn crtlc_ - extrn crtclr_ - extrn crtinit_ - extrn diagnose_ - extrn hregde_ - extrn hregbc_ - extrn .eq - extrn .lt - END - \ No newline at end of file diff --git a/branches/dwg/Apps/crossdev/CLEAR.ASM b/branches/dwg/Apps/crossdev/CLEAR.ASM deleted file mode 100644 index 261b3d1f..00000000 --- a/branches/dwg/Apps/crossdev/CLEAR.ASM +++ /dev/null @@ -1,44 +0,0 @@ - extrn .begin,.chl,.swt - extrn csave,cret,.move - global style_,1 - global vdp_rege_,960 - global pINFOLIS_,2 - global metadata_,128 - global pCNFGDAT_,2 - global pSYSCFG_,2 - PUBLIC main_ -main_: lxi d,.2 - call csave - LXI H,-4096 - SHLD hregbc_ - LXI H,-16384 - SHLD hregde_ - CALL diagnose_ - LXI H,-16384 - SHLD pSYSCFG_ - LHLD pSYSCFG_ - LXI D,68 - DAD D - MOV E,M - MVI D,0 - PUSH D - CALL crtinit_ - POP D - CALL crtclr_ - LXI H,0 - PUSH H - LXI H,0 - PUSH H - CALL crtlc_ - POP D - POP D - RET -.2 EQU -1 - extrn diagnose_ - extrn hregde_ - extrn hregbc_ - extrn crtlc_ - extrn crtclr_ - extrn crtinit_ - END - \ No newline at end of file diff --git a/branches/dwg/Apps/crossdev/CLOGICAL.ASM b/branches/dwg/Apps/crossdev/CLOGICAL.ASM deleted file mode 100644 index 017c74b6..00000000 --- a/branches/dwg/Apps/crossdev/CLOGICAL.ASM +++ /dev/null @@ -1,159 +0,0 @@ - extrn .begin,.chl,.swt - extrn csave,cret,.move - PUBLIC lugcur_ -lugcur_: lxi d,.2 - call csave - LXI H,0 - PUSH H - LXI H,0 - PUSH H - LXI H,12-.2 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,-6602 - PUSH H - CALL asmif_ - XCHG - LXI H,8 - DAD SP - SPHL - LHLD xregde_ - RET -.2 EQU 0 - PUBLIC lugnum_ -lugnum_: lxi d,.3 - call csave - LXI H,0 - PUSH H - LXI H,0 - PUSH H - LXI H,12-.3 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,-6602 - PUSH H - CALL asmif_ - XCHG - LXI H,8 - DAD SP - SPHL - LHLD xreghl_ - RET -.3 EQU 0 - PUBLIC lugdu_ -lugdu_: lxi d,.4 - call csave - LXI H,0 - PUSH H - LXI H,0 - PUSH H - LXI H,12-.4 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,-6602 - PUSH H - CALL asmif_ - XCHG - LXI H,8 - DAD SP - SPHL - LHLD xregbc_ - LXI D,8 - XCHG - CALL .ur - RET -.4 EQU 0 - PUBLIC luscur_ -luscur_: lxi d,.5 - call csave - LXI H,0 - PUSH H - LXI H,0 - PUSH H - LXI H,12-.5 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,-6602 - PUSH H - CALL asmif_ - XCHG - LXI H,8 - DAD SP - SPHL - LHLD xreghl_ - PUSH H - LXI H,12-.5 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LHLD xregbc_ - PUSH H - LXI H,-6599 - PUSH H - CALL asmif_ - XCHG - LXI H,8 - DAD SP - SPHL - RET -.5 EQU 0 - PUBLIC lusnum_ -lusnum_: lxi d,.6 - call csave - LXI H,0 - PUSH H - LXI H,0 - PUSH H - LXI H,12-.6 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,-6602 - PUSH H - CALL asmif_ - XCHG - LXI H,8 - DAD SP - SPHL - LXI H,10-.6 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LHLD xregde_ - PUSH H - LHLD xregbc_ - PUSH H - LXI H,-6599 - PUSH H - CALL asmif_ - XCHG - LXI H,8 - DAD SP - SPHL - RET -.6 EQU 0 - extrn asmif_ - extrn xreghl_ - extrn xregde_ - extrn xregbc_ - extrn .ur - END - \ No newline at end of file diff --git a/branches/dwg/Apps/crossdev/CLOGICAL.O b/branches/dwg/Apps/crossdev/CLOGICAL.O deleted file mode 100644 index cb9e3a5ca4a160de82e9c13f70ab357c34894fe0..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 768 zcmZRPVt|5wU|NmIjnRdPfmuK>fkEJGF@uC61H)4=R##d=+mdjhCxH%Bm+AKDDd=>Qqwc@ z7+}2Qj2w_CRIa$Z1i?!#PAp4>%Ow}3BFX9H=7Z&!IzZ}kO4E}|i{hcCBo^mprp3d| ztSCxNPf3kuVCqnZsLU(Pg{cI|W#oY5{2+2Er6~H6l3^A>4X-k+q${*6Z3`>e?gEI0!(e$hhDXVCl zX?g}T&**4+F7BB&>`)J2s_Cbp!!P5csP?S4JEPh%rW2YYop$AI*s@R>^+0)c&@NW( zC+*XN;`RoNHT`IzFd6m56z>Hq)$ diff --git a/branches/dwg/Apps/crossdev/CNAMEPT1.ASM b/branches/dwg/Apps/crossdev/CNAMEPT1.ASM deleted file mode 100644 index 98b7e2d6..00000000 --- a/branches/dwg/Apps/crossdev/CNAMEPT1.ASM +++ /dev/null @@ -1,527 +0,0 @@ - extrn .begin,.chl,.swt - extrn csave,cret,.move - global cache_,17 - PUBLIC cnamept1_ -cnamept1_: lxi d,.2 - call csave - LXI H,.1+0 - PUSH H - LXI H,cache_ - PUSH H - CALL strcpy_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - INX H - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,.1+17 - PUSH H - CALL printf_ - POP D - POP D - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - INX H - INX H - INX H - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,.1+51 - PUSH H - CALL printf_ - POP D - POP D - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,5 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,.1+85 - PUSH H - CALL printf_ - POP D - POP D - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,7 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,.1+119 - PUSH H - CALL printf_ - POP D - POP D - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,9 - DAD D - MOV E,M - MVI D,0 - PUSH D - LXI H,cache_ - PUSH H - LXI H,.1+153 - PUSH H - CALL printf_ - POP D - POP D - POP D - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,10 - DAD D - MOV E,M - MVI D,0 - PUSH D - LXI H,cache_ - PUSH H - LXI H,.1+175 - PUSH H - CALL printf_ - POP D - POP D - POP D - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,11 - DAD D - MOV E,M - MVI D,0 - PUSH D - LXI H,cache_ - PUSH H - LXI H,.1+197 - PUSH H - CALL printf_ - POP D - POP D - POP D - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,12 - DAD D - MOV E,M - MVI D,0 - PUSH D - LXI H,cache_ - PUSH H - LXI H,.1+219 - PUSH H - CALL printf_ - POP D - POP D - POP D - CALL pager_ - LXI H,cache_ - PUSH H - LXI H,.1+241 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,13 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .3 -.5: - LXI H,.1+261 - PUSH H - CALL printf_ - POP D - JMP .4 -.6: - LXI H,.1+266 - PUSH H - CALL printf_ - POP D - JMP .4 -.3: - CALL .swt - DW 2 - DW 0,.6 - DW 1,.5 - DW .4 -.4: - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,14 - DAD D - MOV E,M - MVI D,0 - PUSH D - LXI H,cache_ - PUSH H - LXI H,.1+272 - PUSH H - CALL printf_ - POP D - POP D - POP D - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,15 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,cache_ - PUSH H - LXI H,.1+298 - PUSH H - CALL printf_ - POP D - POP D - POP D - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,23 - DAD D - MOV E,M - MVI D,0 - PUSH D - LXI H,cache_ - PUSH H - LXI H,.1+324 - PUSH H - CALL printf_ - POP D - POP D - POP D - CALL pager_ - LXI H,cache_ - PUSH H - LXI H,.1+349 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,24 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .7 -.9: - LXI H,.1+369 - PUSH H - CALL printf_ - POP D - JMP .8 -.10: - LXI H,.1+375 - PUSH H - CALL printf_ - POP D - JMP .8 -.11: - LXI H,.1+380 - PUSH H - CALL printf_ - POP D - JMP .8 -.7: - CALL .swt - DW 3 - DW 1,.9 - DW 2,.10 - DW 3,.11 - DW .8 -.8: - CALL pager_ - LXI H,cache_ - PUSH H - LXI H,.1+383 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,25 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .12 -.14: - LXI H,.1+403 - PUSH H - CALL printf_ - POP D - JMP .13 -.15: - LXI H,.1+415 - PUSH H - CALL printf_ - POP D - JMP .13 -.16: - LXI H,.1+429 - PUSH H - CALL printf_ - POP D - JMP .13 -.17: - LXI H,.1+441 - PUSH H - CALL printf_ - POP D - JMP .13 -.18: - LXI H,.1+453 - PUSH H - CALL printf_ - POP D - JMP .13 -.19: - LXI H,.1+463 - PUSH H - CALL printf_ - POP D - JMP .13 -.20: - LXI H,.1+478 - PUSH H - CALL printf_ - POP D - JMP .13 -.12: - CALL .swt - DW 6 - DW 0,.14 - DW 1,.15 - DW 2,.16 - DW 3,.17 - DW 4,.18 - DW 5,.19 - DW .20 -.13: - CALL pager_ - LXI H,cache_ - PUSH H - LXI H,.1+486 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,26 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .21 -.23: - LXI H,.1+506 - PUSH H - CALL printf_ - POP D - JMP .22 -.24: - LXI H,.1+518 - PUSH H - CALL printf_ - POP D - JMP .22 -.25: - LXI H,.1+529 - PUSH H - CALL printf_ - POP D - JMP .22 -.26: - LXI H,.1+541 - PUSH H - CALL printf_ - POP D - JMP .22 -.27: - LXI H,.1+555 - PUSH H - CALL printf_ - POP D - JMP .22 -.28: - LXI H,.1+567 - PUSH H - CALL printf_ - POP D - JMP .22 -.21: - CALL .swt - DW 5 - DW 0,.23 - DW 1,.24 - DW 2,.25 - DW 3,.26 - DW 4,.27 - DW .28 -.22: - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,27 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,cache_ - PUSH H - LXI H,.1+577 - PUSH H - CALL printf_ - POP D - POP D - POP D - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,29 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,cache_ - PUSH H - LXI H,.1+599 - PUSH H - CALL printf_ - POP D - POP D - POP D - CALL pager_ - RET -.2 EQU 0 -.1: - DB 115,121,115,99,102,103,45,62,99,110,102,103,100,97,116 - DB 97,0,115,121,115,99,102,103,45,62,106,109,112,32,32 - DB 32,32,32,32,32,32,32,32,32,32,106,112,32,32,48 - DB 37,48,52,120,104,0,115,121,115,99,102,103,45,62,99 - DB 110,102,108,111,99,32,32,32,32,32,32,32,32,32,46 - DB 100,119,32,48,37,48,52,120,104,0,115,121,115,99,102 - DB 103,45,62,116,115,116,108,111,99,32,32,32,32,32,32 - DB 32,32,32,46,100,119,32,48,37,48,52,120,104,0,115 - DB 121,115,99,102,103,45,62,118,97,114,108,111,99,32,32 - DB 32,32,32,32,32,32,32,46,100,119,32,48,37,48,52 - DB 120,104,0,37,115,46,114,109,106,32,32,32,32,32,32 - DB 32,32,32,32,32,61,32,37,100,0,37,115,46,114,109 - DB 110,32,32,32,32,32,32,32,32,32,32,32,61,32,37 - DB 100,0,37,115,46,114,117,112,32,32,32,32,32,32,32 - DB 32,32,32,32,61,32,37,100,0,37,115,46,114,116,112 - DB 32,32,32,32,32,32,32,32,32,32,32,61,32,37,100 - DB 0,37,115,46,100,105,115,107,98,111,111,116,32,32,32 - DB 32,32,32,61,32,0,84,82,85,69,0,70,65,76,83 - DB 69,0,37,115,46,100,101,118,117,110,105,116,32,32,32 - DB 32,32,32,32,61,32,48,120,37,48,50,120,0,37,115 - DB 46,98,111,111,116,108,117,32,32,32,32,32,32,32,32 - DB 61,32,48,120,37,48,52,120,0,37,115,46,102,114,101 - DB 113,32,32,32,32,32,32,32,32,32,32,61,32,37,100 - DB 77,72,122,0,37,115,46,112,108,97,116,102,111,114,109 - DB 32,32,32,32,32,32,61,32,0,78,56,86,69,77,0 - DB 90,69,84,65,0,78,56,0,37,115,46,100,105,111,112 - DB 108,97,116,32,32,32,32,32,32,32,61,32,0,68,73 - DB 79,80,76,84,95,78,79,78,69,0,68,73,79,80,76 - DB 84,95,68,73,83,75,73,79,0,68,73,79,80,76,84 - DB 95,90,69,84,65,0,68,73,79,80,76,84,95,68,73 - DB 68,69,0,68,73,79,80,76,84,95,78,56,0,68,73 - DB 79,80,76,84,95,68,73,83,75,73,79,51,0,85,110 - DB 107,110,111,119,110,0,37,115,46,118,100,117,109,111,100 - DB 101,32,32,32,32,32,32,32,61,32,0,86,68,85,80 - DB 76,84,95,78,79,78,69,0,86,68,85,80,76,84,95 - DB 86,68,85,0,86,68,85,80,76,84,95,86,68,85,67 - DB 0,86,68,85,80,76,84,95,80,82,79,80,73,79,0 - DB 86,68,85,80,76,84,95,86,80,78,56,0,85,110,107 - DB 110,111,119,110,33,33,0,37,115,46,114,111,109,115,105 - DB 122,101,32,32,32,32,32,32,32,61,32,37,100,0,37 - DB 115,46,114,97,109,115,105,122,101,32,32,32,32,32,32 - DB 32,61,32,37,100,0 - extrn printf_ - extrn strcpy_ - extrn pager_ - END - \ No newline at end of file diff --git a/branches/dwg/Apps/crossdev/CNAMEPT1.O b/branches/dwg/Apps/crossdev/CNAMEPT1.O deleted file mode 100644 index 30243fe56cbcc67e3813e03387a3d4ab618a8c7b..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 2304 zcmd5-OK;;;6h2N{I>WPOB%ozR*QNwkgfOrekcy~C&{TBVbQ-6cmX7P#&Z~(XY&U)E z5E?Nc5D$S6@3+_^u|%rW4J?XOp;@qD#VpYL0JfZS{Ag@V_gKo;d%yFYbG~zL+>A~^ z^!z+Vi~aG(##^W0^n|HnowSk;kdNwJ=Hr9pV^Z(oz@W8eASR)@DSRt`G zOdNV}CWm)rgDimwC`li>dT+)`<^8mk7$VR!FR5iC2aRns)>wXo8%BHpnB;0Zinfv!N)bpfx+A^$G<-;m@{FeG^l>XIp?C#ikO z`RPffqDd@?U&z(3;vS8VsC}IwmcGdl>sey$+l*r6yCH&%(?0}TLgP&djkhE;-X`N6 zX*2SC{6%^g4Gw>imcHj=w|V!@Wt1yF3@gQN{;qE}nom4$I*q1f1j2xr>Gb-Fq6qwi zPY1Wfd{I2J(@Hd$)fKK8OO%4OtrSJRIIIbL5p>fUL4}4jVqkbFji5rIChr%#Ugy|{ zqRc3H3k35{(i)vIPxKZ!Ppl`j2$+vjkQNr8+-m!qb=M7|lo1P#~g5swj} zz`})E`4X&_tFyS|;jFexvQR?9L1}KWGGEmf78lAOqD^UT`Q^Dq3<-{LfiNWW(p;&W zBw^81%G00;XVY=F9r8M`wtB85?64a(tCh6MyokE-rmELULJI@5)?UQ5Kvh+*Twbi8 z3z7-k)+#uI7FJh=ePH`K3!#UCkE2zLO!Np{1mZx55~U`|F6$~_j5fg diff --git a/branches/dwg/Apps/crossdev/CNAMEPT2.ASM b/branches/dwg/Apps/crossdev/CNAMEPT2.ASM deleted file mode 100644 index a8280c90..00000000 --- a/branches/dwg/Apps/crossdev/CNAMEPT2.ASM +++ /dev/null @@ -1,480 +0,0 @@ - extrn .begin,.chl,.swt - extrn csave,cret,.move - global cache_,17 - PUBLIC cnamept2_ -cnamept2_: lxi d,.2 - call csave - LXI H,.1+0 - PUSH H - LXI H,cache_ - PUSH H - CALL strcpy_ - POP D - POP D - LXI H,cache_ - PUSH H - LXI H,.1+17 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,31 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .3 -.5: - LXI H,.1+37 - PUSH H - CALL printf_ - POP D - JMP .4 -.6: - LXI H,.1+47 - PUSH H - CALL printf_ - POP D - JMP .4 -.7: - LXI H,.1+56 - PUSH H - CALL printf_ - POP D - JMP .4 -.3: - CALL .swt - DW 3 - DW 0,.5 - DW 1,.6 - DW 2,.7 - DW .4 -.4: - CALL pager_ - LXI H,cache_ - PUSH H - LXI H,.1+68 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,32 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .8 -.10: - LXI H,.1+88 - PUSH H - CALL printf_ - POP D - JMP .9 -.11: - LXI H,.1+93 - PUSH H - CALL printf_ - POP D - JMP .9 -.8: - CALL .swt - DW 2 - DW 0,.11 - DW 1,.10 - DW .9 -.9: - CALL pager_ - LXI H,cache_ - PUSH H - LXI H,.1+99 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,33 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .12 -.14: - LXI H,.1+119 - PUSH H - CALL printf_ - POP D - JMP .13 -.15: - LXI H,.1+124 - PUSH H - CALL printf_ - POP D - JMP .13 -.12: - CALL .swt - DW 2 - DW 0,.15 - DW 1,.14 - DW .13 -.13: - CALL pager_ - LXI H,cache_ - PUSH H - LXI H,.1+130 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,34 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .16 -.18: - LXI H,.1+150 - PUSH H - CALL printf_ - POP D - JMP .17 -.19: - LXI H,.1+155 - PUSH H - CALL printf_ - POP D - JMP .17 -.16: - CALL .swt - DW 2 - DW 0,.19 - DW 1,.18 - DW .17 -.17: - CALL pager_ - LXI H,cache_ - PUSH H - LXI H,.1+161 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,35 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .20 -.22: - LXI H,.1+181 - PUSH H - CALL printf_ - POP D - JMP .21 -.23: - LXI H,.1+186 - PUSH H - CALL printf_ - POP D - JMP .21 -.20: - CALL .swt - DW 2 - DW 0,.23 - DW 1,.22 - DW .21 -.21: - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,35 - DAD D - MOV E,M - MVI D,0 - PUSH D - LXI H,1 - POP D - CALL .eq - JZ .24 - LXI H,cache_ - PUSH H - LXI H,.1+192 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,36 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .25 -.27: - LXI H,.1+212 - PUSH H - CALL printf_ - POP D - JMP .26 -.28: - LXI H,.1+219 - PUSH H - CALL printf_ - POP D - JMP .26 -.29: - LXI H,.1+232 - PUSH H - CALL printf_ - POP D - JMP .26 -.30: - LXI H,.1+243 - PUSH H - CALL printf_ - POP D - JMP .26 -.31: - LXI H,.1+254 - PUSH H - CALL printf_ - POP D - JMP .26 -.25: - CALL .swt - DW 4 - DW 0,.27 - DW 1,.28 - DW 2,.29 - DW 3,.30 - DW .31 -.26: - CALL pager_ - LXI H,cache_ - PUSH H - LXI H,.1+264 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,37 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .32 -.34: - LXI H,.1+284 - PUSH H - CALL printf_ - POP D - LXI H,.1+291 - PUSH H - CALL printf_ - POP D - JMP .33 -.35: - LXI H,.1+329 - PUSH H - CALL printf_ - POP D - LXI H,.1+336 - PUSH H - CALL printf_ - POP D - JMP .33 -.36: - LXI H,.1+376 - PUSH H - CALL printf_ - POP D - LXI H,.1+383 - PUSH H - CALL printf_ - POP D - JMP .33 -.37: - LXI H,.1+422 - PUSH H - CALL printf_ - POP D - LXI H,.1+429 - PUSH H - CALL printf_ - POP D - JMP .33 -.38: - LXI H,.1+468 - PUSH H - CALL printf_ - POP D - JMP .33 -.32: - CALL .swt - DW 4 - DW 0,.34 - DW 1,.35 - DW 2,.36 - DW 3,.37 - DW .38 -.33: - CALL pager_ - LXI H,cache_ - PUSH H - LXI H,.1+478 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,38 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .39 -.41: - LXI H,.1+498 - PUSH H - CALL printf_ - POP D - LXI H,.1+505 - PUSH H - CALL printf_ - POP D - JMP .40 -.42: - LXI H,.1+543 - PUSH H - CALL printf_ - POP D - LXI H,.1+550 - PUSH H - CALL printf_ - POP D - JMP .40 -.43: - LXI H,.1+590 - PUSH H - CALL printf_ - POP D - LXI H,.1+597 - PUSH H - CALL printf_ - POP D - JMP .40 -.44: - LXI H,.1+636 - PUSH H - CALL printf_ - POP D - LXI H,.1+643 - PUSH H - CALL printf_ - POP D - JMP .40 -.39: - CALL .swt - DW 4 - DW 0,.41 - DW 1,.42 - DW 2,.43 - DW 3,.44 - DW .40 -.40: - CALL pager_ -.24: - RET -.2 EQU 0 -.1: - DB 115,121,115,99,102,103,45,62,99,110,102,103,100,97,116 - DB 97,0,37,115,46,99,108,114,114,97,109,100,107,32,32 - DB 32,32,32,32,61,32,0,67,76,82,95,78,69,86,69 - DB 82,0,67,76,82,95,65,85,84,79,0,67,76,82,95 - DB 65,76,76,87,65,89,83,0,37,115,46,100,115,107,121 - DB 101,110,97,98,108,101,32,32,32,32,61,32,0,84,82 - DB 85,69,0,70,65,76,83,69,0,37,115,46,117,97,114 - DB 116,101,110,97,98,108,101,32,32,32,32,61,32,0,84 - DB 82,85,69,0,70,65,76,83,69,0,37,115,46,118,100 - DB 117,101,110,97,98,108,101,32,32,32,32,32,61,32,0 - DB 84,82,85,69,0,70,65,76,83,69,0,37,115,46,102 - DB 100,101,110,97,98,108,101,32,32,32,32,32,32,61,32 - DB 0,84,82,85,69,0,70,65,76,83,69,0,37,115,46 - DB 102,100,116,114,97,99,101,32,32,32,32,32,32,32,61 - DB 32,0,83,105,108,101,110,116,0,70,97,116,97,108,32 - DB 69,114,114,111,114,115,0,65,108,108,32,69,114,114,111 - DB 114,115,0,69,118,101,114,121,116,104,105,110,103,0,85 - DB 110,107,110,111,119,110,33,33,0,37,115,46,102,100,109 - DB 101,100,105,97,32,32,32,32,32,32,32,61,32,0,70 - DB 68,77,55,50,48,0,32,32,51,46,53,32,55,50,48 - DB 75,66,32,50,45,115,105,100,101,100,32,56,48,32,84 - DB 114,107,115,32,57,32,83,101,99,116,111,114,115,0,70 - DB 68,77,49,52,52,0,32,32,51,46,53,32,49,46,52 - DB 52,77,66,32,50,45,115,105,100,101,100,32,56,48,32 - DB 84,114,107,115,32,49,56,32,83,101,99,116,111,114,115 - DB 0,70,68,77,51,54,48,0,32,32,53,46,50,53,32 - DB 51,54,48,75,66,32,50,45,115,105,100,101,100,32,52 - DB 48,32,84,114,107,115,32,57,32,83,101,99,116,111,114 - DB 115,0,70,68,77,49,50,48,0,32,32,51,46,53,32 - DB 49,46,50,77,66,32,50,45,115,105,100,101,100,32,56 - DB 48,32,84,114,107,115,32,49,53,32,83,101,99,116,111 - DB 114,115,0,85,110,107,110,111,119,110,33,33,0,37,115 - DB 46,102,100,109,101,100,105,97,97,108,116,32,32,32,32 - DB 61,32,0,70,68,77,55,50,48,0,32,32,51,46,53 - DB 32,55,50,48,75,66,32,50,45,115,105,100,101,100,32 - DB 56,48,32,84,114,107,115,32,57,32,83,101,99,116,111 - DB 114,115,0,70,68,77,49,52,52,0,32,32,51,46,53 - DB 32,49,46,52,52,77,66,32,50,45,115,105,100,101,100 - DB 32,56,48,32,84,114,107,115,32,49,56,32,83,101,99 - DB 116,111,114,115,0,70,68,77,51,54,48,0,32,32,53 - DB 46,50,53,32,51,54,48,75,66,32,50,45,115,105,100 - DB 101,100,32,52,48,32,84,114,107,115,32,57,32,83,101 - DB 99,116,111,114,115,0,70,68,77,49,50,48,0,32,32 - DB 51,46,53,32,49,46,50,77,66,32,50,45,115,105,100 - DB 101,100,32,56,48,32,84,114,107,115,32,49,53,32,83 - DB 101,99,116,111,114,115,0 - extrn printf_ - extrn strcpy_ - extrn pager_ - extrn .eq - END - \ No newline at end of file diff --git a/branches/dwg/Apps/crossdev/CNAMEPT2.O b/branches/dwg/Apps/crossdev/CNAMEPT2.O deleted file mode 100644 index ad28d6bb4edaac1174dbf500dc9b089efb4c8fc4..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 2560 zcmd^=O>Y}j6o&6igF<0rgH(wM>5iM06|rL1fmEodE_H;21Fgq)6Pnl=&xh@JJP9+? z6vK*AAbfud2?VGJ1RH)rrAXNTl7R@ZVZjDvf!J28Sa8m{Gns4Se}JXDx^vFC=Q;1a z<9O;gi#|Wzfs22ptJ70Q*KW@(i<3^op* zgUvVrVyibMV6_O_7L?_e;-*~@Sd#-tQGv37ln#TE5rF>k1VAPN^hCeQuf%}92&~G1 z7~mnmWl%B#sO(GtoQMFMqF?>h7+@%L30LGm3}`6;SXZEA1aRrK34oahV2XaV*JFS! z0#D0<7~mklQlNwYc+Z^fS#lG~@t|JO#Jf#gTgoygROvKEnEnH+DM9?@XBPRDAqmnALY96uxo#dokBg z=`L12kg^v)9Lp|$BxRfN!(Ozv{;`x@iyz`_^;4-?>}XvDM=cc`nJPH4R9hXr?}pfg zU(V#4_(0^y5i?glm$)nO!(K;Zn>VFw{fl^rDBJi_%GSOb%dUPcW%X~QY;2&72D)fq z0}b?4=nL-?|2`N5rqiB%)byOTWrW;dr-H2M`o7V(dYYzj_&cky$I6xFlcjp8!Zm@9>YWN`*xO}Xj%tgVrb(Qiq zVWkdbol^(Lit>kpMF=2pL^xLH8z!~K9x#L6b!{(Xi$-X0S1bAcrXR4POG}RH(zfjn z!cNy~vl{n$-sUwglM%i8Hn+M4nt>1WTD-8tAI{G)O*@^P*I@O;d5!01gRW&;+QOVx z^?QNF&uF@BhS(bFbAT}sbVd=b|@3^9bNHQ!TN`@x1yrSTx)aEpp*8v50QP0Fgy5JSG;o@R(TS z!ee5Q7lnbtf$&(ov+xB73^ld4Z?Qe?QP8upq!|d2i#?&3$ZF)xE-U{=gXAt`4)}R>? zw*0OaI)_h2+xB5!M7N*8?Myj`s_veIUtD!pr*)pxAw5g_IO%7kh*fvLC4Hatfb=KQ z+oZpdKB!>jG15m!Go%6O8tHY?4(SZdaGTb*NbiPUXm$5HTK_`&JL#XKHz+$x`U&Yd cQk~Qx9grTS&bMf-(fVgv|3UgU=>PfiFOz&;qW}N^ diff --git a/branches/dwg/Apps/crossdev/CNAMEPT3.ASM b/branches/dwg/Apps/crossdev/CNAMEPT3.ASM deleted file mode 100644 index 1d77ae04..00000000 --- a/branches/dwg/Apps/crossdev/CNAMEPT3.ASM +++ /dev/null @@ -1,794 +0,0 @@ - extrn .begin,.chl,.swt - extrn csave,cret,.move - global cache_,17 - PUBLIC cnamept3_ -cnamept3_: lxi d,.2 - call csave - LXI H,.1+0 - PUSH H - LXI H,cache_ - PUSH H - CALL strcpy_ - POP D - POP D - LXI H,cache_ - PUSH H - LXI H,.1+17 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,39 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .3 -.5: - LXI H,.1+37 - PUSH H - CALL printf_ - POP D - JMP .4 -.6: - LXI H,.1+42 - PUSH H - CALL printf_ - POP D - JMP .4 -.3: - CALL .swt - DW 2 - DW 0,.6 - DW 1,.5 - DW .4 -.4: - CALL pager_ - LXI H,cache_ - PUSH H - LXI H,.1+48 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,40 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .7 -.9: - LXI H,.1+68 - PUSH H - CALL printf_ - POP D - JMP .8 -.10: - LXI H,.1+73 - PUSH H - CALL printf_ - POP D - JMP .8 -.7: - CALL .swt - DW 2 - DW 0,.10 - DW 1,.9 - DW .8 -.8: - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,40 - DAD D - MOV E,M - MVI D,0 - PUSH D - LXI H,1 - POP D - CALL .eq - JZ .11 - LXI H,cache_ - PUSH H - LXI H,.1+79 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,41 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .12 -.14: - LXI H,.1+95 - PUSH H - CALL printf_ - POP D - JMP .13 -.15: - LXI H,.1+102 - PUSH H - CALL printf_ - POP D - JMP .13 -.16: - LXI H,.1+109 - PUSH H - CALL printf_ - POP D - JMP .13 -.17: - LXI H,.1+120 - PUSH H - CALL printf_ - POP D - JMP .13 -.12: - CALL .swt - DW 3 - DW 0,.14 - DW 1,.15 - DW 2,.16 - DW .17 -.13: - CALL pager_ - LXI H,cache_ - PUSH H - LXI H,.1+130 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,42 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .18 -.20: - LXI H,.1+149 - PUSH H - CALL printf_ - POP D - JMP .19 -.21: - LXI H,.1+154 - PUSH H - CALL printf_ - POP D - JMP .19 -.22: - LXI H,.1+160 - PUSH H - CALL printf_ - POP D - JMP .19 -.18: - CALL .swt - DW 2 - DW 0,.21 - DW 1,.20 - DW .22 -.19: - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,43 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,cache_ - PUSH H - LXI H,.1+170 - PUSH H - CALL printf_ - POP D - POP D - POP D - CALL pager_ -.11: - LXI H,cache_ - PUSH H - LXI H,.1+194 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,45 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .23 -.25: - LXI H,.1+214 - PUSH H - CALL printf_ - POP D - JMP .24 -.26: - LXI H,.1+219 - PUSH H - CALL printf_ - POP D - JMP .24 -.23: - CALL .swt - DW 2 - DW 0,.26 - DW 1,.25 - DW .24 -.24: - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,45 - DAD D - MOV E,M - MVI D,0 - PUSH D - LXI H,1 - POP D - CALL .eq - JZ .27 - LXI H,cache_ - PUSH H - LXI H,.1+225 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,46 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .28 -.30: - LXI H,.1+245 - PUSH H - CALL printf_ - POP D - JMP .29 -.31: - LXI H,.1+252 - PUSH H - CALL printf_ - POP D - JMP .29 -.32: - LXI H,.1+259 - PUSH H - CALL printf_ - POP D - JMP .29 -.33: - LXI H,.1+270 - PUSH H - CALL printf_ - POP D - JMP .29 -.28: - CALL .swt - DW 3 - DW 0,.30 - DW 1,.31 - DW 2,.32 - DW .33 -.29: - CALL pager_ - LXI H,cache_ - PUSH H - LXI H,.1+280 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,47 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .34 -.36: - LXI H,.1+300 - PUSH H - CALL printf_ - POP D - JMP .35 -.37: - LXI H,.1+305 - PUSH H - CALL printf_ - POP D - JMP .35 -.38: - LXI H,.1+311 - PUSH H - CALL printf_ - POP D - JMP .35 -.34: - CALL .swt - DW 2 - DW 0,.37 - DW 1,.36 - DW .38 -.35: - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,48 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,cache_ - PUSH H - LXI H,.1+321 - PUSH H - CALL printf_ - POP D - POP D - POP D - CALL pager_ - LXI H,cache_ - PUSH H - LXI H,.1+345 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .39 -.41: - LXI H,.1+365 - PUSH H - CALL printf_ - POP D - JMP .40 -.42: - LXI H,.1+370 - PUSH H - CALL printf_ - POP D - JMP .40 -.43: - LXI H,.1+376 - PUSH H - CALL printf_ - POP D - JMP .40 -.39: - CALL .swt - DW 2 - DW 0,.42 - DW 1,.41 - DW .43 -.40: - CALL pager_ -.27: - LXI H,cache_ - PUSH H - LXI H,.1+386 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,51 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .44 -.46: - LXI H,.1+406 - PUSH H - CALL printf_ - POP D - JMP .45 -.47: - LXI H,.1+414 - PUSH H - CALL printf_ - POP D - JMP .45 -.44: - CALL .swt - DW 2 - DW 1,.46 - DW 2,.47 - DW .45 -.45: - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,52 - DAD D - MOV E,M - MVI D,0 - PUSH D - LXI H,cache_ - PUSH H - LXI H,.1+422 - PUSH H - CALL printf_ - POP D - POP D - POP D - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,53 - DAD D - MOV E,M - MVI D,0 - PUSH D - LXI H,cache_ - PUSH H - LXI H,.1+452 - PUSH H - CALL printf_ - POP D - POP D - POP D - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,54 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,10-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,54 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,cache_ - PUSH H - LXI H,.1+475 - PUSH H - CALL printf_ - XCHG - LXI H,8 - DAD SP - SPHL - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,24 - DAD D - MOV E,M - MVI D,0 - PUSH D - LXI H,3 - POP D - CALL .eq - JZ .48 - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,56 - DAD D - MOV E,M - MVI D,0 - PUSH D - LXI H,cache_ - PUSH H - LXI H,.1+511 - PUSH H - CALL printf_ - POP D - POP D - POP D - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,57 - DAD D - MOV E,M - MVI D,0 - PUSH D - LXI H,cache_ - PUSH H - LXI H,.1+533 - PUSH H - CALL printf_ - POP D - POP D - POP D - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,58 - DAD D - MOV E,M - MVI D,0 - PUSH D - LXI H,cache_ - PUSH H - LXI H,.1+559 - PUSH H - CALL printf_ - POP D - POP D - POP D - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,59 - DAD D - MOV E,M - MVI D,0 - PUSH D - LXI H,cache_ - PUSH H - LXI H,.1+585 - PUSH H - CALL printf_ - POP D - POP D - POP D - CALL pager_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,60 - DAD D - MOV E,M - MVI D,0 - PUSH D - LXI H,cache_ - PUSH H - LXI H,.1+611 - PUSH H - CALL printf_ - POP D - POP D - POP D - CALL pager_ - LXI H,cache_ - PUSH H - LXI H,.1+637 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,61 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .49 -.51: - LXI H,.1+657 - PUSH H - CALL printf_ - POP D - JMP .50 -.52: - LXI H,.1+662 - PUSH H - CALL printf_ - POP D - JMP .50 -.53: - LXI H,.1+668 - PUSH H - CALL printf_ - POP D - JMP .50 -.49: - CALL .swt - DW 2 - DW 0,.52 - DW 1,.51 - DW .53 -.50: - CALL pager_ - LXI H,cache_ - PUSH H - LXI H,.1+678 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,62 - DAD D - MOV E,M - MVI D,0 - XCHG - JMP .54 -.56: - LXI H,.1+698 - PUSH H - CALL printf_ - POP D - JMP .55 -.57: - LXI H,.1+703 - PUSH H - CALL printf_ - POP D - JMP .55 -.58: - LXI H,.1+709 - PUSH H - CALL printf_ - POP D - JMP .55 -.54: - CALL .swt - DW 2 - DW 0,.57 - DW 1,.56 - DW .58 -.55: - CALL pager_ -.48: - RET -.2 EQU 0 -.1: - DB 115,121,115,99,102,103,45,62,99,110,102,103,100,97,116 - DB 97,0,37,115,46,102,100,109,97,117,116,111,32,32,32 - DB 32,32,32,32,61,32,0,84,82,85,69,0,70,65,76 - DB 83,69,0,37,115,46,105,100,101,101,110,97,98,108,101 - DB 32,32,32,32,32,61,32,0,84,82,85,69,0,70,65 - DB 76,83,69,0,37,115,46,105,100,101,116,114,97,99,101 - DB 32,32,61,32,0,83,73,76,69,78,84,0,69,82,82 - DB 79,82,83,0,69,86,69,82,89,84,72,73,78,71,0 - DB 85,110,107,110,111,119,110,33,33,0,37,115,46,100,101 - DB 56,98,105,116,32,32,32,32,32,32,32,61,32,0,84 - DB 82,85,69,0,70,65,76,83,69,0,85,110,107,110,111 - DB 119,110,33,33,0,37,115,46,105,100,101,99,97,112,97 - DB 99,105,116,121,32,32,32,61,32,37,100,77,66,0,37 - DB 115,46,112,112,105,100,101,101,110,97,98,108,101,32,32 - DB 32,61,32,0,84,82,85,69,0,70,65,76,83,69,0 - DB 37,115,46,112,112,105,100,101,116,114,97,99,101,32,32 - DB 32,32,61,32,0,83,73,76,69,78,84,0,69,82,82 - DB 79,82,83,0,69,86,69,82,89,84,72,73,78,71,0 - DB 85,110,107,110,111,119,110,33,33,0,37,115,46,112,112 - DB 105,100,101,56,98,105,116,32,32,32,32,32,61,32,0 - DB 84,82,85,69,0,70,65,76,83,69,0,85,110,107,110 - DB 111,119,110,33,33,0,37,115,46,112,112,105,100,101,99 - DB 97,112,97,99,105,116,121,32,61,32,37,100,75,66,0 - DB 37,115,46,112,112,105,100,101,115,108,111,119,32,32,32 - DB 32,32,61,32,0,84,82,85,69,0,70,65,76,83,69 - DB 0,85,110,107,110,111,119,110,33,33,0,37,115,46,98 - DB 111,111,116,116,121,112,101,32,32,32,32,32,32,61,32 - DB 0,66,84,95,77,69,78,85,0,66,84,95,65,85,84 - DB 79,0,37,115,46,98,111,111,116,116,105,109,101,111,117 - DB 116,32,32,32,61,32,37,100,32,115,101,99,111,110,100 - DB 115,0,37,115,46,98,111,111,116,100,101,102,97,117,108 - DB 116,32,32,32,61,32,37,99,58,0,37,115,46,98,97 - DB 117,100,114,97,116,101,32,32,32,32,32,32,61,32,37 - DB 117,32,40,48,120,37,48,52,120,41,32,66,97,117,100 - DB 0,37,115,46,99,107,100,105,118,32,32,32,32,32,32 - DB 32,32,32,61,32,37,100,0,37,115,46,109,101,109,119 - DB 97,105,116,32,32,32,32,32,32,32,61,32,48,120,37 - DB 48,50,120,0,37,115,46,105,111,119,97,105,116,32,32 - DB 32,32,32,32,32,32,61,32,48,120,37,48,50,120,0 - DB 37,115,46,99,110,116,108,98,48,32,32,32,32,32,32 - DB 32,32,61,32,48,120,37,48,50,120,0,37,115,46,99 - DB 110,116,108,98,49,32,32,32,32,32,32,32,32,61,32 - DB 48,120,37,48,50,120,0,37,115,46,115,100,101,110,97 - DB 98,108,101,32,32,32,32,32,32,61,32,0,84,82,85 - DB 69,0,70,65,76,83,69,0,85,110,107,110,111,119,110 - DB 33,33,0,37,115,46,115,100,116,114,97,99,101,32,32 - DB 32,32,32,32,32,61,32,0,84,82,85,69,0,70,65 - DB 76,83,69,0,85,110,107,110,111,119,110,33,33,0 - extrn printf_ - extrn strcpy_ - extrn pager_ - extrn .eq - END - \ No newline at end of file diff --git a/branches/dwg/Apps/crossdev/CNAMEPT3.O b/branches/dwg/Apps/crossdev/CNAMEPT3.O deleted file mode 100644 index 4d1a1517fdc1e6d72eedbb5b073db1f4c0cc0f31..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3328 zcmd^BOK%%h7`-!Y)v6Q`wZIg~@R3WkOo#-kF-`QR#2kLcv1bXrX zM%9q&9?Fu3hZhf}qmPgW7dy$$R*sjZUPMi}zNK+u)=z9#$w8U9>Le@?l`zTnb4&(a zU@&p9g+Z@tkmvo9mxMu)6El877#LtsAWVV=5SLk1mxOD%5cW_k6&dcEE>qr~eivh|A@@hIub z!nw$aIX@wy7!ai(F-c%XyqkYUtc$oKlUG{!4~Q9YyVOWc` ztQ2Rl@CEYCucc8e-r35A@XAkqi5m9)&v7ChB51h(I~Xl^r4*Lw6S%iTxn=jSCxvQ8cq!p_Gt9n81$%AL^ulR{LyIK z6Yy~E<{I%R&)0}Yc|L9mt*IB$ZOxkExrnVqDQ*R0@Pw2_9F6p7XGA`#>2}FlgMIQQ zR2;5o;+{v&vK*&YVf%ojpdCwQ&c(-5WQ-;=CsN7tupv|#w5(ezaCTr7v2~SNre=$E zP0uTIrR1)wBgj)_MXM?f922jjE0NyVdQa@=dS7IWE#fHEWzAUS637AVp}MS>*A&CS zU|0=>gX?_y7A(0nP~xt!GSzfwDHjv{aEU@4Un}JfvnAftS4IbH&AV{mM*UY3PL0Af z;$yNkm@ZBqY{U(q&0~rZvS%;+5**0s1;g~dsl^ho?wY;kG`^{}vZ{M)YE}2G4U{du zwh?9uRZ)w2h7frJs#Q}d>lNn+?`b<#wNlHt4wb55I(hG#QqZfc&UM$Hg>oW24JdE+ z?FKxB&x42;5JwTOBGwRZB3?qgEJ4+7#9xu=!sp-d`A@`u5a*B|L0m$NBTgXxfOreB zj`%I&0rsm--W*~-Z{^MXh-VNVK7%Q6vt=Rk;+GfY$EX`q_JE1NHA4FKouYbr;VDXj=gr{B#yn_UE3SmyNh>8 z<06pCXA1=iln)UEMTNq(_aGwm091;QLAh2Skpn^q4%}hp&5S+XM4a&9ul0Z4zW00Y zO+H5MLHx72hdw-X%bPc^--`A|V-*zL^iedC&`~P3omfG!?aftmd#{(+_izQ_N0#;% z5_h4ym+nAYi3sXNH@hf$y-Hr7$M?eVw4#k#yy9RQPx4`jt{2$bJEoC8w+q`-oUP4Jim!>vE;F*P zhm6IrQ8*up$h;vLlzxQF%c1lYC8i=>iA7LVF%&krK_6*?B5!q`<=N3k<}JuSyj6|& zVJdL5ve*o9>2w-SoDkTy^IHm@Vy&LbRUnT3?z5hyKY zWZw-LbFv{&+7zX!I6F{SdI`lPX~pid7a{lXY>slEiVCwSyeH~cnNbQG+WVo1vTRVo z2wADF5<){ID>YS19sW5eejqr8emqJa3R{}jF^*SbG_xOx;tkFlHWp<=%*&=Ub#_`7+`y|#kgN|-kqW#>|bb3ZZ zgfx31n?vbBI$P9^PR$(IwMu^jq)O7q6w`1WQF|OqA&7tZLP5r~l1pw5ZF^{8Pc;o8jv#R{zZCSkl>8 z+hu2GVu4}r3nb$Gr2`UB`1=oQebp!*=30{Q^xUeG&1 zFM|4@mqDKgJqP+LOy(bWz5#k0IKRR3-=K@&q(EKJL!gtOv!FkMUIqOHbRG0tqW{O| EUk^JnegFUf diff --git a/branches/dwg/Apps/crossdev/CPMNAME.ASM b/branches/dwg/Apps/crossdev/CPMNAME.ASM deleted file mode 100644 index d4b2fd0c..00000000 --- a/branches/dwg/Apps/crossdev/CPMNAME.ASM +++ /dev/null @@ -1,164 +0,0 @@ - extrn .begin,.chl,.swt - extrn csave,cret,.move - global pINFOLIS_,2 - global pSYSCFG_,2 - global line_,2 - PUBLIC main_ -main_: lxi d,.2 - call csave - LXI H,5 - SHLD line_ - LXI H,-4096 - SHLD hregbc_ - LXI H,-16384 - SHLD hregde_ - CALL diagnose_ - LXI H,-16384 - SHLD pSYSCFG_ - LHLD pSYSCFG_ - LXI D,68 - DAD D - MOV E,M - MVI D,0 - PUSH D - CALL crtinit_ - POP D - CALL crtclr_ - LXI H,0 - PUSH H - LXI H,0 - PUSH H - CALL crtlc_ - POP D - POP D - LXI H,0 - PUSH H - LXI H,0 - PUSH H - LXI H,3 - PUSH H - LXI H,2 - PUSH H - LXI H,2013 - PUSH H - LXI H,16 - PUSH H - LXI H,1 - PUSH H - LXI H,.1+0 - PUSH H - CALL printf_ - XCHG - LXI H,16 - DAD SP - SPHL - LXI H,.1+36 - PUSH H - CALL printf_ - POP D - CALL pager_ - CALL pager_ - LXI H,-6596 - SHLD ireghl_ - CALL bioscall_ - LHLD ireghl_ - SHLD pINFOLIS_ - LXI H,.1+72 - PUSH H - CALL printf_ - POP D - LHLD pINFOLIS_ - INX H - INX H - MOV E,M - INX H - MOV D,M - XCHG - SHLD dregde_ - LXI H,9 - SHLD dregbc_ - CALL bdoscall_ - CALL pager_ - LXI H,-4096 - SHLD hregbc_ - LXI H,-16384 - SHLD hregde_ - CALL diagnose_ - LXI H,-16384 - SHLD pSYSCFG_ - LHLD pSYSCFG_ - PUSH H - CALL cnamept1_ - POP D - LHLD pSYSCFG_ - PUSH H - CALL cnamept2_ - POP D - LHLD pSYSCFG_ - PUSH H - CALL cnamept3_ - POP D - LHLD pSYSCFG_ - PUSH H - CALL cnamept4_ - POP D - RET -.2 EQU -7 -.1: - DB 67,80,77,78,65,77,69,46,67,79,77,32,37,100,47 - DB 37,100,47,37,100,32,118,37,100,46,37,100,46,37,100 - DB 32,40,37,100,41,0,32,100,119,103,32,45,32,68,105 - DB 115,112,108,97,121,32,83,121,115,116,101,109,32,67,111 - DB 110,102,105,103,117,114,97,116,105,111,110,0,112,73,78 - DB 70,79,76,73,83,84,45,62,98,97,110,112,116,114,32 - DB 61,61,62,32,0 - PUBLIC pager_ -pager_: lxi d,.4 - call csave - LHLD line_ - INX H - SHLD line_ - LXI H,.3+0 - PUSH H - CALL printf_ - POP D - LXI H,24 - XCHG - LHLD line_ - CALL .eq - JZ .5 - LXI H,.3+2 - PUSH H - CALL printf_ - POP D - LXI H,1 - SHLD dregbc_ - CALL bdoscall_ - LXI H,1 - SHLD line_ -.5: - RET -.4 EQU 0 -.3: - DB 10,0,32,32,32,32,32,112,114,101,115,115,32,97,110 - DB 121,32,107,101,121,32,116,111,32,99,111,110,116,105,110 - DB 117,101,0 - extrn printf_ - extrn crtlc_ - extrn crtclr_ - extrn crtinit_ - extrn cnamept4_ - extrn cnamept3_ - extrn cnamept2_ - extrn cnamept1_ - extrn diagnose_ - extrn hregde_ - extrn hregbc_ - extrn bdoscall_ - extrn dregde_ - extrn dregbc_ - extrn bioscall_ - extrn ireghl_ - extrn .eq - END - \ No newline at end of file diff --git a/branches/dwg/Apps/crossdev/CPMNAME.O b/branches/dwg/Apps/crossdev/CPMNAME.O deleted file mode 100644 index 0706855010c01724ea187a1068b8265b774639a7..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 1024 zcmcIiJ8#oa6h2Oh0!+37QDDH=jv_&%rchWAv;w6RMItRyDg;Y|AGgjGj_umctK}g9 zLw^A~|0HXXJa}M(F)UeFD+V|>c0#hSadjW(JKuNix#!p`S0Npr1a5rD{t`ZCVMUZ) zf*1vmSI&Vtzyp4&NBkJ6$4IuhAQj;^-|D6@W2c(L0dic!rcL zdNbE>`<@#sBAx;+MT48tIP!$T1buhUxMT1A)Pt8D3L>t&a{q_wqZtTd1y8jHBG*0t znCdD$D3nV3rDqd0MD+zwyQuD^!T)$W#`gs&#wySn%&pI^RV%#TH9@q zvMH~XO`N1xHmlPqlj~*k1`xAvkyWzA0@<^*A!!bSkakGTbq-`^b$u;lt^;0uXM6XF zTyO5JZt9xjg+AHX*d!82`n2O>WdKqMdyW+vX=^UWN)aYVh|#eielZhneOmmb7~7bZ zo9E^LA$diIBy@@4Iw5nq5(UVe=O4VPQ;RusWVCJWO}U^S{zXQh z^)M{u44*D=)sCBRCmB>ECDxm{1T|kYYuk@o39^|(Td2vL@S8gtb2v)!wS8*oMr#3? zs7*MNX_n&#G(m=sRj{x%M~3asl*rk5NgC(*%n1)#nC~9`;GSkt6s8=*d~JIcr!zM& zG}}(|A-9ly>1DdPs5Bg{L%r};`j!N(FQMB@=uU#F^pLjzga>E8u^*#vQ=5A-qb|NR KGYWD4&*Kled)}%5 diff --git a/branches/dwg/Apps/crossdev/CTERMCAP.ASM b/branches/dwg/Apps/crossdev/CTERMCAP.ASM deleted file mode 100644 index 50ae771d..00000000 --- a/branches/dwg/Apps/crossdev/CTERMCAP.ASM +++ /dev/null @@ -1,334 +0,0 @@ - extrn .begin,.chl,.swt - extrn csave,cret,.move - global termtype_,1 - DSEG - public wy50row_ -wy50row_: - DB 32 - DB 33 - DB 34 - DB 35 - DB 36 - DB 37 - DB 38 - DB 39 - DB 40 - DB 41 - DB 42 - DB 43 - DB 44 - DB 45 - DB 46 - DB 47 - DB 48 - DB 49 - DB 50 - DB 51 - DB 52 - DB 53 - DB 54 - DB 55 - CSEG - DSEG - public wy50col_ -wy50col_: - DB 32 - DB 33 - DB 34 - DB 35 - DB 36 - DB 37 - DB 38 - DB 39 - DB 40 - DB 41 - DB 42 - DB 43 - DB 44 - DB 45 - DB 46 - DB 47 - DB 48 - DB 49 - DB 50 - DB 51 - DB 52 - DB 53 - DB 54 - DB 55 - DB 56 - DB 57 - DB 58 - DB 59 - DB 60 - DB 61 - DB 62 - DB 63 - DB 64 - DB 65 - DB 66 - DB 67 - DB 68 - DB 69 - DB 70 - DB 71 - DB 72 - DB 73 - DB 74 - DB 75 - DB 76 - DB 77 - DB 78 - DB 79 - DB 80 - DB 81 - DB 82 - DB 83 - DB 84 - DB 85 - DB 86 - DB 87 - DB 88 - DB 89 - DB 90 - DB 91 - DB 92 - DB 93 - DB 94 - DB 95 - DB 96 - DB 97 - DB 98 - DB 99 - DB 100 - DB 101 - DB 102 - DB 103 - DB 104 - DB 105 - DB 106 - DB 107 - DB 108 - DB 109 - DB 110 - DB 111 - CSEG - PUBLIC crtinit_ -crtinit_: lxi d,.2 - call csave - LXI H,8-.2 - DAD SP - MOV E,M - XCHG - MOV A,L - STA termtype_ - RET -.2 EQU 0 - PUBLIC crtclr_ -crtclr_: lxi d,.3 - call csave - LDA termtype_ - MOV L,A - MVI H,0 - JMP .4 -.6: - LXI H,0 - XCHG - LXI H,2-.3 - DAD SP - MOV M,E - INX H - MOV M,D - JMP .8 -.7: - LXI H,2-.3 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D -.8: - LXI H,2-.3 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,43 - CALL .lt - JZ .9 - LXI H,10 - PUSH H - LXI H,13 - PUSH H - LXI H,.1+0 - PUSH H - CALL printf_ - POP D - POP D - POP D - JMP .7 -.9: - JMP .5 -.10: - LXI H,27 - PUSH H - LXI H,.1+5 - PUSH H - CALL printf_ - POP D - POP D - JMP .5 -.11: - LXI H,27 - PUSH H - LXI H,.1+11 - PUSH H - CALL printf_ - POP D - POP D - JMP .5 -.12: - LXI H,27 - PUSH H - LXI H,27 - PUSH H - LXI H,.1+15 - PUSH H - CALL printf_ - POP D - POP D - POP D - JMP .5 -.4: - CALL .swt - DW 4 - DW 0,.6 - DW 1,.10 - DW 2,.11 - DW 3,.12 - DW .5 -.5: - RET -.3 EQU -2 -.1: - DB 37,99,37,99,0,37,99,91,50,74,0,37,99,43,0 - DB 37,99,74,37,99,72,0 - PUBLIC crtlc_ -crtlc_: lxi d,.14 - call csave - LDA termtype_ - MOV L,A - MVI H,0 - JMP .15 -.17: - JMP .16 -.18: - LXI H,102 - PUSH H - LXI H,12-.14 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,12-.14 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,27 - PUSH H - LXI H,.13+0 - PUSH H - CALL printf_ - XCHG - LXI H,10 - DAD SP - SPHL - JMP .16 -.19: - LXI H,10-.14 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,wy50col_ - DAD D - DCX H - MOV E,M - MVI D,0 - PUSH D - LXI H,10-.14 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,wy50row_ - DAD D - DCX H - MOV E,M - MVI D,0 - PUSH D - LXI H,27 - PUSH H - LXI H,.13+11 - PUSH H - CALL printf_ - XCHG - LXI H,8 - DAD SP - SPHL - JMP .16 -.20: - LXI H,10-.14 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,32 - DAD D - PUSH H - LXI H,10-.14 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,32 - DAD D - PUSH H - LXI H,27 - PUSH H - LXI H,.13+19 - PUSH H - CALL printf_ - XCHG - LXI H,8 - DAD SP - SPHL - JMP .16 -.15: - CALL .swt - DW 4 - DW 0,.17 - DW 1,.18 - DW 2,.19 - DW 3,.20 - DW .16 -.16: - RET -.14 EQU -2 -.13: - DB 37,99,91,37,100,59,37,100,37,99,0,37,99,61,37 - DB 99,37,99,0,37,99,89,37,99,37,99,0 - extrn printf_ - extrn .lt - END - \ No newline at end of file diff --git a/branches/dwg/Apps/crossdev/CTERMCAP.O b/branches/dwg/Apps/crossdev/CTERMCAP.O deleted file mode 100644 index f6da96227fe95447620de7c7629d140567cecb99..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 1024 zcmbtS+fUPQ6h7@pBqk=SL#~?A&EjP`aXMrS1aE+N7ex_WxBk|xg>EHXW#TQ-#AN?~ zFa8($2bd*$5fdJGFebkFz|&sw!58)Pw1XKR{U!Z!&iT&mJ84@l`0p*Jqcs_L&3_C) z+Yhl{3P%pg1BVVDIT}57Ja(dM@MQed>BP{Pt$#VO$qgq*Qln#M$Hj?r=Pz8mG&wbW zdFIO1Yu9gxH*ejZy>oZ&-u?Lp3lATq6)}@lSx(CrbYpSJES9XTppb#!dKrRJcsK(c z$#mmIdpa`R;*Z$%p4F-noHWI8e@ zMPdCJ1V87YTiOkq(jNSz0t^b9>(3#yv9VFtAXwM2ZJ);^h}nxoOEA?E?50dVdwi#l zj+@#LYQsY^5I8VE;9(Jj04#wH;+o841~OZS&mcyjOJ*}Nn+C!BTVWB`v2dL{t`iPN0$Hv5V+x70Odmt5Hy4rQwx%4VEJvKQoBO3sn^F}csX!aQ9AcD1`d zU`*8tMhTi8(@i((bLEP&t+jBmqUCW_4l^9hE;_5rTA=DyS5^~)wpCFA z)o$NomZ|W>G21aphJ&7f9D2;OmF9Gl2Ke5xZIqn60(|w8muWHufSW)E@z-wvzV;4n vzSd7TMi?Vh2|p0NCv#o diff --git a/branches/dwg/Apps/crossdev/FLIP.ASM b/branches/dwg/Apps/crossdev/FLIP.ASM deleted file mode 100644 index bfd5cb5b..00000000 --- a/branches/dwg/Apps/crossdev/FLIP.ASM +++ /dev/null @@ -1,428 +0,0 @@ - extrn .begin,.chl,.swt - extrn csave,cret,.move - PUBLIC vdaini_ -vdaini_: lxi d,.2 - call csave - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,16384 - CALL .or - SHLD hregbc_ - LHLD hregbc_ - PUSH H - LXI H,.1+0 - PUSH H - CALL printf_ - POP D - POP D - LXI H,10-.2 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - SHLD hregde_ - LHLD hregde_ - PUSH H - LXI H,.1+17 - PUSH H - CALL printf_ - POP D - POP D - LXI H,12-.2 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - SHLD hreghl_ - LHLD hreghl_ - PUSH H - LXI H,.1+34 - PUSH H - CALL printf_ - POP D - POP D - CALL diagnose_ - LDA hrega_ - MOV L,A - MVI H,0 - PUSH H - LXI H,.1+51 - PUSH H - CALL printf_ - POP D - POP D - LDA hrega_ - MOV L,A - MVI H,0 - RET -.2 EQU 0 -.1: - DB 104,114,101,103,98,99,32,61,32,48,120,37,48,52,120 - DB 10,0,104,114,101,103,100,101,32,61,32,48,120,37,48 - DB 52,120,10,0,104,114,101,103,104,108,32,61,32,48,120 - DB 37,48,52,120,10,0,86,68,65,73,78,73,32,99,97 - DB 108,108,101,100,44,32,114,101,116,117,114,110,32,99,111 - DB 100,101,32,119,97,115,32,48,120,37,48,50,120,10,0 - PUBLIC bitlook_ -bitlook_: lxi d,.4 - call csave - LXI H,-32768 - XCHG - LXI H,2-.4 - DAD SP - MOV M,E - INX H - MOV M,D - LXI H,0 - XCHG - LXI H,0-.4 - DAD SP - MOV M,E - INX H - MOV M,D - JMP .6 -.5: - LXI H,0-.4 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D -.6: - LXI H,0-.4 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,256 - CALL .lt - JZ .7 - LXI H,0-.4 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,.3+0 - PUSH H - CALL printf_ - POP D - POP D - LXI H,0 - XCHG - LXI H,-2-.4 - DAD SP - MOV M,E - INX H - MOV M,D - JMP .9 -.8: - LXI H,-2-.4 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D -.9: - LXI H,-2-.4 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,8 - CALL .lt - JZ .10 - LXI H,2-.4 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D - XCHG - DCX H - MOV E,M - MVI D,0 - PUSH D - LXI H,.3+16 - PUSH H - CALL printf_ - POP D - POP D - JMP .8 -.10: - LXI H,.3+24 - PUSH H - CALL printf_ - POP D - JMP .5 -.7: - RET -.4 EQU -6 -.3: - DB 97,115,99,105,105,32,61,32,48,120,37,48,50,120,32 - DB 0,48,120,37,48,50,120,32,0,10,0 - PUBLIC vdaqry_ -vdaqry_: lxi d,.12 - call csave - LXI H,8-.12 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,16640 - CALL .or - SHLD hregbc_ - LHLD hregbc_ - PUSH H - LXI H,.11+0 - PUSH H - CALL printf_ - POP D - POP D - LXI H,10-.12 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - SHLD hreghl_ - LHLD hreghl_ - LXI D,-32768 - CALL .ne - JZ .13 - LXI H,.11+17 - PUSH H - CALL printf_ - POP D -.13: - CALL diagnose_ - LDA hrega_ - MOV L,A - MVI H,0 - PUSH H - LXI H,.11+43 - PUSH H - CALL printf_ - POP D - POP D - LHLD hregbc_ - LXI D,255 - CALL .an - PUSH H - LXI H,.11+83 - PUSH H - CALL printf_ - POP D - POP D - LHLD hregde_ - LXI D,8 - XCHG - CALL .ur - PUSH H - LHLD hregde_ - LXI D,8 - XCHG - CALL .ur - PUSH H - LXI H,.11+123 - PUSH H - CALL printf_ - POP D - POP D - POP D - LHLD hregde_ - LXI D,255 - CALL .an - PUSH H - LHLD hregde_ - LXI D,255 - CALL .an - PUSH H - LXI H,.11+167 - PUSH H - CALL printf_ - POP D - POP D - POP D - LDA hrega_ - MOV L,A - MVI H,0 - RET -.12 EQU 0 -.11: - DB 104,114,101,103,98,99,32,61,32,48,120,37,48,52,120 - DB 10,0,118,100,97,113,114,121,32,115,97,121,115,32,104 - DB 108,32,33,61,32,48,120,56,48,48,48,10,0,86,68 - DB 65,81,82,89,32,99,97,108,108,101,100,44,32,115,116 - DB 97,116,117,115,32,32,32,32,32,32,32,119,97,115,32 - DB 48,120,37,48,50,120,10,0,32,32,32,32,32,32,32 - DB 32,32,32,32,32,32,32,32,118,105,100,101,111,32,109 - DB 111,100,101,32,32,32,119,97,115,32,48,120,37,48,50 - DB 120,10,0,32,32,32,32,32,32,32,32,32,32,32,32 - DB 32,32,32,114,111,119,32,99,111,117,110,116,32,32,32 - DB 32,119,97,115,32,48,120,37,48,50,120,40,37,100,41 - DB 10,0,32,32,32,32,32,32,32,32,32,32,32,32,32 - DB 32,32,99,111,108,117,109,110,32,99,111,117,110,116,32 - DB 119,97,115,32,48,120,37,48,50,120,40,37,100,41,10 - DB 0 - PUBLIC main_ -main_: lxi d,.15 - call csave - LXI H,.14+0 - PUSH H - CALL printf_ - POP D - LXI H,-32768 - PUSH H - LXI H,64 - PUSH H - CALL vdaqry_ - POP D - POP D - XCHG - LXI H,-3-.15 - DAD SP - MOV M,E - INX H - MOV M,D - LXI H,-32768 - XCHG - LXI H,2-.15 - DAD SP - MOV M,E - INX H - MOV M,D - LXI H,0 - XCHG - LXI H,-1-.15 - DAD SP - MOV M,E - INX H - MOV M,D - JMP .17 -.16: - LXI H,-1-.15 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D -.17: - LXI H,-1-.15 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,2048 - CALL .lt - JZ .18 - LXI H,2-.15 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - MOV E,M - LXI H,1-.15 - DAD SP - MOV M,E - LXI H,1-.15 - DAD SP - MOV E,M - MVI D,0 - LXI H,255 - CALL .xr - XCHG - LXI H,1-.15 - DAD SP - MOV M,E - LXI H,1-.15 - DAD SP - MOV E,M - PUSH D - LXI H,4-.15 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - POP D - MOV M,E - LXI H,2-.15 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D - JMP .16 -.18: - LXI H,-32768 - PUSH H - LXI H,0 - PUSH H - LXI H,64 - PUSH H - CALL vdaini_ - POP D - POP D - POP D - RET -.15 EQU -7 -.14: - DB 102,108,105,112,46,99,111,109,40,99,41,32,49,49,47 - DB 49,53,47,50,48,49,50,32,100,119,103,32,45,32,10 - DB 10,0 - extrn printf_ - extrn diagnose_ - extrn hreghl_ - extrn hregde_ - extrn hregbc_ - extrn hrega_ - extrn .or - extrn .xr - extrn .an - extrn .ne - extrn .lt - extrn .ur - END - \ No newline at end of file diff --git a/branches/dwg/Apps/crossdev/FORM.ASM b/branches/dwg/Apps/crossdev/FORM.ASM deleted file mode 100644 index e2f63568..00000000 --- a/branches/dwg/Apps/crossdev/FORM.ASM +++ /dev/null @@ -1,646 +0,0 @@ - extrn .begin,.chl,.swt - extrn csave,cret,.move - global pDPHMAP_,2 - global pDPHVEC_,16 - DSEG - public pSYSCFG_ -pSYSCFG_: - DW -16384 - CSEG - DSEG - public form_ -form_: - DW 6 - DW 3 - DW 6 - DB 102 - DB 105 - DB 101 - DB 108 - DB 100 - DB 49 - DB 0 - DW 6 - DW 13 - DB 100 - DB 101 - DB 102 - DB 97 - DB 117 - DB 108 - DB 116 - DB 49 - DB 0 - ds 24 - DW 7 - DW 3 - DW 6 - DB 102 - DB 105 - DB 101 - DB 108 - DB 100 - DB 50 - DB 0 - DW 7 - DW 13 - DB 100 - DB 101 - DB 102 - DB 97 - DB 117 - DB 108 - DB 116 - DB 50 - DB 0 - ds 24 - CSEG - PUBLIC main_ -main_: lxi d,.2 - call csave - LXI H,-4096 - SHLD hregbc_ - LXI H,-16384 - SHLD hregde_ - CALL diagnose_ - LXI H,-16384 - SHLD pSYSCFG_ - LHLD pSYSCFG_ - LXI D,68 - DAD D - MOV E,M - MVI D,0 - PUSH D - CALL crtinit_ - POP D - CALL crtclr_ - LXI H,0 - PUSH H - LXI H,0 - PUSH H - CALL crtlc_ - POP D - POP D - LXI H,.1+0 - PUSH H - CALL banner_ - POP D - LXI H,0 - XCHG - LXI H,2-.2 - DAD SP - MOV M,E - INX H - MOV M,D - JMP .4 -.3: - LXI H,2-.2 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D -.4: - LXI H,2-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,2 - CALL .lt - JZ .5 - LXI H,2-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - CALL .ml - LXI D,form_+2 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,4-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - CALL .ml - LXI D,form_ - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - CALL crtlc_ - POP D - POP D - LXI H,2-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - CALL .ml - LXI D,form_+6 - DAD D - PUSH H - LXI H,.1+5 - PUSH H - CALL printf_ - POP D - POP D - LXI H,2-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - CALL .ml - LXI D,form_+15 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,4-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - CALL .ml - LXI D,form_+13 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - CALL crtlc_ - POP D - POP D - LXI H,0 - XCHG - LXI H,0-.2 - DAD SP - MOV M,E - INX H - MOV M,D - JMP .7 -.6: - LXI H,0-.2 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D -.7: - LXI H,2-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - CALL .ml - LXI D,form_+17 - DAD D - PUSH H - CALL strlen_ - POP D - PUSH H - LXI H,2-.2 - DAD SP - MOV E,M - INX H - MOV D,M - POP H - CALL .lt - JZ .8 - LXI H,.1+8 - PUSH H - CALL printf_ - POP D - JMP .6 -.8: - LXI H,2-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - CALL .ml - LXI D,form_+15 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,4-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - CALL .ml - LXI D,form_+13 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - CALL crtlc_ - POP D - POP D - LXI H,2-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - CALL .ml - LXI D,form_+17 - DAD D - PUSH H - LXI H,.1+10 - PUSH H - CALL printf_ - POP D - POP D - JMP .3 -.5: - LXI H,0 - XCHG - LXI H,2-.2 - DAD SP - MOV M,E - INX H - MOV M,D - JMP .10 -.9: - LXI H,2-.2 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D -.10: - LXI H,2-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,2 - CALL .lt - JZ .11 - LXI H,2-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - CALL .ml - LXI D,form_+15 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,4-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - CALL .ml - LXI D,form_+13 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - CALL crtlc_ - POP D - POP D - LXI H,34 - PUSH H - LXI H,0 - PUSH H - LXI H,-30-.2 - DAD SP - PUSH H - CALL memset_ - POP D - POP D - POP D - LXI H,10 - SHLD dregbc_ - LXI H,-34-.2 - DAD SP - SHLD dregde_ - LXI H,31 - XCHG - LXI H,-34-.2 - DAD SP - MOV M,E - LXI H,0 - XCHG - LXI H,-33-.2 - DAD SP - MOV M,E - CALL bdoscall_ - LXI H,-33-.2 - DAD SP - MOV E,M - MVI D,0 - PUSH D - LXI H,0 - POP D - XCHG - CALL .lt - JZ .12 - LXI H,32 - PUSH H - LXI H,0 - PUSH H - LXI H,6-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - CALL .ml - LXI D,form_+17 - DAD D - PUSH H - CALL memset_ - POP D - POP D - POP D - LXI H,-32-.2 - DAD SP - MOV E,M - MVI D,0 - PUSH D - LXI H,4-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - CALL .ml - LXI D,form_+17 - DAD D - PUSH H - CALL strcpy_ - POP D - POP D -.12: - JMP .9 -.11: - LXI H,0 - XCHG - LXI H,2-.2 - DAD SP - MOV M,E - INX H - MOV M,D - JMP .14 -.13: - LXI H,2-.2 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D -.14: - LXI H,2-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,2 - CALL .lt - JZ .15 - LXI H,2-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - CALL .ml - LXI D,form_+2 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,4-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - CALL .ml - LXI D,form_ - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - CALL crtlc_ - POP D - POP D - LXI H,2-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - CALL .ml - LXI D,form_+6 - DAD D - PUSH H - LXI H,.1+13 - PUSH H - CALL printf_ - POP D - POP D - LXI H,2-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - CALL .ml - LXI D,form_+15 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,4-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - CALL .ml - LXI D,form_+13 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - CALL crtlc_ - POP D - POP D - LXI H,0 - XCHG - LXI H,0-.2 - DAD SP - MOV M,E - INX H - MOV M,D - JMP .17 -.16: - LXI H,0-.2 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D -.17: - LXI H,2-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - CALL .ml - LXI D,form_+17 - DAD D - PUSH H - CALL strlen_ - POP D - PUSH H - LXI H,2-.2 - DAD SP - MOV E,M - INX H - MOV D,M - POP H - CALL .lt - JZ .18 - LXI H,.1+16 - PUSH H - CALL printf_ - POP D - JMP .16 -.18: - LXI H,2-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - CALL .ml - LXI D,form_+15 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,4-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - CALL .ml - LXI D,form_+13 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - CALL crtlc_ - POP D - POP D - LXI H,2-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,50 - CALL .ml - LXI D,form_+17 - DAD D - PUSH H - LXI H,.1+18 - PUSH H - CALL printf_ - POP D - POP D - JMP .13 -.15: - RET -.2 EQU -38 -.1: - DB 70,79,82,77,0,37,115,0,95,0,37,115,0,37,115 - DB 0,32,0,37,115,0 - extrn strcpy_ - extrn memset_ - extrn strlen_ - extrn printf_ - extrn banner_ - extrn crtlc_ - extrn crtclr_ - extrn crtinit_ - extrn diagnose_ - extrn hregde_ - extrn hregbc_ - extrn bdoscall_ - extrn dregde_ - extrn dregbc_ - extrn .lt - extrn .ml - END - \ No newline at end of file diff --git a/branches/dwg/Apps/crossdev/MAP.ASM b/branches/dwg/Apps/crossdev/MAP.ASM deleted file mode 100644 index 35aa6305..00000000 --- a/branches/dwg/Apps/crossdev/MAP.ASM +++ /dev/null @@ -1,1649 +0,0 @@ - extrn .begin,.chl,.swt - extrn csave,cret,.move - global pINFOLIS_,2 - global pDPHMAP_,2 - global pDPHVEC_,24 - global metadata_,128 - global pBIOS_,2 - global pDPH_,2 - global pCNFGDAT_,2 - global pSYSCFG_,2 - global devunit_,2 - global dev_,2 - global unit_,2 - global currlu_,2 - global numlu_,2 - global drivenum_,2 - global drive_,2 - global deflu_,2 - global szTemp_,128 - PUBLIC readsec_ -readsec_: lxi d,.2 - call csave - LXI H,-6629 - SHLD ireghl_ - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - SHLD iregbc_ - LXI H,0 - SHLD iregde_ - CALL bioscall_ - LXI H,-6626 - SHLD ireghl_ - LXI H,10-.2 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - SHLD iregbc_ - CALL bioscall_ - LXI H,-6623 - SHLD ireghl_ - LXI H,12-.2 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - SHLD iregbc_ - CALL bioscall_ - LXI H,-6620 - SHLD ireghl_ - LXI H,14-.2 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - SHLD iregbc_ - CALL bioscall_ - LXI H,-6617 - SHLD ireghl_ - CALL bioscall_ - LDA irega_ - MOV L,A - MVI H,0 - RET -.2 EQU 0 - PUBLIC haslu_ -haslu_: lxi d,.3 - call csave - LXI H,8-.3 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - CALL lugnum_ - POP D - PUSH H - LXI H,0 - POP D - XCHG - CALL .lt - JZ .4 - LXI H,1 - RET -.4: - LXI H,0 - RET -.3 EQU 0 - PUBLIC dispdph_ -dispdph_: lxi d,.5 - call csave - LXI H,-6602 - SHLD ireghl_ - LXI H,12-.5 - DAD SP - MOV E,M - MVI D,0 - LXI H,-65 - DAD D - SHLD iregbc_ - CALL bioscall_ - LDA irega_ - MOV L,A - MVI H,0 - PUSH H - LXI H,1 - POP D - CALL .eq - JZ .6 - RET -.6: - LXI H,10-.5 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,10-.5 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - CALL crtlc_ - POP D - POP D - LXI H,12-.5 - DAD SP - MOV E,M - MVI D,0 - PUSH D - LXI H,.1+0 - PUSH H - CALL printf_ - POP D - POP D - LXI H,12-.5 - DAD SP - MOV E,M - MVI D,0 - LXI H,-65 - DAD D - PUSH H - CALL lugdu_ - POP D - SHLD devunit_ - LHLD devunit_ - LXI D,240 - CALL .an - SHLD dev_ - LHLD devunit_ - LXI D,15 - CALL .an - SHLD unit_ - LXI H,12-.5 - DAD SP - MOV E,M - MVI D,0 - LXI H,-65 - DAD D - PUSH H - CALL lugcur_ - POP D - SHLD currlu_ - LHLD dev_ - JMP .7 -.9: - LHLD unit_ - MOV A,H - ORA L - JNZ .10 - LXI H,.1+5 - PUSH H - CALL printf_ - POP D -.10: - LXI H,1 - XCHG - LHLD unit_ - CALL .eq - JZ .11 - LXI H,.1+9 - PUSH H - CALL printf_ - POP D -.11: - JMP .8 -.12: - LHLD unit_ - PUSH H - LXI H,.1+13 - PUSH H - CALL printf_ - POP D - POP D - JMP .8 -.13: - LHLD unit_ - PUSH H - LXI H,.1+18 - PUSH H - CALL printf_ - POP D - POP D - JMP .8 -.14: - LHLD unit_ - PUSH H - LXI H,.1+24 - PUSH H - CALL printf_ - POP D - POP D - JMP .8 -.15: - LHLD unit_ - PUSH H - LXI H,.1+32 - PUSH H - CALL printf_ - POP D - POP D - JMP .8 -.16: - LHLD unit_ - PUSH H - LXI H,.1+40 - PUSH H - CALL printf_ - POP D - POP D - JMP .8 -.17: - LHLD unit_ - PUSH H - LXI H,.1+45 - PUSH H - CALL printf_ - POP D - POP D - JMP .8 -.18: - LHLD unit_ - PUSH H - LXI H,.1+53 - PUSH H - CALL printf_ - POP D - POP D - JMP .8 -.19: - LHLD unit_ - PUSH H - LXI H,.1+61 - PUSH H - CALL printf_ - POP D - POP D - JMP .8 -.20: - LXI H,.1+68 - PUSH H - CALL printf_ - POP D - JMP .8 -.7: - CALL .swt - DW 9 - DW 0,.9 - DW 16,.12 - DW 32,.13 - DW 48,.14 - DW 64,.15 - DW 80,.16 - DW 96,.17 - DW 112,.18 - DW 128,.19 - DW .20 -.8: - LXI H,14-.5 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,16 - DAD D - MOV E,M - MVI D,0 - PUSH D - LXI H,76 - POP D - CALL .eq - JZ .21 - LXI H,14-.5 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,17 - DAD D - MOV E,M - MVI D,0 - PUSH D - LXI H,85 - POP D - CALL .eq - JZ .22 - LHLD currlu_ - PUSH H - LXI H,.1+72 - PUSH H - CALL printf_ - POP D - POP D -.22: -.21: - RET -.5 EQU 0 -.1: - DB 37,99,58,32,0,82,79,77,0,82,65,77,0,70,68 - DB 37,100,0,73,68,69,37,100,0,65,84,65,80,73,37 - DB 100,0,80,80,73,68,69,37,100,0,83,68,37,100,0 - DB 80,82,80,83,68,37,100,0,80,80,80,83,68,37,100 - DB 0,72,68,83,75,37,100,0,85,78,75,0,45,76,85 - DB 37,100,0 - PUBLIC main_ -main_: lxi d,.24 - call csave - LXI H,8-.24 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,3 - CALL .eq - JZ .25 - LXI H,10-.24 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - INX H - INX H - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,-43-.24 - DAD SP - PUSH H - CALL strcpy_ - POP D - POP D - LXI H,10-.24 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,4 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,-75-.24 - DAD SP - PUSH H - CALL strcpy_ - POP D - POP D - LXI H,-77-.24 - DAD SP - PUSH H - CALL atoi_ - POP D - XCHG - LXI H,0-.24 - DAD SP - MOV M,E - INX H - MOV M,D - LXI H,-45-.24 - DAD SP - PUSH H - CALL strlen_ - POP D - LXI D,2 - CALL .eq - JZ .26 - LXI H,-44-.24 - DAD SP - MOV E,M - MVI D,0 - PUSH D - LXI H,58 - POP D - CALL .eq - JZ .27 - LXI H,-45-.24 - DAD SP - MOV E,M - MVI D,0 - XCHG - JMP .28 -.30: -.31: - LXI H,0-.24 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,0 - PUSH H - CALL luscur_ - POP D - POP D - JMP .29 -.32: -.33: - LXI H,0-.24 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,1 - PUSH H - CALL luscur_ - POP D - POP D - JMP .29 -.34: -.35: - LXI H,0-.24 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,2 - PUSH H - CALL luscur_ - POP D - POP D - JMP .29 -.36: -.37: - LXI H,0-.24 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,3 - PUSH H - CALL luscur_ - POP D - POP D - JMP .29 -.38: -.39: - LXI H,0-.24 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,4 - PUSH H - CALL luscur_ - POP D - POP D - JMP .29 -.40: -.41: - LXI H,0-.24 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,5 - PUSH H - CALL luscur_ - POP D - POP D - JMP .29 -.42: -.43: - LXI H,0-.24 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,6 - PUSH H - CALL luscur_ - POP D - POP D - JMP .29 -.44: -.45: - LXI H,0-.24 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,7 - PUSH H - CALL luscur_ - POP D - POP D - JMP .29 -.46: -.47: - LXI H,0-.24 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,8 - PUSH H - CALL luscur_ - POP D - POP D - JMP .29 -.48: -.49: - LXI H,0-.24 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,9 - PUSH H - CALL luscur_ - POP D - POP D - JMP .29 -.50: -.51: - LXI H,0-.24 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,10 - PUSH H - CALL luscur_ - POP D - POP D - JMP .29 -.52: -.53: - LXI H,0-.24 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,11 - PUSH H - CALL luscur_ - POP D - POP D - JMP .29 -.54: - JMP .29 -.28: - LXI D,-65 - DAD D - XCHG - LXI H,-44 - DAD D - JC .54 - LXI H,.55 - DAD D - DAD D - MOV E,M - INX H - MOV D,M - XCHG - PCHL -.55: DW .31 - DW .33 - DW .35 - DW .37 - DW .39 - DW .41 - DW .43 - DW .45 - DW .47 - DW .49 - DW .51 - DW .53 - DW .54 - DW .54 - DW .54 - DW .54 - DW .54 - DW .54 - DW .54 - DW .54 - DW .54 - DW .54 - DW .54 - DW .54 - DW .54 - DW .54 - DW .54 - DW .54 - DW .54 - DW .54 - DW .54 - DW .54 - DW .30 - DW .32 - DW .34 - DW .36 - DW .38 - DW .40 - DW .42 - DW .44 - DW .46 - DW .48 - DW .50 - DW .52 -.29: -.27: -.26: - LXI H,1 - PUSH H - CALL exit_ - POP D -.25: - LXI H,-6656 - SHLD pBIOS_ - LXI H,-4096 - SHLD hregbc_ - LXI H,-16384 - SHLD hregde_ - CALL diagnose_ - LXI H,-16384 - SHLD pSYSCFG_ - LHLD pSYSCFG_ - LXI D,68 - DAD D - MOV E,M - MVI D,0 - PUSH D - CALL crtinit_ - POP D - CALL crtclr_ - LXI H,0 - PUSH H - LXI H,0 - PUSH H - CALL crtlc_ - POP D - POP D - LXI H,0 - PUSH H - LXI H,0 - PUSH H - LXI H,3 - PUSH H - LXI H,2 - PUSH H - LXI H,2013 - PUSH H - LXI H,16 - PUSH H - LXI H,1 - PUSH H - LXI H,.23+0 - PUSH H - CALL printf_ - XCHG - LXI H,16 - DAD SP - SPHL - LXI H,.23+32 - PUSH H - CALL printf_ - POP D - LXI H,-6596 - SHLD ireghl_ - CALL bioscall_ - LHLD ireghl_ - SHLD pINFOLIS_ - LXI H,57 - PUSH H - LXI H,7 - PUSH H - CALL crtlc_ - POP D - POP D - LHLD pINFOLIS_ - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,.23+79 - PUSH H - CALL printf_ - POP D - POP D - LHLD pINFOLIS_ - LXI D,10 - DAD D - MOV E,M - INX H - MOV D,M - XCHG - SHLD pDPHMAP_ - LHLD pDPHMAP_ - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,65 - PUSH H - LXI H,5 - PUSH H - LXI H,3 - PUSH H - CALL dispdph_ - XCHG - LXI H,8 - DAD SP - SPHL - LHLD pDPHMAP_ - INX H - INX H - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,66 - PUSH H - LXI H,5 - PUSH H - LXI H,4 - PUSH H - CALL dispdph_ - XCHG - LXI H,8 - DAD SP - SPHL - LHLD pDPHMAP_ - LXI D,4 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,67 - PUSH H - LXI H,5 - PUSH H - LXI H,5 - PUSH H - CALL dispdph_ - XCHG - LXI H,8 - DAD SP - SPHL - LHLD pDPHMAP_ - LXI D,6 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,68 - PUSH H - LXI H,25 - PUSH H - LXI H,3 - PUSH H - CALL dispdph_ - XCHG - LXI H,8 - DAD SP - SPHL - LHLD pDPHMAP_ - LXI D,8 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,69 - PUSH H - LXI H,25 - PUSH H - LXI H,4 - PUSH H - CALL dispdph_ - XCHG - LXI H,8 - DAD SP - SPHL - LHLD pDPHMAP_ - LXI D,10 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,70 - PUSH H - LXI H,25 - PUSH H - LXI H,5 - PUSH H - CALL dispdph_ - XCHG - LXI H,8 - DAD SP - SPHL - LHLD pDPHMAP_ - LXI D,12 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,71 - PUSH H - LXI H,45 - PUSH H - LXI H,3 - PUSH H - CALL dispdph_ - XCHG - LXI H,8 - DAD SP - SPHL - LHLD pDPHMAP_ - LXI D,14 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,72 - PUSH H - LXI H,45 - PUSH H - LXI H,4 - PUSH H - CALL dispdph_ - XCHG - LXI H,8 - DAD SP - SPHL - LHLD pDPHMAP_ - LXI D,16 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,73 - PUSH H - LXI H,45 - PUSH H - LXI H,5 - PUSH H - CALL dispdph_ - XCHG - LXI H,8 - DAD SP - SPHL - LHLD pDPHMAP_ - LXI D,18 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,74 - PUSH H - LXI H,65 - PUSH H - LXI H,3 - PUSH H - CALL dispdph_ - XCHG - LXI H,8 - DAD SP - SPHL - LHLD pDPHMAP_ - LXI D,20 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,75 - PUSH H - LXI H,65 - PUSH H - LXI H,4 - PUSH H - CALL dispdph_ - XCHG - LXI H,8 - DAD SP - SPHL - LHLD pDPHMAP_ - LXI D,22 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,76 - PUSH H - LXI H,65 - PUSH H - LXI H,5 - PUSH H - CALL dispdph_ - XCHG - LXI H,8 - DAD SP - SPHL - LXI H,25 - SHLD dregbc_ - CALL bdoscall_ - LDA drega_ - MOV L,A - MVI H,0 - SHLD drive_ - LXI H,5 - PUSH H - LXI H,7 - PUSH H - CALL crtlc_ - POP D - POP D - LHLD drive_ - LXI D,65 - DAD D - PUSH H - LXI H,.23+100 - PUSH H - CALL printf_ - POP D - POP D - LHLD drive_ - PUSH H - CALL lugdu_ - POP D - SHLD devunit_ - LHLD devunit_ - LXI D,240 - CALL .an - SHLD dev_ - LHLD devunit_ - LXI D,15 - CALL .an - SHLD unit_ - LHLD drive_ - PUSH H - CALL lugcur_ - POP D - SHLD currlu_ - LHLD currlu_ - SHLD deflu_ - LHLD drive_ - PUSH H - CALL lugnum_ - POP D - SHLD numlu_ - LXI H,31 - PUSH H - LXI H,7 - PUSH H - CALL crtlc_ - POP D - POP D - LHLD drive_ - PUSH H - CALL lugnum_ - POP D - PUSH H - LXI H,.23+121 - PUSH H - CALL printf_ - POP D - POP D - LXI H,0 - XCHG - LHLD numlu_ - CALL .lt - JZ .56 - LXI H,4 - PUSH H - LXI H,9 - PUSH H - CALL crtlc_ - POP D - POP D - LXI H,.23+142 - PUSH H - CALL printf_ - POP D - LXI H,30 - PUSH H - LXI H,9 - PUSH H - CALL crtlc_ - POP D - POP D - LXI H,.23+164 - PUSH H - CALL printf_ - POP D - LXI H,56 - PUSH H - LXI H,9 - PUSH H - CALL crtlc_ - POP D - POP D - LXI H,.23+186 - PUSH H - CALL printf_ - POP D - LXI H,0 - XCHG - LXI H,-10-.24 - DAD SP - MOV M,E - INX H - MOV M,D - LXI H,-10-.24 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,39 - DAD D - XCHG - LXI H,-12-.24 - DAD SP - MOV M,E - INX H - MOV M,D - LXI H,-12-.24 - DAD SP - MOV E,M - INX H - MOV D,M - LHLD numlu_ - CALL .gt - JZ .57 - LHLD numlu_ - XCHG - LXI H,-12-.24 - DAD SP - MOV M,E - INX H - MOV M,D -.57: - LXI H,1 - XCHG - LXI H,-13-.24 - DAD SP - MOV M,E -.58: - LXI H,-13-.24 - DAD SP - MOV E,M - MVI D,0 - PUSH D - LXI H,1 - POP D - CALL .eq - JZ .59 - LXI H,10 - XCHG - LXI H,-8-.24 - DAD SP - MOV M,E - INX H - MOV M,D - LXI H,0 - XCHG - LXI H,-4-.24 - DAD SP - MOV M,E - INX H - MOV M,D - LXI H,0 - XCHG - LXI H,-6-.24 - DAD SP - MOV M,E - INX H - MOV M,D - JMP .61 -.60: - LXI H,-6-.24 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D -.61: - LXI H,-6-.24 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,13 - CALL .lt - JZ .62 - LXI H,0 - PUSH H - LXI H,-6-.24 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,-4-.24 - DAD SP - MOV A,M - INX H - MOV H,M - MOV L,A - DAD D - PUSH H - CALL crtlc_ - POP D - POP D - LXI H,.23+208 - PUSH H - CALL printf_ - POP D - LXI H,.23+237 - PUSH H - CALL printf_ - POP D - JMP .60 -.62: - LXI H,-10-.24 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,2-.24 - DAD SP - MOV M,E - INX H - MOV M,D - JMP .64 -.63: - LXI H,2-.24 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D -.64: - LXI H,2-.24 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,-12-.24 - DAD SP - MOV A,M - INX H - MOV H,M - MOV L,A - CALL .lt - JZ .65 - LXI H,2-.24 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LHLD drive_ - PUSH H - CALL luscur_ - POP D - POP D - LXI H,metadata_ - PUSH H - LXI H,11 - PUSH H - LXI H,0 - PUSH H - LHLD drive_ - PUSH H - CALL readsec_ - XCHG - LXI H,8 - DAD SP - SPHL - LXI H,0 - MOV A,L - STA metadata_+119 - LDA metadata_+96 - MOV L,A - MVI H,0 - PUSH H - LXI H,1 - POP D - CALL .eq - JZ .66 - LXI H,.23+266 - PUSH H - LXI H,-77-.24 - DAD SP - PUSH H - CALL strcpy_ - POP D - POP D - JMP .67 -.66: - LXI H,.23+268 - PUSH H - LXI H,-77-.24 - DAD SP - PUSH H - CALL strcpy_ - POP D - POP D -.67: - LXI H,-4-.24 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D - XCHG - DCX H - JMP .68 -.70: - LXI H,3 - PUSH H - LXI H,-6-.24 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - CALL crtlc_ - POP D - POP D - LXI H,metadata_+103 - PUSH H - LXI H,-77-.24 - DAD SP - PUSH H - LXI H,6-.24 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,.23+270 - PUSH H - CALL printf_ - XCHG - LXI H,8 - DAD SP - SPHL - JMP .69 -.71: - LXI H,29 - PUSH H - LXI H,-6-.24 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - CALL crtlc_ - POP D - POP D - LXI H,metadata_+103 - PUSH H - LXI H,-77-.24 - DAD SP - PUSH H - LXI H,6-.24 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,.23+280 - PUSH H - CALL printf_ - XCHG - LXI H,8 - DAD SP - SPHL - JMP .69 -.72: - LXI H,55 - PUSH H - LXI H,-6-.24 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - CALL crtlc_ - POP D - POP D - LXI H,metadata_+103 - PUSH H - LXI H,-77-.24 - DAD SP - PUSH H - LXI H,6-.24 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,.23+290 - PUSH H - CALL printf_ - XCHG - LXI H,8 - DAD SP - SPHL - LXI H,0 - XCHG - LXI H,-4-.24 - DAD SP - MOV M,E - INX H - MOV M,D - LXI H,-8-.24 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D - JMP .69 -.68: - CALL .swt - DW 3 - DW 0,.70 - DW 1,.71 - DW 2,.72 - DW .69 -.69: - JMP .63 -.65: - LXI H,0 - PUSH H - LXI H,23 - PUSH H - CALL crtlc_ - POP D - POP D - LXI H,.23+300 - PUSH H - CALL printf_ - POP D - LXI H,1 - SHLD dregbc_ - CALL bdoscall_ - LDA drega_ - MOV L,A - MVI H,0 - JMP .73 -.75: -.76: -.77: -.78: -.79: - LXI H,0 - XCHG - LXI H,-13-.24 - DAD SP - MOV M,E - JMP .74 -.80: -.81: -.82: - LXI H,39 - XCHG - LXI H,-10-.24 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - DAD D - XCHG - POP H - MOV M,E - INX H - MOV M,D - LXI H,-10-.24 - DAD SP - MOV E,M - INX H - MOV D,M - LHLD numlu_ - CALL .gt - JZ .83 - LXI H,0 - XCHG - LXI H,-10-.24 - DAD SP - MOV M,E - INX H - MOV M,D -.83: - LXI H,-10-.24 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,39 - DAD D - XCHG - LXI H,-12-.24 - DAD SP - MOV M,E - INX H - MOV M,D - LXI H,-12-.24 - DAD SP - MOV E,M - INX H - MOV D,M - LHLD numlu_ - CALL .gt - JZ .84 - LHLD numlu_ - XCHG - LXI H,-12-.24 - DAD SP - MOV M,E - INX H - MOV M,D -.84: - JMP .74 -.85: -.86: - LXI H,39 - XCHG - LXI H,-10-.24 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - XCHG - CALL .sb - XCHG - POP H - MOV M,E - INX H - MOV M,D - LXI H,-10-.24 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,0 - CALL .lt - JZ .87 - LXI H,0 - XCHG - LXI H,-10-.24 - DAD SP - MOV M,E - INX H - MOV M,D -.87: - LXI H,-10-.24 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,39 - DAD D - XCHG - LXI H,-12-.24 - DAD SP - MOV M,E - INX H - MOV M,D - LXI H,-12-.24 - DAD SP - MOV E,M - INX H - MOV D,M - LHLD numlu_ - CALL .gt - JZ .88 - LHLD numlu_ - XCHG - LXI H,-12-.24 - DAD SP - MOV M,E - INX H - MOV M,D -.88: - JMP .74 -.89: - LXI H,7 - PUSH H - LXI H,.23+340 - PUSH H - CALL printf_ - POP D - POP D - JMP .74 -.73: - CALL .swt - DW 10 - DW 3,.79 - DW 32,.82 - DW 78,.80 - DW 80,.85 - DW 81,.75 - DW 88,.77 - DW 110,.81 - DW 112,.86 - DW 113,.76 - DW 120,.78 - DW .89 -.74: - JMP .58 -.59: - LHLD deflu_ - PUSH H - LHLD drive_ - PUSH H - CALL luscur_ - POP D - POP D -.56: - RET -.24 EQU -83 -.23: - DB 77,65,80,46,67,79,77,32,37,100,47,37,100,47,37 - DB 100,32,118,37,100,46,37,100,46,37,100,32,40,37,100 - DB 41,0,32,100,119,103,32,45,32,83,121,115,116,101,109 - DB 32,83,116,111,114,97,103,101,32,68,114,105,118,101,115 - DB 32,97,110,100,32,76,111,103,105,99,97,108,32,85,110 - DB 105,116,115,0,105,110,102,111,108,105,115,116,46,118,101 - DB 114,115,105,111,110,32,37,100,10,0,67,117,114,114,101 - DB 110,116,32,100,114,105,118,101,32,105,115,32,37,99,58 - DB 0,78,117,109,98,101,114,32,111,102,32,76,85,115,32 - DB 105,115,32,37,100,10,0,76,85,32,80,32,45,45,45 - DB 45,45,76,97,98,101,108,45,45,45,45,45,45,0,76 - DB 85,32,80,32,45,45,45,45,45,76,97,98,101,108,45 - DB 45,45,45,45,45,0,76,85,32,80,32,45,45,45,45 - DB 45,76,97,98,101,108,45,45,45,45,45,45,0,9,9 - DB 9,9,32,32,32,32,32,32,32,32,32,32,32,32,32 - DB 32,32,32,32,32,32,32,32,32,32,32,0,32,32,32 - DB 32,32,32,32,32,32,32,32,32,32,32,32,32,32,32 - DB 32,32,32,32,32,32,32,32,32,32,0,42,0,32,0 - DB 37,51,100,32,37,115,32,37,115,0,37,51,100,32,37 - DB 115,32,37,115,0,37,51,100,32,37,115,32,37,115,0 - DB 79,112,116,105,111,110,115,40,32,78,40,101,120,116,41 - DB 44,32,80,40,114,101,118,105,111,117,115,41,44,32,81 - DB 40,117,105,116,41,32,41,63,32,0,37,99,0 - extrn crtclr_ - extrn crtinit_ - extrn exit_ - extrn strlen_ - extrn atoi_ - extrn strcpy_ - extrn printf_ - extrn crtlc_ - extrn diagnose_ - extrn hregde_ - extrn hregbc_ - extrn lugnum_ - extrn luscur_ - extrn lugcur_ - extrn lugdu_ - extrn bdoscall_ - extrn dregbc_ - extrn drega_ - extrn bioscall_ - extrn ireghl_ - extrn iregde_ - extrn iregbc_ - extrn irega_ - extrn .an - extrn .eq - extrn .lt - extrn .gt - extrn .sb - END - \ No newline at end of file diff --git a/branches/dwg/Apps/crossdev/MAP.O b/branches/dwg/Apps/crossdev/MAP.O deleted file mode 100644 index e74abee3eaa7a0a639183d2bad9615c9f8c38163..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 5376 zcmd5ATWlOx^~~(LPE2WM9NY1>CG#*QiAzirM2Sr(aqT!UaqO+vE@{-no}HQ9on&9x z*|qa@LR&Q!h>ErX{`f&i2#F5_Nbm!u`<00OSinC;An~!OU?tQ)3P0i8bMNfK_DZGv zuyM|w*FERlbIv{Y+To`_eC8i#$hqFLPuhLZuc#}aRD9THJpItTCMkw_dV3l;w}t%{v{I0Jt5w51L9zkZG7J}vsZ+uSplUgR>UpX6)-T>ofx?`9ft>YMG1xjv6bjhmvN4jW z)$(OprPkPjF9*@JaTmV6EBpNJ?C7hzYwym!xI264wOx%|Y-6*C7hfkuzK==)_U*-1 zOoFPw6;O3ZgL)J)pq_**s8PrPHs^|@=E0KGyAYRbmeS{K&{%&O3PiBnTgEI@d9Iu` zu`0w%f!M{wUzK?3&htRDYW4oGJ+8yT{5e>dI0xGF)UX3HQ>PG4EKWpcG(@6N&WJIY z7F~!E5{>e2?aWl{EDDz9&ccz|rC~<}HG$Rhv2y0|gtVW64FQ!i$wC}YNKexV8ydoW zY#HX#?S#}jR;yg&t%mYvXi*rqz!h$`DZ~VM9rf#mc{CyQjrl_b!;A?-H{`ymDsz`9 z=5i4Q)QDTgxHt+PKvZmFB09aMX$r|ae# z2Dt_rX-(i-EIErrspMsJxd&Y`u{a?w2!(JjdT3KngEKP8Rr;8rZ7Pq6V>E>-5vcVs zKigFH2$fTT3Tw@FM?CN?V>(dT>F9A`L9s`|uhyi_##~safZu)UQrJ zg!*Oijo=m-DdL#@h<7B{ZQP7_JDMdN)MQ~@!uzs-PBo0M)hSwEmwNGKfc^FIJ#srh z9bF$O;OJ#fg(UVnZrNbRoL}vzdufAoBUOX-dz)zS8-eKfcF~1zk_c~R035e7jd6<@ zO-th-VA9O94FO?TM2e;qQXZs23gRkP8l+*3x4dD_vbpZlw;0dCOXV`2_8z8kIwA1| zo(DtN1|uWMG;(Pwi>&$iO~Qr0VKK6u$gF75fn z(N(wLds;4w)_Y*GR4BOFqV8yHrSADUzMo;Pl!sfk4)i@hA1oIZ_Km_Nr|En%^n6k8_Nk)T1@ zSoU;jS;(@b3?l^Puuedhu*s;V%uNW*yJ*Y5vFK*<%OGzc0R`7`eAiy)Ir9o`GL=RT zlwC%}?N-V`qg)pEaz6HHx~XZQKY4={AZ7X7A6ZG4k{DO8ZZu7aN6oiU)A9VglTQin zqwZA}lJH;`ifME%sC>c8788LLwCT{^c^6pN0*!Sj!$h(DeGk){vAirA5mx+S!OmX~ ztXRdI*CtE5sLOYhF8O4IQ|>h^P{T^9Eia5}=Ed=>WH#r!d>!t=quNrONZDzOjLV!h zD{-eapG?N`$u&olJZFOP<7~4aooqsR^UVfF-ux}%^5zWgUf%qR#Ne|8zeF%fa4$(? zgxdstg0B&Lhu{wg{)}Lm;2#K{p|uQ3Cx7yY*}oTN@JeWaB%H&46VBli6x%_9ANH^a|4Hyy-3))1 z;NOYEGA?g^NSrCc9fC^)e~y1RkvD%w_@c{!_wrf(rzHNjCpPcqjNi>AX)m Yt+1c?lLV(*;2PmSB={qQ|JR@Y0A++^Hvj+t diff --git a/branches/dwg/Apps/crossdev/META.ASM b/branches/dwg/Apps/crossdev/META.ASM deleted file mode 100644 index 02d485b5..00000000 --- a/branches/dwg/Apps/crossdev/META.ASM +++ /dev/null @@ -1,750 +0,0 @@ - extrn .begin,.chl,.swt - extrn csave,cret,.move - global metadata_,128 - global bRunning_,2 - global deflu_,2 - global drive_,2 - global logunit_,2 - global numlu_,2 - DSEG - public pSYSCFG_ -pSYSCFG_: - DW -16384 - CSEG - PUBLIC display_ -display_: lxi d,.2 - call csave - LHLD logunit_ - PUSH H - LHLD drive_ - PUSH H - CALL luscur_ - POP D - POP D - LXI H,metadata_ - PUSH H - LXI H,11 - PUSH H - LXI H,0 - PUSH H - LHLD drive_ - PUSH H - CALL rdsector_ - XCHG - LXI H,8 - DAD SP - SPHL - LXI H,0 - PUSH H - LXI H,7 - PUSH H - CALL crtlc_ - POP D - POP D - LHLD metadata_ - PUSH H - LXI H,.1+0 - PUSH H - CALL printf_ - POP D - POP D - LXI H,0 - PUSH H - LXI H,8 - PUSH H - CALL crtlc_ - POP D - POP D - LDA metadata_+2 - MOV L,A - MVI H,0 - PUSH H - LXI H,.1+28 - PUSH H - CALL printf_ - POP D - POP D - LXI H,0 - PUSH H - LXI H,9 - PUSH H - CALL crtlc_ - POP D - POP D - LXI H,.1+56 - PUSH H - CALL printf_ - POP D - LXI H,0 - XCHG - LXI H,2-.2 - DAD SP - MOV M,E - INX H - MOV M,D - JMP .4 -.3: - LXI H,2-.2 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D -.4: - LXI H,2-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,8 - CALL .lt - JZ .5 - LXI H,2-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,metadata_+4 - DAD D - MOV E,M - MVI D,0 - PUSH D - LXI H,.1+79 - PUSH H - CALL printf_ - POP D - POP D - JMP .3 -.5: - LXI H,.1+82 - PUSH H - CALL printf_ - POP D - LXI H,0 - PUSH H - LXI H,10 - PUSH H - CALL crtlc_ - POP D - POP D - LDA metadata_+12 - MOV L,A - MVI H,0 - LXI D,65 - DAD D - PUSH H - LXI H,.1+84 - PUSH H - CALL printf_ - POP D - POP D - LHLD metadata_+13 - XCHG - LHLD logunit_ - CALL .ne - JZ .6 - LHLD logunit_ - SHLD metadata_+13 - LHLD metadata_+97 - INX H - SHLD metadata_+97 - LXI H,metadata_ - PUSH H - LXI H,11 - PUSH H - LXI H,0 - PUSH H - LHLD drive_ - PUSH H - CALL wrsector_ - XCHG - LXI H,8 - DAD SP - SPHL -.6: - LXI H,0 - PUSH H - LXI H,11 - PUSH H - CALL crtlc_ - POP D - POP D - LHLD numlu_ - PUSH H - LHLD metadata_+13 - PUSH H - LXI H,.1+109 - PUSH H - CALL printf_ - POP D - POP D - POP D - LXI H,0 - PUSH H - LXI H,12 - PUSH H - CALL crtlc_ - POP D - POP D - LXI H,.1+150 - PUSH H - CALL printf_ - POP D - LDA metadata_+96 - MOV L,A - MVI H,0 - JMP .7 -.9: - LXI H,.1+172 - PUSH H - CALL printf_ - POP D - JMP .8 -.10: - LXI H,.1+178 - PUSH H - CALL printf_ - POP D - JMP .8 -.11: - LXI H,.1+184 - PUSH H - CALL printf_ - POP D - JMP .8 -.7: - CALL .swt - DW 2 - DW 0,.10 - DW 1,.9 - DW .11 -.8: - LXI H,0 - PUSH H - LXI H,13 - PUSH H - CALL crtlc_ - POP D - POP D - LHLD metadata_+97 - PUSH H - LXI H,.1+190 - PUSH H - CALL printf_ - POP D - POP D - LXI H,0 - PUSH H - LXI H,14 - PUSH H - CALL crtlc_ - POP D - POP D - LDA metadata_+101 - MOV L,A - MVI H,0 - PUSH H - LDA metadata_+101 - MOV L,A - MVI H,0 - PUSH H - LDA metadata_+100 - MOV L,A - MVI H,0 - PUSH H - LDA metadata_+99 - MOV L,A - MVI H,0 - PUSH H - LXI H,.1+214 - PUSH H - CALL printf_ - XCHG - LXI H,10 - DAD SP - SPHL - LXI H,0 - PUSH H - LXI H,15 - PUSH H - CALL crtlc_ - POP D - POP D - LXI H,.1+247 - PUSH H - CALL printf_ - POP D - LXI H,0 - XCHG - LXI H,2-.2 - DAD SP - MOV M,E - INX H - MOV M,D - JMP .13 -.12: - LXI H,2-.2 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D -.13: - LXI H,2-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,16 - CALL .lt - JZ .14 - LXI H,2-.2 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,metadata_+103 - DAD D - MOV E,M - MVI D,0 - PUSH D - LXI H,.1+270 - PUSH H - CALL printf_ - POP D - POP D - JMP .12 -.14: - LXI H,.1+273 - PUSH H - CALL printf_ - POP D - LXI H,0 - PUSH H - LXI H,16 - PUSH H - CALL crtlc_ - POP D - POP D - LHLD metadata_+120 - PUSH H - LXI H,.1+275 - PUSH H - CALL printf_ - POP D - POP D - LXI H,0 - PUSH H - LXI H,17 - PUSH H - CALL crtlc_ - POP D - POP D - LHLD metadata_+122 - PUSH H - LXI H,.1+303 - PUSH H - CALL printf_ - POP D - POP D - LXI H,0 - PUSH H - LXI H,18 - PUSH H - CALL crtlc_ - POP D - POP D - LHLD metadata_+124 - PUSH H - LXI H,.1+331 - PUSH H - CALL printf_ - POP D - POP D - LXI H,0 - PUSH H - LXI H,19 - PUSH H - CALL crtlc_ - POP D - POP D - LHLD metadata_+126 - PUSH H - LXI H,.1+359 - PUSH H - CALL printf_ - POP D - POP D - RET -.2 EQU -2 -.1: - DB 109,101,116,97,100,97,116,97,46,115,105,103,110,97,116 - DB 117,114,101,32,61,32,48,120,37,48,52,120,0,109,101 - DB 116,97,100,97,116,97,46,112,108,97,116,102,111,114,109 - DB 32,32,61,32,48,120,37,48,50,120,0,109,101,116,97 - DB 100,97,116,97,46,102,111,114,109,97,116,116,101,114,32 - DB 61,32,34,0,37,99,0,34,0,109,101,116,97,100,97 - DB 116,97,46,100,114,105,118,101,32,32,32,32,32,61,32 - DB 37,99,58,0,109,101,116,97,100,97,116,97,46,108,111 - DB 103,117,110,105,116,32,32,32,61,32,37,100,40,114,101 - DB 108,48,41,32,111,102,32,37,100,32,32,32,32,32,0 - DB 109,101,116,97,100,97,116,97,46,119,114,105,116,101,112 - DB 114,111,116,32,61,32,0,84,82,85,69,32,0,70,65 - DB 76,83,69,0,85,110,107,33,33,0,109,101,116,97,100 - DB 97,116,97,46,117,112,100,97,116,101,32,32,32,32,61 - DB 32,37,100,0,109,101,116,97,100,97,116,97,46,123,118 - DB 101,114,125,32,32,32,32,32,61,32,37,100,46,37,100 - DB 46,37,100,46,37,100,0,109,101,116,97,100,97,116,97 - DB 46,108,97,98,101,108,32,32,32,32,32,61,32,34,0 - DB 37,99,0,34,0,109,101,116,97,100,97,116,97,46,105 - DB 110,102,108,111,99,32,32,32,32,61,32,48,120,37,48 - DB 52,120,0,109,101,116,97,100,97,116,97,46,99,112,109 - DB 108,111,99,32,32,32,32,61,32,48,120,37,48,52,120 - DB 0,109,101,116,97,100,97,116,97,46,99,112,109,101,110 - DB 100,32,32,32,32,61,32,48,120,37,48,52,120,0,109 - DB 101,116,97,100,97,116,97,46,99,112,109,101,110,116,32 - DB 32,32,32,61,32,48,120,37,48,52,120,0 - PUBLIC menu_ -menu_: lxi d,.16 - call csave - LXI H,0 - PUSH H - LXI H,21 - PUSH H - CALL crtlc_ - POP D - POP D - LXI H,.15+0 - PUSH H - CALL printf_ - POP D - LXI H,.15+40 - PUSH H - CALL printf_ - POP D - LXI H,0 - PUSH H - LXI H,21 - PUSH H - CALL crtlc_ - POP D - POP D - LXI H,.15+80 - PUSH H - CALL printf_ - POP D - LXI H,0 - XCHG - LHLD logunit_ - CALL .lt - JZ .17 - LXI H,.15+90 - PUSH H - CALL printf_ - POP D -.17: - LHLD numlu_ - DCX H - PUSH H - LHLD logunit_ - POP D - XCHG - CALL .lt - JZ .18 - LXI H,.15+102 - PUSH H - CALL printf_ - POP D -.18: - LDA metadata_+96 - MOV L,A - MVI H,0 - PUSH H - LXI H,1 - POP D - CALL .eq - JZ .19 - LXI H,.15+114 - PUSH H - CALL printf_ - POP D -.19: - lda metadata_+96 - ora a - JNZ .20 - LXI H,.15+127 - PUSH H - CALL printf_ - POP D -.20: - LXI H,.15+138 - PUSH H - CALL printf_ - POP D - LXI H,1 - SHLD dregbc_ - CALL bdoscall_ - LXI H,1 - XCHG - LXI H,2-.16 - DAD SP - MOV M,E - INX H - MOV M,D - LDA drega_ - MOV L,A - MVI H,0 - JMP .21 -.23: -.24: - LXI H,0 - XCHG - LXI H,2-.16 - DAD SP - MOV M,E - INX H - MOV M,D - JMP .22 -.25: - LHLD numlu_ - DCX H - PUSH H - LHLD logunit_ - POP D - XCHG - CALL .lt - JZ .26 - LHLD logunit_ - INX H - SHLD logunit_ - JMP .27 -.26: - LXI H,7 - PUSH H - LXI H,.15+151 - PUSH H - CALL printf_ - POP D - POP D -.27: - JMP .22 -.28: - LXI H,0 - XCHG - LHLD logunit_ - CALL .lt - JZ .29 - LHLD logunit_ - DCX H - SHLD logunit_ - JMP .30 -.29: - LXI H,7 - PUSH H - LXI H,.15+154 - PUSH H - CALL printf_ - POP D - POP D -.30: - JMP .22 -.31: - LXI H,1 - MOV A,L - STA metadata_+96 - LHLD metadata_+97 - INX H - SHLD metadata_+97 - LXI H,metadata_ - PUSH H - LXI H,11 - PUSH H - LXI H,0 - PUSH H - LHLD drive_ - PUSH H - CALL wrsector_ - XCHG - LXI H,8 - DAD SP - SPHL - JMP .22 -.32: - LXI H,0 - MOV A,L - STA metadata_+96 - LHLD metadata_+97 - INX H - SHLD metadata_+97 - LXI H,metadata_ - PUSH H - LXI H,11 - PUSH H - LXI H,0 - PUSH H - LHLD drive_ - PUSH H - CALL wrsector_ - XCHG - LXI H,8 - DAD SP - SPHL - JMP .22 -.33: - LXI H,7 - PUSH H - LXI H,.15+157 - PUSH H - CALL printf_ - POP D - POP D - JMP .22 -.21: - CALL .swt - DW 6 - DW 43,.25 - DW 45,.28 - DW 88,.23 - DW 112,.31 - DW 117,.32 - DW 120,.24 - DW .33 -.22: - LXI H,2-.16 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - RET -.16 EQU -2 -.15: - DB 32,32,32,32,32,32,32,32,32,32,32,32,32,32,32 - DB 32,32,32,32,32,32,32,32,32,32,32,32,32,32,32 - DB 32,32,32,32,32,32,32,32,32,0,32,32,32,32,32 - DB 32,32,32,32,32,32,32,32,32,32,32,32,32,32,32 - DB 32,32,32,32,32,32,32,32,32,32,32,32,32,32,32 - DB 32,32,32,32,0,79,112,116,105,111,110,115,40,32,0 - DB 32,45,123,112,114,101,118,32,108,117,125,0,32,43,123 - DB 110,101,120,116,32,108,117,125,0,32,117,123,110,112,114 - DB 111,116,101,99,116,125,0,32,112,123,114,111,116,101,99 - DB 116,125,0,32,120,123,113,117,105,116,125,32,41,58,32 - DB 0,37,99,0,37,99,0,37,99,0 - PUBLIC main_ -main_: lxi d,.35 - call csave - LXI H,-4096 - SHLD hregbc_ - LXI H,-16384 - SHLD hregde_ - CALL diagnose_ - LXI H,-16384 - SHLD pSYSCFG_ - LHLD pSYSCFG_ - LXI D,68 - DAD D - MOV E,M - MVI D,0 - PUSH D - CALL crtinit_ - POP D - CALL crtclr_ - LXI H,0 - PUSH H - LXI H,0 - PUSH H - CALL crtlc_ - POP D - POP D - LXI H,.34+0 - PUSH H - CALL banner_ - POP D - LXI H,25 - SHLD dregbc_ - CALL bdoscall_ - LDA drega_ - MOV L,A - MVI H,0 - SHLD drive_ - LHLD drive_ - PUSH H - CALL lugnum_ - POP D - SHLD numlu_ - LHLD drive_ - PUSH H - CALL lugcur_ - POP D - SHLD deflu_ - LHLD deflu_ - SHLD logunit_ - LXI H,1 - SHLD bRunning_ -.36: - LXI H,1 - XCHG - LHLD bRunning_ - CALL .eq - JZ .37 - CALL display_ - LXI H,1 - PUSH H - CALL menu_ - POP D - SHLD bRunning_ - JMP .36 -.37: - LHLD deflu_ - PUSH H - LHLD drive_ - PUSH H - CALL luscur_ - POP D - POP D - LXI H,0 - PUSH H - LXI H,23 - PUSH H - CALL crtlc_ - POP D - POP D - RET -.35 EQU 0 -.34: - DB 77,69,84,65,0 - extrn banner_ - extrn printf_ - extrn lugnum_ - extrn luscur_ - extrn lugcur_ - extrn crtlc_ - extrn crtclr_ - extrn crtinit_ - extrn diagnose_ - extrn hregde_ - extrn hregbc_ - extrn wrsector_ - extrn rdsector_ - extrn bdoscall_ - extrn dregbc_ - extrn drega_ - extrn .eq - extrn .ne - extrn .lt - END - \ No newline at end of file diff --git a/branches/dwg/Apps/crossdev/META.O b/branches/dwg/Apps/crossdev/META.O deleted file mode 100644 index a68bf7c187647030e692d8e3f17088aeb026312d..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3072 zcmbVO&2Jl35Pxe5=@+n@q-oPu?5?ArHc_o8st^fOY6UG95N(n+X=&rEch}Cg>s@EP z>m+s4@@Y~KDj?v>5&nbTkcAJZNIv+$4GtW9!50p2KpVJ1FD`ckm!>{a$W*vIz&uCe-Ws@<`OkF_m^lr`oqi^5ID5XV8-7;MC&CB{-@XDeCu*pbe4| zPCa>GcyWmRfUdLel4}UJVFL{`Gw+dRm`A%;#(~kkcnG4^&R_w6ILC>YDPX6x4wMQ? z1_!!SHZ_fE6~PNNZ3K50YAVQ`^^29>`ax+${i;}b^ufz`tww_z z7RGtLHUNP(@;srd9|)+iEHeCXhhm{u(Tvytwu8qsg%#L!c8DI^lkzl?50zk%8_Gxf zl;mI#7i;uvcP!_&w6lCk(SJk{K^gYSHhNn6LVW%n;SV*y4M+&v;lCO{C2tLe8m069v*eyk23{*C!&s;ofuybc#ojuDg1~*JomsBg0lprA&osw4xfRAd$jW)lQ7f?6AtaOM< z)|bkQ#}XO~$3wjOT0rxXzbpsjb2QCRj6bb~>xH*_TWcHbJRc{#$7z({>{?P_D240_ z2esB%mGzIe0q$>gXt-INaET8G`TpaeYMTmcH7npG$2l|5P%wxkN4x*6&4H{0=%`I% z4Yt5My{f3qHDwT%ICld+cc<4CnlBCjd>{*;QBc%}0`x!!cgRQ@reoten7{>r=gjko zh3{Q~JL)FwbCYp0DQ=lu*>0k+jY*nz|7*q$@jFT!_NbO3_-nn9s5mm8VB>6A(N3@% zinhR9MJusD(GnIa+8WC%ODUXG0n_mg>O8>S;UDUJxxw%43bs@65TmPLua{yk49dq0 zrW+@!rO2%qezL)g@oJ#EYcby>)d1g1-L+$YN>y0XQa9GBD~T6x7{{j#e3ORYAO18e zg}(y^O!jNKs=!x0eG8gmLoDH@yTuM^FEhGPo4296ns*fb7Qk)KZ!*)&rSL~UDFt0M zEW1h-eUx4YC-ehjC8f2}Rk@3Bw+1`-hfWwUu^$=r;@B#@Y}nZj1h+xDb~AyqfuJ_* z6xwY4YLOH8AjNYK=ICo@=gu(Jw;O-|WO8o73%Wad*+;Fw%B%6#&MsROw~N`4+k<6_ zA;&h~1cscMeVcfb=4O&0@PY#0Id0xhvTy=nG;X^)F=DeE3z8x+AKL^ctTcOh_N8;L zWK*FmPs(-@WkuAHQ-((xMjW%F*thWn%C;1FL7bP&j87@ZYy-?rGFKz+ zCAB%W3o{BZXvuU}dYDe+7IJU|KOyIYW!v(7zC+9c!_;Qs3GiZh!IqchZFabGTNS#e zl1CNP+$4FKi0-~P4Yg;FA4pT)?9u=nqNq> oi`E*+L6YMnpC|bONtfh3kjiNY7ET%JL-`ZbGgbc+. - - - maclib portab - maclib globals - maclib cpmbios - maclib cpmbdos - maclib memory ; has x$memset - maclib applvers ; has A$RMJ, A$RMN, A$RUP, A$RTP - maclib printers - maclib stdlib ; SUCCESS and FAILURE - -; metadata.lib 1/31/2012 dwg - macros to manipulate drive metadata -; -; update$meta buffer | x$u$meta hl -> buffer -; init$meta buffer | x$i$meta hl -> buffer -; get$meta drive,buffer | x$g$meta hl -> buffer, c = drivenum -; put$meta drive,buffer | x$p$meta hl -> buffer, c = drivenum -; prot$meta drive | x$pr$meta c = drivenum -; unprot$meta drive | x$un$meta c = drivenum -; -;------------------------------------------- - -;meta$debug equ TRUE -meta$debug equ FALSE - -meta$sig5a equ 0 -meta$siga5 equ 1 -meta$prot equ 128-8-1-16-7 -meta$updates equ 128-8-1-16-6 -meta$rmj equ 128-8-1-16-4 -meta$rmn equ 128-8-1-16-3 -meta$rup equ 128-8-1-16-2 -meta$rtp equ 128-8-1-16-1 -meta$label equ 128-8-1-16 -meta$term equ 128-8-1 -meta$info$loc equ 128-8 -meta$cpm$loc equ 128-6 -meta$dat$end equ 128-4 -meta$cpm$ent equ 128-2 -meta$label$len equ meta$term-meta$label - -;----------------------------- -crlf db CR,LF,'$' -;----------------------------- - - page - - public x$u$meta -x$u$meta: - shld x$u$bufptr - -; lhld x$u$bufptr - lxi d,meta$prot - dad d - mov a,m - cpi TRUE ; is metadata write protected - jz x$u$proterr ; if so go around update code - - ; increment the update count - lhld x$u$bufptr - lxi d,meta$updates - dad d - mov e,m ; pick up LO byte into E - inx h - mov d,m ; pick up HO byte into D - inx d ; increment DE - mov m,d - dcx h - mov m,e - - ; update last written version quad - lhld x$u$bufptr - lxi d,meta$rmj - dad d - mvi a,A$RMJ - mov m,a - inx h - mvi a,A$RMN - mov m,a - inx h - mvi a,A$RUP - mov m,a - inx h - mvi a,A$RTP - mov m,a - - lhld x$u$bufptr - lxi d,meta$term - dad d - mov a,m - cpi '$' - jz x$u$end - - lhld x$u$bufptr - lxi d,meta$label - dad d - mvi a,' ' - mvi c,16 - call x$memset - - lhld x$u$bufptr - lxi d,meta$term - dad d - mvi a,'$' - mov m,a - -x$u$end: - mvi a,SUCCESS - ret - -x$u$proterr: - mvi a,FAILURE - ret - -x$u$bufptr ds 2 - - -;----------------------------- - - page - - public x$i$meta -x$i$meta: - shld x$i$bufptr - - lhld x$i$bufptr - lxi d,meta$sig5a - dad d - mvi a,05ah - mov m,a - inx h - mvi a,0a5h - mov m,a - - lhld x$i$bufptr - lxi d,meta$prot - dad d - mvi a,FALSE - mov m,a - - lhld x$i$bufptr - lxi d,meta$updates - dad d - mvi a,0 - mov m,a - inx h - mov m,a - - lhld x$i$bufptr - lxi d,meta$label - dad d ; hl -> dest - mvi a,' ' - mvi c,meta$label$len - call x$memset - - lhld x$i$bufptr - lxi d,meta$term - dad d - mvi a,'$' - mov m,a - - lhld x$i$bufptr - lxi d,meta$updates - dad d - mvi a,0 - mov m,a - inx h - mov m,a - - lhld x$i$bufptr - call x$u$meta - - ret - -x$i$bufptr ds 2 - -;------------------------------------------- - - page - - public x$g$meta -x$g$meta; - - shld x$g$bufptr ; entry hl has bufptr - mov a,c ; entry c has drivenum - sta x$g$drivenum - -; lda x$g$drivenum - mov c,a - call BISELDSK - - lxi b,0 - call BISETTRK - - lxi b,11 - call BISETSEC - - lhld x$g$bufptr - push h - pop b - call BISETDMA - - call BIREAD - - lhld x$g$bufptr - lxi d,meta$siga5 - dad d - mov a,m - cpi 0a5h - jnz x$g$needs$init - - lhld x$g$bufptr - lxi d,meta$sig5a - dad d - mov a,m - cpi 05ah - jnz x$g$needs$init - - jmp x$g$fini - -x$g$needs$init: - - lhld x$g$bufptr - call x$i$meta - - mvi c,0 ; default to 0 per Wayne - call BIWRITE - -x$g$fini: - mvi c,13 - call BDOS - ret - -x$g$bufptr ds 2 -x$g$drivenum ds 1 - -;----------------------------------- - - page - - public x$p$meta -x$p$meta: - shld x$p$bufptr - mov a,c - sta x$p$drivenum - - IF meta$debug eq TRUE - conout 'x' - conout '$' - conout 'p' - conout '$' - printf 'meta called, drive=' - lda x$p$drivenum - mov l,a - mvi h,0 - call pr$d$word - printf ', buffer=' - lhld x$p$bufptr - call pr$h$word - print crlf - ENDIF - - ; increment the update count - lhld x$p$bufptr ; hl -> buffer - lxi d,meta$updates ; de = offset to updates word - dad d ; hl -> updates word - mov e,m ; e = LO byte of updates - inx h ; hl -> HO byte - mov d,m ; d = HO byte of updates - inx d ; increment DE (updates) - mov m,d ; put back HO byte - dcx h ; back up ptr - mov m,e ; put back LO byte - - ; update last written version quad - lhld x$p$bufptr - lxi d,meta$rmj - dad d - mvi a,A$RMJ - mov m,a - inx h - mvi a,A$RMN - mov m,a - inx h - mov a,A$RUP - mov m,a - inx h - mvi a,A$RTP - mov m,a - - lhld x$p$bufptr - lxi d,meta$prot - dad d - mov a,m - cpi TRUE ; if metadata is write protected - jz x$p$fini ; jump around update code - lda x$p$drivenum - mov c,a - call BISELDSK - lxi b,0 - call BISETTRK - lxi b,11 - call BISETSEC - lhld x$p$bufptr - push h - pop b - call BISETDMA - - mvi c,0 ; default to 0 per Wayne - call BIWRITE - - IF meta$debug eq TRUE - printf 'return from BIWRITE is ' - mov l,a - mvi h,0 - call pr$h$word - print crlf - ENDIF - -x$p$fini: - ret - -x$p$bufptr ds 2 -x$p$drivenum ds 1 - -;----------------------- - - page - - public x$pr$meta -x$pr$meta: - mov a,c - sta x$pr$drivenum - - IF meta$debug eq TRUE - conout 'x' - conout '$' - printf 'pr' - conout '$' - printf 'meta called, drive=' - lda x$pr$drivenum - mov l,a - mvi h,0 - call pr$d$word - print crlf - ENDIF - - lda x$pr$drivenum - mov c,a - call BISELDSK - lxi b,0 - call BISETTRK - lxi b,11 - call BISETSEC - lxi b,x$pr$buffer - call BISETDMA - call BIREAD - - IF meta$debug eq TRUE - printf 'return from BIREAD is ' - mov l,a - mvi h,0 - call pr$h$word - print crlf - ENDIF - - lxi h,x$pr$buffer - lxi d,meta$prot - dad d - mvi a,TRUE - mov m,a - - - lxi h,x$pr$buffer - lxi d,meta$updates - dad d - mov e,m - inx h - mov d,m - inx d - mov m,d - dcx h - mov m,e - - lda x$pr$drivenum - mov c,a - call BISELDSK - lxi b,0 - call BISETTRK - lxi b,11 - call BISETSEC - lxi b,x$pr$buffer - call BISETDMA - - mvi c,0 ; default to 0 per Wayne - call BIWRITE - - IF meta$debug eq TRUE - printf 'return from BIWRITE is ' - mov l,a - mvi h,0 - call pr$h$word - print crlf - ENDIF - - mvi c,13 - call BDOS - - ret - - -x$pr$drivenum ds 1 -x$pr$buffer ds 128 - -;----------------------- - - page - - public x$un$meta -x$un$meta: - mov a,c - sta x$un$drivenum - - IF meta$debug eq TRUE - conout 'x' - conout '$' - printf 'un' - conout '$' - printf 'meta called, drive=' - lda x$un$drivenum - mov l,a - mvi h,0 - call pr$d$word - print crlf - ENDIF - - lda x$un$drivenum - mov c,a - call BISELDSK - lxi b,0 - call BISETTRK - lxi b,11 - call BISETSEC - lxi b,x$un$buffer - call BISETDMA - call BIREAD - - IF meta$debug eq TRUE - printf 'return from BIREAD is ' - mov l,a - mvi h,0 - call pr$h$word - print crlf - ENDIF - - lxi h,x$un$buffer - lxi d,meta$prot - dad d - mvi a,FALSE - mov m,a - - - lxi h,x$un$buffer - lxi d,meta$updates - dad d - mov e,m - inx h - mov d,m - inx d - mov m,d - dcx h - mov m,e - - lda x$un$drivenum - mov c,a - call BISELDSK - lxi b,0 - call BISETTRK - lxi b,11 - call BISETSEC - lxi b,x$un$buffer - call BISETDMA - - mvi c,0 ; default to 0 per Wayne - call BIWRITE - - IF meta$debug eq TRUE - printf 'return from BIWRITE is ' - mov l,a - mvi h,0 - call pr$h$word - print crlf - ENDIF - - mvi c,13 - call BDOS - - ret - -x$un$drivenum ds 1 -x$un$buffer ds 128 - -;----------------------- - -; eof - metadata.asm - \ No newline at end of file diff --git a/branches/dwg/Apps/crossdev/MULTIFMT.ASM b/branches/dwg/Apps/crossdev/MULTIFMT.ASM deleted file mode 100644 index e4013257..00000000 --- a/branches/dwg/Apps/crossdev/MULTIFMT.ASM +++ /dev/null @@ -1,1319 +0,0 @@ - extrn .begin,.chl,.swt - extrn csave,cret,.move - global pINFOLIS_,2 - global metadata_,128 - global pDPB_,2 - global pDPH_,2 - global pSYSCFG_,2 - global gDrvNum_,2 - global gDevUnit_,2 - global gDefLU_,2 - global gCurLU_,2 - global gNumLU_,2 - global gStatus_,2 - global gRetcode_,2 - global g1st_,2 - global gLast_,2 - global gOverAll_,2 - global gTT_,1 - global e5buffer_,128 - PUBLIC dispattr_ -dispattr_: lxi d,.2 - call csave - LXI H,8-.2 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,27 - PUSH H - LXI H,.1+0 - PUSH H - CALL printf_ - POP D - POP D - POP D - RET -.2 EQU 0 -.1: - DB 37,99,91,37,115,109,0 - PUBLIC clrline_ -clrline_: lxi d,.4 - call csave - LDA gTT_ - MOV L,A - MVI H,0 - PUSH H - LXI H,0 - POP D - XCHG - CALL .lt - JZ .5 - LXI H,0 - PUSH H - LXI H,2 - PUSH H - CALL crtlc_ - POP D - POP D -.5: - LXI H,13 - PUSH H - LXI H,.3+0 - PUSH H - CALL printf_ - POP D - POP D - LXI H,13 - PUSH H - LXI H,.3+40 - PUSH H - CALL printf_ - POP D - POP D - RET -.4 EQU 0 -.3: - DB 37,99,32,32,32,32,32,32,32,32,32,32,32,32,32 - DB 32,32,32,32,32,32,32,32,32,32,32,32,32,32,32 - DB 32,32,32,32,32,32,32,32,32,0,32,32,32,32,32 - DB 32,32,32,32,32,32,32,32,32,32,32,32,32,32,32 - DB 32,32,32,32,32,32,32,32,32,32,32,32,32,32,32 - DB 32,32,37,99,0 - PUBLIC getinfo_ -getinfo_: lxi d,.7 - call csave - LXI H,-6602 - SHLD ireghl_ - LXI H,8-.7 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - SHLD iregbc_ - CALL bioscall_ - LDA irega_ - MOV L,A - MVI H,0 - SHLD gStatus_ - LHLD iregbc_ - SHLD gDevUnit_ - LHLD iregde_ - SHLD gCurLU_ - LHLD ireghl_ - SHLD gNumLU_ - RET -.7 EQU 0 - PUBLIC clrdir_ -clrdir_: lxi d,.8 - call csave - lda gTT_ - ora a - JNZ .9 - LHLD gDrvNum_ - PUSH H - LXI H,.6+0 - PUSH H - CALL printf_ - POP D - POP D -.9: - LXI H,128 - PUSH H - LXI H,229 - PUSH H - LXI H,e5buffer_ - PUSH H - CALL memset_ - POP D - POP D - POP D - LXI H,-6629 - SHLD ireghl_ - LHLD gDrvNum_ - SHLD iregbc_ - LXI H,0 - SHLD iregde_ - CALL bioscall_ - LHLD ireghl_ - SHLD pDPH_ - LHLD pDPH_ - LXI D,10 - DAD D - MOV E,M - INX H - MOV D,M - XCHG - SHLD pDPB_ - LHLD pDPB_ - LXI D,7 - DAD D - MOV E,M - INX H - MOV D,M - XCHG - INX H - LXI D,2 - XCHG - CALL .ur - XCHG - LXI H,0-.8 - DAD SP - MOV M,E - INX H - MOV M,D - LXI H,0 - PUSH H - LXI H,e5buffer_ - PUSH H - LXI H,0 - PUSH H - LHLD pDPB_ - LXI D,13 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LHLD gDrvNum_ - PUSH H - CALL wrsector_ - XCHG - LXI H,10 - DAD SP - SPHL - LXI H,1 - XCHG - LXI H,2-.8 - DAD SP - MOV M,E - INX H - MOV M,D - JMP .11 -.10: - LXI H,2-.8 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D -.11: - LXI H,2-.8 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,0-.8 - DAD SP - MOV A,M - INX H - MOV H,M - MOV L,A - CALL .lt - JZ .12 - LXI H,-1 - XCHG - LXI H,8-.8 - DAD SP - MOV A,M - INX H - MOV H,M - MOV L,A - CALL .ne - JZ .13 - LXI H,10-.8 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - DCX H - PUSH H - LXI H,10-.8 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - CALL crtlc_ - POP D - POP D - LXI H,0-.8 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,2-.8 - DAD SP - MOV A,M - INX H - MOV H,M - MOV L,A - CALL .sb - PUSH H - LXI H,.6+12 - PUSH H - CALL printf_ - POP D - POP D -.13: - LXI H,1 - PUSH H - LXI H,e5buffer_ - PUSH H - LXI H,6-.8 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LHLD pDPB_ - LXI D,13 - DAD D - MOV E,M - INX H - MOV D,M - PUSH D - LHLD gDrvNum_ - PUSH H - CALL wrsector_ - XCHG - LXI H,10 - DAD SP - SPHL - JMP .10 -.12: - RET -.8 EQU -4 -.6: - DB 99,108,114,100,105,114,40,37,100,41,32,0,37,51,100 - DB 0 - PUBLIC clrmeta_ -clrmeta_: lxi d,.15 - call csave - lda gTT_ - ora a - JNZ .16 - LXI H,8-.15 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,.14+0 - PUSH H - CALL printf_ - POP D - POP D - JMP .17 -.16: - LXI H,12-.15 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - DCX H - PUSH H - LXI H,12-.15 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - CALL crtlc_ - POP D - POP D - LXI H,.14+13 - PUSH H - CALL printf_ - POP D -.17: - LXI H,0 - PUSH H - LXI H,metadata_ - PUSH H - LXI H,11 - PUSH H - LXI H,0 - PUSH H - LHLD gDrvNum_ - PUSH H - CALL rdsector_ - XCHG - LXI H,10 - DAD SP - SPHL - LXI H,-23206 - SHLD metadata_ - LHLD pSYSCFG_ - LXI D,24 - DAD D - MOV E,M - XCHG - MOV A,L - STA metadata_+2 - LXI H,8 - PUSH H - LXI H,.14+17 - PUSH H - LXI H,metadata_+4 - PUSH H - CALL memcpy_ - POP D - POP D - POP D - LHLD gDrvNum_ - MOV A,L - STA metadata_+12 - LXI H,8-.15 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - SHLD metadata_+13 - LXI H,0 - MOV A,L - STA metadata_+96 - LXI H,2 - MOV A,L - STA metadata_+99 - LXI H,3 - MOV A,L - STA metadata_+100 - LXI H,0 - MOV A,L - STA metadata_+101 - LXI H,0 - MOV A,L - STA metadata_+102 - LXI H,16 - PUSH H - LXI H,.14+26 - PUSH H - LXI H,metadata_+103 - PUSH H - CALL memcpy_ - POP D - POP D - POP D - LXI H,36 - MOV A,L - STA metadata_+119 - LXI H,0 - SHLD metadata_+97 - LXI H,0 - PUSH H - LXI H,metadata_ - PUSH H - LXI H,11 - PUSH H - LXI H,0 - PUSH H - LHLD gDrvNum_ - PUSH H - CALL wrsector_ - XCHG - LXI H,10 - DAD SP - SPHL - RET -.15 EQU 0 -.14: - DB 99,108,114,109,101,116,97,40,37,100,41,32,0,109,101 - DB 116,0,109,117,108,116,105,102,109,116,0,91,109,117,108 - DB 116,105,102,111,114,109,97,116,116,101,100,93,0 - PUBLIC physfmt_ -physfmt_: lxi d,.19 - call csave - LXI H,0 - PUSH H - LXI H,metadata_ - PUSH H - LXI H,11 - PUSH H - LXI H,0 - PUSH H - LHLD gDrvNum_ - PUSH H - CALL rdsector_ - XCHG - LXI H,10 - DAD SP - SPHL - LDA metadata_+96 - MOV L,A - MVI H,0 - PUSH H - LXI H,1 - POP D - CALL .eq - JZ .20 - lda gTT_ - ora a - JNZ .21 - LXI H,8-.19 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,.18+0 - PUSH H - CALL printf_ - POP D - POP D -.21: - LHLD gOverAll_ - MOV A,H - ORA L - JNZ .22 - lda gTT_ - ora a - JNZ .23 - LXI H,.18+21 - PUSH H - CALL printf_ - POP D -.23: - LXI H,0 - RET -.22: - lda gTT_ - ora a - JNZ .24 - LXI H,.18+47 - PUSH H - CALL printf_ - POP D -.24: -.20: - lda gTT_ - ora a - JNZ .25 - LXI H,13 - PUSH H - LXI H,10-.19 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,.18+69 - PUSH H - CALL printf_ - POP D - POP D - POP D - LXI H,-1 - PUSH H - LXI H,-1 - PUSH H - LXI H,12-.19 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - CALL clrmeta_ - POP D - POP D - POP D - LXI H,-1 - PUSH H - LXI H,-1 - PUSH H - CALL clrdir_ - POP D - POP D - JMP .26 -.25: - LXI H,8-.19 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,16 - CALL .dv - XCHG - LXI H,2-.19 - DAD SP - MOV M,E - INX H - MOV M,D - LXI H,0 - PUSH H - LXI H,4-.19 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,6 - DAD D - PUSH H - CALL crtlc_ - POP D - POP D - LXI H,8-.19 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,240 - CALL .an - PUSH H - LXI H,.18+90 - PUSH H - CALL printf_ - POP D - POP D - LXI H,8-.19 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,15 - CALL .an - XCHG - LXI H,0-.19 - DAD SP - MOV M,E - INX H - MOV M,D - LXI H,0-.19 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - DAD H - DAD H - LXI D,9 - DAD D - PUSH H - LXI H,4-.19 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,6 - DAD D - PUSH H - LXI H,12-.19 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - CALL clrmeta_ - POP D - POP D - POP D - LXI H,0-.19 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - DAD H - DAD H - LXI D,9 - DAD D - PUSH H - LXI H,4-.19 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,6 - DAD D - PUSH H - CALL clrdir_ - POP D - POP D - LXI H,0-.19 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - DAD H - DAD H - LXI D,9 - DAD D - PUSH H - LXI H,4-.19 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,6 - DAD D - PUSH H - CALL crtlc_ - POP D - POP D - LXI H,.18+97 - PUSH H - CALL printf_ - POP D -.26: - LXI H,1 - RET -.19 EQU -4 -.18: - DB 76,85,37,100,32,105,115,32,112,114,111,116,101,99,116 - DB 101,100,44,32,32,0,79,118,101,114,114,105,100,101,32 - DB 105,115,32,110,111,116,32,101,110,97,98,108,101,100,44 - DB 32,0,79,118,101,114,114,105,100,101,32,105,115,32,101 - DB 110,97,98,108,101,100,44,32,0,70,111,114,109,97,116 - DB 116,105,110,103,32,76,85,35,32,37,51,100,37,99,0 - DB 37,51,100,46,46,46,0,79,75,0 - PUBLIC lformat_ -lformat_: lxi d,.28 - call csave - lda gTT_ - ora a - JZ .29 - LXI H,0 - XCHG - LXI H,2-.28 - DAD SP - MOV M,E - INX H - MOV M,D - JMP .31 -.30: - LXI H,2-.28 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D -.31: - LXI H,2-.28 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,16 - CALL .lt - JZ .32 - LXI H,2-.28 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - DAD H - DAD H - LXI D,8 - DAD D - PUSH H - LXI H,4 - PUSH H - CALL crtlc_ - POP D - POP D - LXI H,2-.28 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LXI H,.27+0 - PUSH H - CALL printf_ - POP D - POP D - JMP .30 -.32: - LXI H,0 - XCHG - LXI H,2-.28 - DAD SP - MOV M,E - INX H - MOV M,D - JMP .34 -.33: - LXI H,2-.28 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D -.34: - LXI H,2-.28 - DAD SP - MOV E,M - INX H - MOV D,M - LXI H,16 - CALL .lt - JZ .35 - LXI H,2-.28 - DAD SP - MOV E,M - INX H - MOV D,M - XCHG - DAD H - DAD H - LXI D,8 - DAD D - PUSH H - LXI H,5 - PUSH H - CALL crtlc_ - POP D - POP D - LXI H,.27+5 - PUSH H - CALL printf_ - POP D - JMP .33 -.35: -.29: - LHLD gDrvNum_ - PUSH H - CALL lugcur_ - POP D - SHLD gDefLU_ - LHLD g1st_ - XCHG - LXI H,2-.28 - DAD SP - MOV M,E - INX H - MOV M,D - JMP .37 -.36: - LXI H,2-.28 - DAD SP - PUSH H - MOV A,M - INX H - MOV H,M - MOV L,A - INX H - XCHG - POP H - MOV M,E - INX H - MOV M,D -.37: - LXI H,2-.28 - DAD SP - MOV E,M - INX H - MOV D,M - LHLD gLast_ - CALL .le - JZ .38 - LXI H,2-.28 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - LHLD gDrvNum_ - PUSH H - CALL luscur_ - POP D - POP D - LXI H,0 - PUSH H - LXI H,metadata_ - PUSH H - LXI H,11 - PUSH H - LXI H,0 - PUSH H - LHLD gDrvNum_ - PUSH H - CALL rdsector_ - XCHG - LXI H,10 - DAD SP - SPHL - LDA metadata_+96 - MOV L,A - MVI H,0 - PUSH H - LXI H,1 - POP D - CALL .eq - JZ .39 - LXI H,1 - XCHG - LHLD gOverAll_ - CALL .eq - JZ .40 - LXI H,2-.28 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - CALL physfmt_ - POP D -.40: - JMP .41 -.39: - LXI H,2-.28 - DAD SP - MOV E,M - INX H - MOV D,M - PUSH D - CALL physfmt_ - POP D -.41: - JMP .36 -.38: - LHLD gDefLU_ - PUSH H - LHLD gDrvNum_ - PUSH H - CALL luscur_ - POP D - POP D - RET -.28 EQU -2 -.27: - DB 43,37,50,100,0,45,45,45,0 - PUBLIC dispinfo_ -dispinfo_: lxi d,.43 - call csave - LXI H,1 - XCHG - LHLD gRetcode_ - CALL .eq - JZ .44 - LXI H,1 - RET -.44: - LHLD gNumLU_ - MOV A,H - ORA L - JNZ .45 - LXI H,1 - RET -.45: - LHLD gDrvNum_ - LXI D,65 - DAD D - PUSH H - LXI H,.42+0 - PUSH H - CALL printf_ - POP D - POP D - LHLD gCurLU_ - PUSH H - LXI H,.42+13 - PUSH H - CALL printf_ - POP D - POP D - LHLD gNumLU_ - PUSH H - LXI H,.42+32 - PUSH H - CALL printf_ - POP D - POP D - LHLD gDevUnit_ - LXI D,8 - XCHG - CALL .rs - LXI D,240 - CALL .an - JMP .46 -.48: - LXI H,.42+55 - PUSH H - CALL printf_ - POP D - JMP .47 -.49: - LXI H,.42+68 - PUSH H - CALL printf_ - POP D - JMP .47 -.50: - LHLD gDevUnit_ - PUSH H - LXI H,.42+83 - PUSH H - CALL printf_ - POP D - POP D - JMP .47 -.46: - CALL .swt - DW 2 - DW 32,.48 - DW 64,.49 - DW .50 -.47: - CALL clrline_ - LXI H,.42+106 - PUSH H - CALL printf_ - POP D - LXI H,1 - SHLD dregbc_ - CALL bdoscall_ - LDA drega_ - MOV L,A - MVI H,0 - JMP .51 -.53: -.54: - LXI H,1 - RET -.55: - LXI H,0 - RET -.51: - CALL .swt - DW 2 - DW 89,.53 - DW 121,.54 - DW .55 -.52: - RET -.43 EQU 0 -.42: - DB 10,68,114,105,118,101,32,37,99,58,44,32,0,67,117 - DB 114,114,101,110,116,32,76,85,32,105,115,32,37,100,44 - DB 32,0,78,117,109,98,101,114,32,111,102,32,76,85,39 - DB 115,32,105,115,32,37,100,44,32,0,68,114,105,118,101 - DB 32,105,115,32,73,68,69,0,68,114,105,118,101,32,105 - DB 115,32,80,80,73,68,69,0,68,114,105,118,101,32,105 - DB 115,32,85,110,107,110,111,119,110,33,33,40,37,120,41 - DB 0,87,111,117,108,100,32,121,111,117,32,108,105,107,101 - DB 32,116,111,32,102,111,114,109,97,116,32,116,104,101,32 - DB 108,111,103,105,99,97,108,32,117,110,105,116,115,32,111 - DB 110,32,116,104,105,115,32,100,114,105,118,101,40,89,47 - DB 110,41,63,0 - PUBLIC gather_ -gather_: lxi d,.57 - call csave - CALL clrline_ - LXI H,1 - SHLD g1st_ - LHLD g1st_ - PUSH H - LHLD gNumLU_ - DCX H - PUSH H - LXI H,.56+0 - PUSH H - CALL printf_ - POP D - POP D - POP D - LXI H,-124-.57 - DAD SP - PUSH H - CALL gets_ - POP D - LXI H,-124-.57 - DAD SP - PUSH H - CALL strlen_ - POP D - PUSH H - LXI H,0 - POP D - XCHG - CALL .lt - JZ .58 - LXI H,-124-.57 - DAD SP - PUSH H - CALL atoi_ - POP D - SHLD g1st_ -.58: - CALL clrline_ - LHLD gNumLU_ - DCX H - SHLD gLast_ - LHLD gLast_ - PUSH H - LHLD gNumLU_ - DCX H - PUSH H - LXI H,.56+53 - PUSH H - CALL printf_ - POP D - POP D - POP D - LXI H,-124-.57 - DAD SP - PUSH H - CALL gets_ - POP D - LXI H,-124-.57 - DAD SP - PUSH H - CALL strlen_ - POP D - PUSH H - LXI H,0 - POP D - XCHG - CALL .lt - JZ .59 - LXI H,-124-.57 - DAD SP - PUSH H - CALL atoi_ - POP D - SHLD gLast_ -.59: - CALL clrline_ - LXI H,0 - SHLD gOverAll_ - LXI H,.56+105 - PUSH H - CALL printf_ - POP D - LXI H,1 - SHLD dregbc_ - CALL bdoscall_ - LDA drega_ - MOV L,A - MVI H,0 - PUSH H - LXI H,89 - POP D - CALL .eq - JZ .60 - CALL clrline_ - LXI H,.56+165 - PUSH H - CALL printf_ - POP D - LXI H,1 - SHLD dregbc_ - CALL bdoscall_ - LDA drega_ - MOV L,A - MVI H,0 - PUSH H - LXI H,68 - POP D - CALL .eq - JZ .61 - LXI H,1 - SHLD gOverAll_ -.61: - JMP .62 -.60: - LXI H,.56+221 - PUSH H - CALL printf_ - POP D -.62: - RET -.57 EQU -128 -.56: - DB 80,108,101,97,115,101,32,101,110,116,101,114,32,102,105 - DB 114,115,116,32,108,111,103,105,99,97,108,32,117,110,105 - DB 116,32,116,111,32,102,111,114,109,97,116,32,48,45,37 - DB 100,32,40,37,100,41,58,0,80,108,101,97,115,101,32 - DB 101,110,116,101,114,32,108,97,115,116,32,108,111,103,105 - DB 99,97,108,32,117,110,105,116,32,116,111,32,102,111,114 - DB 109,97,116,32,48,45,37,100,32,40,37,100,41,58,0 - DB 68,111,32,121,111,117,32,119,97,110,116,32,116,111,32 - DB 111,118,101,114,114,105,100,101,32,97,108,108,32,112,114 - DB 111,116,101,99,116,101,100,32,108,111,103,105,99,97,108 - DB 32,117,110,105,116,115,32,40,89,47,110,41,58,32,0 - DB 68,111,32,121,111,117,32,114,101,97,108,108,121,32,119 - DB 97,110,116,32,116,111,32,68,69,83,84,82,79,89,32 - DB 97,108,108,32,108,111,103,105,99,97,108,32,117,110,105 - DB 116,115,32,40,68,47,110,41,58,32,0,10,0 - PUBLIC main_ -main_: lxi d,.64 - call csave - LXI H,-4096 - SHLD hregbc_ - LXI H,-16384 - SHLD hregde_ - CALL diagnose_ - LXI H,-16384 - SHLD pSYSCFG_ - LHLD pSYSCFG_ - LXI D,68 - DAD D - MOV E,M - XCHG - MOV A,L - STA gTT_ - LDA gTT_ - MOV L,A - MVI H,0 - PUSH H - CALL crtinit_ - POP D - LDA gTT_ - MOV L,A - MVI H,0 - PUSH H - LXI H,0 - POP D - XCHG - CALL .lt - JZ .65 - CALL crtclr_ - LXI H,0 - PUSH H - LXI H,0 - PUSH H - CALL crtlc_ - POP D - POP D -.65: - LXI H,0 - PUSH H - LXI H,0 - PUSH H - LXI H,3 - PUSH H - LXI H,2 - PUSH H - LXI H,2013 - PUSH H - LXI H,16 - PUSH H - LXI H,1 - PUSH H - LXI H,.63+0 - PUSH H - CALL printf_ - XCHG - LXI H,16 - DAD SP - SPHL - LXI H,.63+35 - PUSH H - CALL printf_ - POP D - LXI H,-6596 - SHLD ireghl_ - CALL bioscall_ - LHLD ireghl_ - SHLD pINFOLIS_ - LXI H,25 - SHLD dregbc_ - CALL bdoscall_ - LDA drega_ - MOV L,A - MVI H,0 - SHLD gDrvNum_ - LHLD gDrvNum_ - PUSH H - CALL getinfo_ - POP D - CALL dispinfo_ - XCHG - LXI H,2-.64 - DAD SP - MOV M,E - INX H - MOV M,D - LXI H,2-.64 - DAD SP - mov a,m - inx h - ora m - JNZ .66 - LXI H,.63+81 - PUSH H - CALL printf_ - POP D - LXI H,1 - PUSH H - CALL exit_ - POP D -.66: - CALL gather_ - CALL lformat_ - RET -.64 EQU -2 -.63: - DB 77,85,76,84,73,70,77,84,46,67,79,77,32,37,100 - DB 47,37,100,47,37,100,32,118,37,100,46,37,100,46,37 - DB 100,46,37,100,0,32,100,119,103,32,45,32,80,114,101 - DB 112,97,114,101,32,110,101,119,32,109,97,115,115,32,115 - DB 116,111,114,97,103,101,32,109,101,100,105,97,32,102,111 - DB 114,32,117,115,101,0,10,70,111,114,109,97,116,32,99 - DB 97,110,99,101,108,108,101,100,32,97,116,32,117,115,101 - DB 114,39,115,32,114,101,113,117,101,115,116,0 - extrn exit_ - extrn crtclr_ - extrn crtinit_ - extrn atoi_ - extrn strlen_ - extrn gets_ - extrn crtlc_ - extrn printf_ - extrn diagnose_ - extrn hregde_ - extrn hregbc_ - extrn luscur_ - extrn lugcur_ - extrn wrsector_ - extrn rdsector_ - extrn bdoscall_ - extrn dregbc_ - extrn drega_ - extrn bioscall_ - extrn ireghl_ - extrn iregde_ - extrn iregbc_ - extrn irega_ - extrn memset_ - extrn memcpy_ - extrn .an - extrn .eq - extrn .ne - extrn .lt - extrn .le - extrn .rs - extrn .ur - extrn .sb - extrn .dv - END - \ No newline at end of file diff --git a/branches/dwg/Apps/crossdev/MULTIFMT.O b/branches/dwg/Apps/crossdev/MULTIFMT.O deleted file mode 100644 index 6b441a10bb4c39a777c2fd4cecce40d07d86e14d..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 5120 zcmds4TWlOx89p=X)`_dAJF%VENt&5icOe(zrtU?tm8dCk0})Q+#CC&Iwf5}J+4b17 zJNC@1FG=jAT!MwDgm?w!lyQ*@<`X_2l*B5h~RO^e>a5BuJGWFHlE z+jhiRqh4Lsj@D|mt!)1NY*Z3PP6-cHwBF!zkP@P{Q@yRFxAUS0NZr;&y?RGGRIAws zNQs*$X(4>|Ypm8}t=8_3xw}-W7J^_(3*jjVMd-}tg(3Njo%Wl5%&cnUmlWOP*G^_l zOIPn{>7jYO6Q|G2Yw1%UW$udfsRccqS;K$q$lMdgmQiSWYJBpr2+kd0z@eGMp(F6{ zK0K`BZ&8Cskq#eg_E9zpVW`tO5t0lvlTp^Z0zE6D$LJ8fe4u6E%i<-YUEzI(E_SN1 zZtU2Zvjx#J81;o5)kUqFVqJ%Dk8yy7AMt^z75&JL-6015ZfgR&1`48!c5Ql;QDDag z>uY_5pl|07q)YK(n)P=N5{uI}C%Wv%kD=gP0l{MOqMqLNNy|_{9On3)t~0{He1t3? zguisoF5SFxiB#FVHHm51==SwZe2D0ba5Wm2O>#lKtmqc&fegTK1AXBERD|&Ad z*jqo!EFn*~#bKidq2E~@u$RO@m%R_-&~yDGa&}3)j!n1qP80ztV4?F=eTn6r3}h~J z!2q*HA9SHtcsYh;N-f8+Oavx&m+xVjR>p26#%?}fYlo@iURHZ=ev8WuR<85bI#y3Q zRnbl56h*frW9LNHr1)YfN)W-@2h1HmYg`2?!ga);h=LO)Cjfs(`r}rBymGv zjy~w&(V&T1^)6~ChlZ!lpMbZRK%Ap3 zrKG4hQ)-A9HAS7#x_I7XhFaB6e1o^s07G%t`7d+6AyHk{TRGKGr_%9~LvqC<>eW^5 z#sNp$?Z(XOj>ePHejX8SG{QMYQ=2{&)irJaSG)C1J^?pMlm8;~sl^?Qo0V6`xW!JM zH1<>0_L@L3x15?v>@&A0cRpK8bunUnohoWsGpSd%MkcbZoEF z3`5U!C9%puY{{~d^Q8%9!c#0$(TRMSi^z<G8>y4lXiZHIG0DJ)f8O z7sYhSNu{eRG-!PNmTHSGYKu$-^u<(qXemYShs|87hnfYU-%<)DMLuP$2sb5D=2pjW z=q*Ysn;$|ST&kF1D9bULfSM3TZJ)?4pAH(UZ%$fqU=@PU#0iJG=E z4eWO6aINKC=%vt24c;B9eki5jQdUoAP}ivKRtpm_5v zqq?aklbdR;k@lI?#J9PMo=m%vA5P@`6h{drHcL1I%zW^1GDNpVed$CJ6Ea4I3#J!F zaWe(TfQh7VekeU>&t#D}dg%;_=042b(DI$#ZKg$;YuRSfzGT~QfW(^>Yso>4L37X? z)sFAe7*|u=Y&`?2;DkwuAF>4RuUMfpA-~d8GyKk&Iez2Xq(xei3R365-eI-1123~O z*9`*xX=W8c5gVB`Q0}Sa?d0(^tR7DlzT~^;jZmF$;~V^mZ;1eV7uwYK1jZUBI6fA5 zz|oLP;ZHvf@cZ^UKa1#XX-~JQ(!@g~O|M}P#?-h#4$t$Wy!i@W6rFbOlii%blU)t8 zyP8p}Mk$`p8A_`xm#mT#MOGA}X`Q09O49WlYGJDq znNoD9tJKOn<-GJwU%D1brxM8!qa&2v3l$l~LbUIrue<)7EPCZ8mY?y7n((3}$ThHh zbe-5qc*CP#oZ6Kf9{q9)Ha0nS z>GGGRlw@%@T*TaKVsdc;Ro&pp!pOu_Vy}3q61HI2)Pjx0PF#r^T5iZVAGk8n@@f?C zS}%^Eg@7hJdcwTz`|ax*PFoxwCqeM;1IjmYl|n&=`a02EFPg{eH&ij35500+m=gN> z%i!Vd?0aQ7mBiEMkR{R0hq0fBR(<{FkSt2Pd4ma5 z%X8?|O-Wah^*<}?_%3SfE6GwM;h>W2uY{0j>{|*WyxoGthyF6&g5|#5{fd$Iq)gPzV$M!l=c9yElSvYXpf$5!Ba@B8Ei=S76f~vJz3^mCh&* zeOYcq(1`<&c>4NZ_oK=k51fYN%pQA$QC5@|^lGsjL{ed>0uN=Kcnb^xZb-^yFrZVr z2q5&0ms-|WnBq1m+Qol7CYd&rtG+Ugp@PVazVRzw|Ae8EJjC>NhTmoQ z5yLfx9|LL^;T-ne&*#~J1r-fDp#@_GSKyLg{Zn?}a;jUw`` cZ~T;DJ5$;iz6jXxYq*1Cwi#{${{R2{3n