jueves, 28 de marzo de 2013

Codigo Fuente de Tennis y otros

Curt Vendel libero varios códigos fuentes, entre ellos el de Atari Tennis... mirando el código hay varias cosas graciosas, tal como:

Por lo visto el jugador controlado por el juego se llama Fred  :-)

EJECT
;*********************************************************************
;*                                                                   *
;*                      "PROTECT AND SERVE"                          *
;*                                                                   *
;*********************************************************************

INCLUDE D2:SECURITY.800



EJECT
;*********************************************************************
;* Q: WHAT DID TARZAN SAY WHEN HE SAW THE CHARACTOR SETS COMING?     *
;*                                                                   *
;* A: "HERE COME THE CHARACTOR SETS."                                *
;*********************************************************************   

LDA    PLRFLG,X    ;IS THIS CLOWN SERVING?

    AND    GAMFLG    ;RESET D0 ("NOT CONTROLLED BY `FRED'")

    BNE    :60    ;BRANCH IF NOT CONTROLLED BY FRED.

;    HUMAN VS FRED DOUBLES.


CUPDSP    PROC

    SEI
    LDA    #0
    STA    SDMCTL            ;SHADOW DMA CONTROL.
    STA     DMACTL            ;SHUT IT DOWN, NOW!!!
    STA    NMIEN            ;NO VBLANK OR DL INTERRUPTS.

    STA    BALSND            ;QUIET PLEASE.
    STA    RAQSND
   
;    GET THE PLAYERS THE HELL OUT OF THE WAY!



:60$:       
; IS THIS A NTSC OR A PAL SYSTEM?

    LDY    #$00
    LDA    PAL
    AND    #$0E    ;FOR HCD NTSC=$0E & PAL=00.
    BEQ    INIT10    ; BRANCH IF PAL SYSTEM.

    LDY    #$2B    ; 17 PERCENT SLOWER FOR NTSC
   

   
SELTXT:    DB    '            '  ;00
    DB    'INTERMEDIATE'  ;0C
    DB    ' ADVANCED   '  ;18
    DB    ' PAUSE MODE '  ;24
    DB    ' AUTOMATED  '  ;30
    DB    ' TIEBREAKER '  ;3C
    DB    'PLR 1&3'  ;48
    DB    'PLR 2&4'  ;4F
    DB    'PLR 1  '  ;56
    DB    'PLR 2  '  ;5D
    DB    '       '  ;64
    DB    'SEAN SPECIAL'  ;6B


   





No hay comentarios.:

Publicar un comentario