Routines
Prev: 77D5 Up: Map Next: 788D
77EA: Inicio do codigo
Input
Output
start 77EA LD A,$00 Espera que se pressione uma tecla
77EC LD ($5C08),A
77EF NOP
77F0 NOP
77F1 NOP
start_0 77F2 LD A,($5C08)
77F5 CP $00
77F7 JR Z,start_0
77F9 NOP No Operation
77FA NOP
77FB NOP
77FC NOP
This entry point is used by the routine at the_end.
start_1 77FD LD A,$10 Define atributos para o fadeOut a $10 e chama-o
77FF LD ($C34F),A
7802 CALL fadeOut
7805 LD A,$02 Faz um beep?
7807 OUT ($FE),A
7809 LD DE,$3C00 Define CHARS em $3C00
780C CALL de_to_chars
780F LD HL,$788D Desenha frame_recordista
7812 CALL desenhaFrameHL
7815 LD HL,$89A6 HL com var_recordista
7818 LD B,$20 Inutil(?) é repetida abaixo
781A LD A,$16 AT
781C RST $10
781D LD A,$09 X = $09
781F RST $10
7820 LD A,$00 Y = 00
7822 RST $10
7823 LD A,$11 PAPER
7825 RST $10
7826 LD A,$02 $02 RED
7828 RST $10
7829 LD A,$10 INK
782B RST $10
782C LD A,$06 $6 YELLOW
782E RST $10
782F LD A,$13 BRIGHTNESS
7831 RST $10
7832 LD A,$01 $01
7834 RST $10
7835 LD B,$20 Imprime $20 (32) caracteres da string em HL
start_2 7837 PUSH BC
7838 LD A,(HL)
7839 RST $10
783A INC HL
783B POP BC
783C DJNZ start_2
783E LD A,$13 BRIGHTNESS
7840 RST $10
7841 LD A,$00 $00
7843 RST $10
7844 LD A,$00 Espera que se pressione uma tecla
7846 LD ($5C08),A
start_3 7849 LD A,($5C08)
784C CP $00
784E JR Z,start_3
7850 LD A,$01 Faz um beep?
7852 OUT ($FE),A
7854 LD A,$00
7856 LD ($C33D),A var_inventario_arma a 0
7859 LD ($C337),A var_inventario_droga a 0
785C LD A,$01
785E LD ($C33C),A var_inventario_carteira a 1
7861 LD A,$30
7863 LD ($C346),A var_score a "0000" $30 é "0" em ASCII
7866 LD ($C347),A
7869 LD ($C348),A
786C LD ($C349),A
786F LD ($C340),A var_dinheiro a "3000" - 030000$
7872 LD ($C341),A
7875 LD ($C33F),A
7878 LD A,$33
787A LD ($C33E),A
787D LD A,($5C78) Guarda o valor do FRAMES (contador de tempo +-)
7880 SUB $80 Subtrai $80
7882 LD B,A Corre o "randomizer" o numero de vezes que estiver em A
start_4 7883 PUSH BC
7884 CALL random1
7887 POP BC
7888 DJNZ start_4
788A JP main_0
Prev: 77D5 Up: Map Next: 788D