smwhacking.de - die deutschsprachige Seite übers SMW-Hacken

Wow das klingt interessant. Würde mich als Levelersteller breitstellen, wenn ihr noch wen sucht. Egal für welche Welt.

Vielleicht könnt ihr mich ja irgendwie einbringen ^^

Edit: Irgendwie ist das witzig ich heiße nämlich auch Patrick xD

Oh mein Gott erst beim fünften Mal lesen ist mir der Sinn gekommen XD. Würde das Lied dann funktionieren, wenn ich den header weglasse? Oder ruiniert es die ganze Datei, sodass sie nicht mehr benutzbar ist?

Hi. Ich melde mich auch mal wieder seit sehr sehr langer Zeit.

. Ich hätte ne Frage zu einem custom Block. Und zwar wollte ich den custom Block Pass on Yoshi Coin so umschreiben, dass er, nachdem ich die Yoshi Coins eingesammelt habe, verschwindet (wechsel zum nächsten MAp 16 Teil), anstatt nur mich durchzulassen und dass er meinen Yoshi Coin Counter um einen verringert (ich baue einen Zelda-ähnliches Level, wo Yoshi Coins Schlüssel sind und der Custom Block quasi die Schlüsseltüren, die einen dann durchlassen sollen). Das heißt auch wenn mehrere Coins gesammelt wurden, dass man dann auch durch die Anzahl Türen durch kann, die der Anzahl Coins entsprechen. Aber ich kenn mich überhaupt nicht mit ASM hacking aus, deswegen frage ich hier.

Der Custom Block Code lautet:

Code

;Block that is passable only when you have 4 (or specified number) dragon coins.
;Change the number after the CMP #$ to specify the number of dragon coins needed.

print "A block that is passable only when the player has 4 dragon coins."

db $42
JMP MarioBelow : JMP MarioAbove : JMP MarioSide : JMP SpriteV : JMP SpriteH : JMP MarioCape : JMP MarioFireBall
JMP Corner : JMP BodyIn : JMP HeadIn

Corner:
HeadIn:
BodyIn:
MarioAbove:
MarioBelow:
MarioSide:
LDA $1420 ;Load number of dragon coins
CMP #$01
BEQ GotCoins ;Branch to 'Gotcoins'
LDY #$01 ;act like tile 130 (Grey cement block)
LDA #$30
STA $1693
RTL
SpriteV:
SpriteH:
MarioCape:
MarioFireBall:
GotCoins:
RTL

Ich hoffe, ihr versteht was ich meine und ob ihr mir da helfen könnt. Ich habe die Anzahl der benötigten Coins schon auf 1 geändert, war auch nicht schwer mit Anleitung

.

Edit: Ich habe mit Blockcreator und ein wenig eigenem ASM Wissen (wirklich wirklich wenig) es ungefähr hinbekommen. Gucken wir mal wie es in der eigentlichen Level funktionieren wird.

Danke sehr. Ich versuche mal meine eigene Version sowie deine erstellte Version und schaue, welche besser funktioniert.

Edit: Kannst du mit evtl noch verraten wofür der zweite Code ist, bzw wie der eingefügt wird?. Kenne mich nicht mit Patches, Modifikationen usw. aus. Der erste Code ist ja der Block selber. Irgendwie scheint dein Block nicht zu funktionieren. Der lässt mich nicht durch egal wie viele dragon coins ich habe

. Auch wenn ich 1422 in 1420 ändere, ändert das nichts am Ergebnis.

Okay dann versuche ich nochmal die abgeänderte Version. Kannst du mir noch erklären wie das mit dem Patch funktioniert? Ich steige durch das readme von Imamelia nicht wirklich durch auch wenn am Ende steht, dass es nicht so kompliziert ist wie es aussieht. ^^

Der Block soll Platz 2050 haben. Wie trage ich das in den unteren Code ein und wie bringe ich das Programm dazu, Tile 2050 als extended Object zu sehen. Wenn es ja ein Object ist anstelle eines Tiles dann bleibt es ja weg, selbt wenn ich das Sublevel verlasse.
Ich poste dir nochmal die Codes, damit du dir ein Bild davon machen kannst.

Code

!DragonCoins = $1420 ; Falls es nicht funktioniert, nutzt stattdessen $1420

JMP Mario : JMP Mario : JMP Mario
JML Return : JML Return
JML Return : JML Return
JMP Mario : JMP Mario : JMP Mario

Mario:
LDA !DragonCoins
BEQ Return
LDA #$01 ; Replace block with block # 025
STA $9C
PHY
JSL $00BEB0 ; Make the block disappear.
PLY
DEC !DragonCoins
Return:
RTL

bzw.

Code

