Changeset 50 for trunk/page01/01base.asm
- Timestamp:
- 10/11/09 00:52:29 (3 years ago)
- Files:
-
- 1 modified
-
trunk/page01/01base.asm (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/page01/01base.asm
r48 r50 9 9 10 10 GetKey: 11 GetKeyStart: 12 xor a 13 GetKeyMainLoop: 14 call DisplayShift 15 call showCursor 16 set apdRunning,(iy+apdFlags) 17 restartKeyLoop: 11 18 in a,(statusPort) 12 19 and STATUS_NON_83P_MASK 13 20 jr z,GetKeyStart 14 ;set linkAssistEnabled,(iy+linkAssistFlags)15 ;in a,(laStatusPort)16 ;xor a17 ;out (laEnPort),a18 21 bit 0,(iy+3Eh) 19 22 jr z,disableLA … … 29 32 ld a,80h 30 33 out (8),a 31 GetKeyStart:32 xor a33 GetKeyMainLoop:34 call DisplayShift35 call showCursor36 set apdRunning,(iy+apdFlags)37 restartKeyLoop:38 34 set enableHW2Timer,(iy+interruptFlags) 39 35 bit onInterrupt,(iy+onFlags)
