DBugEqu.Text Thu, Mar FILENAME: 16, 1989 11 :03 PM DBUGEQU LmaJ Memory ( i e $400 -- $600) !----------------------! I RTNADDR !----------------------! is as f o11 ows: <-- $400 <-- GLOBSTRT Assembly Language Globals i !----------------------! i I I I I <-- GLOBEND Pascal Gi obal Variables !----------------------! i Free 1----------------------i Debuggers <-- GLOBEND+PGLOBSZ <-- $600 data. area below the screen !----------------------! <-- HEAPPTF: Debuggers Heap I I l----------------1-----i I I I l I <-- SYMBEG Users Symbol Table i----------------------1 <-- SYMEND I Free j 1------·---------------- ! <-- A7 Debuggers Stack ; DATASIZ . . !----------------------! (-- ($110) EQU size of debuggers 4096 ' ; Assemb I y Language ; Globals RTNADDR EQU $0400 TRAPSR SYMBBEG SYMBEND EQU EQU EQU RTNADDR+4 TRAPSR+2 SYMBBEG+4 .' ; Assembly Language Globals Initialized data area bei ow the screen by STARTUP return address for taik value to set into SR on next trap ptr to symbol tab1 e begin ptr to symbol table end Zeroed by STARTUP, Initialized ; GLOBSTF:T EQU RUNFLAG EQU SYMBEND+4 GLOBSiHT g1oba 1 area start running the user boolean by INITDBUG OBugEqu.Text G02DBUG NOTALK DBGMODE USERREGS TRAPNUMB FCODE ACCADDR INSTR USERA5 NEWCPU NEW IO MEMOFS VIA2PTR IXAREA IXPTR SETV IDL OLDSETT MSBASE UNUSED .JUMP3PTR .JUMP2PTR .JUMP 1PTR MAINPC MAINSP EQU EQU EQU EG!U EQU EQU EQU EQU EQU EG!U EQU EQU EQU EQU EQU EG!U EQU EG!U EQU EQU EQU RUNFLAG+2 G02DBUG+2 NOTAU<+l DBGMODE+l USEF:REGS+80 TRAPNUMB+2 FCODE+2 ACCADDR+4 INSTR+2 USERA5+4 NEWCPU+l NEWI0+1 MEMOFS+4 VIA2PTR+4 IXAREA+10 IXPTR+4 SETVIDL+l OLDSETT+1 MSBASE+4 UNUSED+4 JUMP3PTR+4 mu .JUMP2Prn+4 EQU MAINPC+4 MAINSP+4 MAINA6+4 COPSFLAG+l COPSFLAG+2 TWGDONE+2 BPTINIT+4 BPTCREAT+4 BPTSET+4 BPTCLEAR+4 ADDRDCT+4 ADDRBPT+4 HEAPPTF:+4 TENTRY+4 EQU EQU COPSFLAG EQU COPSBYTE EG!U TWGDONE EQU BPTINIT EQU BPTCREAT EQU BPTSET rnu BPTCLEAR EQU ADDRDCT EQU ADDRBPT EQU HEAPPTR EQU TENTF\Y EQU TEX IT mu PHBASE EG!U OLDATRAP EQU ATRACEON mu ATRACESE EQU BLKMOVE EQU GLOBEND EQU MAINA6 BPTCOUNT BPTTABLE PPTCOUNT PPTTABLE RTNCOUNT RTNSTACK Thu, Mar .JUMP1PTR+4 TEXIT+4 PRBASE+4 OLDAiRAP+4 ATF:ACEON+2 ATRACESE+2 BLKMOVE+4 EQU 0 EQU BPTCOUNT+2 BPTTABLE+160 PPTCOUNT+2 PPTTABLE+56 RTt~COUNT +2 RTNSTACK+32 16, 1989 , 11:03 PM 2 indicates we trapped in user indicates no talk program (since $120 was 0) (normal ,tracing,ixtracing,assembling,heapfault> save area for user registers the short address passed a1ong to the user the function code the access address the instruct ion User A5 register recorded by the Loader Feb82 CPU board Feb82 IiO board offset to start of memory contains @VIA2, note: @vial is at $134 5 word save area for IX command pointer to Pc-10 for IX command boo! ean, video page i atch needs to be set o1 d screen setting, O=primary, 1=alternate four bytes of screen contra 1 ptr to jump table for Lisabug3.obj ptr to jump table for Lisabug2.…

{MRCSBUG 1/0 HOUTiNES} Filename: 10.TEXT 20-Rt49-84 23-Au:;!-a4 27-Aui;,i-84 10-Sep-84 23-Sep-84 18-0c:t-84 Added SUhJP f f G9 set i r! f ~ i pp i n9 code Un f i ::-::ed ss..aJGP f ~ G';i .· 1::;dded f ~ t.ish of keiJup ( L i sG > Ft~r ther f i ::{ of kei:::t~p f ~ ush i n9 .: G i m::1s t uJor·ks Added ke!JboGrd de ! Gi:J OUTPUT tests for..- abort.. of pr i n;:. t r-ig Term i t""iG j bc~sed debuggers 1J l so de; test (Ctr I C ) for Gbc~r t er f 8-Dec-84 :..J.-e.-•. -. 1:.•.•;:_}'_ .~F (SP)l· •-·u .._:t ' <SP) CC• ._:; 1296ns 12 * 108 ns 4 108 ns = 4:32ns * .ELSE } .. L (SP)_, <SP) !F ncT:rm .EQU Kbd!.);~rs after keyboard shifts some th ~ ni;l ; r~ S tdEri tr!:i #64.:D7 t i cks c:ot~n t..er..· f orc:e i mmed . REAOBUF BSH !MCHNE HERDBUF swGpSc:reeri *$60.~DO swap char Ctilda) 8ME . S F ~ ipS ~de *$C=0 .=DD BEQ . S @2 .amc #8 .• DO BACKSPACE? . . BNE.S ~;o no.: Keep go i r-u;} A6.:A5 BHS.S BEADBUF SUBQ.L #1.,Ati ANii CHAH~:; TO DELETE? NO·' i GNOHE BACKSPACE :/es.: remc::.}e c:hcu-· f r·om buffer DO_: -(SP) BSB M01...'E C:!"lPI .B BACKSPACE? •8_,DO BEADBUF k;:::epi t ~ s ! t =:1 C:~rr j ct:~e Beturr1? no, stuff into 10 buffer #' otherwise stuff a space ±£::!·f""! iUi ~· •.j._Z!...,l .t !....~::_,: UpLoop res tore post e 1...=en t s tJJ ff pos tE 5......=er1 t ~ HU #:t;2F .~DO _Set Trc1pAddre:ss (SP)+ .: $28 (SP )+} DO-D7 /RO-A~3 restore RTS 'r~ r ; wait for al~ keys to be up (kwk) TBAPTO __J~·=OLL i;je t CLB. i-J DO set up for ~:.et:JCZ:n:Je TRAP TO TST. ~-~ BME.S pend i ni~ ke;~ e1.}en ts *$48 .=DO BETUBN kei:JC:ode = :i;4f! _r:. _e!:1 ! SUOUJn test the keiJ i s the r·e turn kei.J st j !Jes; keep test i ri=~ :: ..- : r-. 01 t~pLoop THAPTO now f !ush the key up event no r-epeci ts - ch:!r; : t !J.h:.i i t... for e ._h::r-d:. 1 TRAP TO the _ELSE BSH.S ~nchNE wait for post up •KeyOwnEvt,keyEvt i_IJ(4S ~!G no, keep checking i +.. Ci keydCdlin? MULH-! *4~: SP BRA Deci ! i-i~:.ei::1 SUBQ #Ke!JUpE :.} +.. .• ke1::1Et} t upLi:•i:ip no, keep looping DO~, (Afi )+ stuff into buffer BNE.S ilh~S j t G kei:JUP? .ENDC keepit BSB.S Uploop 17 - - ..:.. BBA ~NPUT HEAD8UF A CHAH (NO ECHO) iF t·1Dt)E. L .. .-. onLiSi:Jirue=u : ~ ,-= .-,, -i ! : i :...,..: ! n.~ n z did 24/60ths sec rol BEQ . S r~1cn}E. B #02 .~ t} i FH(A 1) RDDQ ii; n- ; n'? _,~·; DDBG .EMDC BLT.S 9c:Ke!J *O.tD7 KbdT::A I ked fiAke the keyboGrd non-t::~ Jk i omem ;.}ee:tc1r .EMDC CLFi. i·i iF THRPTO _f 0LL r·iOi..JEO t·Kli..JEQ TF!RPTG #0 . ~ DO iiO .: D1 1 TST.B DO p;::-n .::: :;._•,,_·-:. ·-· Got.Ke!:4 TST.B BEQ.S Ct1P. B Got..Ke1::1 #1 .rD2 BEQ . S D2 s s nee ~ nterrt~pts off.= poi key repeG ts n1) t. okc~u:J dor-;: t ?.!J!:-4 ! t for e;. .;er-!t_ QE: t_ the ~:. ei:Jboard ei.}en t has cu··11::: th i ng hc1ppened? no e!.}en t. d i sk ilpouJer e=.}en t ~? ( Gsc: i 0) iJes .: i 9nore i) GotJ:~e!:i from CLH D2.; ke!JH it .ELSE <ki.uk) ~.}~A.=R1 BTST…

This flavor lS on-screen~ ines witn disassembler for 512K. i:Jdded on68000 " .= ont·1Gc Trtie .: onl i S!J. Trt4e = or-:=..lae:e: True ; equcJ tes f cir a./ACC and abo2...=e t l .EQU ~EQU = \Jes .: or5 G f"'1c~c i n tosh ;1or on G L i sc1 (Mcie )::L ) un:jer HcicJ~or+:.s 0 E"·lr:T ;!r-;i ~S Ci ~EQU noTer. m ~EQU c~Port .EQU suJ::ip8creen ~.rJ i thD is .EQU .EQU .EQU .EQU dLines 0 .set .set i f screen si;Jc:;p if :Jjsa.ssemb~er :;;::: t to zero ~ f riO heGp pr- i rr. t i r1:J o T j i nes to d i sp i Gi:J number of ! ines to !L (default) nt~mber· 40 . t:.L!U DDBG 68000 .EQU .EQU ~.!!-~-:!"" ~ 1=J i ...J - !.. ~ ~ - - : .,._ - tJ=::L::_41::i::i j r !i::£ l. !.... - u ii:! -! - !... ... - -- - ·1..JCL!i.,.-i!::i~::i==r" shouJ trGip nc:unes .PF;OC .NOLI ST \NCLUDE iNCLUDE iNCLUDE ~:Jit~:.dtu;i-m=AC ~l t i ctsm-S\·:SEQU ~ TE~:(T !NCLUDE ~:J.1.tkdb·;1-m;:~1a:: :l t i i:;sm-He(JpDe f s ~NCLUDE ~:J.;_ikdb9-mGc: / t_ ~ Gsm-sa:JsmGcs . TE)::T ~:. uJkdb9-rrP~C.:/t ~ c4sm-Gr:::;fEQU ~TEXT ~:J.ukdb!;1-mcie: / t i :::&sm-Too l EQU _TE)::T F TEXT .ENDC ~NCLUDE ~NCLUDE ~NCLUDE ~NCLUDE tiasm-GrafEQU.TEXT t l ::ism-Too ~ EQU . TEXT tlasm-HeapOefs.TEXT tlasm-sysmacs.TEXT r:r.Jr1t-· • ~il !t-:.:_. iF ~MCLUDE ~NCLUDE ~NCLUDE iMCLUDE ~NC:LUDE tiasm-GrafEQU.TEXT t ~ ctsm-T oo ~ EQU _TE)CT t I asm-HeapDefs. TE::<T tlasm-sysmacs.TEXT .ENDC ~LIST ~NCLUDE db9-rom4EQU . TE)::T equ::~tes/;9 I obG ~ jhCLUDE dtu;t- ~ ri 1 t TEXT [n:4S i c: ~NCLUOE dbg-cmds:.TEXT » INCLUDE db9- i o . TE:X:T ~NCLUDE :...Jf-H::! ..-i!-..-:-.-: +~-...-::-.. ;._; ",.i :--ft--* • -rr:··{T i :....., ....·.. ~ INCLUDE db9-heGp.TEXT INCLUDE db:J-dm . te}=~ t dt::~-pr i r! t . TE::(T iNCLUDE debt.f1;t9er ~2 more c:omm1:1nds defs in i t rs232/disp!ay stuff GtrGp stuff heG!p stuff memori:! d i sp i Gi:J c:ode printing utilities symbols code/table ~NCLUDE .ENDC ll:" ll ~NCLUDE .ENDC iMCLUDE .EMDC UJ i thD is db1;-D . TEXT