Changeset 28
- Timestamp:
- 08/02/09 02:18:59 (3 years ago)
- Location:
- trunk
- Files:
-
- 4 modified
-
includes/os2.inc (modified) (2 diffs)
-
page00/boot.asm (modified) (4 diffs)
-
page00/display.asm (modified) (1 diff)
-
page1D/1Dbase.asm (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/includes/os2.inc
r25 r28 27 27 ;====================================================================== 28 28 _keyscnlnk EQU 4A1Ah 29 _ getKey EQU 4972h29 _GetKey EQU 4972h 30 30 _Rec1stByteNC EQU 4EFDh 31 31 _RecAByteIO EQU 4F03h … … 295 295 lcdTurnOn EQU 03h 296 296 lcdXAutoIncrementMode EQU 05h 297 lcdYAutoIncrementMode EQU 07h 297 298 LCDdataPort EQU 11h 298 299 -
trunk/page00/boot.asm
r27 r28 10 10 EXTERN Placeholder005Fh,Placeholder0006h,Placeholder004Eh,Placeholder0003h,Placeholder0035h 11 11 EXTERN outputPage,NZIf83Plus,_ZERO_PORT_3,_OUT_PORT_3,AnimateRunIndicator,PowerOff 12 EXTERN DispHexA,DispHexHL,IPutC,ReadKeyboardKey,ReadKeypad 12 EXTERN DispHexA,DispHexHL,IPutC,ReadKeyboardKey,ReadKeypad,ClrLCDFull 13 13 EXTERN curBlink,resetAPDTimer,UpdateAPD,BCALL,BJUMP 14 14 EXTERN _HandleDefaultUSBInterrupt,_ReadUSBInterruptData,_HandleUSBInterruptInitialize … … 462 462 set onRunning,(iy+onFlags) 463 463 ;Start the OS, minimal as it is 464 call ClrLCDFull 464 465 res indicOnly,(iy+indicFlags) 465 466 call ReadKeypad … … 490 491 $$: ld hl,6 491 492 ld (curRow),hl 492 B_CALL getKey493 B_CALL GetKey 493 494 ld hl,7 494 495 ld (curRow),hl … … 535 536 536 537 StartBootLoader: 537 ld hl, 6538 ld hl,0 538 539 ld (curRow),hl 539 540 ld hl,sBoot 540 541 call PutS 542 BootLoaderKeyLoop: 543 B_CALL GetKey 544 cp skYEqu 545 jr z,$F 546 jr BootLoaderKeyLoop 547 $$: call ClrLCDFull 541 548 jr TurnCalculatorOn 542 sBoot: DB " Boot Loader",0543 549 sBoot: DB "Select Boot OS",0CEh,0 550 -
trunk/page00/display.asm
r16 r28 2 2 SEGMENT PAGE00 3 3 4 PUBLIC AnimateRunIndicator,DispHexA,PutS,PutC,curBlink,SaveOScreen,DispHexHL,EraseEOL 5 EXTERN IsAtEditTail,IsAtBtm 4 PUBLIC AnimateRunIndicator,DispHexA,PutS,PutC,curBlink,SaveOScreen,DispHexHL,EraseEOL,ClrLCDFull 5 EXTERN IsAtEditTail,IsAtBtm,LCDDelay 6 6 7 7 include "includes\os2.inc" 8 9 ClrLCDFull: 10 push af 11 ld hl,flags+shiftFlags 12 push hl 13 ld a,(hl) 14 and 1 15 push af 16 res 0,(hl) 17 ld b,128 18 ld a,0B8h 19 jr $F 20 di 21 $$: push bc 22 push af 23 call ClearRow 24 pop af 25 sub 8 26 pop bc 27 cp b 28 jr nc,$B 29 ei 30 nop 31 pop af 32 pop hl 33 or (hl) 34 ld (hl),a 35 pop af 36 ret 37 ClearRow: 38 di 39 ld d,a 40 ld e,20h 41 ClearRowLoop: 42 ld a,d 43 call SetLCDRow 44 call SetXAutoIncrementMode 45 ld b,8 46 ld a,e 47 call LCDDelay 48 out (LCDinstPort),a 49 $$: xor a 50 call LCDDelay 51 out (LCDdataPort),a 52 djnz $B 53 inc e 54 ld a,e 55 cp 2Ch 56 jr nz,ClearRowLoop 57 ret 58 59 SetLCDRow: 60 call SetYAutoIncrementMode 61 cp 80h 62 ret c 63 cp 0C0h 64 ret nc 65 call LCDDelay 66 out (LCDinstPort),a 67 ret 68 SetYAutoIncrementMode: 69 push af 70 ld a,lcdYAutoIncrementMode 71 $$: call LCDDelay 72 out (LCDinstPort),a 73 pop af 74 ret 75 SetXAutoIncrementMode: 76 push af 77 ld a,lcdXAutoIncrementMode 78 jr $B 8 79 9 80 SaveOScreen: -
trunk/page1D/1Dbase.asm
r22 r28 2 2 SEGMENT PAGE1D 3 3 4 PUBLIC _JErrorNo,_UnlockFlash,_ getKey4 PUBLIC _JErrorNo,_UnlockFlash,_GetKey 5 5 EXTERN JErrorNo,UnlockFlash,GetKey,keyscnlnk,Rec1stByteNC,RecAByteIO 6 6 … … 2424 2424 DW 0000h 2425 2425 DB 00h 2426 _ getKey:2426 _GetKey: 2427 2427 DW GetKey 2428 2428 DB 01h