LDY $57
JSR GetItemMemoryBit
LDA $0F
BNE .return
LDA #$xx ; Das ist die Nummer, wo das Map16-Tile ist ohne die Seite
STA [$6B],y
LDA #$yy ; Das ist die Seite, wo das Map16-Tile ist
STA [$6E],y
.return
RTS

Ich ändere LDA #$xx in 50 und LDA #$yy in 20. Dann habe ich das in custobjcode bei Custobj02 hineingeschrieben. Gepatcht habe ich, bevor ich den Code hineingeschrieben habe. Muss das dann neu gepatcht werden?
Edit. Ich habe gemerkt, dass du ein deutsches Tutorial dazu bei smwc hochgeladen hast. Ich werde mir das zunächst anschauen. Vielleicht verstehe ich es ja dadurch. ^^

Okay ich habe den Code soweit geändert und er funktioniert. Das mit dem Obectool habe ich noch nicht ausprobiert. Allerdings gibt es ein kleines Problem mit dem Block. Und zwar soll der Block eine 16x32 Tür darstellen. Jedoch verschwindet nur der untere Block und der obere bleibt, es sei denn eine zweite Coin wird verwendet. Wie ändere ich den Code ab, dass der Block darüber ebenfalls verschwindet? Außerdem wird der Punktecounter nicht zurückgesetzt (RAM map $1420). Wo füge ich den Teil ein, oder ist es einfach nur DEC $1420?

Ja man muss sowohl $1420 als auch $1422 vermindern. Ich poste dir mal den Code:

Code

!DragonCoins = $1420 / $1422 ; Falls es nicht funktioniert, nutzt stattdessen $1420

JMP Mario : JMP Mario : JMP Mario
JML Return : JML Return
JML Return : JML Return
JMP Mario : JMP Mario : JMP Mario

Mario:
LDA !DragonCoins
BEQ Return
LDA #$01 ; Replace block with block # 025
STA $9C
PHY
JSL $00BEB0 ; Make the block disappear.
PLY
DEC !DragonCoins
Return:
RTL

!DragonCoins kann aber in dem Sinne so nicht abgespeichert werden. Müsste ich das dann mit LDA $1420, LDA $1422 trennen und dann jeweils DEC $1420 bzw DEC $1422 schreiben oder gibt es Abkürzungen, die man als Programmierer nutzen kann?

Ich habe per Blockcreator einen ähnlichen Block erstellt und ihn ein wenig verändert. Bitte nicht zu harsch mit der Kritik sein, das ist mein erster wirklicher Block mit 1 Stunde ASM Tutorial lesen

Code

;Block that is passable only when you have 4 (or specified number) dragon coins.
;Change the number after the CMP #$ to specify the number of dragon coins needed.

;print "A block that is passable only when the player has 4 dragon coins."

db $42
JMP MarioBelow : JMP MarioAbove : JMP MarioSide : JMP SpriteV : JMP SpriteH : JMP MarioCape : JMP MarioFireBall
JMP Corner : JMP BodyIn : JMP HeadIn

Corner:
HeadIn:
BodyIn:
MarioAbove:
MarioBelow:
MarioSide:
LDA $1420 ;Load number of dragon coins
CMP #$01
BCS GotCoins ;Branch to 'Gotcoins'
BCC Reset ;Branch to 'Reset'
LDY #$01 ;act like tile 130 (Grey cement block)
LDA #$30
STA $1693
RTL
SpriteV:
SpriteH:
MarioCape:
MarioFireBall:
GotCoins:
LDA $1422
DEC $1422
CMP #$00
BEQ Reset
LDA $1420
DEC $1420
RTL

Reset:
RTL
RTL

Das CMP und so war vorerst für einen anderen Block gedacht. Ich habe davor einen erstellt, der, bei Berührung, Yoshi Coins addiert und nach 4 Yoshi Coins sollte er resetten, womit man 1. maximal 4 haben kann und 2. keine Leben einfach so erfarmen kann. Das CMP war so gedacht, dass er resetten soll falls mehr als 4 yoshi coins eingesammelt wurden. Kann sein, dass ich da den Code einfach rauskopiert habe und das dabei vergessen habe zu entfernen ^^. Naja wie gesagt ich kenne mich noch nicht so gut mit ASM aus, weswegen ich erstmal die langen Wege gehe (z.B. habe ich keine Ahnung warum du am Anfang der Datei db $42 geschrieben hast)

. Weißt du dabei noch, wie man den Code verändern muss, damit das Tile direkt über dem Block ebenfalls verschwindet (16x32 Tür) und wie ich daraus ein extended object (per objectool-patch) mache, damit die tür auch offen bleibt, wenn ich das sublevel wechsle.

Danke für deine Hilfe ^^

Edit: Der Block funktioniert wunderbar. Danke sehr ^^

