WarpTileListPointers:
dw .FacingDownWarpTiles
dw .FacingUpWarpTiles
dw .FacingLeftWarpTiles
dw .FacingRightWarpTiles
MACRO warp_carpet_tiles
IF _NARG
db \
ENDC
db -1 ; end
ENDM
.FacingDownWarpTiles:
warp_carpet_tiles $01, $12, $17, $3D, $04, $18, $33
.FacingUpWarpTiles:
warp_carpet_tiles $01, $5C
.FacingLeftWarpTiles:
warp_carpet_tiles $1A, $4B
.FacingRightWarpTiles:
warp_carpet_tiles $0F, $4E