diff options
| author | Christian A. Weber <chris@gna.ch> | 2020-06-30 04:05:46 +0200 |
|---|---|---|
| committer | Christian A. Weber <chris@gna.ch> | 2020-06-30 04:05:46 +0200 |
| commit | 2463fb307217ec70078ee7a4c4755f879d18823a (patch) | |
| tree | 42343432b5d0023312f9445a61b7fcd492fd28d8 /Keyboard.S | |
| parent | 74b34af0a91a0303859da828f1fd568217214450 (diff) | |
| download | gameexec-2463fb307217ec70078ee7a4c4755f879d18823a.tar.gz gameexec-2463fb307217ec70078ee7a4c4755f879d18823a.tar.bz2 gameexec-2463fb307217ec70078ee7a4c4755f879d18823a.zip | |
Debug-Output optimiert
Diffstat (limited to 'Keyboard.S')
| -rw-r--r-- | Keyboard.S | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -94,8 +94,8 @@ ExitKeyFunc: movem.l d1-d2/a0-a1/a6,-(SP) JSRLIB CloseDevice movea.l d2,a1 ; IO-Request - ;; MSG <"Trying to DeleteIO (a1)"> - ;; bsr @DeleteIO ; freigeben + ;;; SMSG <"Deleting Keyboard IO-Request $%08lx">,a1 + bsr @DeleteIO ; freigeben clr.l InputIOReq 1$: movem.l (SP)+,d1-d2/a0-a1/a6 @@ -290,6 +290,7 @@ keydown: cmpi.b #$60,d0 ; shift, alt, ctrl amiga etc. ? addi.w #$60,d0 ; shift: Daten aus Tabelle 2 2$: movea.l KeyMapPtr,a0 ; Zeiger auf aktuelle Keymap move.b 0(a0,d0.w),d0 + SMSG <"Key pressed: '%lc' (%ld)">,d0,d0 move.b d0,meb_ActualASCIIKey(a6) beq.s keyend ; wenn 0: ignorieren move.w KeyBufPtr,d1 ; D0 in den Tastaturpuffer |