Ich als ASM Laie (eigentlich sogar noch weniger) kann damit nichts wirklich anfangen. Nochmal als Zusammenfassung für WYE:
Ich wollte einen Block programmieren, der bei Berührung eine Yoshi Coin abzieht und dabei verschwindet. Da es so eine Art Schlüsseltür darstellen soll, soll die Block darüber auch verschwinden. Dann der dritte Teil: Daraus soll ein Extended Object werden, aber ich kann mit objectool irgendwie nichts anfangen. Schließlich soll die Tür ja nicht wieder zu gehen

. D.h. wenn ich keine Coin hab, soll er mich auch nicht durchlassen. Allerdings soll er auch sowohl den Counter als auch quasi die Punktzahl um einen zurücksetzen (DEC $1420 und $1422).

Den Block haben wir soweit hinbekommen (Danke an MarioFanGamer und xHF01x). Jetzt fehlt eigentlich nur noch die Komponente, dass der Block darüber verschwindet (16x32 Block).

Das ist der Code für den Block:

Code

db $42
JMP Mario : JMP Mario : JMP Mario
JML Return : JML Return
JML Return : JML Return
JMP Mario : JMP Mario : JMP Mario

Mario:
LDA $1420
BEQ Return
LDA #$01 ; Replace block with block # 025
STA $9C
PHY
JSL $00BEB0 ; Make the block disappear.
PLY
DEC $1420
DEC $1422
Return:
RTL

Der Block funktioniert wunderbar. Das mit dem objectool mache ich evtl. morgen, finde heute keine Zeit mehr dafür.

Edit. So ich habe jetzt den Code im Patch eingefügt und gepatcht (mit asar wenn es nichts ausmacht). Er hat mir auch keine Fehlermeldung ausgegeben und die ROM läuft. Jetzt die Frage: Wie wird der jetzt in das Programm gebracht? Ich dachte an Layer 1 manuell einfügen object 02 (weil das der Platz des extended objects, wo ich den Code eingefügt habe). Dann habe ich Angaben wie Size/Type/Exit und Extension. Was davon muss ich umstellen, weil wenn ich beides auf 0 lasse kommt standard object 02 (invisible coin block).

Danke schon mal im Vorraus, bald haben wir es geschafft

Sry für den Doppelpost, aber Edits werden nicht als letzer Post (sag ich mal

) angezeigt. Deswegen nochmal die Frage: Wenn ich das Teil manuell einfügen will (Custom Object 02), welche Werte muss ich bei insert manually ändern (ich glaube mal extension 00-FFx, aber ich weiß nicht zu was

)?

Okay danke dir, jetzt funktioniert alles, wie es soll und ich kann endlich die Level designen.

Hi. Nachdem ich jetzt den Block habe, brauche ich für meine Dungeon Level die passende Musik

. Deswegen hier die Frage: Kann mir wer von euch vielleicht die Boss Musik aus The Legend of Zelda: Oracle of Ages bzw Seasons porten? Die MIDI-Dateien sind leicht zu finden und die Musik ist auch nicht sonderlich lang. Auf SMWC sowie anderen Seiten habe ich diese leider nicht gefunden (es ist mir auch aufgefallen, dass viele Musikdateiten, die vorher noch downloadbar sind, nicht mehr da sind, ähnlich wie Blöcke). Also wenn wer Zeit und Lust hätte wäre ich ihm sehr sehr dankbar.

Hi

. Mein Problem ist: Wenn ich den Level ender sprite in meinem Level einfüge, spielt er, nachdem die Gegner tot sind, die Unterwassermusik von SMW ab anstatt die Fanfare (liegt wohl an AddmusicK). Meine Frage ist: Wie muss ich den Code verändern, damit diese abgespielt wird?
Der Code:

Code

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Level end trigger, by mikeyk
;;
;; Description: This sprite will cause the level to end when all the enemies on screen
;; are killed. This version ignnores sprites that don't turn into a coin when the goal
;; tape is passed.
;;
;; Uses first extra bit: YES
;; When the first extra bit is clear, the sprite will trigger the regular exit. When it
;; is set, the sprite will trigger the secret exit.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

EXTRA_BITS = $7FAB10

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; sprite data
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

EXTRA_PROP_1 = $7FAB28
EXTRA_PROP_2 = $7FAB34

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; sprite init JSL
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

dcb "INIT"
RTL

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; sprite code JSL
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

dcb "MAIN"
LDA $1493
BNE RETURN
LDA $13C6
BNE RETURN

LDY #$0B
LOOP_START:
LDA $14C8,y
CMP #$08
BCS TestTweakerBits
DONT_CHECK:
DEY
BPL LOOP_START

LDA #$FF ; \ set time before return to overworld
STA $1493 ; /
LDA EXTRA_BITS,x ; set secret exit if first extra bit is set
LSR A
LSR A
LSR A
AND #$01
EOR #$01
STA $141C

