home *** CD-ROM | disk | FTP | other *** search
/ Amiga ACS 1998 #6 / amigaacscoverdisc1998-061998.iso / games / descent / source / 3d / setup.asm < prev    next >
Assembly Source File  |  1998-06-08  |  5KB  |  196 lines
  1. ;THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
  2. ;SOFTWARE CORPORATION ("PARALLAX").  PARALLAX, IN DISTRIBUTING THE CODE TO
  3. ;END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
  4. ;ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
  5. ;IN USING, DISPLAYING,  AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
  6. ;SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
  7. ;FREE PURPOSES.  IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
  8. ;CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES.  THE END-USER UNDERSTANDS
  9. ;AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.  
  10. ;COPYRIGHT 1993-1998 PARALLAX SOFTWARE CORPORATION.  ALL RIGHTS RESERVED.
  11. ;
  12. ; $Source: f:/miner/source/3d/rcs/setup.asm $
  13. ; $Revision: 1.13 $
  14. ; $Author: matt $
  15. ; $Date: 1995/02/09 22:00:53 $
  16. ;
  17. ; Source for setup,close,start & end frame routines
  18. ;
  19. ; $Log: setup.asm $
  20. ; Revision 1.13  1995/02/09  22:00:53  matt
  21. ; Removed dependence on divide overflow handler; we now check for overflow
  22. ; before dividing.  This fixed problems on some TI chips.
  23. ; 
  24. ; Revision 1.12  1994/11/10  21:29:48  mike
  25. ; call init_interface_vars_to_assembler.
  26. ; 
  27. ; Revision 1.11  1994/10/03  12:50:54  matt
  28. ; Fixed stupid mistake
  29. ; 
  30. ; Revision 1.10  1994/10/03  12:50:12  matt
  31. ; Took out unused routines & data
  32. ; 
  33. ; Revision 1.9  1994/07/25  00:00:05  matt
  34. ; Made 3d no longer deal with point numbers, but only with pointers.
  35. ; 
  36. ; Revision 1.8  1994/04/19  18:26:43  matt
  37. ; Added g3_draw_sphere() function.
  38. ; 
  39. ; Revision 1.7  1994/03/15  21:21:58  matt
  40. ; Put in check for div overflow in blob code
  41. ; 
  42. ; Revision 1.6  1994/02/10  18:00:43  matt
  43. ; Changed 'if DEBUG_ON' to 'ifndef NDEBUG'
  44. ; 
  45. ; Revision 1.5  1994/01/28  13:07:50  matt
  46. ; Added func, g3_get_view_pos_ptr_, sortof a hack, for the polygon objects.
  47. ; 
  48. ; Revision 1.4  1994/01/14  17:19:50  matt
  49. ; Added check for no points in start_frame()
  50. ; 
  51. ; Revision 1.2  1993/11/04  18:49:18  matt
  52. ; Added system to only rotate points once per frame
  53. ; 
  54. ; Revision 1.1  1993/10/29  22:20:27  matt
  55. ; Initial revision
  56. ; 
  57. ;
  58. ;
  59.  
  60. .386
  61.     option    oldstructs
  62.  
  63.     .nolist
  64.     include    types.inc
  65.     include    psmacros.inc
  66.     include    gr.inc
  67.     include    3d.inc
  68.     include    div0.inc
  69.     .list
  70.  
  71.     assume    cs:_TEXT, ds:_DATA
  72.  
  73. _DATA    segment    dword public USE32 'DATA'
  74.  
  75. rcsid    db    "$Id: setup.asm 1.13 1995/02/09 22:00:53 matt Exp $"
  76.     align    4
  77.  
  78.  extd free_point_num
  79.  
  80. _DATA    ends
  81.  
  82.  
  83.  
  84. _TEXT    segment    dword public USE32 'CODE'
  85.  
  86.     extn    init_interface_vars_to_assembler_
  87.     extn    atexit_    ;C library function
  88.  
  89. ;I don't what these are supposed to do, but here they are.
  90.  
  91. ;sets up divide overflow handler, and sets the global points variables. 
  92. ;takes eax=points, edx=vecs, ecx=num points
  93. ;trashes eax,edx
  94. g3_init:
  95.     mov    eax,DM_ERROR
  96.     call    div0_init_
  97.     or    eax,eax    ;check error
  98.     jnz    dz_ok
  99.     int    3
  100. dz_ok:
  101.  
  102. ;;@@;handlers for point projection
  103. ;;@@    lea    eax,cs:proj_div0
  104. ;;@@    lea    edx,cs:div_overflow_handler
  105. ;;@@    call    div0_set_handler_
  106. ;;@@
  107. ;;@@    lea    eax,cs:proj_div1
  108. ;;@@    lea    edx,cs:div_overflow_handler
  109. ;;@@    call    div0_set_handler_
  110. ;;@@
  111. ;;@@;handlers for blob draw
  112. ;;@@    lea    eax,cs:blob_div0
  113. ;;@@    lea    edx,cs:blob_overflow_handler
  114. ;;@@    call    div0_set_handler_
  115. ;;@@
  116. ;;@@    lea    eax,cs:blob_div1
  117. ;;@@    lea    edx,cs:blob_overflow_handler
  118. ;;@@    call    div0_set_handler_
  119. ;;@@
  120. ;;@@;handler for sphere projection
  121. ;;@@    lea    eax,cs:sphere_proj_div
  122. ;;@@    lea    edx,cs:sphere_div_overflow_handler
  123. ;;@@    call    div0_set_handler_
  124. ;;@@
  125.  
  126.     lea    eax,cs:g3_close
  127.     call    atexit_
  128.  
  129.     ret
  130.  
  131.  
  132. g3_close:    ret
  133.  
  134.  
  135. ;cv_bitmap equ 0
  136. ;bm_w equ 4
  137. ;bm_h equ 6
  138.  
  139. ;start rendering a frame. sets up window vars
  140. g3_start_frame:    pushm    eax,edx,esi
  141.  
  142.     mov    esi,grd_curcanv
  143.  
  144.     movzx    eax,w [esi].cv_bitmap.bm_w
  145.     mov    Canvas_width,eax    ;store width
  146.     sal    eax,15    ;get fixed-point width/2
  147.     mov    Canv_w2,eax
  148.  
  149.     movzx    eax,w [esi].cv_bitmap.bm_h
  150.     mov    Canvas_height,eax    ;store height
  151.     sal    eax,15    ;get fixed-point height/2
  152.     mov    Canv_h2,eax
  153.  
  154. ;compute aspect ratio for this canvas
  155.     mov    esi,grd_curscreen
  156.     mov    eax,[esi].sc_aspect    ;get pixel ratio
  157.     imul    Canvas_height    ;figure in window size
  158.     idiv    Canvas_width
  159.  
  160.     cmp    eax,f1_0    ; > 1?
  161.     jg    scale_y
  162.     mov    Window_scale.x,eax
  163.     mov    Window_scale.y,f1_0
  164.     jmp    got_win_scale
  165. scale_y:    mov    esi,eax
  166.     mov    eax,f1_0
  167.     fixdiv    esi
  168.     mov    Window_scale.y,eax
  169.     mov    Window_scale.x,f1_0
  170. got_win_scale:    mov    Window_scale.z,f1_0    ;always 1
  171.  
  172.     call    init_interface_vars_to_assembler_
  173.  
  174.     popm    eax,edx,esi
  175.     ret
  176.  
  177. ;this doesn't do anything, but is here for completeness
  178. g3_end_frame:
  179.     ifndef    NDEBUG
  180.      test    free_point_num,-1
  181.      ;break_if    nz,"Error: free_point_num != 0 in g3_end_frame"
  182.      ;Commented the above line out, so it would compile
  183.     endif
  184.     ret
  185.  
  186.  
  187. ;@@ public g3_get_view_pos_ptr_
  188. ;@@g3_get_view_pos_ptr_:
  189. ;@@    lea    eax,View_position
  190. ;@@    ret
  191.  
  192.  
  193. _TEXT    ends
  194.  
  195.     end
  196.