/[projet1]/users/chema/1337intro/shipscenes.s
Defence Force logotype

Diff of /users/chema/1337intro/shipscenes.s

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 389 by Chema, Sun Sep 5 16:39:43 2010 UTC revision 390 by Chema, Mon Sep 6 17:22:30 2010 UTC
# Line 1  Line 1 
1  #define OBS  osdk_end  #define OBS  osdk_end
2  #define DODBUG  #define DODBUG
3    //#define NOSTARSINLOGO
4    
5   // Positions   // Positions
6    
# Line 25  frame_count .byt 00 Line 25  frame_count .byt 00
25    
26  _InitTestCode  _InitTestCode
27  .(  .(
28                     jsr INITSTAR
29    +_ReInit3D
30           lda #<OBS        ;Object records           lda #<OBS        ;Object records
31           ldy #>OBS           ldy #>OBS
32           jsr Init3D           jsr Init3D
                  jsr INITSTAR  
33           jmp _DoubleBuffOn           jmp _DoubleBuffOn
34  .)  .)
35    
# Line 86  loopp Line 87  loopp
87  .)  .)
88    
89    
90    
91  _Test1337  _Test1337
92  .(  .(
93    
# Line 161  l1  lda OCEN13,Y Line 163  l1  lda OCEN13,Y
163      lda #$10      lda #$10
164      sta frame_count      sta frame_count
165  loop  loop
         ;jsr _UpdateFrame  
   
166          ldx #4          ldx #4
167    
168    .(    .(
# Line 226  loopp Line 226  loopp
226      lda #$10      lda #$10
227      sta frame_count      sta frame_count
228  loop  loop
229          ;jsr _UpdateFrame  #ifndef NOSTARSINLOGO
230          ldx VOB          jsr _UpdateFrame
231          jsr SetCurOb  #else
232      jsr CalcView          jsr _UpdateFrameNoStars
233      jsr SortVis  #endif
     jsr clr_hires2  
     jsr DrawAllVis   ;Draw objects  
     jsr dump_buf  
234    
235    
236          ldx #4          ldx #4
# Line 310  loopp Line 307  loopp
307  #endif  #endif
308      sta frame_count      sta frame_count
309  loop  loop
310          ;jsr _UpdateFrame  #ifndef NOSTARSINLOGO
311          ldx VOB          jsr _UpdateFrame
312          jsr SetCurOb  #else
313      jsr CalcView          jsr _UpdateFrameNoStars
314      jsr SortVis  #endif
     jsr clr_hires2  
     jsr DrawAllVis   ;Draw objects  
     jsr dump_buf  
   
   
315          ldx #4          ldx #4
316          jsr goforit          jsr goforit
317          ldx #3          ldx #3
# Line 343  loop Line 335  loop
335  .)  .)
336    
337    
338    #ifdef NOSTARSINLOGO
339    _UpdateFrameNoStars
340    .(
341            ldx VOB
342            jsr SetCurOb
343        jsr CalcView
344        jsr SortVis
345        jsr clr_hires2
346        jsr DrawAllVis   ;Draw objects
347        jmp dump_buf
348    .)
349    #endif
350    
351    
352    
353  _FirstScene  _FirstScene
354  .(  .(
355    

Legend:
Removed from v.389  
changed lines
  Added in v.390

  ViewVC Help
Powered by ViewVC 1.1.26