LDA EXTRA_PROP_1,x
CMP #$01
BEQ WALK
DEC $13C6 ; prevent mario from walking at level end
WALK:
LDA EXTRA_PROP_2,x
STA $1DFB

TestTweakerBits:
LDA $1686,y
AND #$20
BNE DONT_CHECK
RETURN:
RTL

Ich glaub ich habe es

Hallo.Ist es möglich, ohne irgendein ASM Coding mehr als Palette 4,5,6 und 7 für die OW zu benutzen?

Ich habe eine Frage zu einem Code.
Und zwar möchte ich den Powerup sprite von Ersanio/ICB benutzen. Aleerdings möchte ich, dass er das Powerup behält selbst wenn er getroffen wird.
Hier ist der Code (das ist das wichtige) ^^:

Code

LDA $19 ;\If Mario's powerup
CMP #$01 ;|is Big
BEQ GETPOWER ;|then continue
LDA #$00 ;|but if he gets hit or gets another powerup
STA $0DC6 ;/then reset the powerup RAM to Zero.
GETPOWER
JSR SPRITE_CODE_START
PLB
RTL

Was muss entfernt/geändert werden, damit ich das Powerup behalten kann? Kann sein, dass es dann irgendwelche Komplikationen gibt.
Danke im Voraus ^^

Ich kann ja mal den kompletten Code posten, da man sowohl Sprite als auch Generator einfügen muss und sich das ja irgendwie beeinflusst (die readme sagt, dass alles vom Generator ausgeht und das deswegen da geändert werden muss). Hier ist der komplette Code für den Generator und den Sprite:
Generator:

Code

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;flutter/wall jump generator
;based on generator by ICB
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Uses first extra bit: NO
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

RAM_IsDucking = $73
RAM_OnYoshi = $187A

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; sprite code JSL
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

dcb "INIT" ;generators don't have an init routine
dcb "MAIN"
PHB
PHK
PLB
LDA $19 ;\If Mario's powerup
CMP #$01 ;|is Big
BEQ GETPOWER ;|then continue
LDA #$00 ;|but if he gets hit or gets another powerup
STA $0DC6 ;/then reset the powerup RAM to Zero.
GETPOWER
JSR SPRITE_CODE_START
PLB
RTL

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; main sprite code
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

Return_A RTS

SPRITE_CODE_START
LDA $19 ;only let generator process
CMP #$01 ;if big mario
BNE Return_A ;other end
LDA $0DC6
CMP #$03 ;if mode = 3, let mario wallkick
BEQ SET_WALL
CMP #$04 ;if mode = 4, let mario flutter
BEQ SET_FLUTTER
BNE Return_A ;otherwise return
LDA RAM_IsDucking ;if ducking
ORA RAM_OnYoshi ;or on yoshi
BNE Return_A ;end
SET_WALL
LDA $76
BEQ Right
BRA Left

Left LDA $77
AND #$03
BEQ Return6
LDA $15
AND #$80
BEQ Return6

LDA #$E0 ;Horizontal speed
STA $7B ;

LDA #$A7 ;
STA $7D ;Vertical Speed

LDA #$02 ;
STA $1DF9 ;"Click" Sound effect

STZ $76 ;Direction left

BRA Return6 ;Always Return

Right LDA $77
AND #$03
BEQ Return6
LDA $16
AND #$80
BEQ Return6
LDA #$20 ;Horizontal Speed
STA $7B ;
LDA #$A7 ;Vertical Speed
STA $7D ;
LDA #$02 ;
STA $1DF9 ;Click sound effect
LDA #$01 ;Direction Right
STA $76
BRA Return6

Return6 RTS ;return

Return_Again RTS

SET_FLUTTER
LDA $19 ;recheck
CMP #$01
BNE Return_Again
LDA $0DC6
CMP #$04 ;mode = 4
BNE Return_Again
LDA $77
AND #$04
BNE Reset ;won't work while swimming, on air, yoshi
LDA $75
BNE Reset
LDA $74
BNE Reset
LDA $187A
BNE Reset
LDA $140D ;spin jump flutter
BNE Check
LDA $0660
BEQ Check
LDA $1499
BNE Return

LDA $7D
CMP #$7F
BCC Rest
LDA $1470
BNE Carry
LDA $148F
BNE Carry
LDA $0660
CMP #$02
BCS Stand
LDA #$05
STA $13E0
INC $0660
BRA Return
Check
LDA $16 ;button to push
CMP #$80
BNE Return
STZ $140D
LDA #$BF
STA $7D
INC $0660
LDA #$01
STA $1DFA
BRA Return
Stand
LDA #$04
STA $13E0

DEC $0660

