Changeset 55 for trunk/page00/boot.asm

Timestamp:

10/11/09 23:33:32 (3 years ago)

Author:

brandonlw

Message:

We now have a basic menu system and the beginnings of an oncalc hex editor
I also was forced to duplicate PutMap? instead of using the boot code hack, since it doesn't support inverse text
Progress...

Files:

• trunk/page00/boot.asm (modified) (5 diffs)

trunk/page00/boot.asm

@@ -4 +4 @@
  include "includes\os2.inc"
 
- PUBLIC LdHLInd,BCALLRoutine,CheckForBootLoader,OS2Marker,AppInit
+ PUBLIC LdHLInd,BCALLRoutine,CheckForBootLoader,OS2Marker,AppInit,JForceCmdNoChar,JForceCmd
  EXTERN PutS,PutC,ifastcopy,CallUSBActivityHook,CheckLowBatteriesTurnOff,SaveOScreen
  EXTERN RunLinkActivityHook,HandleLinkKeyActivity,ResetStacks,_LCD_DRIVERON
  EXTERN _APP_PUSH_ERRORH,_APP_POP_ERRORH,FindSym,PushRealO1,Mov9ToOP1,FPAdd,OP1ToOP2,LCDDelay
  EXTERN Placeholder005Fh,Placeholder0006h,Placeholder004Eh,Placeholder0003h,Placeholder0035h
- EXTERN outputPage,NZIf83Plus,_ZERO_PORT_3,_OUT_PORT_3,AnimateRunIndicator,PowerOff
+ EXTERN outputPage,NZIf83Plus,_ZERO_PORT_3,_OUT_PORT_3,AnimateRunIndicator,PowerOff,clrTR
  EXTERN DispHexA,DispHexHL,IPutC,ReadKeyboardKey,ReadKeypad,ClrLCDFull,InitHomescreenContext
  EXTERN curBlink,resetAPDTimer,UpdateAPD,BCALL,BJUMP,CopyRAMToFlashPage,cphlde,CalculateOSChecksum
@@ -15 +15 @@
  EXTERN _HandleUSBACablePluggedIn,_HandleUSBACableUnplugged,_HandleUSBBCablePluggedIn,_HandleUSBBCableUnplugged
  EXTERN GetHexA,GetHexHL,CursorOff,RunIndicOn,SetFastSpeed,CanAlph,homescreenContextVectors,SetContrast,_PULLDOWNCHK
+ EXTERN savepartialWin
 
 ;0000h:
@@ -494 +495 @@
        ld hl,0800h
        ld (winTop),hl
+       set appTextSave,(iy+appFlags)
        B_CALL ClrScrnFull
        ld hl,userMem
@@ -516 +518 @@
        call APP_PUSH_ERRORH
        ld (onSP),sp
+       ld a,lcdTurnOn
+       out (LCDinstPort),a
+       set onRunning,(iy+onFlags)
+       res indicOnly,(iy+indicFlags)
+       set indicRun,(iy+indicFlags)
+       set curAble,(iy+curFlags)
+       set apdAble,(iy+apdFlags)
+       set apdRunning,(iy+apdFlags)
+       xor a
+       ld (menuCurrent),a
+       ld a,appStart
+       call _newContext0
+       call ResetStacks
+       ld hl,0205h
+       ld (curRow),hl
+       res appTextSave,(iy+appFlags)
+       ld hl,sRAMCleared
+       call PutS
+       set appTextSave,(iy+appFlags)
+       call savepartialWin
+       ld hl,0
+       ld (curRow),hl
+       B_CALL GetKey
+       push af
+       B_CALL ClrLCDFull
+       pop af
+       jr _monForceKey
 $$:    ;Screw up the RAM checksum so it's no longer valid
+       ld de,(RAMChecksum)
        dec de
        ld (RAMChecksum),de
@@ -540 +570 @@
        call ResetStacks
        set appTextSave,(iy+appFlags)
+       call savepartialWin
 RestartMon:
 _Mon:  xor a
        ld (kbdKey),a
-       ld (8446h),a
+       ld (keyExtend),a
        B_CALL GetKey
 _monForceKey:
        ld (kbdKey),a
+       cp kQuit
+       jr z,doContextSwitch
+       push af
        call CursorOff
        call RunIndicOn
+       pop af
        call _PULLDOWNCHK
+       jr c,RestartMon
+       call clrTR
        jr c,RestartMon
        call CallcxMain
        jr _Mon
+doContextSwitch:
+       call _newContext0
+       jr RestartMon
+JForceCmdNoChar:
+       xor a
+JForceCmd:
+       ld sp,(onSP)
+       ld a,appStart
+       call _newContext0
+       jr _Mon
+sRAMCleared:
+       DB "RAM cleared",0
+
 CallcxMain:
        push hl