More Extended Sprites

SMW Patches → More Extended Sprites

Submission Details

Name:	More Extended Sprites
Author:	Isikoro
Added:	2024-03-28 07:44:51 AM
Version History:	View
Tool:	Asar
Requires Free Space:	No
Bug Fix:	Yes
Featured:	No
Description:	Up to 16 extended sprites, excluding fireballs, can coexist in the screen. If minimalist status bars are used or the item box is disabled, up to 18 items can be served. Lava splash are used as Minor Sprite 04 (same as Flame from Podoboo), and The spin-jump star is used as minor sprite 09 (overwrites the address of the note that moves to the left). (Extended sprites 07 and 10 will be erased.) (Notes that move to the left can be used by using minor sprite 08 and setting $7820,x to $01 or higher. If it is $00, it will move to the right.) Routine to spawn spin jump stars. : JSL $07FC3B\|!bank Routine to spawn Lava drops. : JSL $028528\|!bank Bubbles in water will disappear in a certain amount of time without touching the ceiling or the air. In the original, the Boo Stream row is also used as a minor sprite, so I recommend using it with this one. To insert a sprite in PIXI, download here one, copy the contents of the included "pixi" folder into it, and overwrite it. This patch is for SA-1ROM only, and cannot be used for LoROM. Some of the extended sprite usage RAM will be changed. The OAM index used for score sprites and the OAM index used for bounce sprites will be changed. Please save the level in Lunar Magic at least once before applying this patch. To make your resources compatible with this patch, you need to map them to the extended sprite usage RAM using the supplied Converter and add this code. It is necessary to manually replace "LD? #$07" to "LD?.b #!ExSprSize" and "LD? #$09" to "LD?.b #!FireballSprSize" in the extended sprite index. Code !More_ExSprite = 0 !ExSprSize = $07 if read2($029B39) == $0000 !More_ExSprite = 1 !ExSprSize = read01(00FAD5) endif !FireballSprSize = !ExSprSize+2 macro define_ram_exsp(name, name2, exsp, exsp_more) if !More_ExSprite == 0 !<name> = <exsp> else !<name> = <exsp_more> endif !<name2> = !<name> endmacro %define_ram_exsp(ex_sprite_num, "170B", $170B\|!addr, $770B) %define_ram_exsp(ex_sprite_y_low, "1715", $1715\|!addr, $3426) %define_ram_exsp(ex_sprite_x_low, "171F", $171F\|!addr, $343A) %define_ram_exsp(ex_sprite_y_high, "1729", $1729\|!addr, $771F) %define_ram_exsp(ex_sprite_x_high, "1733", $1733\|!addr, $7733) %define_ram_exsp(ex_sprite_speed_y, "173D", $173D\|!addr, $344E) %define_ram_exsp(ex_sprite_speed_x, "1747", $1747\|!addr, $3462) %define_ram_exsp(ex_sprite_speed_y_frac, "1751", $1751\|!addr, $7747) %define_ram_exsp(ex_sprite_speed_x_frac, "175B", $175B\|!addr, $775B) %define_ram_exsp(ex_sprite_inc, "1765", $1765\|!addr, $3476) %define_ram_exsp(ex_sprite_misc, "176F", $176F\|!addr, $776F) %define_ram_exsp(ex_sprite_layer, "1779", $1779\|!addr, $348A) %define_ram_exsp(ex_sprite_table1, "1765", $1765\|!addr, $3476) %define_ram_exsp(ex_sprite_table2, "198C", $198C\|!addr, $798C) %define_ram_exsp(ex_sprite_table3, "1996", $1996\|!addr, $349E) %define_ram_exsp(ex_sprite_table4, "19A0", $19A0\|!addr, $79A0) %define_ram_exsp(ex_sprite_table5, "19AA", $19AA\|!addr, $34B2) Update 1 - Added documentation of OAM index after patching. Update 2 - Added the ability to fix the Sumo bro Lightning Flame bug.(Extended No Sprite Limits patch is no longer required.) - Fixed a bug that prevented Yoshi's flame from animating. - Edited sa1def.asm
Tags:	extended sprites minor sprites oam sa-1 thunder
Comments:	47 (jump to comments)

Download 22.44 KiB | 383 downloads

Screenshots

View all

Comments (47)

Showing comments from:

MarioFanGamer 2024-03-28 07:46:15 AM Link

Lunar Magic v3.40
SA-1 Pack v1.40
Asar v1.81
PIXI v1.40
Volcano Lotus + Pollen
BSNES v115

A simple update which includes some bugfixes.

Anas From older version: More Extended Sprites 2024-03-11 09:39:10 AM Link

Originally posted by MarioFanGamer

@Anas: Basically, the fireballs load the frame counter to determine the frame and then load the extended sprite's OAM index. This normally isn't a problem because the get OAM index code is to simply read from a table into Y (which preserves the frame index) but More Extended Sprites replaces it into a routine which cobbles the frame index.

A fix for that is to replace the $029F76 hijack to:

Code

org $029F71
    JSR $A34F
    LDA $14
    LSR #3

MarioFanGamer From older version: More Extended Sprites 2024-03-10 09:40:45 PM Link

A small bug slipped through the moderation: The Yoshi fireballs don't animate because getting the OAM index overrides A which is used for the fireball palette. Of course, that one can be fixed by rearranging the opcodes but it nonetheless is a bug to fix.

Edit: In hindsight, there is an update submitted already which fixes this bug, it just is waiting right now.

Anas From older version: More Extended Sprites 2024-03-11 05:32:42 AM Link

What opcodes exactly should be changed?

MarioFanGamer From older version: More Extended Sprites 2024-03-11 09:34:37 AM Link

Code

org $029F71
    JSR $A34F
    LDA $14
    LSR #3

Anas 2023-05-13 10:48:45 AM Link

What exactly are the OAM indexes in M7 boss rooms? Just asking.

Anas 2023-04-13 08:31:41 PM Link

Originally posted by MarkVD100

I tried that and the pollen suddenly doesn't spawn even with extension values and extended sprite number set! (Volcano Lotus + Pollen custom sprite)

That’s odd, because I’m using this version of the patch and all my custom extended sprites work fine after conversion. Please make sure you’re properly converting both the pollen ext. sprite and the custom lotus itself. Run the whole code through the converter and make sure to hold Enter for at least 3-4 secs after pressing the ‘Convert’ button. You should also change any relevant instance of ‘LD? #$07’ to ‘LD?.b #!ExSprSize’ and use the provided routines with the patch. I would suggest leaving your code here for someone to check it out and see the issue. Otherwise, this must be bizarre.

MarkVD100 2023-04-12 12:17:06 AM Link

While the collision fix for the Sumo Bro flame lightning works other than it doesn't hurt Mario regardless, it doesn't apply to custom sprites like the fire pilliar.

Anas 2023-04-12 01:35:02 AM Link

If the fire pillar is a custom sprite, I doubt it actually spawns the vanilla sumo flame sprite. Plus, you can spin-jump on that sprite IIRC. So this patch doesn’t fix that sadly.

Isikoro Author 2023-04-08 06:45:46 AM Link

Originally posted by MarkVD100

Still the same problem, and it's because it doesn't like where there is no !addr. Hence why the previous sa1def works fine. This time, it's working just fine now without needing to re-insert the patch.

Can you show me the error screen?

MarkVD100 2023-04-12 12:07:04 AM Link

Showed it in your DMs.

Isikoro Author 2023-04-07 11:44:57 AM Link

Originally posted by MarkVD100

The new sa1def didn't work with the "Define 170B to 176F wasn't found", but the current one I have still does, but now I'm seeing that the PIXI lotus pollen is randomly wrapping around the screen and still not having a hitbox as well as the fire extended sprite from a sprite that spawns fire after a certain amount of time isn't spawning anymore either.

"Define 170B to 176F wasn't found"?
Please download and try this patch again.

MarkVD100 2023-04-07 09:27:06 PM Link

Still the same problem, and it's because it doesn't like where there is no !addr. Hence why the previous sa1def works fine. This time, it's ~~working just fine now without needing to re-insert the patch.~~ Never mind, the original Volcano Lotus sprite works fine, but not the custom one.

Isikoro Author 2023-04-07 07:52:30 AM Link

Originally posted by MarkVD100

Does it fix the PIXI custom sprite thing too? Notably the extended sprites not having a hitbox anymore?

The hitbox can be fixed by editing the level and applying the More Extended Sprites patch again.

See Readme for information on Extended Sprites to be inserted in Pixi.

MarkVD100 2023-04-13 07:51:11 PM Link

I tried that, and the pollen suddenly doesn't spawn anymore even with extension values and extended sprite number set! (Volcano Lotus + Pollen custom sprite)