BRA Return
Reset
STZ $0660
BRA Return
Rest
LDA $0660
CMP #$15 ;To stop the advantage(or to increase rest time,) increase this hexidecimal number
BNE Rest1
STZ $0660
BRA Check
Rest1
INC $0660 ;continues rest time
BRA Return
Carry
LDA $0660 ;same as above
CMP #$02
BCS Run
LDA #$08
STA $13E0
INC $0660
BRA Return
Run
LDA #$07
STA $13E0
DEC $0660
BRA Return
Return RTS

Sprite:

Code

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;
;; Wall jump powerup, by Iceguy
;; Based on wall jump block by Ersanio
;;
;;
;; Description: This sprite, when collected by Mario, will make him turn big and give
;; him the ability to wall jump! If he gets hit, he loses the powerup. For the sprite
;; to work, place the generator at all secondary entrances.
;;
;; This sprite does not use the extra bit.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; sprite init JSL
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

dcb "INIT"
RTL

dcb "MAIN"
PHB
PHK
PLB
JSR SPRITE_ROUTINE
PLB
RTL

SPRITE_ROUTINE LDA $14C8,x ; return if sprite status != 8
CMP #$08
BNE RETURNED
JSR SUB_GFX
LDA $9D ; return if sprites locked
BNE RETURNED
JSR SUB_OFF_SCREEN_X0 ; only process sprite while on screen

LDA $187A ;if on yoshi
BNE RETURNED ;end code
JSL $01A7DC ;mario/sprite contact..
BCC RETURNED
LDA #$04 ;play flower animation
STA $71
LDA #$30 ;cycle through palettes
STA $149B
LDA #$01 ;make mario big
STA $19
LDA #$0A ;play SFX
STA $1DF9
LDA #$03 ;set new mode
STA $0DC6
STZ $14C8,x ;and erase sprite
BRA Check_Whole ;then check main code
RETURNED RTS

;This part of the code is not executed by the sprite
;it is executed by the generator
;the code below will do nothing if you change it
;except for the graphics routine

Check_Whole STZ $7D
LDA $76
BEQ JumpRight
BRA JumpLeft

JumpLeft LDA $15 ;
AND #$80 ;If you dont press the jump button, return.
BEQ Return ;

LDA #$E0 ;Horizontal speed
STA $7B ;

LDA #$A7 ;
STA $7D ;Vertical Speed

LDA #$02 ;
STA $1DF9 ;"Click" Sound effect

STZ $76 ;Direction left

BRA Return ;Always Return

JumpRight
LDA $16
AND #$80 ;If you dont press the jump button, return.
BEQ Return
LDA #$20 ;Horizontal Speed
STA $7B ;
LDA #$A7 ;Vertical Speed
STA $7D ;
LDA #$02 ;
STA $1DF9 ;Click sound effect
LDA #$01 ;Direction Right
STA $76

Return RTS

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; GRAPHICS ROUTINE
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

SUB_GFX JSR GET_DRAW_INFO ; after: Y = index to sprite OAM ($300)
; $00 = sprite x position relative to screen boarder
; $01 = sprite y position relative to screen boarder

LDA $157C,x ; $02 = sprite direction
STA $02

LDA $00 ; set x position of the tile
STA $0300,y

LDA $01 ; set y position of the tile
STA $0301,y

LDA #$C2 ; set tile number
STA $0302,y

LDA $15F6,x ; get sprite palette info
PHX
LDX $02 ; flip the tile if the sprite direction is 0
BNE NO_FLIP_1
ORA #$40
NO_FLIP_1 PLX
ORA $64 ; add in the priority bits from the level settings
STA $0303,y ; set properties

INY ; get the index to the next slot of the OAM
INY ; (this is needed if you wish to draw another tile)
INY
INY

LDY #$02 ; #$02 means the tiles are 16x16
LDA #$00 ; This means we drew one tile
JSL $01B7B3
RTS

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; ROUTINES FROM THE LIBRARY ARE PASTED BELOW
; You should never have to modify this code
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; GET_DRAW_INFO
; This is a helper for the graphics routine. It sets off screen flags, and sets up
; variables. It will return with the following:
;
; Y = index to sprite OAM ($300)
; $00 = sprite x position relative to screen boarder
; $01 = sprite y position relative to screen boarder
;
; It is adapted from the subroutine at $03B760
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

SPR_T1 dcb $0C,$1C
SPR_T2 dcb $01,$02

GET_DRAW_INFO STZ $186C,x ; reset sprite offscreen flag, vertical
STZ $15A0,x ; reset sprite offscreen flag, horizontal
LDA $E4,x ; \
CMP $1A ; | set horizontal offscreen if necessary
LDA $14E0,x ; |
SBC $1B ; |
BEQ ON_SCREEN_X ; |
INC $15A0,x ; /

