Return to whasm.asm CVS log

Up to [Witchaven I] / src

Annotation of src/whasm.asm, revision 1.1

1.1     ! root        1: ;/***************************************************************************
        !             2: ; *   TEKASM.ASM  - assembly code for Tekwar game                           *
        !             3: ; *                                                                         *
        !             4: ; *                                                      3/29/95 Jeff S.    *
        !             5: ; ***************************************************************************/
        !             6:                                         
        !             7: ; WATCOM C/C++ Assembler (WASM.EXE) Template.
        !             8: ; Written by Keith Harrison CIS:100431,1675 16th Nov 1994.
        !             9: 
        !            10:                                  
        !            11:                  .586p     ; 386, 486, Pentium
        !            12: 
        !            13:                  ; Declare non-parameter registers that you alter as
        !            14:                  ; a #pragma in the C++ file.
        !            15: 
        !            16:                  ASSUME  CS:_TEXT
        !            17:                  ASSUME  DS:_DATA
        !            18: 
        !            19: 
        !            20: _DATA           SEGMENT 'DATA' USE32
        !            21: 
        !            22: return_code     dd      0
        !            23: integer_data    dd      0
        !            24: 
        !            25: _DATA           ENDS
        !            26: 
        !            27: 
        !            28: _TEXT           SEGMENT PUBLIC 'CODE' USE32
        !            29: 
        !            30: ;
        !            31: ; (template to follow)
        !            32: ;
        !            33: ;     On entry: eax = pointer to integer number,
        !            34: ;               ebx = value to store at address eax.
        !            35: ;
        !            36: ;asm_main_       PROC    NEAR
        !            37: ;                
        !            38: ;                call    protected_code  ; Call your own code...
        !            39: ;                cld                     ; Direction bit must be clear on exit.
        !            40: ;                mov     eax, [return_code]; EAX = return value (if required).
        !            41: ;                ret
        !            42: ;
        !            43: ;asm_main_       ENDP
        !            44: 
        !            45:                                         PUBLIC  asmwaitvrt_      ; Note underscore AFTER function name.
        !            46: 
        !            47: asmwaitvrt_     PROC    NEAR
        !            48:                                         
        !            49: @@wait:
        !            50:                                         xor     edx,edx
        !            51:                                         xor     eax,eax
        !            52:                                         xor dx, 0x03DA
        !            53: 
        !            54:                                         ; ecx loaded via param
        !            55: 
        !            56:                                         ; wait for a display signal to make sure the raster isn't 
        !            57:                                         ; in the middle of a sync
        !            58: @@waitnosync:
        !            59:                        in al,dx
        !            60:                          test   al,8
        !            61:                          jnz @@waitnosync
        !            62: 
        !            63: @@waitsync:
        !            64:                        in al,dx
        !            65:                          test   al,8
        !            66:                          jz  @@waitsync
        !            67: 
        !            68:                          loop   @@waitnosync
        !            69: 
        !            70:                                         cld                      ; Direction bit must be clear on exit.
        !            71:                                         ret
        !            72: 
        !            73: asmwaitvrt_     ENDP
        !            74: 
        !            75:                                         PUBLIC  asmsetpalette_ 
        !            76: 
        !            77: asmsetpalette_  PROC    NEAR
        !            78:                                         
        !            79:                                         ; pal ptr passed in esi
        !            80:                                         xor     eax, eax
        !            81:                          mov edx,0x000003C8   ; PEL_WRITE_ADR
        !            82:                          out dx,al
        !            83:                          mov edx,0x000003C9   ; PEL_DATA
        !            84: 
        !            85:                                         mov  cx,256
        !            86: @@setloop:
        !            87:                        lodsb
        !            88:                          out dx,al
        !            89:                        lodsb
        !            90:                        out   dx,al
        !            91:                        lodsb
        !            92:                        out   dx,al
        !            93:                        loop  @@setloop
        !            94: 
        !            95:                                         cld      
        !            96:                                         ret
        !            97: 
        !            98: asmsetpalette_  ENDP
        !            99: 
        !           100: _TEXT           ENDS
        !           101: 
        !           102:                                         END

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.