MarkVD100 2023-04-06 06:40:59 PM Link

Isikoro Author From older version: More Extended Sprites 2023-04-06 02:01:14 PM Link

Originally posted by MarkVD100

This doesn't correlate well with the Extended No Sprite Limits patch. (After doing the steps, their collision gets disabled, or if not applied the PIXI files, they get stuck in place.)

Updated to fix the lightning flame hit detection bug without the Extended No Sprite Limits patch.
New Version

MarkVD100 From older version: More Extended Sprites 2023-04-06 05:05:00 PM Link

Does it fix the PIXI custom sprite thing too? Notably the extended sprites not having a hitbox anymore?

MarkVD100 From older version: More Extended Sprites 2023-04-05 12:09:06 AM Link

This doesn't correlate well with the Extended No Sprite Limits patch. (After doing the steps, their collision gets disabled, or if not applied the PIXI files, they get stuck in place.)
EDIT: Never mind, the issue I'm having happens regardless of not applying the Extended No Sprite Limits. It's more about the PIXI thing. Forgot to mention that yesterday. I'll see if that above fixes that as well.

Maarfy From older version: More Extended Sprites 2023-03-09 09:02:06 AM Link

This update simply added a text file listing the OAM indices for the various sprite types as used by the patch. All other files including the patch itself are completely unchanged, and as such no further testing has been done.

In the future, you're welcome to ask one of our SMW ASM Section Moderators to edit the file for you in order to avoid adding a minor update and breaking up the comment history.

Users of this patch may wish to check out the "older" version comments to see the moderator approval notes.

Isikoro Author From older version: More Extended Sprites 2023-03-04 07:11:14 AM Link

Originally posted by Isikoro

Originally posted by HammerBrother

if you want, you can include this patch (I think modifying it to merge may be needed, hijack likely conflict)

I will make it correspond.

I have applied it to this patch. Here

Isikoro Author From older version: More Extended Sprites 2023-02-27 01:26:38 PM Link

Originally posted by HammerBrother

if you want, you can include this patch (I think modifying it to merge may be needed, hijack likely conflict)

I will make it correspond.

HammerBrother From older version: More Extended Sprites 2023-02-24 03:40:20 AM Link

if you want, you can include this patch (I think modifying it to merge may be needed, hijack likely conflict)

Anas From older version: More Extended Sprites 2023-02-19 04:20:33 PM Link

Thank you for the precise documentation! Now I know what index is safe to use!

anonimzwx From older version: More Extended Sprites 2022-07-13 04:45:55 PM Link

Is there a way to identify that the patch was applied to the rom? because if i do an extended sprite i would need to know first if the rom is lorom or sa1 and second i need to know if this patch was applied or not to remap the addresses.

MarioFanGamer From older version: More Extended Sprites 2022-07-11 12:55:01 PM Link

Moderated with:

Lunar Magic v3.31
SA-1 Pack v1.40
Asar 1.81
BSNES v115
Console (by MarkAlarm)
Hammer Bro
Volcano Lotus + Pollen

This certainly is a huge patch and there is a notable chance that it will break your hack should you apply it. In fact, it is likely the second biggest patch you're applying to your ROM (only SA-1 is beaten) thanks to the massive amount of remapping.
Furthermore, I am impressed, how you managed to not use any freespace whatsover for this patch.

It should be noted that it uses some extra freeRAM for certainly sprite tables. These are not cleared and can be seen in the Volcano Lotus I linked where the pollen may randomly start to home the player even when the sprite is set to not shoot aimed pollen (though that one is also an oversight of the original sprite and can happen without this patch).

Anas From older version: More Extended Sprites 2022-03-27 08:17:54 AM Link

Originally posted by Isikoro

Originally posted by Anas

I found another issue, but it's a small visual one. If you have an item in the item box and four or more score sprites are on-screen, the item's graphics will temporarily disappear until the score sprites despawn.

Fixed.
However, the default number of possible coexistence is now 16.

Hmm, not a bad tradeoff. But thanks! I'll check it out!

Isikoro Author From older version: More Extended Sprites 2022-03-27 03:46:50 AM Link

Originally posted by Anas

Fixed.
However, the default number of possible coexistence is now 16.

Anas From older version: More Extended Sprites 2022-02-24 10:10:15 AM Link

Isikoro Author From older version: More Extended Sprites 2022-02-13 08:38:24 AM Link

Originally posted by Anas

I found another issue in the Bowser battle room:

You can't shoot fireballs properly. Hopefully this will be fixed sometime.

Fixed.

Anas From older version: More Extended Sprites 2022-02-12 11:30:10 AM Link

I found another issue in the Bowser battle room:

You can't shoot fireballs properly. Hopefully this will be fixed sometime.

Anas From older version: More Extended Sprites 2021-12-26 07:50:05 AM Link

Okay, I just noticed you mentioned the routine to spawn the spin jump stars. In the numbered platform, there was this:

Code

	LDA #$10
	%SpawnExtended()

Replacing it with 'JSL $07FC3B|!bank' fixed it! Thanks! It would be nice to mention the routine for spawning the lava splashes too. In fact, you should have a readme mentioning the stuff mentioned in the description as LX5 said. Anyways, awesome patch and so far found no issues! If I do find any, I'll let you know.

obersteiner86 From older version: More Extended Sprites 2021-12-24 04:14:40 PM Link

@DaMoarbidMan that is not a fatal bug. (Extended sprites 07 and 10 will be erased.)

Anas From older version: More Extended Sprites 2021-12-23 04:36:31 PM Link

Alright, now it's fine! Thanks!

Edit: I forgot to tell you that 'SpawnExtended' needs to be converted too. Here's the conversion:

Collapsed text: Show/Hide

Code

;Routine that spawns an extended sprite with initial speed at the position (+offset)
;of the calling sprite and returns the sprite index in Y
;For a list of extended sprites see here: http://www.smwiki.net/wiki/RAM_Address/$7E:170B