ON_SCREEN_X LDA $14E0,x ; \
XBA ; |
LDA $E4,x ; |
REP #$20 ; |
SEC ; |
SBC $1A ; | mark sprite invalid if far enough off screen
CLC ; |
ADC.W #$0040 ; |
CMP.W #$0180 ; |
SEP #$20 ; |
ROL A ; |
AND #$01 ; |
STA $15C4,x ; /
BNE INVALID ;

LDY #$00 ; \ set up loop:
LDA $1662,x ; |
AND #$20 ; | if not smushed (1662 & 0x20), go through loop twice
BEQ ON_SCREEN_LOOP ; | else, go through loop once
INY ; /
ON_SCREEN_LOOP LDA $D8,x ; \
CLC ; | set vertical offscreen if necessary
ADC SPR_T1,y ; |
PHP ; |
CMP $1C ; | (vert screen boundry)
ROL $00 ; |
PLP ; |
LDA $14D4,x ; |
ADC #$00 ; |
LSR $00 ; |
SBC $1D ; |
BEQ ON_SCREEN_Y ; |
LDA $186C,x ; | (vert offscreen)
ORA SPR_T2,y ; |
STA $186C,x ; |
ON_SCREEN_Y DEY ; |
BPL ON_SCREEN_LOOP ; /

LDY $15EA,x ; get offset to sprite OAM
LDA $E4,x ; \
SEC ; |
SBC $1A ; | $00 = sprite x position relative to screen boarder
STA $00 ; /
LDA $D8,x ; \
SEC ; |
SBC $1C ; | $01 = sprite y position relative to screen boarder
STA $01 ; /
RTS ; return

INVALID PLA ; \ return from *main gfx routine* subroutine...
PLA ; | ...(not just this subroutine)
RTS ; /

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; SUB_OFF_SCREEN
; This subroutine deals with sprites that have moved off screen
; It is adapted from the subroutine at $01AC0D
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

SPR_T12 dcb $40,$B0
SPR_T13 dcb $01,$FF
SPR_T14 dcb $30,$C0,$A0,$C0,$A0,$F0,$60,$90 ;bank 1 sizes
dcb $30,$C0,$A0,$80,$A0,$40,$60,$B0 ;bank 3 sizes
SPR_T15 dcb $01,$FF,$01,$FF,$01,$FF,$01,$FF ;bank 1 sizes
dcb $01,$FF,$01,$FF,$01,$00,$01,$FF ;bank 3 sizes

SUB_OFF_SCREEN_X1 LDA #$02 ; \ entry point of routine determines value of $03
BRA STORE_03 ; | (table entry to use on horizontal levels)
SUB_OFF_SCREEN_X2 LDA #$04 ; |
BRA STORE_03 ; |
SUB_OFF_SCREEN_X3 LDA #$06 ; |
BRA STORE_03 ; |
SUB_OFF_SCREEN_X4 LDA #$08 ; |
BRA STORE_03 ; |
SUB_OFF_SCREEN_X5 LDA #$0A ; |
BRA STORE_03 ; |
SUB_OFF_SCREEN_X6 LDA #$0C ; |
BRA STORE_03 ; |
SUB_OFF_SCREEN_X7 LDA #$0E ; |
STORE_03 STA $03 ; |
BRA START_SUB ; |
SUB_OFF_SCREEN_X0 STZ $03 ; /

