RIP test

art/anim_exported.asm

@@ -462,3 +462,41 @@ gamescreen_l_ph3p14  ; phase 3 page 14
   dta $01,$01,$82,$CF,$CE,$46,$45,$44,$C3,$42,$41,$1D,$1E,$9F,$A0,$A1,$A2,$A3,$A4,$25,$26,$01,$01,$01,$01,$01,$01,$03,$01,$1D,$1E,$9F
   dta $01,$01,$01,$F5,$F4,$F4,$F4,$F4,$F3,$01,$01,$1D,$1E,$9F,$A0,$A1,$A2,$A3,$A4,$25,$26,$01,$01,$01,$01,$01,$01,$01,$01,$1D,$1E,$9F
   dta $01,$01,$01,$7B,$7A,$79,$78,$77,$76,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$1D,$1E,$9F
+
+; RIP screens    
+RIPscreen_l_nobranch  ; page 1
+  dta $03,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01
+  dta $01,$01,$01,$02,$6E,$6F,$70,$71,$03,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$02,$01,$01,$01,$01,$01,$01,$01,$02,$01,$01
+  dta $01,$03,$01,$01,$76,$72,$73,$74,$01,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$01,$01,$01,$01,$03,$01,$01,$01,$01,$01,$01
+  dta $01,$01,$01,$01,$76,$77,$77,$79,$82,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$03,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01
+  dta $01,$01,$01,$01,$76,$78,$78,$79,$01,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$01,$01,$01,$82,$01,$01,$01,$01,$01,$01,$01
+  dta $01,$01,$82,$7C,$75,$7D,$6D,$7E,$7F,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$01,$01,$01,$01,$01,$01,$03,$01,$01,$01,$01
+  dta $01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01
+  dta $01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01
+RIPscreen_r_nobranch  ; page 2
+  dta $03,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01
+  dta $01,$01,$01,$02,$01,$01,$01,$01,$03,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$02,$01,$01,$6E,$6F,$70,$71,$01,$02,$01,$01
+  dta $01,$03,$01,$01,$01,$01,$01,$01,$01,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$01,$01,$01,$76,$72,$73,$74,$01,$01,$01,$01
+  dta $01,$01,$01,$01,$03,$01,$01,$01,$82,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$03,$01,$01,$76,$77,$77,$79,$01,$01,$01,$01
+  dta $01,$01,$01,$01,$01,$01,$01,$03,$01,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$01,$01,$01,$76,$78,$78,$79,$01,$01,$01,$01
+  dta $01,$01,$82,$01,$01,$01,$01,$01,$01,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$01,$01,$7C,$75,$6D,$7D,$7E,$7F,$01,$01,$01
+  dta $01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01
+  dta $01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01
+RIPscreen_l_branch  ; page 3
+  dta $03,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01
+  dta $01,$01,$01,$02,$6E,$6F,$70,$71,$03,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$02,$01,$01,$01,$01,$01,$01,$01,$02,$01,$01
+  dta $01,$03,$01,$01,$76,$72,$73,$74,$01,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$01,$01,$01,$01,$03,$01,$01,$01,$01,$01,$01
+  dta $01,$01,$01,$E9,$76,$77,$77,$79,$EA,$EB,$EC,$A5,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$03,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01
+  dta $01,$01,$01,$01,$76,$78,$78,$79,$E6,$E7,$E8,$A5,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$01,$01,$01,$82,$01,$01,$01,$01,$01,$01,$01
+  dta $01,$01,$82,$7C,$75,$7D,$6D,$7E,$7F,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$01,$01,$01,$01,$01,$01,$03,$01,$01,$01,$01
+  dta $01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$1D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01
+  dta $01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$1D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$26,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01
+RIPscreen_r_branch  ; page 4
+  dta $03,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01
+  dta $01,$01,$01,$02,$01,$01,$01,$01,$03,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$02,$01,$01,$6E,$6F,$70,$71,$01,$02,$01,$01
+  dta $01,$03,$01,$01,$01,$01,$01,$01,$01,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$01,$01,$01,$76,$72,$73,$74,$01,$01,$01,$01
+  dta $01,$01,$01,$01,$03,$01,$01,$01,$82,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$9E,$E2,$E3,$E4,$76,$77,$77,$79,$E5,$01,$01,$01
+  dta $01,$01,$01,$01,$01,$01,$01,$03,$01,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$9E,$DF,$E0,$E1,$76,$78,$78,$79,$01,$01,$01,$01
+  dta $01,$01,$82,$01,$01,$01,$01,$01,$01,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$01,$01,$7C,$75,$6D,$7D,$7E,$7F,$01,$01,$01
+  dta $01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01
+  dta $01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$9D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$A6,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01

art/lumberjack_export.py

@@ -238,3 +238,25 @@ print_lines(dta, -9, -1)
 print('gamescreen_l_ph3p14  ; phase 3 page 14')
 dta = load_atrview('phase3l.atrview', page=14)
 print_lines(dta, -9, -1)
+
+print("""
+; RIP screens    
+RIPscreen_l_nobranch  ; page 1""")
+with open('rip.atrview', 'rb') as f:
+    pj=json.loads(f.read().decode('utf-8-sig'))
+dta = pj['Pages'][0]['View']
+dta = [dta[i*80:(i+1)*80][:64] for i in range(len(dta)//80)]
+for l, d in enumerate(dta[-9:-1], 1):
+    print(f'  dta '+','.join([f'${d[i:i+2]}' for i in range(0, len(d), 2)]))
+
+print('RIPscreen_r_nobranch  ; page 2')
+dta = load_atrview('rip.atrview', page=2)
+print_lines(dta, -9, -1)
+
+print('RIPscreen_l_branch  ; page 3')
+dta = load_atrview('rip.atrview', page=3)
+print_lines(dta, -9, -1)
+
+print('RIPscreen_r_branch  ; page 4')
+dta = load_atrview('rip.atrview', page=4)
+print_lines(dta, -9, -1)

lumber.asm

@@ -416,6 +416,7 @@ no_2branch_l
     jsr AnimationL1
     jmp go_loop
 LevelDeath
+    jsr SetRIPscreen
     mva #2 StateFlag
     mva RANDOM COLBAK
     jsr GetKeyFast
@@ -441,7 +442,33 @@ LevelOver
 ;--------------------------------------------------
     icl 'art/animations.asm'
 ;--------------------------------------------------
-
+;--------------------------------------------------
+.proc SetRIPscreen
+;--------------------------------------------------
+    WaitForSync
+    mva #>font_game_rip LowCharsetBase
+    lda LumberjackDir    ; branch and Lumerjack ?
+    cmp branches_list+5
+    beq BranchDeath
+    ;no branch
+    cmp #1
+    bne leftside
+    ; right branch
+    mwa #RIPscreen_r_nobranch animation_addr
+    rts
+leftside
+    mwa #RIPscreen_l_nobranch animation_addr
+    rts    
+BranchDeath
+    cmp #1
+    bne leftbranch
+    ; right branch
+    mwa #RIPscreen_r_branch animation_addr
+    rts
+leftbranch
+    mwa #RIPscreen_l_branch animation_addr
+    rts
+.endp
 ;--------------------------------------------------
 .proc AudioInit
 ;--------------------------------------------------