;Input:  A   = number
;        $00 = x offset  \
;        $01 = y offset  | you could also just ignore these and set them later
;        $02 = x speed   | using the returned Y.
;        $03 = y speed   /
;
;Output: Y   = index to extended sprite (#$FF means no sprite spawned)
;        C   = Carry Set = spawn failed, Carry Clear = spawn successful.

?main:
    XBA                        ; Save A
    LDA !15A0,x                ; \
    ORA !186C,x                ; | return if offscreen or about to be eaten
    ORA !15D0,x                ; |
    BNE ?.ret                    ; /
    
; Get Index
    LDY #!ExSprSize                    ; loop over 8 extra sprite slots (last 2 are for fireballs)
?.loop
    LDA !170B,y    ; \ if empty, proceed
    BEQ ?+                        ; /
    DEY                        ; \
    BPL ?.loop                ; | if not, decrease Y and continue with loop
?.ret
    SEC                        ; | set carry if none is spawned
    RTL                        ; /
?+
    XBA                        ; get number back in A
    STA !170B,y     ;
        
        
    LDA $00                    ; \
    CLC : ADC !E4,x        ; |
    STA !171F,y    ; | store x position + x offset (low byte)
    LDA #$00                    ; |
    BIT $00                    ; | create high byte based on $00 in A and add
    BPL ?+                        ; | to x position
    DEC                        ; |
?+    ADC !14E0,x                ; |
    STA !1733,y    ; /
        
    LDA $01                    ; \ 
     CLC : ADC !D8,x        ; |
    STA !1715,y    ; | store y position + y offset    
    LDA #$00                    ; |
    BIT $01                    ; | create high byte based on $01 in A and add
    BPL ?+                        ; | to y position
    DEC                        ; |
?+    ADC !14D4,x                ; |
    STA !1729,y    ; /
    
    LDA $02                    ; \ store x speed
    STA !1747,y    ; /
    LDA $03                    ; \ store y speed
    STA !173D,y    ; /
    
    CLC
    RTL

Edit 3: I discovered a fatal bug. Resources which spawn ext. sprites 0x07 or 0x10 like this and this will crash while attempting to spawn them. What should be done?

Isikoro Author From older version: More Extended Sprites 2021-12-23 01:55:29 PM Link

Originally posted by Anas

Another issue I found is that PIXI's 'ExtendedHurt' and 'ExtendedCapeClipping' don't work with this patch. I converted them myself with the converter.

'ExtendedHurt':
Collapsed text: Show/Hide

Code

;; extended sprite -> mario interaction.

LDA $13F9|!Base2
CMP #$01
BNE .cont
RTL

.cont
	LDA !171F,x
	CLC
	ADC #$03
	STA $04
	LDA !1733,x
	ADC #$00
	STA $0A
	LDA #$0A
	STA $06
	STA $07
	LDA !1715,x
	CLC
	ADC #$03
	STA $05
	LDA !1729,x
	ADC #$00
	STA $0B
	JSL $03B664|!BankB
	JSL $03B72B|!BankB
	BCC .skip
	PHB
	LDA.b #$02|!Bank8
	PHA
	PLB
	PHK
	PEA.w .return-1
	PEA.w $B889-1
	JML $02A469|!BankB
.return
	PLB 
.skip
	RTL

'ExtendedCapeClipping':
Collapsed text: Show/Hide

Code

;; Extended Sprite cape clipping routine
;; input:
;; $00 = X clipping offsets
;; $01 = Width
;; $02 = Y clipping offsets
;; $03 = Height
;; returns: carry set if contact, clear if not

?main:
    JSR ?.ClippingExt
    JSR ?.MarioInteractVal
    JSL $03B72B|!BankB
    RTL



?.ClippingExt                     ; Subroutine to get clipping values (B) for an extended sprite.
    LDA !171F,X
    CLC
    ADC $00
    STA $04
    LDA !1733,X
    ADC #$00
    STA $0A
    LDA $01
    STA $06
    LDA !1715,X
    CLC
    ADC $02
    STA $05
    LDA !1729,X
    ADC #$00
    STA $0B
    LDA $03
    STA $07
    RTS

?.MarioInteractVal               ; Routine to get interaction values for Mario's cape and net punches. Takes the place of "sprite B".
    LDA.w $13E9|!addr
    SEC
    SBC.b #$02
    STA $00                     ; Get X displacement.
    LDA.w $13EA|!addr
    SBC.b #$00
    STA $08
    LDA.b #$14                  ; Width for Mario's capesin and net punch.
    STA $02
    LDA.w $13EB|!addr
    STA $01                     ; Get Y displacement.
    LDA.w $13EC|!addr
    STA $09
    LDA.b #$10                  ; Height for Mario's capesin and net punch.
    STA $03
    RTS

Please include these with the patch.

Edit 2: Here we go again, another one... I converted Sonikku's fire bro successfully, following the given instructions. However, when the fireball sprites spawn, I can't shoot any fireballs. There is no 'LD? #$09' present in the code.

Fire bro:
Collapsed text: Show/Hide

Code

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Fire Bros.
;; By Sonikku
;;
;; Description: Walks back and forth, frequently throwing two fireballs.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

!FireballNumber = $04               ; Extended sprite number from list.txt of fireball.asm.

!FireballSFX = $06                  ; Sound effect to play when shooting fire.
!FireballBank = $1DFC

TILEMAP:            db $46,$4A,$7F
                    db $46,$5A,$2F
                    db $02,$4A,$7F
                    db $02,$5A,$2F

PROPERTIES:	db $40,$00			;actually only contains horizontal flip data, properties are set through CFG/json

TILE_SIZE:	db $02,$00,$00

HORZ_DISP:	db $00,$00,$08
		db $00,$08,$00

VERT_DISP:	db $F8,$08,$08

print "INIT ",pc
    JSR FaceMario
    RTL

print "MAIN ",pc
    PHB : PHK : PLB
    JSR SpriteCode
    PLB
    RTL

Return:
    RTS

; Workaround for sublabels; wastes 4 bytes, but ensures the sprite assembles.
%SubOffScreen()

SpriteCode:
    JSR Graphics

    LDA !14C8,x                     ; If sprite dead of sprites locked, return.
    CMP #$08
    BNE Return
    LDA $9D
    BNE Return

    %SubOffScreen()

    JSL $01A7DC|!BankB              ; Sprite interacts with Mario
    JSR FaceMario                   ; Sprite always faces Mario
    JSL $01802A|!BankB              ; Sprite has gravity
	JSL $018032|!BankB
	
    INC !1570,x

    LDA !1570,x
    CMP #$A0
    BNE .noReset                    ; if timer isn't maximum, branch.

    STZ !1570,x

    LDY #$50                        ; Random option 1
    JSL $01ACF9|!BankB
    AND #$01
    BEQ +
        LDY #$30                    ; Random option 2
+   TYA
    STA !1540,x                     ; Set timer

    STZ !B6,x
.noReset
    LDY #$00                        ; Y = $00

    LDA !151C,x
    AND #$08
    BEQ +                           ; 8 ticks on, 8 ticks off; branch
        INY                         ; Y = $01
+   LDA !1540,x
    BEQ ++                          ; if timer = #$00, branch
    CMP #$20
    BNE +                           ; if timer != #$20, branch
    JSL $01ACF9|!BankB
    AND #$01
    BEQ +                           ; 50% chance to branch.
    LDA !1588,x
    AND #$04
    BEQ +
    LDA #$C8
    STA !AA,x
+   LDY #$02                        ; Y = $02
++  TYA
    STA !1602,x                     ; set frame based on Y
    LDA !1540,x
    CMP #$40
    BCS +                           ; if timer is above #$40, branch
    AND #$1F
    CMP #$0F
    BNE +                           ; if not time to spawn, branch
    JSR GenerateFireball
+   LDA !1540,x
    BNE +
    LDA !1528,x
    BEQ .onGround                   ; if flag is already #$00, branch
+   LDA !1588,x
    AND #$04
    BEQ +                           ; if sprite is in the air, return
    STZ !1528,x                     ; clear flag
    LDA !AA,x
    BMI +
        STZ !AA,x                   ; no speed if positive
+   RTS

.onGround
    LDA !160E,x
    BEQ +
        DEC !160E,x
+   INC !1534,x
    LDA !1534,x
    AND #$1F
    BNE +                           ; only run once every #$20 frames
    JSL $01ACF9|!BankB
    AND #$01
    BNE +                           ; 50% chance to branch
    LDA !1588,x
    AND #$04
    BEQ +                           ; branch if in the air
    INC !1528,x                     ; increment flag
    LDA #$D8
    STA !AA,x                       ; jump
    STZ !B6,x                       ; no x-speed
    RTS

+   LDA !C2,x
    AND #$03                        ; one of 4 possibilities
    ASL A
    TAX
    JMP.w (.pointers,x)

.pointers
    dw .walkLeft
    dw .stopWalk
    dw .walkRight
    dw .stopWalk

.stopWalk
    LDX $15E9|!Base2
    LDA !160E,x
    BNE +
    INC !C2,x                       ; increment state (to walking left or right)
    LDA #$20
    STA !160E,x                     ; set walk timer
+   BRA .finish

.walkLeft
    LDX $15E9|!Base2
    LDY #$F8
    BRA +

.walkRight
    LDX $15E9|!Base2
    LDY #$08
+   LDA !160E,x
    BNE +
    INC !C2,x                       ; increment state (to waiting)
    LDA #$10
    STA !160E,x                     ; set wait timer
+   TYA
    STA !B6,x

    LDA !160E,x
    AND #$3F
    BNE .finish                     ; every so often we let the sprite hop

    LDA !160E,x
    AND #$40
    ASL #2
    LDY #$E0                        ; possibility 1
    BCC +
        LDY #$D8                    ; possibility 2
+   TYA
    STA !AA,x                       ; set y speed
.finish
    LDA !1588,x
    AND #$04
    BEQ +
    INC !151C,x
    LDA !AA,x
    BMI +
    STZ !AA,x
+   RTS

Graphics:
    %GetDrawInfo()

    		LDA !1602,x
                ASL
		CLC			;multiply by 3
		ADC !1602,x
		STA $03                 ; /

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

		LDA !15F6,x
		STA $05

                LDX #$02                ;3 tiles

After_Pre_LOOP_START:
		STX $04			;amount of tiles to store

LOOP_START:
		STX $06

		LDA $02
		BNE NO_ADJ
		TXA
		CLC : ADC #$03		;whoops, i kinda forgot how this works, this should be about right
	        TAX

NO_ADJ:
                LDA $00                 ; \ tile x position = sprite x location ($00)
                CLC
                ADC HORZ_DISP,x
                STA $0300|!Base2,y      ; /
                 
		LDX $06			;restore OAM slot
                                        
		LDA $01                 ; \ tile y position = sprite y location ($01) + tile displacement
		CLC                     ;  |
		ADC VERT_DISP,x         ;  |
		STA $0301|!Base2,y      ; /
                    
		LDA TILE_SIZE,x
		PHA
		TYA                     ; \ get index to sprite property map ($460)...
		LSR A                   ; |    ...we use the sprite OAM index...
		LSR A                   ; |    ...and divide by 4 because a 16x16 tile is 4 8x8 tiles
		TAX                     ; | 
		PLA
		STA $0460|!Base2,x      ; /  

		LDX $06
		TXA                     ; \ X = index to horizontal displacement
		;ORA $03                 ; / get index of tile (index to first tile of frame + current tile number)
		;TAX          
CLC : ADC $03
TAX
		LDA TILEMAP,x           ; \ store tile
		STA $0302|!Base2,y      ; / 

		LDA $05            	; get palette info
.ItsHammer
		LDX $02                 ; \
		ORA PROPERTIES,x        ;  | get tile PROPERTIES using sprite direction
		ORA $64                 ;  | ?? what is in 64, level PROPERTIES... disable layer priority??
		STA $0303|!Base2,y      ; / store tile PROPERTIES

		LDX $06			;and restore OAM slot also

		INY                     ;  | increase index to sprite tile map ($300)...
		INY                     ;  |    ...we wrote 1 16x16 tile...
		INY                     ;  |    ...sprite OAM is 8x8...
		INY                     ;  |    ...so increment 4 times
		;DEC $06                 ;  | go to next tile of frame and loop
		DEX
		BPL LOOP_START          ; / 

		LDX $15E9|!Base2	;
                    
		LDY #$FF                ; \
		LDA $04			;  | A = number of tiles drawn - 1
		JSL $01B7B3|!BankB	; / don't draw if offscreen
		RTS                     ; RETURN


GenerateFireball:
    LDA !15A0,x
    ORA !186C,x
    BNE ++
    LDY #!ExSprSize
-   LDA !extended_num,y
    BEQ +
    DEY
    BPL -
++  RTS

+   LDA.b #!FireballSFX
    STA.w !FireballBank|!Base2
    LDA.b #!FireballNumber+!ExtendedOffset
    STA !extended_num,y
    LDA #$20                        ; extended sprite Y speed
    STA $173D|!Base2,y
    LDA !E4,x                       ; extended sprite X position = 4 pixels to the left
    CLC : ADC #$04
    STA !extended_x_low,y
    LDA !14E0,x                     ; extended sprite Y position (high)
    ADC #$00
    STA !extended_x_high,y
    LDA !D8,x
    CLC : ADC #$F8                  ; extended sprite Y position = 8 pixels above sprite
    STA !extended_y_low,y
    LDA !14D4,x
    ADC #$FF                        ; extended sprite Y position (high)
    STA !extended_y_high,y

    LDA !157C,x                     ; set up extended sprite direction
    TAX
    LDA .xspd,x                     ; set up extended sprite speed
    STA $1747|!Base2,y
    LDX $15E9|!Base2
    RTS

.xspd
    db $02,$FE

FaceMario:
    LDY #$00
    LDA $94
    SEC : SBC !E4,x
    LDA $95
    SBC !14E0,x
    BPL +
        INY
+   TYA
    STA !157C,x
    RTS

Fireball:
Collapsed text: Show/Hide

Code

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Fireball
;; Enemy fireball: a copy of Mario's fireball but can harm the player
;; By Sonikku
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

print "CAPE", pc
LDA #$04
STA $00
LDA #$08
STA $01
LDA #$06
STA $02
LDA #$08
STA $03
%ExtendedCapeClipping()
BCC .notInContact
lda #$01 : sta !170B,x
lda #$10 : sta !176F,x
.notInContact
RTL

print "MAIN ",pc
	PHB : PHK : PLB
	LDA $9D
	BEQ Continue
	JMP Graphics

Continue:
	LDA !extended_y_low,x
	CMP $1C
	LDA !extended_y_high,x
	SBC $1D
	BEQ NotOffscreen
	STZ !extended_num,x
	PLB
	RTL

NotOffscreen:
	INC !extended_table,x
	%ExtendedHurt1()
	LDA !173D,x
	CMP #$30
	BPL .enoughGravity
	CLC : ADC #$04
	STA !173D,x
.enoughGravity
	%ExtendedBlockInteraction()
Fireball:
	BCC .inAir
	INC !175B,x
	LDA !175B,x
	CMP #$02
	BCS .hitTwoObjects
	LDA !1747,x
	BPL .plus
	LDA $0B
	EOR #$FF : INC A
	STA $0B
.plus
	LDA $0B
	CLC : ADC #$04
	TAY
	LDA.w .data_029F99,y
	STA !173D,x
	LDA !extended_y_low,x
	SEC : SBC.w .data_029FA2,y
	STA !extended_y_low,x
	BCS .updatePos
	DEC !extended_y_high,x
	BRA .updatePos

.data_029F99
	db $00,$B8,$C0,$C8,$D0,$D8,$E0,$E8,$F0
.data_029FA2
	db $00,$05,$03,$02,$02,$02,$02,$02,$02

.hitTwoObjects
	LDA #$01
	STA $1DF9|!Base2
	LDA #$0F
	STA !176F,x
	LDA #$01
	STA !extended_num,x
	JMP Graphics

.inAir
	STZ !175B,x
.updatePos
	LDY #$00
	LDA !1747,x
	BPL +
        DEY
+   CLC : ADC !extended_x_low,x
	STA !extended_x_low,x
	TYA
	ADC !extended_x_high,x
	STA !extended_x_high,x
	%SpeedY()
Graphics:
	%ExtendedGetDrawInfo()
	LDA !1747,x
	AND #$80
	LSR A
	STA $03
	LDA !extended_behind,x
	STA $00
	LDA $01
	STA $0200|!Base2,y
	LDA $02
	STA $0201|!Base2,y
	LDA !extended_table,x
	LSR #2
	AND #$03
	TAX
	LDA.w FireballTiles,x
	STA $0202|!Base2,y
	LDA.w FireballProps,x
	EOR $03
	ORA $64
	LDX $00
	BEQ +
        AND #$CF
        ORA #$10
+   STA $0203|!Base2,y
	TYA
	LSR #2
	TAY
	LDA #$00
	STA $0420|!Base2,y
	LDX $15E9|!Base2
	PLB
	RTL

FireballTiles:
	db $2C,$2D,$2C,$2D

FireballProps:
	db $04,$04,$C4,$C4

Edit: Actually, I *can* shoot the fireballs but graphically, they don't show up.

"$173D|!Base2,y" has not been rewritten to "!173D,y".
"$1747|!Base2,y" has not been rewritten to "!1747,y".

I will enclose the two routines with the patch file.

Please re-download the patch and overwrite the converter.

obersteiner86 From older version: More Extended Sprites 2021-12-21 09:05:31 PM Link

hmmm what should happen on enter press i dont see any changes or i am blind ups now i see it. hmm my extendhurt looks dif then yours

Anas From older version: More Extended Sprites 2021-12-21 03:49:44 PM Link

Another issue I found is that PIXI's 'ExtendedHurt' and 'ExtendedCapeClipping' don't work with this patch. I converted them myself with the converter.

'ExtendedHurt':
Collapsed text: Show/Hide

Code

;; extended sprite -> mario interaction.

LDA $13F9|!Base2
CMP #$01
BNE .cont
RTL

.cont
	LDA !171F,x
	CLC
	ADC #$03
	STA $04
	LDA !1733,x
	ADC #$00
	STA $0A
	LDA #$0A
	STA $06
	STA $07
	LDA !1715,x
	CLC
	ADC #$03
	STA $05
	LDA !1729,x
	ADC #$00
	STA $0B
	JSL $03B664|!BankB
	JSL $03B72B|!BankB
	BCC .skip
	PHB
	LDA.b #$02|!Bank8
	PHA
	PLB
	PHK
	PEA.w .return-1
	PEA.w $B889-1
	JML $02A469|!BankB
.return
	PLB 
.skip
	RTL

'ExtendedCapeClipping':
Collapsed text: Show/Hide

Code

;; Extended Sprite cape clipping routine
;; input:
;; $00 = X clipping offsets
;; $01 = Width
;; $02 = Y clipping offsets
;; $03 = Height
;; returns: carry set if contact, clear if not

?main:
    JSR ?.ClippingExt
    JSR ?.MarioInteractVal
    JSL $03B72B|!BankB
    RTL



?.ClippingExt                     ; Subroutine to get clipping values (B) for an extended sprite.
    LDA !171F,X
    CLC
    ADC $00
    STA $04
    LDA !1733,X
    ADC #$00
    STA $0A
    LDA $01
    STA $06
    LDA !1715,X
    CLC
    ADC $02
    STA $05
    LDA !1729,X
    ADC #$00
    STA $0B
    LDA $03
    STA $07
    RTS

?.MarioInteractVal               ; Routine to get interaction values for Mario's cape and net punches. Takes the place of "sprite B".
    LDA.w $13E9|!addr
    SEC
    SBC.b #$02
    STA $00                     ; Get X displacement.
    LDA.w $13EA|!addr
    SBC.b #$00
    STA $08
    LDA.b #$14                  ; Width for Mario's capesin and net punch.
    STA $02
    LDA.w $13EB|!addr
    STA $01                     ; Get Y displacement.
    LDA.w $13EC|!addr
    STA $09
    LDA.b #$10                  ; Height for Mario's capesin and net punch.
    STA $03
    RTS

Code

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Fire Bros.
;; By Sonikku
;;
;; Description: Walks back and forth, frequently throwing two fireballs.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

!FireballNumber = $04               ; Extended sprite number from list.txt of fireball.asm.

!FireballSFX = $06                  ; Sound effect to play when shooting fire.
!FireballBank = $1DFC

TILEMAP:            db $46,$4A,$7F
                    db $46,$5A,$2F
                    db $02,$4A,$7F
                    db $02,$5A,$2F

PROPERTIES:	db $40,$00			;actually only contains horizontal flip data, properties are set through CFG/json

TILE_SIZE:	db $02,$00,$00

HORZ_DISP:	db $00,$00,$08
		db $00,$08,$00

VERT_DISP:	db $F8,$08,$08

print "INIT ",pc
    JSR FaceMario
    RTL

print "MAIN ",pc
    PHB : PHK : PLB
    JSR SpriteCode
    PLB
    RTL

Return:
    RTS

; Workaround for sublabels; wastes 4 bytes, but ensures the sprite assembles.
%SubOffScreen()

SpriteCode:
    JSR Graphics

    LDA !14C8,x                     ; If sprite dead of sprites locked, return.
    CMP #$08
    BNE Return
    LDA $9D
    BNE Return

    %SubOffScreen()

    JSL $01A7DC|!BankB              ; Sprite interacts with Mario
    JSR FaceMario                   ; Sprite always faces Mario
    JSL $01802A|!BankB              ; Sprite has gravity
	JSL $018032|!BankB
	
    INC !1570,x

    LDA !1570,x
    CMP #$A0
    BNE .noReset                    ; if timer isn't maximum, branch.

    STZ !1570,x

    LDY #$50                        ; Random option 1
    JSL $01ACF9|!BankB
    AND #$01
    BEQ +
        LDY #$30                    ; Random option 2
+   TYA
    STA !1540,x                     ; Set timer

    STZ !B6,x
.noReset
    LDY #$00                        ; Y = $00

    LDA !151C,x
    AND #$08
    BEQ +                           ; 8 ticks on, 8 ticks off; branch
        INY                         ; Y = $01
+   LDA !1540,x
    BEQ ++                          ; if timer = #$00, branch
    CMP #$20
    BNE +                           ; if timer != #$20, branch
    JSL $01ACF9|!BankB
    AND #$01
    BEQ +                           ; 50% chance to branch.
    LDA !1588,x
    AND #$04
    BEQ +
    LDA #$C8
    STA !AA,x
+   LDY #$02                        ; Y = $02
++  TYA
    STA !1602,x                     ; set frame based on Y
    LDA !1540,x
    CMP #$40
    BCS +                           ; if timer is above #$40, branch
    AND #$1F
    CMP #$0F
    BNE +                           ; if not time to spawn, branch
    JSR GenerateFireball
+   LDA !1540,x
    BNE +
    LDA !1528,x
    BEQ .onGround                   ; if flag is already #$00, branch
+   LDA !1588,x
    AND #$04
    BEQ +                           ; if sprite is in the air, return
    STZ !1528,x                     ; clear flag
    LDA !AA,x
    BMI +
        STZ !AA,x                   ; no speed if positive
+   RTS

.onGround
    LDA !160E,x
    BEQ +
        DEC !160E,x
+   INC !1534,x
    LDA !1534,x
    AND #$1F
    BNE +                           ; only run once every #$20 frames
    JSL $01ACF9|!BankB
    AND #$01
    BNE +                           ; 50% chance to branch
    LDA !1588,x
    AND #$04
    BEQ +                           ; branch if in the air
    INC !1528,x                     ; increment flag
    LDA #$D8
    STA !AA,x                       ; jump
    STZ !B6,x                       ; no x-speed
    RTS

+   LDA !C2,x
    AND #$03                        ; one of 4 possibilities
    ASL A
    TAX
    JMP.w (.pointers,x)

.pointers
    dw .walkLeft
    dw .stopWalk
    dw .walkRight
    dw .stopWalk

.stopWalk
    LDX $15E9|!Base2
    LDA !160E,x
    BNE +
    INC !C2,x                       ; increment state (to walking left or right)
    LDA #$20
    STA !160E,x                     ; set walk timer
+   BRA .finish

.walkLeft
    LDX $15E9|!Base2
    LDY #$F8
    BRA +

.walkRight
    LDX $15E9|!Base2
    LDY #$08
+   LDA !160E,x
    BNE +
    INC !C2,x                       ; increment state (to waiting)
    LDA #$10
    STA !160E,x                     ; set wait timer
+   TYA
    STA !B6,x

    LDA !160E,x
    AND #$3F
    BNE .finish                     ; every so often we let the sprite hop

    LDA !160E,x
    AND #$40
    ASL #2
    LDY #$E0                        ; possibility 1
    BCC +
        LDY #$D8                    ; possibility 2
+   TYA
    STA !AA,x                       ; set y speed
.finish
    LDA !1588,x
    AND #$04
    BEQ +
    INC !151C,x
    LDA !AA,x
    BMI +
    STZ !AA,x
+   RTS

Graphics:
    %GetDrawInfo()

    		LDA !1602,x
                ASL
		CLC			;multiply by 3
		ADC !1602,x
		STA $03                 ; /

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

		LDA !15F6,x
		STA $05

                LDX #$02                ;3 tiles

After_Pre_LOOP_START:
		STX $04			;amount of tiles to store

LOOP_START:
		STX $06

		LDA $02
		BNE NO_ADJ
		TXA
		CLC : ADC #$03		;whoops, i kinda forgot how this works, this should be about right
	        TAX

NO_ADJ:
                LDA $00                 ; \ tile x position = sprite x location ($00)
                CLC
                ADC HORZ_DISP,x
                STA $0300|!Base2,y      ; /
                 
		LDX $06			;restore OAM slot
                                        
		LDA $01                 ; \ tile y position = sprite y location ($01) + tile displacement
		CLC                     ;  |
		ADC VERT_DISP,x         ;  |
		STA $0301|!Base2,y      ; /
                    
		LDA TILE_SIZE,x
		PHA
		TYA                     ; \ get index to sprite property map ($460)...
		LSR A                   ; |    ...we use the sprite OAM index...
		LSR A                   ; |    ...and divide by 4 because a 16x16 tile is 4 8x8 tiles
		TAX                     ; | 
		PLA
		STA $0460|!Base2,x      ; /  

		LDX $06
		TXA                     ; \ X = index to horizontal displacement
		;ORA $03                 ; / get index of tile (index to first tile of frame + current tile number)
		;TAX          
CLC : ADC $03
TAX
		LDA TILEMAP,x           ; \ store tile
		STA $0302|!Base2,y      ; / 

		LDA $05            	; get palette info
.ItsHammer
		LDX $02                 ; \
		ORA PROPERTIES,x        ;  | get tile PROPERTIES using sprite direction
		ORA $64                 ;  | ?? what is in 64, level PROPERTIES... disable layer priority??
		STA $0303|!Base2,y      ; / store tile PROPERTIES

		LDX $06			;and restore OAM slot also

		INY                     ;  | increase index to sprite tile map ($300)...
		INY                     ;  |    ...we wrote 1 16x16 tile...
		INY                     ;  |    ...sprite OAM is 8x8...
		INY                     ;  |    ...so increment 4 times
		;DEC $06                 ;  | go to next tile of frame and loop
		DEX
		BPL LOOP_START          ; / 

		LDX $15E9|!Base2	;
                    
		LDY #$FF                ; \
		LDA $04			;  | A = number of tiles drawn - 1
		JSL $01B7B3|!BankB	; / don't draw if offscreen
		RTS                     ; RETURN


GenerateFireball:
    LDA !15A0,x
    ORA !186C,x
    BNE ++
    LDY #!ExSprSize
-   LDA !extended_num,y
    BEQ +
    DEY
    BPL -
++  RTS

+   LDA.b #!FireballSFX
    STA.w !FireballBank|!Base2
    LDA.b #!FireballNumber+!ExtendedOffset
    STA !extended_num,y
    LDA #$20                        ; extended sprite Y speed
    STA $173D|!Base2,y
    LDA !E4,x                       ; extended sprite X position = 4 pixels to the left
    CLC : ADC #$04
    STA !extended_x_low,y
    LDA !14E0,x                     ; extended sprite Y position (high)
    ADC #$00
    STA !extended_x_high,y
    LDA !D8,x
    CLC : ADC #$F8                  ; extended sprite Y position = 8 pixels above sprite
    STA !extended_y_low,y
    LDA !14D4,x
    ADC #$FF                        ; extended sprite Y position (high)
    STA !extended_y_high,y

    LDA !157C,x                     ; set up extended sprite direction
    TAX
    LDA .xspd,x                     ; set up extended sprite speed
    STA $1747|!Base2,y
    LDX $15E9|!Base2
    RTS

.xspd
    db $02,$FE

FaceMario:
    LDY #$00
    LDA $94
    SEC : SBC !E4,x
    LDA $95
    SBC !14E0,x
    BPL +
        INY
+   TYA
    STA !157C,x
    RTS

Fireball:
Collapsed text: Show/Hide

Code

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Fireball
;; Enemy fireball: a copy of Mario's fireball but can harm the player
;; By Sonikku
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

print "CAPE", pc
LDA #$04
STA $00
LDA #$08
STA $01
LDA #$06
STA $02
LDA #$08
STA $03
%ExtendedCapeClipping()
BCC .notInContact
lda #$01 : sta !170B,x
lda #$10 : sta !176F,x
.notInContact
RTL

print "MAIN ",pc
	PHB : PHK : PLB
	LDA $9D
	BEQ Continue
	JMP Graphics

Continue:
	LDA !extended_y_low,x
	CMP $1C
	LDA !extended_y_high,x
	SBC $1D
	BEQ NotOffscreen
	STZ !extended_num,x
	PLB
	RTL

NotOffscreen:
	INC !extended_table,x
	%ExtendedHurt1()
	LDA !173D,x
	CMP #$30
	BPL .enoughGravity
	CLC : ADC #$04
	STA !173D,x
.enoughGravity
	%ExtendedBlockInteraction()
Fireball:
	BCC .inAir
	INC !175B,x
	LDA !175B,x
	CMP #$02
	BCS .hitTwoObjects
	LDA !1747,x
	BPL .plus
	LDA $0B
	EOR #$FF : INC A
	STA $0B
.plus
	LDA $0B
	CLC : ADC #$04
	TAY
	LDA.w .data_029F99,y
	STA !173D,x
	LDA !extended_y_low,x
	SEC : SBC.w .data_029FA2,y
	STA !extended_y_low,x
	BCS .updatePos
	DEC !extended_y_high,x
	BRA .updatePos

.data_029F99
	db $00,$B8,$C0,$C8,$D0,$D8,$E0,$E8,$F0
.data_029FA2
	db $00,$05,$03,$02,$02,$02,$02,$02,$02

.hitTwoObjects
	LDA #$01
	STA $1DF9|!Base2
	LDA #$0F
	STA !176F,x
	LDA #$01
	STA !extended_num,x
	JMP Graphics

.inAir
	STZ !175B,x
.updatePos
	LDY #$00
	LDA !1747,x
	BPL +
        DEY
+   CLC : ADC !extended_x_low,x
	STA !extended_x_low,x
	TYA
	ADC !extended_x_high,x
	STA !extended_x_high,x
	%SpeedY()
Graphics:
	%ExtendedGetDrawInfo()
	LDA !1747,x
	AND #$80
	LSR A
	STA $03
	LDA !extended_behind,x
	STA $00
	LDA $01
	STA $0200|!Base2,y
	LDA $02
	STA $0201|!Base2,y
	LDA !extended_table,x
	LSR #2
	AND #$03
	TAX
	LDA.w FireballTiles,x
	STA $0202|!Base2,y
	LDA.w FireballProps,x
	EOR $03
	ORA $64
	LDX $00
	BEQ +
        AND #$CF
        ORA #$10
+   STA $0203|!Base2,y
	TYA
	LSR #2
	TAY
	LDA #$00
	STA $0420|!Base2,y
	LDX $15E9|!Base2
	PLB
	RTL

FireballTiles:
	db $2C,$2D,$2C,$2D

FireballProps:
	db $04,$04,$C4,$C4

Edit: Actually, I *can* shoot the fireballs but graphically, they don't show up.

Anas From older version: More Extended Sprites 2021-12-21 03:15:03 PM Link

Originally posted by Isikoro

To Anas

Did you hold down Enter for three seconds after clicking the "Converter"?

I believe so, but when I did so, nothing seemed to change. I'll try again.

Edit: Okay, tried again and now it works! Thanks! Is there anything else I should worry about or is this it? Also, what do you mean by 'extended sprite index'?

Edit: Okay, I figured it out. 'Extended sprite index' means the address $170B. Would be nice if you were more specific with that, but at least everyone will know now.

Isikoro Author From older version: More Extended Sprites 2021-12-21 02:04:30 PM Link

To Anas

Did you hold down Enter for three seconds after clicking the "Converter"?

Anas From older version: More Extended Sprites 2021-12-21 01:34:00 PM Link

Originally posted by Isikoro

Originally posted by Anas

Originally posted by Isikoro

Originally posted by Anas

Cool patch! Definitely opens up a lot of potential! By the way, I suggest you overwrite either minor ext. sprite 08 or 09 with the spin jump star’s code rather than the unused Yoshi smoke because the latter is a somewhat practical detail.

Edit: For specificity's sake (citing Yoshifanatic), sprites 08 and 09 are duplicates of the unused music note that apparently is supposed to be spawned by exploding turn blocks but aren't. They technically lead to the same code, so you should make one of the sprites' code point to the spin jump star's code. That way, you neither sacrifice the Yoshi smoke nor the unused music note. You can see more info here: https://smwc.me/1472167

I left Yoshi's smoke and assigned minor sprite 09 to the spin jump star.

Thanks! Btw, by 'extended sprite index', do you mean $170B? Because I found this in Sonikku's boomerang bro's code:

Code

    LDY #$07
-   LDA $170B|!Base2,y

and I changed the '#$07' to '#!ExSprSize' like you said, but the extended sprite doesn't work properly. However, the boomerang bro throws it normally. I ran both the boomerang bro and the boomerang ext. sprite through the converter. What do I do?

Can you show me a GIF image?

Code for boomerang projectile:
Collapsed text: Show/Hide

Code

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Boomerang:
;; Flies to the left or right depending on direction thrown,
;; then flies back toward the direction it was thrown.
;; Can be caught by the Boomerang Bros.

        !HammerProp = #!Palette9|!SP3SP4

;don't touch, made so it's actually easy to change hardcoded prop without having to look up for help

!Palette8 = %00000000
!Palette9 = %00000010
!PaletteA = %00000100
!PaletteB = %00000110
!PaletteC = %00001000
!PaletteD = %00001010
!PaletteE = %00001100
!PaletteF = %00001110

!SP1SP2 = %00000000
!SP3SP4 = %00000001

print "CAPE", pc
LDA #$04
STA $00
LDA #$08
STA $01
LDA #$06
STA $02
LDA #$08
STA $03
%ExtendedCapeClipping()
BCC .notInContact
lda #$01 : sta !170B,x
lda #$10 : sta !176F,x
.notInContact
RTL

print "MAIN ",pc

Boomerang:
    JSR Graphics

    LDA $9D
    BNE Return

    %SpeedNoGrav()
    ;%ExtendedHurt()
	JSR CustomInteraction

    INC $0E05|!Base2,x
    LDA !176F,x              ; if timer isn't zero, branch.
    BNE NoDecrement

    LDA !1765,x
    TAY
    LDA !1747,x              ; accelerate sprite based on "direction."
    CMP X_Speed_Max,y
    BEQ NoDecrement
    LDA $1747|!Base2,x
    CLC : ADC X_Accel,y
    STA $1747|!Base2,x
NoDecrement:
    LDA $14                         ; run every other frame.
    LSR A
    BCS Return
    LDA !1779,x
    CMP #$01
    BCS ++
    LDA $1779|!Base2,x              ; increment/decrement y speed based on stuff.
    AND #$01
    TAY
    LDA !173D,x
    CMP Y_Speed_Max,y
    BNE +
        INC $1779|!Base2,x
+   LDA $173D|!Base2,x
    CLC : ADC Y_Accel,y
    STA $173D|!Base2,x
    RTL

++  LDA $173D|!Base2,x
    BEQ Return
    DEC $173D|!Base2,x              ; decrement timer used by the x speed.
Return:
    RTL

X_Accel:
    db $01,$FF

X_Speed_Max:
    db $20,$E0

Y_Accel:
    db $01,$FF

Y_Speed_Max:
    db $12,$EE

Graphics:
    %ExtendedGetDrawInfo()

    LDA $1747|!Base2,x
    STA $03

    LDA $0E05|!Base2,x              ; get frame based on $0E05,x
    LSR #2
    AND #$03
    PHX
    TAX

    LDA $01
    STA $0200|!Base2,y

    LDA $02
    STA $0201|!Base2,y

    LDA Tilemap,x
    STA $0202|!Base2,y

    LDA !HammerProp                       ; palette
    PHY
    TXY
    LDX $03                         ; flip based on direction.
    BPL +
        INY #4
+   ORA Properties,y                ; set properties.
    ORA $64
    PLY
    STA $0203|!Base2,y

    TYA
    LSR #2
    TAX
    LDA #$02
    STA $0420|!Base2,x
    PLX
    RTS

Properties:
    db $40,$40,$80,$80
    db $00,$00,$C0,$C0

Tilemap:
    db $4B,$4E,$4B,$4E

CustomInteraction:
JSR GetExClipping
JSL $03B664|!BankB			;get mario's clipping
JSL $03B72B|!BankB
BCC .nah

LDY #$00               ;A:25A1 X:0007 Y:0001 D:0000 DB:03 S:01EA P:envMXdizCHC:0130 VC:085 00 FL:924
LDA $96                ;A:25A1 X:0007 Y:0000 D:0000 DB:03 S:01EA P:envMXdiZCHC:0146 VC:085 00 FL:924
SEC                    ;A:2546 X:0007 Y:0000 D:0000 DB:03 S:01EA P:envMXdizCHC:0170 VC:085 00 FL:924
SBC !1715,x              ;A:2546 X:0007 Y:0000 D:0000 DB:03 S:01EA P:envMXdizCHC:0184 VC:085 00 FL:924
STA $0F                ;A:25D6 X:0007 Y:0000 D:0000 DB:03 S:01EA P:eNvMXdizcHC:0214 VC:085 00 FL:924
LDA $97                ;A:25D6 X:0007 Y:0000 D:0000 DB:03 S:01EA P:eNvMXdizcHC:0238 VC:085 00 FL:924
SBC !1729,x            ;A:2501 X:0007 Y:0000 D:0000 DB:03 S:01EA P:envMXdizcHC:0262 VC:085 00 FL:924
BPL +            ;A:25FF X:0007 Y:0000 D:0000 DB:03 S:01EA P:eNvMXdizcHC:0294 VC:085 00 FL:924
INY                    ;A:25FF X:0007 Y:0000 D:0000 DB:03 S:01EA P:eNvMXdizcHC:0310 VC:085 00 FL:924

+
LDA $0F					;
CMP #$E6				;
BPL .hurt

LDA $140D|!Base2		; if player's either spinjumping
ORA $187A|!Base2		; or on yoshi
BNE .Spinjmp			; make sprite die in four stars of life force that last 23 frames.

.nah
RTS

.hurt
	PHB
	LDA.b #$02|!Bank8
	PHA
	PLB
	PHK
	PEA.w .return-1
	PEA.w $B889-1
	JML $02A469|!BankB
.return
	PLB
	RTS				;p-sure should be RTL
	
.Spinjmp
JSL $01AB9E|!BankB 
JSL $01AA33|!BankB

LDA #$02			;
STA $1DF9|!Base2		; spin-killed sound effect
RTS

GetExClipping:
	LDA !171F,x
	clc
	adc #$03
	STA $04		;

	LDA !1733,x
	adc #$00
	STA $0A			;

LDA #$0B			;width
STA $06				;

LDA $1715|!Base2,x		;Y pos
clc				;
adc #$00			;
STA $05				;

LDA $1729|!Base2,x		;
adc #$00			;
STA $0B				;

LDA #$0A			;length
STA $07				;
RTS				;

Boomerang bro:
Collapsed text: Show/Hide

Code

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Boomerang Bros.
;; By Sonikku
;; Description: Walks back and forth, frequently throwing 2 boomerangs in the
;; direction of the player and will attempt to catch them when they return.
;; Requires: Extended Sprites Extender
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

!BoomerangNumber = $08      ; Extended sprite number (from list.txt) of the boomerang (boomerang.asm).

TILEMAP:	db $48,$4A,$7F,$4e		;last byte is for hammer (all tables)
		db $48,$5A,$2F,$4e
		db $46,$4A,$7F,$4e
		db $46,$5A,$2F,$4e

HORZ_DISP:	db $00,$00,$08,$0A
		db $00,$08,$00,$F6

VERT_DISP:	db $F8,$08,$08,$F2

TILE_SIZE:	db $02,$00,$00,$02		;$00 - 8x8, $02 - 16x16

PROPERTIES:	db $40,$00			;actually only contains horizontal flip data, properties are set through CFG/json (except for the hammer).

		!HammerProp = #!Palette9|!SP3SP4

;don't touch, made so it's actually easy to change hardcoded prop without having to look up for help

!Palette8 = %00000000
!Palette9 = %00000010
!PaletteA = %00000100
!PaletteB = %00000110
!PaletteC = %00001000
!PaletteD = %00001010
!PaletteE = %00001100
!PaletteF = %00001110

!SP1SP2 = %00000000
!SP3SP4 = %00000001


print "INIT ",pc
    JSR FaceMario
    JSL $01ACF9|!BankB
    AND #$03
    STA !C2,x               ; randomize state
    RTL

print "MAIN ",pc
    PHB : PHK : PLB
    JSR SpriteCode
    PLB
    RTL

Return:
    RTS

; Workaround for sublabels.
%SubOffScreen()

SpriteCode:
    JSR Graphics

    LDA !14C8,x
    CMP #$08
    BNE Return                      ; sprite not normal = return.
    LDA $9D
    BNE Return                      ; sprites locked = return.

    %SubOffScreen()                 ; A guaranteed to be 0

    JSL $01802A|!BankB              ; sprite has gravity.
    JSL $01A7DC|!BankB              ; sprite interacts with mario.
	JSL $018032|!BankB
	
    LDA !AA,x
    BMI .noCatch                    ; sprite won't catch when moving upward
    LDA $14
    AND #$03
    BNE .noCatch
    PHY
    LDY #$0A
-   LDA !1534,x
    CMP $0DF5|!Base2,y              ; state must be the same as the sprite's index.
    BNE +
    LDA !170B,y
    CMP #$14
    BNE +
    LDA !171F,y
    CLC : ADC #$04
    STA $00
    LDA !1733,y
    ADC #$00
    STA $08
    LDA #$04
    STA $02
    LDA !1715,y
    CLC : ADC #$08
    STA $01
    LDA !1729,y
    ADC #$00
    STA $09
    LDA #$08
    STA $03
    JSL $03B69F|!BankB              ;  | check interaction.
    JSL $03B72B|!BankB              ; /
    BCC +
    LDA #$00
    STA !170B,y
+   DEY
    BPL -
    PLY
.noCatch
    LDA !1588,x
    AND #$04
    BEQ +                           ; if sprite not on ground, branch.
    STZ !AA,x                       ; make sprite Y speed = #$00
+   LDA $14
    AND #$0F
    BNE +                           ; once every 16 frames..
    JSR FaceMario                   ; sprite faces mario.
+   LDA !C2,x                       ; $C2,x = sprite walking state.
    AND #$03                        ; can be 1 of 4 possibilities.
    ASL A
    TAX
    JMP.w (.pointers,x)

.pointers
    dw .walkStop                    ; #$00
    dw .walkRight                   ; #$01
    dw .walkStop                    ; #$02
    dw .walkLeft                    ; #$03

.walkStop
    LDX $15E9|!Base2
    LDA !1540,x                     ; when timer > #$00..
    BNE +                           ; .. branch.
    INC !C2,x                       ; increment $C2,x.
    LDA #$40
    STA !1540,x                     ; set walking timer to #$40.
+   STZ !B6,x                       ; clear out x speed otherwise.
    RTS

.walkRight
    LDX $15E9|!Base2
    LDA #$F8                        ; walk right.
    BRA +

.walkLeft
    LDX $15E9|!Base2
    LDA #$08                        ; walk left.
+   STA !B6,x                       ; apply x speed.

    INC !151C,x                     ; increment $151C,x (walking animation frame counter).

    LDA $14                         ; unless frame counter is #$00..
    BNE +                           ; branch.

    JSL $01ACF9|!BankB              ; get random number..
    EOR $13                         ; .. flip some bits to randomize more..
    AND #$01                        ; and make it one of two possibilites.
    BNE +                           ; ..if #$01, branch.

    LDA #$D0                        ; make a short hop..
    STA !AA,x                       ; .. and apply y speed.
    LDA #$28
    STA !1528,x
+
    LDA !1540,x                     ; whenever the timer..
    BNE +                           ; .. is zero..
    INC !C2,x                       ; .. we increment $C2,x (to the short pause in the sprite's walking pattern)..
    LDA #$10                        ; .. and set the timer.
    STA !1540,x
+   LDA !1570,x
    INC !1570,x                     ; increment a frame counter..
    AND #$BF                        ; do some ANDy stuff.
    CMP #$1F                        ; so it throws a boomerang twice.
    BNE +
    LDA #$0F                        ; set boomerang throw timer.
    STA !163E,x
+   LDA !151C,x                     ; get frame counter.
    LSR #3                          ; divide several times.
    AND #$01                        ; can be 1 of 2 possibilities.
    TAY                             ; transfer this result to Y.
    LDA !163E,x                     ; whenever the sprite isn't about to throw an extended sprite..
    BEQ +                           ; .. branch away.
    CMP #$01                        ; if the timer isn't #$01..
    BNE ++                          ; .. branch away.
    PHY
    JSR GenerateHammer              ; EVEN THOUGH I AM NOT THROWING A HAMMER.
    PLY
    BRA ++                          ; skip frame increments.

+   INY                             ; increment frame by 1..
    INY                             ; .. and by 1 more.
++  TYA                             ; transfer whatever is in the Y index to A..
    STA !1602,x                     ; .. and store to the sprite's frame.
    RTS

Graphics:
    %GetDrawInfo()

    LDA !1602,x
                ASL A
                ASL A                   ;  | $03 = index to frame start (frame to show * 2 tile per frame)
                STA $03                 ; /

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

		LDA !15F6,x
		STA $05

                LDA !163E,x
                BEQ Pre_LOOP_START
		DEC
		BEQ Pre_LOOP_START

		LDX #$03		;load 4 tiles
		BRA After_Pre_LOOP_START

Pre_LOOP_START:
                LDX #$02                ;3 tiles if hammer isn't shown

After_Pre_LOOP_START:
		STX $04			;amount of tiles to store
		;STX $06		;store current OAM slot index used to eliminate most PHX : PLX combinations (because really)

LOOP_START:
		STX $06

		LDA $02
		BNE NO_ADJ
		;ASL
		;ASL
		TXA
		CLC : ADC #$04		;whoops, i kinda forgot how this works, this should be about right
	        TAX

NO_ADJ:
                LDA $00                 ; \ tile x position = sprite x location ($00)
                CLC
                ADC HORZ_DISP,x
                STA $0300|!Base2,y      ; /
                 
		LDX $06			;restore OAM slot
                                        
		LDA $01                 ; \ tile y position = sprite y location ($01) + tile displacement
		CLC                     ;  |
		ADC VERT_DISP,x         ;  |
		STA $0301|!Base2,y      ; /
                    
		LDA TILE_SIZE,x
		PHA
		TYA                     ; \ get index to sprite property map ($460)...
		LSR A                   ; |    ...we use the sprite OAM index...
		LSR A                   ; |    ...and divide by 4 because a 16x16 tile is 4 8x8 tiles
		TAX                     ; | 
		PLA
		STA $0460|!Base2,x      ; /  

		LDX $06
		;PHX
		TXA                     ; \ X = index to horizontal displacement
		ORA $03                 ; / get index of tile (index to first tile of frame + current tile number)
		TAX
                                 
		LDA TILEMAP,x           ; \ store tile
		STA $0302|!Base2,y      ; / 

		LDX $06
		LDA !HammerProp
		CPX #$03		;check hammer tile to apply hardcoded prop
		BEQ .ItsHammer

		LDA $05            	; get palette info

.ItsHammer
		LDX $02                 ; \
		ORA PROPERTIES,x        ;  | get tile PROPERTIES using sprite direction
		ORA $64                 ;  | ?? what is in 64, level PROPERTIES... disable layer priority??
		STA $0303|!Base2,y      ; / store tile PROPERTIES

		LDX $06			;and restore OAM slot also

		INY                     ;  | increase index to sprite tile map ($300)...
		INY                     ;  |    ...we wrote 1 16x16 tile...
		INY                     ;  |    ...sprite OAM is 8x8...
		INY                     ;  |    ...so increment 4 times
		;DEC $06                 ;  | go to next tile of frame and loop
		DEX
		BPL LOOP_START          ; / 

		LDX $15E9|!Base2	;
                    
		LDY #$FF                ; \
		LDA $04			;  | A = number of tiles drawn - 1
		JSL $01B7B3|!BankB	; / don't draw if offscreen
		RTS                     ; RETURN

GenerateHammer:
    LDA !15A0,x
    ORA !186C,x
    BNE ++
    LDY #$07
-   LDA $170B|!Base2,y
    BEQ +
    DEY
    BPL -
++  RTS

+   LDA.b #!BoomerangNumber+!ExtendedOffset
    STA $170B|!Base2,y              ; ext. sprite number.
    LDA #$EA                        ; ext. sprite y speed.
    STA !173D,y
    LDA !E4,x                       ; ext. sprite x position = same as sprite.
    STA !171F,y
    LDA !14E0,x                     ; ext. sprite x position (high) = same as sprite.
    STA !1733,y
    LDA !D8,x
    CLC : ADC #$F0                  ; ext. sprite y position = 16 pixels above sprite.
    STA !1715,y
    LDA !14D4,x
    ADC #$FF                        ; ext. sprite y position (high) = sets the carry stuff.
    STA !1729,y
    LDA #$00                        ; clear information.
    STA !1779,y
    LDA #$40                        ; set timer before returning (can be changed for interesting results*).
    STA !176F,y

;; * - I'd personally use a random number generator to make it so the boomerangs
;; go in slightly randomized patterns.

    LDA !157C,x                     ; set up ext. sprite direction.
    EOR #$01
    STA !1765,y
    TAX
    LDA Hammer_X_Speed,x            ; set up ext. sprite speed.
    STA !1747,y
    TXA
    LDX $15E9|!Base2
    STA $0DF5|!Base2,y              ; get sprite index and put into ext. sprite (using overworld sprite data becuase its unused during levels).
    STA !1534,x
    RTS

Hammer_X_Speed:
    db $E0,$20                      ; not recommended to change.

; Modified SubHorzPos; only uses needed information.
FaceMario:
    LDY #$00
    LDA $94
    SEC : SBC !E4,x
    LDA $95
    SBC !14E0,x
    BPL $01
    INY
    TYA
    STA !157C,x
    RTS

Isikoro Author From older version: More Extended Sprites 2021-12-21 01:06:56 PM Link

Originally posted by Anas

Originally posted by Isikoro

Originally posted by Anas

I left Yoshi's smoke and assigned minor sprite 09 to the spin jump star.

Thanks! Btw, by 'extended sprite index', do you mean $170B? Because I found this in Sonikku's boomerang bro's code:

Code

    LDY #$07
-   LDA $170B|!Base2,y

Can you show me a GIF image?

Anas From older version: More Extended Sprites 2021-12-21 09:19:35 AM Link

Originally posted by Isikoro

Originally posted by Anas

I left Yoshi's smoke and assigned minor sprite 09 to the spin jump star.

Thanks! Btw, by 'extended sprite index', do you mean $170B? Because I found this in Sonikku's boomerang bro's code:

Code

    LDY #$07
-   LDA $170B|!Base2,y

obersteiner86 From older version: More Extended Sprites 2021-12-20 01:22:57 PM Link

seems to break with the Extended No Sprite Tile Limits v3.1 because:
; This is similar to edit1754's famous No Sprite Tile Limits patch, except that
; this one is for sprites using the other half of OAM. That is, the patch makes it
; so that sprite tiles using OAM addresses $02xx (extended sprites, cluster sprites,
; minor extended sprites, block bounce sprites, smoke images, spinning coins
; from blocks, and Yoshi's tongue), use dynamic OAM indexes instead of hardcoded
; ones, just like normal sprites do when the normal No Sprite Tile Limits patch is
; used. This drastically reduces the risk of any sprite graphics glitching up because
; of an OAM conflict.
; (It also means that Sumo Brothers work properly with the original NSTL patch and sprite memory 10; they didn't before.)

Isikoro Author From older version: More Extended Sprites 2021-12-18 12:51:05 PM Link

Originally posted by Anas

I left Yoshi's smoke and assigned minor sprite 09 to the spin jump star.

HammerBrother From older version: More Extended Sprites 2021-12-15 02:56:40 AM Link

Predicting bullet hell hacks are comming.

Anas From older version: More Extended Sprites 2021-12-12 06:02:10 AM Link

lx5 From older version: More Extended Sprites 2021-12-11 03:08:17 PM Link

Cool! I hope people actually read the instructions on this resource.

Also, maybe you could add the patch's description as a standalone readme file? There's none included in the resource and people might not check the instructions you added in this page.