START_SUB JSR SUB_IS_OFF_SCREEN ; \ if sprite is not off screen, return
BEQ RETURN_35 ; /
LDA $5B ; \ goto VERTICAL_LEVEL if vertical level
AND #$01 ; |
BNE VERTICAL_LEVEL ; /
LDA $D8,x ; \
CLC ; |
ADC #$50 ; | if the sprite has gone off the bottom of the level...
LDA $14D4,x ; | (if adding 0x50 to the sprite y position would make the high byte >= 2)
ADC #$00 ; |
CMP #$02 ; |
BPL ERASE_SPRITE ; / ...erase the sprite
LDA $167A,x ; \ if "process offscreen" flag is set, return
AND #$04 ; |
BNE RETURN_35 ; /
LDA $13 ;A:8A00 X:0009 Y:0001 D:0000 DB:01 S:01F1 P:envMXdiZcHC:0756 VC:176 00 FL:205
AND #$01 ;A:8A01 X:0009 Y:0001 D:0000 DB:01 S:01F1 P:envMXdizcHC:0780 VC:176 00 FL:205
ORA $03 ;A:8A01 X:0009 Y:0001 D:0000 DB:01 S:01F1 P:envMXdizcHC:0796 VC:176 00 FL:205
STA $01 ;A:8A01 X:0009 Y:0001 D:0000 DB:01 S:01F1 P:envMXdizcHC:0820 VC:176 00 FL:205
TAY ;A:8A01 X:0009 Y:0001 D:0000 DB:01 S:01F1 P:envMXdizcHC:0844 VC:176 00 FL:205
LDA $1A ;A:8A01 X:0009 Y:0001 D:0000 DB:01 S:01F1 P:envMXdizcHC:0858 VC:176 00 FL:205
CLC ;A:8A00 X:0009 Y:0001 D:0000 DB:01 S:01F1 P:envMXdiZcHC:0882 VC:176 00 FL:205
ADC SPR_T14,y ;A:8A00 X:0009 Y:0001 D:0000 DB:01 S:01F1 P:envMXdiZcHC:0896 VC:176 00 FL:205
ROL $00 ;A:8AC0 X:0009 Y:0001 D:0000 DB:01 S:01F1 P:eNvMXdizcHC:0928 VC:176 00 FL:205
CMP $E4,x ;A:8AC0 X:0009 Y:0001 D:0000 DB:01 S:01F1 P:eNvMXdizCHC:0966 VC:176 00 FL:205
PHP ;A:8AC0 X:0009 Y:0001 D:0000 DB:01 S:01F1 P:envMXdizCHC:0996 VC:176 00 FL:205
LDA $1B ;A:8AC0 X:0009 Y:0001 D:0000 DB:01 S:01F0 P:envMXdizCHC:1018 VC:176 00 FL:205
LSR $00 ;A:8A00 X:0009 Y:0001 D:0000 DB:01 S:01F0 P:envMXdiZCHC:1042 VC:176 00 FL:205
ADC SPR_T15,y ;A:8A00 X:0009 Y:0001 D:0000 DB:01 S:01F0 P:envMXdizcHC:1080 VC:176 00 FL:205
PLP ;A:8AFF X:0009 Y:0001 D:0000 DB:01 S:01F0 P:eNvMXdizcHC:1112 VC:176 00 FL:205
SBC $14E0,x ;A:8AFF X:0009 Y:0001 D:0000 DB:01 S:01F1 P:envMXdizCHC:1140 VC:176 00 FL:205
STA $00 ;A:8AFF X:0009 Y:0001 D:0000 DB:01 S:01F1 P:eNvMXdizCHC:1172 VC:176 00 FL:205
LSR $01 ;A:8AFF X:0009 Y:0001 D:0000 DB:01 S:01F1 P:eNvMXdizCHC:1196 VC:176 00 FL:205
BCC SPR_L31 ;A:8AFF X:0009 Y:0001 D:0000 DB:01 S:01F1 P:envMXdiZCHC:1234 VC:176 00 FL:205
EOR #$80 ;A:8AFF X:0009 Y:0001 D:0000 DB:01 S:01F1 P:envMXdiZCHC:1250 VC:176 00 FL:205
STA $00 ;A:8A7F X:0009 Y:0001 D:0000 DB:01 S:01F1 P:envMXdizCHC:1266 VC:176 00 FL:205
SPR_L31 LDA $00 ;A:8A7F X:0009 Y:0001 D:0000 DB:01 S:01F1 P:envMXdizCHC:1290 VC:176 00 FL:205
BPL RETURN_35 ;A:8A7F X:0009 Y:0001 D:0000 DB:01 S:01F1 P:envMXdizCHC:1314 VC:176 00 FL:205
ERASE_SPRITE LDA $14C8,x ; \ if sprite status < 8, permanently erase sprite
CMP #$08 ; |
BCC KILL_SPRITE ; /
LDY $161A,x ;A:FF08 X:0007 Y:0001 D:0000 DB:01 S:01F3 P:envMXdiZCHC:1108 VC:059 00 FL:2878
CPY #$FF ;A:FF08 X:0007 Y:0000 D:0000 DB:01 S:01F3 P:envMXdiZCHC:1140 VC:059 00 FL:2878
BEQ KILL_SPRITE ;A:FF08 X:0007 Y:0000 D:0000 DB:01 S:01F3 P:envMXdizcHC:1156 VC:059 00 FL:2878
LDA #$00 ;A:FF08 X:0007 Y:0000 D:0000 DB:01 S:01F3 P:envMXdizcHC:1172 VC:059 00 FL:2878
STA $1938,y ;A:FF00 X:0007 Y:0000 D:0000 DB:01 S:01F3 P:envMXdiZcHC:1188 VC:059 00 FL:2878
KILL_SPRITE STZ $14C8,x ; erase sprite
RETURN_35 RTS ; return

