Changeset 60 for trunk/page00/boot.asm

Timestamp:

11/08/09 18:23:13 (3 years ago)

Author:

brandonlw

Message:

More attempts to stabilize dual booting

Files:

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

trunk/page00/boot.asm

@@ -6 +6 @@
  PUBLIC LdHLInd,BCALLRoutine,CheckForBootLoader,OS2Marker,AppInit,JForceCmdNoChar,JForceCmd
  EXTERN PutS,PutC,ifastcopy,CallUSBActivityHook,CheckLowBatteriesTurnOff,SaveOScreen
- EXTERN RunLinkActivityHook,HandleLinkKeyActivity,ResetStacks,_LCD_DRIVERON,NZIf84PlusSeries
+ EXTERN RunLinkActivityHook,HandleLinkKeyActivity,ResetStacks,LCD_DRIVERON,NZIf84PlusSeries
  EXTERN _APP_PUSH_ERRORH,_APP_POP_ERRORH,FindSym,PushRealO1,Mov9ToOP1,FPAdd,OP1ToOP2,LCDDelay
  EXTERN Placeholder005Fh,Placeholder0006h,Placeholder004Eh,Placeholder0003h,Placeholder0035h
@@ -18 +18 @@
 
 ;0000h:
-boot:  jp BootCalculator
+boot:  jp JumpToBootCode
 ;0003h:
        jp Placeholder0003h
@@ -418 +418 @@
        ret
 
+JumpToBootCode:
+       in a,(statusPort)
+       and STATUS_NON_83P_MASK
+       ld a,1Fh
+       jr z,$F
+       ld a,3
+       out (0Eh),a ;not sure yet
+       ld a,7Fh
+$$:    out (memPageAPort),a
+       ld a,7
+       out (4),a
+       ld hl,812Ch
+       in a,(statusPort)
+       and STATUS_84P_SERIES_MASK
+       jr nz,$F
+       ld hl,80D5h
+$$:    jp (hl)
+       xor a
 BootCalculator:
        di
@@ -494 +512 @@
        ld a,17h ;default contrast level
        ld (contrast),a
-       call _LCD_DRIVERON
+       call LCD_DRIVERON
        ld hl,0800h
        ld (winTop),hl
@@ -520 +538 @@
        call APP_PUSH_ERRORH
        ld (onSP),sp
-       call _LCD_DRIVERON
+       call LCD_DRIVERON
        set onRunning,(iy+onFlags)
        res indicOnly,(iy+indicFlags)
@@ -552 +570 @@
        ld (RAMChecksum),de
 TurnCalculatorOn:
-       call _LCD_DRIVERON
+       call LCD_DRIVERON
        set onRunning,(iy+onFlags)
        res indicOnly,(iy+indicFlags)
@@ -765 +783 @@
        nop
        in a,(1)
-       and 07Fh
+       bit 7,a
        ld a,0FFh
        out (1),a
@@ -777 +795 @@
 ;We need to put a loader in RAM and call that, which might return and we're good, or it'll switch OSes.
 ;TODO: this whole thing needs to run from RAM and depend on neither OS (or both, you might say)
+       ld a,81h
+       out (memPageBPort),a
+       xor a
+       out (memPageCPort),a
        ld a,(OS2Marker)
        or a
@@ -787 +809 @@
        jp userMem
 BootLoader:
+       B_CALL LCD_DRIVERON
        res indicOnly,(iy+indicFlags)
        res curAble,(iy+curFlags)
@@ -796 +819 @@
        ld hl,2
        ld (curRow),hl
-       call NZIfTIOSExists-BootLoader+userMem
+       call DoesSecondOSExist-BootLoader+userMem
        jp z,ReceiveTIOS-BootLoader+userMem
        ;We have the TI-OS, decide to make the switch or not
@@ -835 +858 @@
        jr nz,bootSelectKeyLoop
        ;We pressed CLEAR, just reset and boot whatever it is that we are
-       B_CALL ClrLCDFull
+;       B_CALL ClrLCDFull
+       xor a
+       out (memPageBPort),a
        rst 00h
 contrastUp:
@@ -944 +969 @@
        jr nz,$B
        ;Restart.
-       B_CALL ClrLCDFull
+       ld hl,0
+       ld (RAMChecksum),hl
+;       B_CALL ClrLCDFull
+;       B_CALL PowerOff
        rst 00h
 DeleteOS:
@@ -953 +981 @@
        B_CALL WriteAByte
        ;Restart.
+       xor a
+       out (memPageBPort),a
        rst 00h
 ReceiveTIOS:
@@ -965 +995 @@
        ld hl,2
        ld (curRow),hl
-       call NZIfTIOSExists-BootLoader+userMem
+       call DoesSecondOSExist-BootLoader+userMem
        ld hl,sStartTransfer2-BootLoader+userMem
        jr nz,$F
@@ -982 +1012 @@
 $$:    B_CALL ClrLCDFull
        jp TurnCalculatorOn
-NZIfTIOSExists:
+DoesSecondOSExist:
        in a,(memPageAPort)
        push af
@@ -992 +1022 @@
        jr z,$F
        xor a
-       jr NZIfTIOSExists_1
+       jr DoesSecondOSExist_1
 $$:    or 1
-NZIfTIOSExists_1:
+DoesSecondOSExist_1:
        pop bc
        ld a,b
@@ -1214 +1244 @@
        DB LlBrack,"CLEAR] to exit",0
 sStartTransfer:
-       DB "TI-OS not found."
+       DB "OS not found.   "
 sStartTransfer2:
-       DB "Send TI-OS now  "
-       DB "to enable dual  "
-       DB "booting.",0
+       DB "Send secondary  "
+       DB "OS now to enable"
+       DB "dual booting.",0
 sSwitching:
        DB "Switching...",0