VERTICAL_LEVEL LDA $167A,x ; \ if "process offscreen" flag is set, return
AND #$04 ; |
BNE RETURN_35 ; /
LDA $13 ; \
LSR A ; |
BCS RETURN_35 ; /
LDA $E4,x ; \
CMP #$00 ; | if the sprite has gone off the side of the level...
LDA $14E0,x ; |
SBC #$00 ; |
CMP #$02 ; |
BCS ERASE_SPRITE ; / ...erase the sprite
LDA $13 ;A:0000 X:0009 Y:00E4 D:0000 DB:01 S:01F3 P:eNvMXdizcHC:1218 VC:250 00 FL:5379
LSR A ;A:0016 X:0009 Y:00E4 D:0000 DB:01 S:01F3 P:envMXdizcHC:1242 VC:250 00 FL:5379
AND #$01 ;A:000B X:0009 Y:00E4 D:0000 DB:01 S:01F3 P:envMXdizcHC:1256 VC:250 00 FL:5379
STA $01 ;A:0001 X:0009 Y:00E4 D:0000 DB:01 S:01F3 P:envMXdizcHC:1272 VC:250 00 FL:5379
TAY ;A:0001 X:0009 Y:00E4 D:0000 DB:01 S:01F3 P:envMXdizcHC:1296 VC:250 00 FL:5379
LDA $1C ;A:001A X:0009 Y:0001 D:0000 DB:01 S:01F3 P:eNvMXdizcHC:0052 VC:251 00 FL:5379
CLC ;A:00BD X:0009 Y:0001 D:0000 DB:01 S:01F3 P:eNvMXdizcHC:0076 VC:251 00 FL:5379
ADC SPR_T12,y ;A:00BD X:0009 Y:0001 D:0000 DB:01 S:01F3 P:eNvMXdizcHC:0090 VC:251 00 FL:5379
ROL $00 ;A:006D X:0009 Y:0001 D:0000 DB:01 S:01F3 P:enVMXdizCHC:0122 VC:251 00 FL:5379
CMP $D8,x ;A:006D X:0009 Y:0001 D:0000 DB:01 S:01F3 P:eNVMXdizcHC:0160 VC:251 00 FL:5379
PHP ;A:006D X:0009 Y:0001 D:0000 DB:01 S:01F3 P:eNVMXdizcHC:0190 VC:251 00 FL:5379
LDA.W $001D ;A:006D X:0009 Y:0001 D:0000 DB:01 S:01F2 P:eNVMXdizcHC:0212 VC:251 00 FL:5379
LSR $00 ;A:0000 X:0009 Y:0001 D:0000 DB:01 S:01F2 P:enVMXdiZcHC:0244 VC:251 00 FL:5379
ADC SPR_T13,y ;A:0000 X:0009 Y:0001 D:0000 DB:01 S:01F2 P:enVMXdizCHC:0282 VC:251 00 FL:5379
PLP ;A:0000 X:0009 Y:0001 D:0000 DB:01 S:01F2 P:envMXdiZCHC:0314 VC:251 00 FL:5379
SBC $14D4,x ;A:0000 X:0009 Y:0001 D:0000 DB:01 S:01F3 P:eNVMXdizcHC:0342 VC:251 00 FL:5379
STA $00 ;A:00FF X:0009 Y:0001 D:0000 DB:01 S:01F3 P:eNvMXdizcHC:0374 VC:251 00 FL:5379
LDY $01 ;A:00FF X:0009 Y:0001 D:0000 DB:01 S:01F3 P:eNvMXdizcHC:0398 VC:251 00 FL:5379
BEQ SPR_L38 ;A:00FF X:0009 Y:0001 D:0000 DB:01 S:01F3 P:envMXdizcHC:0422 VC:251 00 FL:5379
EOR #$80 ;A:00FF X:0009 Y:0001 D:0000 DB:01 S:01F3 P:envMXdizcHC:0438 VC:251 00 FL:5379
STA $00 ;A:007F X:0009 Y:0001 D:0000 DB:01 S:01F3 P:envMXdizcHC:0454 VC:251 00 FL:5379
SPR_L38 LDA $00 ;A:007F X:0009 Y:0001 D:0000 DB:01 S:01F3 P:envMXdizcHC:0478 VC:251 00 FL:5379
BPL RETURN_35 ;A:007F X:0009 Y:0001 D:0000 DB:01 S:01F3 P:envMXdizcHC:0502 VC:251 00 FL:5379
BMI ERASE_SPRITE ;A:8AFF X:0002 Y:0000 D:0000 DB:01 S:01F3 P:eNvMXdizcHC:0704 VC:184 00 FL:5490

SUB_IS_OFF_SCREEN LDA $15A0,x ; \ if sprite is on screen, accumulator = 0
ORA $186C,x ; |
RTS ; / return

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; SUB_HORZ_POS
; This routine determines which side of the sprite Mario is on. It sets the Y register
; to the direction such that the sprite would face Mario
; It is ripped from $03B817
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

☰ Menü

Beiträge von Rubis

Rubis

Rubis

Rubis

Rubis

Rubis

Rubis

Rubis

Rubis

Rubis

Rubis

Rubis

Rubis

Rubis

Rubis

Rubis

Rubis

Rubis

Rubis