;************************************************************************ ;* * ;* title name : "yossy" * ;* proccess : course BG write sub.1 * ;* file name : ys_bgsc0 * ;* * ;************************************************************************ ; ; SALL ; include ys_header.inc include ys_unit.h ; ; ; ; ;;;; include yst_header.inc ;;;; include ../../../JPN/sfc/ys_unit.h ; XALL ; ; ;------------------------------------------------------------------------ ;- global symbol - ;------------------------------------------------------------------------ GLB KOTEISB,KAHENSB GLB KOTESB,KAHNSB ; GLB RND_RND GLB UPCHK_SB,DWNCHK_SB,LFTCHK_SB,RITCHK_SB ; ; ; ;------------------------------------------------------------------------ ;- extern symbol - ;------------------------------------------------------------------------ ; ;-------< bgsc1 >-------------------------------------------------------- EXT BG_FLOOR0,BG_FLOOR1,FLOOR_RND EXT FLORLFT,FLORRIT,FLRLFT_RND,FLR225 EXT FLORUPDWN0,FLORUPDWN1 EXT KABELFT,KABERIT EXT TBOUST,YBOUST EXT LIFT30,LIFT45,LIFTST,TONNEL,KUMOKUMO EXT WTRWTR,WTRGRND,WTRLAND,WTRROCK,WTRBRIDGEH EXT WTRBRIDGEV,WTRLIFT,WTRKINOKO,WTRHANA EXT YOGAN,YOGAN_KYOTU EXT JNGL_FOOR,JNGL_LEFT,JNGL_RIGHT,JNGL_DORO EXT JNGL_DR_LT,JNGL_DR_RT,JNGL_LDRU,JNGL_LURD EXT JNGL_KS_UP0,JNGL_KS_UP1,JNGL_KUI,JNGL_STNE EXT JNGL_TULU0,JNGL_TULU1,JNGL_WOOD,JNGL_TLUP0 EXT JNGL_TLUP1,JNGL_BLOCK0,JNGL_BLOCK1,JNGL_WRTKS EXT JUNGLE_WTR,HN_ATR_HS,YGN_IWA_BIG,YGN_IWA_SML EXT KUSAANAURU60,KUSAANAURD60,TTDOKAN EXT SNOWKUMO,SNOWBOUSD EXT YOGANHARI EXT KABEHBLOCK,KABEVBLOCK,KABEVBLOCK2,KBKABE,KABEUPDWN EXT KABEYOGAN,KABEYUKA_L,KABEYUKA_R,KABEWINDOW EXT BLOKSLM EXT KUSAETABG,KUSABLKBG EXT KABESENROVH,KABESENROS,KABEYUKABOU,KABESAKBOU EXT KUSAHANHAS,KUSAOVHANG EXT KUSAANARD30,KUSAANARD45,KUSAANARD60 EXT KUSAANAURU30,KUSAANAURU45,KUSAANAURD30,KUSAANAURD45 EXT RED_YLW_GRN,SNOW_BLCK,GIMEN,BGCOIN,FRWR_GIMEN EXT HEKOMU,GOMU EXT GOALYUKA,KABEBLOCK EXT TOGEBOWSET,COLRBLK EXT TATTURU,ZASSOU1,ZASSOU2,ZASSOU3,TURUKUS EXT TURUKUSS,TURUKUSL,TURUKUSR,TURUKUSC,NANAMTURU EXT KAIDAN,KABE1,KABE2,KABE3,KABEKS,KABEANA EXT KBNANAUP,KBNANADWN,BLUECOIN,BLUECOIN_NNM_SB EXT KUSAANAU60R,KUSAANAU60L EXT KUSAJARI,DWNBLK,BKTKABE,HNTULU EXT CHKWBIG,BRKUI30,BRKUI45,BRKUIEDA0,BRKUIEDA1 EXT YMARASI,CONTBLCK,CHKTK,CHKTKIWA EXT CHKBIGWOD,CHKSMLWOD0,CHKSMLWOD1 EXT HNIWABLCK,CHKWSML_SB,NRR_TAMA EXT COLR_BLCK,BRK_BLCK,DOKAN,TGBLKST,TGBLKCR EXT NRMLBOW,MOVE_DOKAN EXT DKNLFST,DKNRIST,DKNUPST,DKNDNST EXT DKNTTST,DKNYKST,DKNTYST,DKNHNST EXT DKRIUP0,DKRIUP1,DKRIUP2,DKRIUP3 EXT DKLFUP0,DKLFUP1,DKLFUP2,DKLFUP3 EXT DUPENST,DDNENST,DRIENST,DLFENST EXT DKWHSST,DKWTTST,DKWLFST,DKWRIST,DKWLDST,DKWRDST EXT COINXPS,COINYPS,COINNPS,DKWTRST EXT KBWAKST,KBLFUST,KBRIUST,HANA_DWN45 EXT HANA_DWN22,HANA_DWN10,HANA_TT,HANA_YK EXT DKN_ROMKB,DKN_ROMTWKL,DKN_ROMTWKR EXT DKN_ROMTWKU,DKN_ROMTWKD,SORA_MRT EXT NAZO_BLCK,SNOW_YK,SNOW_WTR,CK2_ICEFOR EXT CK2_ICIW,CK2_YOGAN0,CK2_YOGAN1,CK2_TANAKN EXT SORA_HSR,SNOW_ANA,FLOWER_YK,FLWR_LDRU22 EXT FLWR_LDRU45,FLWR_LDRU60,FLWR_LURD22,FLWR_LURD45 EXT FLWR_LURD60,FLWR_LTRT,YGN_UPBLK,YGN_YUKA EXT TOGE2,KAMEC_BLK ; ;-------< bgsc2 >-------------------------------------------------------- EXT JUNGLE_HA,JNGL_3HA,JNGL_TULU EXT DBLTELE_ROOM,WTR_BKTSTOP EXT I_CHOU_ST,GLGL_SNTR,TNSN_LR_HS,TNSN_RL_HS EXT TNSN_LR_KN,TNSN_RL_KN,KUIKUI,SPLCOIN EXT STT_DM_UNT,LST_BOS_No1,WLD6_HONE EXT DBLTL_ANA,DBLTL_DOR EXT HILIGHT_SML EXT KABEHOLE,KABEMOVE,KABE1POS EXT HBLOCK, HOMEST,GOALPOL EXT TRTPKUS,TRRTKS,TRLTKS EXT NZMANA,MIDKUSA,UPKUSA,DOWNKUSA EXT AROW,GURSNTR,GURDAI,KSRPL EXT HNTULU01,HNTULU23,HNTULU456,HNTULU789 EXT CHKWSML,HANAIWA,BREDA,CHKTKISI EXT KUSAKAGE,DKNINST EXT DKUPBST,DKDNBST,DKLFBST,DKRIBST,DTTSLST,DTTSRST EXT DTTLLST,DTTLRST,DYKSUST,DYKSDST,DYKLUST,DYKLDST EXT DKHOTST,DKNNKST,KAKUHO_SET,JGM_HOLL EXT GOAL_DAI,GOAL_YN,SORA_KUMO EXT DOKANANA,DOKAN_YKARW,DOKAN_TTARW EXT KUSANOEEG,HANA_EN_SML,HANA_EN_MID,HANA_EN_BIG EXT HANA_END,DOKAN_KD,DKN_ROMKD0,DKN_ROMKD1 EXT DKN_ROMKD2,DKN_ROMKD3,HANA_HRT,Xmas_TREE EXT CHIKA2_ZRR,CHIKA2_ICEHH,CHIKA2_CRSTL EXT CHIKA2_YGIWA,CHIKA2_KNSML,CHIKA2_KNBIG EXT CHIKA2_3KN4KH,CHIKA2_SLMKN,SORA_SMLGRDI EXT SORA_TNGR,SORA_BIGDI,EGGBLOCK,FLOWER_MOYOU EXT FLOWER_HANA,FLOWER_IWA,YGN_LOCKDKN ; ; ; EXT UNITST,UNDO_GO ; ; ; ;------------------------------------------------------------------------ ;- define symbol - ;------------------------------------------------------------------------ ;;;; EQU ; ; ;************************************************************************ ;* * ;* program start * * ;* * ;************************************************************************ ; ; EXTEND ; ; MEM8 IDX8 ; Group_12 GROUP Bgsc0_pro Bgsc0_pro SECT REL ; ; ;************************************************************************ ;* course BG write sub table * ;************************************************************************ ; ;-------------- kotei data -------------------------------------- KOTEISB EQU $ WORD JUNGLE_HA0-1 ;[0] WORD JUNGLE_HA1-1 ;[1] WORD JUNGLE_HA2-1 ;[2] WORD JUNGLE_HA3-1 ;[3] WORD JUNGLE_HA4-1 ;[4] WORD JUNGLE_HA5-1 ;[5] WORD JUNGLE_HA6-1 ;[6] WORD JUNGLE_HA7-1 ;[7] WORD JUNGLE_HA8-1 ;[8] WORD JUNGLE_HA9-1 ;[9] WORD JUNGLE_3HA0-1 ;[A] WORD JUNGLE_3HA1-1 ;[B] WORD JUNGLE_TULU-1 ;[C] WORD DBLTELE_ROOM0-1 ;[D] WORD DBLTELE_ROOM1-1 ;[E] WORD WATER_BKTSTOP-1 ;[F] ; WORD I_CHOU_SET-1 ;[10] WORD GLGL_SENTER-1 ;[11] WORD TNSN_LR_HASI-1 ;[12] WORD TNSN_RL_HASI-1 ;[13] WORD TNSN_LR_KIDN-1 ;[14] WORD TNSN_RL_KIDN-1 ;[15] WORD KUI_KUI-1 ;[16] WORD SPL_COIN-1 ;[17] WORD STAT_DEMO_UNT-1 ;[18] WORD LAST_BOSS_No1-1 ;[19] WORD LAST_BOSS_No2-1 ;[1A] WORD WLD6_HONE0-1 ;[1B] WORD WLD6_HONE1-1 ;[1C] WORD WLD6_HONE2-1 ;[1D] WORD DBLTL_HOLE-1 ;[1E] WORD DBLTL_DOOR-1 ;[1F] ; WORD HILIGHT_RHR21-1 ;[20] WORD HILIGHT_BHR21-1 ;[21] WORD HILIGHT_RHR22-1 ;[22] WORD HILIGHT_BHR22-1 ;[23] WORD HILIGHT_RLR21-1 ;[24] WORD HILIGHT_BLR21-1 ;[25] WORD HILIGHT_RLR22-1 ;[26] WORD HILIGHT_BLR22-1 ;[27] WORD HILIGHT_RS11-1 ;[28] WORD HILIGHT_BS11-1 ;[29] WORD HILIGHT_RS12-1 ;[2A] WORD HILIGHT_BS12-1 ;[2B] WORD HILIGHT_RS21-1 ;[2C] WORD HILIGHT_BS21-1 ;[2D] WORD HILIGHT_RS22-1 ;[2E] WORD HILIGHT_BS22-1 ;[2F] ; WORD KABE_HOLE-1 ;[30] WORD KABE_MOVE-1 ;[31] WORD SENRO00-1 ;[32] WORD SENRO01-1 ;[33] WORD SENRO02-1 ;[34] WORD SENRO03-1 ;[35] WORD SENRO04-1 ;[36] WORD SENRO05-1 ;[37] WORD SENRO06-1 ;[38] WORD SENRO07-1 ;[39] WORD SENRO08-1 ;[3A] WORD RAKUGAKI00-1 ;[3B] WORD RAKUGAKI01-1 ;[3C] WORD RAKUGAKI02-1 ;[3D] WORD RAKUGAKI03-1 ;[3E] WORD RAKUGAKI04-1 ;[3F] ; WORD RAKUGAKI05-1 ;[40] WORD RAKUGAKI06-1 ;[41] WORD RAKUGAKI07-1 ;[42] WORD RAKUGAKI08-1 ;[43] WORD RAKUGAKI09-1 ;[44] WORD RAKUGAKI10-1 ;[45] WORD H_BLOCK-1 ;[46] WORD BGHOMEST-1 ;[47] WORD GOAL_POL-1 ;[48] WORD TRTPKUSST-1 ;[49] WORD TRRTKSST-1 ;[4A] WORD TRLTKSST-1 ;[4B] WORD NZMANASET-1 ;[4C] WORD MID_KUSA-1 ;[4D] WORD UP_KUSA-1 ;[4E] WORD DOWN_KUSA-1 ;[4F] ; WORD YAZILSI-1 ;[50] WORD GURSENTER-1 ;[51] WORD GURUDAI-1 ;[52] WORD KUSARIPL-1 ;[53] WORD HANATULU0-1 ;[54] WORD HANATULU1-1 ;[55] WORD HANATULU2-1 ;[56] WORD HANATULU3-1 ;[57] WORD HANATULU4-1 ;[58] WORD HANATULU5-1 ;[59] WORD HANATULU6-1 ;[5A] WORD HANATULU7-1 ;[5B] WORD HANATULU8-1 ;[5C] WORD HANATULU9-1 ;[5D] WORD CHIKUWASML-1 ;[5E] WORD HANAIWA00-1 ;[5F] ; WORD HANAIWA01-1 ;[60] WORD HANAIWA02-1 ;[61] WORD HANAIWA03-1 ;[62] WORD HANAIWA04-1 ;[63] WORD HANAIWA05-1 ;[64] WORD HANAIWA06-1 ;[65] WORD HANAIWA07-1 ;[66] WORD BOROEDA-1 ;[67] WORD CHIKATAKIISI0-1 ;[68] WORD CHIKATAKIISI1-1 ;[69] WORD KUSAKAGESML-1 ;[6A] WORD KUSAKAGEMID-1 ;[6B] WORD KUSAKAGEBIG-1 ;[6C] WORD DOKAN_UP_IN-1 ;[6D] WORD DOKAN_DN_IN-1 ;[6E] WORD DOKAN_LF_IN-1 ;[6F] ; WORD DOKAN_RT_IN-1 ;[70] WORD DOKAN_XSZ0-1 ;[71] WORD DOKAN_XSZ1-1 ;[72] WORD DOKAN_YSZ0-1 ;[73] WORD DOKAN_YSZ1-1 ;[74] WORD DOKAN_XTNG0-1 ;[75] WORD DOKAN_XTNG1-1 ;[76] WORD DOKAN_XTNG2-1 ;[77] WORD DOKAN_XTNG3-1 ;[78] WORD DOKAN_YTNG0-1 ;[79] WORD DOKAN_YTNG1-1 ;[7A] WORD DOKAN_YTNG2-1 ;[7B] WORD DOKAN_YTNG3-1 ;[7C] WORD DOKAN_WTROUT-1 ;[7D] WORD DOKAN_NKAGE0-1 ;[7E] WORD DOKAN_NKAGE1-1 ;[7F] ; WORD JUGEMU_HOLL-1 ;[80] WORD GOAL_YUKA_DAI-1 ;[81] WORD GOAL_YANE-1 ;[82] WORD SORA_KUMO0-1 ;[83] WORD SORA_KUMO1-1 ;[84] WORD SORA_KUMO2-1 ;[85] WORD SORA_KUMO3-1 ;[86] WORD SORA_KUMO4-1 ;[87] WORD DOKAN_ANA-1 ;[88] WORD DOKAN_LFARW-1 ;[89] WORD DOKAN_RTARW-1 ;[8A] WORD DOKAN_UPARW-1 ;[8B] WORD DOKAN_DWARW-1 ;[8C] WORD KUSA_NOEEG-1 ;[8D] WORD HANA_EN_SML0-1 ;[8E] WORD HANA_EN_SML1-1 ;[8F] ; WORD HANA_EN_SML2-1 ;[90] WORD HANA_EN_SML3-1 ;[91] WORD HANA_EN_MID0-1 ;[92] WORD HANA_EN_MID1-1 ;[93] WORD HANA_EN_MID2-1 ;[94] WORD HANA_EN_MID3-1 ;[95] WORD HANA_EN_BIG0-1 ;[96] WORD HANA_EN_BIG1-1 ;[97] WORD HANA_EN_BIG2-1 ;[98] WORD HANA_EN_BIG3-1 ;[99] WORD HANA_END0-1 ;[9A] WORD HANA_END1-1 ;[9B] WORD HANA_END2-1 ;[9C] WORD HANA_END3-1 ;[9D] WORD DOKAN_LFKD-1 ;[9E] WORD DOKAN_RTKD-1 ;[9F] ; WORD DOKAN_ROMKD0-1 ;[A0] WORD DOKAN_ROMKD1-1 ;[A1] WORD DOKAN_ROMKD2-1 ;[A2] WORD DOKAN_ROMKD3-1 ;[A3] WORD HANA_HARETU-1 ;[A4] WORD BIG_Xmas_TREE-1 ;[A5] WORD SML_Xmas_TREE-1 ;[A6] WORD CHIKA2_ICEHYHO-1 ;[A7] WORD YAZILSI_SB-1 ;[A8] WORD CHIKA2_ZRR0-1 ;[A9] WORD CHIKA2_ZRR1-1 ;[AA] WORD CHIKA2_ZRR2-1 ;[AB] WORD CHIKA2_ZRR3-1 ;[AC] WORD CHIKA2_CRSTL0-1 ;[AD] WORD CHIKA2_CRSTL1-1 ;[AE] WORD CHIKA2_CRSTL2-1 ;[AF] ; WORD CHIKA2_CRSTL3-1 ;[B0] WORD CHIKA2_CRSTL4-1 ;[B1] WORD CHIKA2_CRSTL5-1 ;[B2] WORD CHIKA2_YOGNIWA-1 ;[B3] WORD CHIKA2_KNSML0-1 ;[B4] WORD CHIKA2_KNSML1-1 ;[B5] WORD CHIKA2_KNBIG0-1 ;[B6] WORD CHIKA2_KNBIG1-1 ;[B7] WORD CHIKA2_3KINOK-1 ;[B8] WORD CHIKA2_4KINOK-1 ;[B9] WORD CHIKA2_SLMKN0-1 ;[BA] WORD CHIKA2_SLMKN1-1 ;[BB] WORD CHIKA2_SLMKN2-1 ;[BC] WORD CHIKA2_SLMKN3-1 ;[BD] WORD CHIKA2_SLMKN4-1 ;[BE] WORD CHIKA2_SLMKN5-1 ;[BF] ; WORD SORA_SMLGRDAI-1 ;[C0] WORD SORA_TONGARI-1 ;[C1] WORD SORA_BIGDAI-1 ;[C2] WORD SORA_BIGRDAI-1 ;[C3] WORD EGG_BLOCK-1 ;[C4] WORD FLOWER_MOYOU0-1 ;[C5] WORD FLOWER_MOYOU1-1 ;[C6] WORD FLOWER_MOYOU2-1 ;[C7] WORD FLOWER_MOYOU3-1 ;[C8] WORD FLOWER_MOYOU4-1 ;[C9] WORD FLOWER_HANA0-1 ;[CA] WORD FLOWER_HANA1-1 ;[CB] WORD FLOWER_HANA2-1 ;[CC] WORD FLOWER_HANA3-1 ;[CD] WORD FLOWER_HANA4-1 ;[CE] WORD FLOWER_HANA5-1 ;[CF] ; WORD FLOWER_HANA6-1 ;[D0] WORD FLOWER_HANA7-1 ;[D1] WORD FLOWER_HANA8-1 ;[D2] WORD FLOWER_HANA9-1 ;[D3] WORD FLOWER_IWA00-1 ;[D4] WORD FLOWER_IWA01-1 ;[D5] WORD FLOWER_IWA02-1 ;[D6] WORD FLOWER_IWA03-1 ;[D7] WORD FLOWER_IWA04-1 ;[D8] WORD FLOWER_IWA05-1 ;[D9] WORD FLOWER_IWA06-1 ;[DA] WORD FLOWER_IWA07-1 ;[DB] WORD FLOWER_IWA08-1 ;[DC] WORD FLOWER_IWA09-1 ;[DD] WORD FLOWER_IWA10-1 ;[DE] WORD FLOWER_IWA11-1 ;[DF] ; WORD YOGAN_LOCKDKN-1 ;[E0] WORD 000000H,000000H,000000H,000000H,000000H,000000H,000000H ;[E1]-[E7] WORD 000000H,000000H,000000H,000000H,000000H,000000H,000000H,000000H ;[E8]-[EF] WORD 000000H,000000H,000000H,000000H,000000H,000000H,000000H,000000H ;[F0]-[F7] WORD 000000H,000000H,000000H ;[F8]-[FA] ; WORD DISPCOPY-1 ;[FB] WORD SPLB2POS-1 ;[FC] WORD KAKUHO-1 ;[FD] WORD SCRL45-1 ;[FE] WORD KAIHOU-1 ;[FF] ; ;-------------- kahen data -------------------------------------- KAHENSB EQU $-2 WORD FLOORSET-1 ;[1] WORD FLORLTST-1 ;[2] WORD FLORRTST-1 ;[3] WORD FLORUPDWN30-1 ;[4] WORD FLORDWNUP30-1 ;[5] WORD FLORUPDWN45-1 ;[6] WORD FLORDWNUP45-1 ;[7] WORD FLORUPDWN60-1 ;[8] WORD FLORDWNUP60-1 ;[9] WORD KABELTST-1 ;[A] WORD KABERTST-1 ;[B] WORD TATBOUST-1 ;[C] WORD HANYKBOU-1 ;[D] WORD TATBOULT-1 ;[E] WORD TATBOURT-1 ;[F] ; WORD YKLIFT30-1 ;[10] WORD YKLIFT45-1 ;[11] WORD YKLIFT60-1 ;[12] WORD YKLIFT-1 ;[13] WORD TONNELINT-1 ;[14] WORD KUMO_KUMO-1 ;[15] WORD WATERWATER-1 ;[16] WORD WATERGRND-1 ;[17] WORD WATERLAND-1 ;[18] WORD WATERROCK-1 ;[19] WORD WATERBRIDGEH-1 ;[1A] WORD WATERBRIDGEV-1 ;[1B] WORD WATERLIFT-1 ;[1C] WORD WATERKINOKO-1 ;[1D] WORD WATERHANA-1 ;[1E] WORD YOGANYOGAN-1 ;[1F] ; WORD YOGANBLOCK-1 ;[20] WORD JUNGLE_FOOR-1 ;[21] WORD JUNGLE_LEFT-1 ;[22] WORD JUNGLE_RIGHT-1 ;[23] WORD JUNGLE_DORO-1 ;[24] WORD JUNGLE_DR_LT-1 ;[25] WORD JUNGLE_DR_RT-1 ;[26] WORD JUNGLE_LDRU-1 ;[27] WORD JUNGLE_LURD-1 ;[28] WORD JUNGLE_KS_UP0-1 ;[29] WORD JUNGLE_KS_UP1-1 ;[2A] WORD JUNGLE_KUI-1 ;[2B] WORD JUNGLE_STONE-1 ;[2C] WORD JUNGLE_TULU0-1 ;[2D] WORD JUNGLE_TULU1-1 ;[2E] WORD JUNGLE_WOOD-1 ;[2F] ; WORD JUNGLE_TLUP0-1 ;[30] WORD JUNGLE_TLUP1-1 ;[31] WORD JUNGLE_BLOCK0-1 ;[32] WORD JUNGLE_BLOCK1-1 ;[33] WORD JUNGLE_WRTKS-1 ;[34] WORD JUNGLE_WATER-1 ;[35] WORD JUNGLE_TURUSB-1 ;[36] WORD HAN_ATARI_HS-1 ;[37] WORD YOGAN_IWA_BIG-1 ;[38] WORD YOGAN_IWA_SML-1 ;[39] WORD KUSA_ANAURU60-1 ;[3A] WORD KUSA_ANAURD60-1 ;[3B] WORD TATE_DOKAN-1 ;[3C] WORD SNOW_KUMO-1 ;[3D] WORD SNOW_BOU_SD-1 ;[3E] WORD YOGAN_HARI_L-1 ;[3F] ; WORD YOGAN_HARI_R-1 ;[40] WORD KABE_HBLOCK-1 ;[41] WORD KABE_VBLOCK-1 ;[42] WORD KABE_VBLOCK2-1 ;[43] WORD KABEKABE-1 ;[44] WORD KABE_LFTUP-1 ;[45] WORD KABE_RITUP-1 ;[46] WORD KABE_YOGAN-1 ;[47] WORD KABE_YUKA-1 ;[48] WORD KABE_WINDOW-1 ;[49] WORD KABE_POOL-1 ;[4A] WORD KABE_BLKSLM4-1 ;[4B] WORD KABE_BLKSLM6-1 ;[4C] WORD KABE_BLKSLM8-1 ;[4D] WORD KUSA_ETABG-1 ;[4E] WORD KUSA_BLKBG-1 ;[4F] ; WORD KABE_SENROV-1 ;[50] WORD KABE_SENROH-1 ;[51] WORD KABE_SENROS-1 ;[52] WORD KABE_YUKABOU-1 ;[53] WORD KABE_BOU30-1 ;[54] WORD KABE_BOU45-1 ;[55] WORD KABE_BOU60-1 ;[56] WORD KUSA_HANHAS-1 ;[57] WORD KUSA_OVHANG-1 ;[58] WORD KUSA_ANARD30-1 ;[59] WORD KUSA_ANARD45-1 ;[5A] WORD KUSA_ANARD60-1 ;[5B] WORD KUSA_ANARU30-1 ;[5C] WORD KUSA_ANARU45-1 ;[5D] WORD KUSA_ANARU60-1 ;[5E] WORD KUSA_ANAURU30-1 ;[5F] ; WORD KUSA_ANAURU45-1 ;[60] WORD KUSA_ANAURD30-1 ;[61] WORD KUSA_ANAURD45-1 ;[62] WORD RED_DAT_INT-1 ;[63] WORD YLW_DAT_INT-1 ;[64] WORD GRN_DAT_INT-1 ;[65] WORD SNOW_BLOCK-1 ;[66] WORD FLOR_GIMEN-1 ;[67] WORD COIN_COIN-1 ;[68] WORD HEKOMU_FLOOR-1 ;[69] WORD GOMU_GOMU-1 ;[6A] WORD FLOR_GOAL-1 ;[6B] WORD KABE_BLOCK-1 ;[6C] WORD TOGEBOW-1 ;[6D] WORD COLRBLOK-1 ;[6E] WORD TATTURUST-1 ;[6F] ; WORD ZASSOU1ST-1 ;[70] WORD ZASSOU2ST-1 ;[71] WORD ZASSOU3ST-1 ;[72] WORD TURUKUSST-1 ;[73] WORD TURUKUSSST-1 ;[74] WORD TURUKUSLST-1 ;[75] WORD TURUKUSRST-1 ;[76] WORD TURUKUSCST-1 ;[77] WORD NANAMTURUST-1 ;[78] WORD KAIDANST-1 ;[79] WORD KABESET1-1 ;[7A] WORD KABESET2-1 ;[7B] WORD KABESET3-1 ;[7C] WORD KABEKUSA-1 ;[7D] WORD KABEDAISET-1 ;[7E] WORD KABEANASET-1 ;[7F] ; WORD KABENANAUP-1 ;[80] WORD KABENANADWN-1 ;[81] WORD BLUE_COIN-1 ;[82] WORD BLUE_COIN_X-1 ;[83] WORD BLUE_COIN_NNM-1 ;[84] WORD KUSA_ANAU60R-1 ;[85] WORD KUSA_ANAU60L-1 ;[86] WORD KUSA_JARI-1 ;[87] WORD KUSA_JARI1-1 ;[88] WORD DOWNBLOCK-1 ;[89] WORD HASANCOIN-1 ;[8A] WORD HASENBLOCK-1 ;[8B] WORD BAKITUKABE-1 ;[8C] WORD HANATULU-1 ;[8D] WORD CHIKUWABIG-1 ;[8E] WORD BOROKUI30-1 ;[8F] ; WORD BOROKUI45-1 ;[90] WORD BOROKUIEDA0-1 ;[91] WORD BOROKUIEDA1-1 ;[92] WORD YAMAARASI-1 ;[93] WORD COUNTBLOCK1-1 ;[94] WORD COUNTBLOCK2-1 ;[95] WORD COUNTBLOCK3-1 ;[96] WORD COUNTBLOCK4-1 ;[97] WORD CHIKATAKI-1 ;[98] WORD CHIKATAKIIWA-1 ;[99] WORD CHIKABIGWOD-1 ;[9A] WORD CHIKASMLWOD0-1 ;[9B] WORD CHIKASMLWOD1-1 ;[9C] WORD HANAIWABLOCK-1 ;[9D] WORD CHIKUWASML_SB-1 ;[9E] WORD NORERU_TAMA-1 ;[9F] ; WORD RED_BLOCK-1 ;[A0] WORD YELLOW_BLOCK-1 ;[A1] WORD GREEN_BLOCK-1 ;[A2] WORD BREAK_BLOCK0-1 ;[A3] WORD BREAK_BLOCK1-1 ;[A4] WORD DOKAN_TATE-1 ;[A5] WORD DOKAN_YOKO-1 ;[A6] WORD TOGE_TOGE-1 ;[A7] WORD TOGE_NUKI-1 ;[A8] WORD NORML_BOW-1 ;[A9] WORD DOKAN_LFTATE-1 ;[AA] WORD DOKAN_RTTATE-1 ;[AB] WORD DOKAN_UPYOKO-1 ;[AC] WORD DOKAN_DWYOKO-1 ;[AD] WORD DOKAN_NKTATE-1 ;[AE] WORD DOKAN_NKYOKO-1 ;[AF] ; WORD DOKAN_NKSIKAK-1 ;[B0] WORD DOKAN_DAI-1 ;[B1] WORD DOKAN_NANAME0-1 ;[B2] WORD DOKAN_NANAME1-1 ;[B3] WORD DOKAN_NANAME2-1 ;[B4] WORD DOKAN_NANAME3-1 ;[B5] WORD DOKAN_NANAME4-1 ;[B6] WORD DOKAN_NANAME5-1 ;[B7] WORD DOKAN_NANAME6-1 ;[B8] WORD DOKAN_NANAME7-1 ;[B9] WORD DOKAN_DUPENST-1 ;[BA] WORD DOKAN_DDNENST-1 ;[BB] WORD DOKAN_DRIENST-1 ;[BC] WORD DOKAN_DLFENST-1 ;[BD] WORD DOKAN_DKWHSST-1 ;[BE] WORD DOKAN_DKWTTST-1 ;[BF] ; WORD DOKAN_DKWLFST-1 ;[C0] WORD DOKAN_DKWRIST-1 ;[C1] WORD DOKAN_DKWLDST-1 ;[C2] WORD DOKAN_DKWRDST-1 ;[C3] WORD COIN_XPAS_ST-1 ;[C4] WORD COIN_YPAS_ST-1 ;[C5] WORD COIN_NPAS_ST-1 ;[C6] WORD HASIN_COIN_X-1 ;[C7] WORD HASIN_COIN_Y-1 ;[C8] WORD HASIN_COIN_N-1 ;[C9] WORD DOKAN_WTRPOOL-1 ;[CA] WORD KABE_SIDEON-1 ;[CB] WORD KABE_UPLFUP-1 ;[CC] WORD KABE_UPRTUP-1 ;[CD] WORD HANA_NNM45-1 ;[CE] WORD HANA_NNM22-1 ;[CF] ; WORD HANA_NNM10-1 ;[D0] WORD HANA_TATE-1 ;[D1] WORD HANA_YOKO-1 ;[D2] WORD DOKAN_ROOMKB-1 ;[D3] WORD DOKAN_ROMTWKR-1 ;[D4] WORD DOKAN_ROMTWKL-1 ;[D5] WORD DOKAN_ROMTWKU-1 ;[D6] WORD DOKAN_ROMTWKD-1 ;[D7] WORD SORA_MRT_BIG-1 ;[D8] WORD SORA_MRT_SML-1 ;[D9] WORD NAZO_BLOCK-1 ;[DA] WORD SNOW_YUKA-1 ;[DB] WORD SNOW_WATER-1 ;[DC] WORD CHIKA2_ICEFOOR-1 ;[DD] WORD CHIKA2_ICEIWA-1 ;[DE] WORD CHIKA2_YOGAN0-1 ;[DF] ; WORD CHIKA2_YOGAN1-1 ;[E0] WORD CHIKA2_TANAKN-1 ;[E1] WORD SORA_HASIRA-1 ;[E2] WORD SNOW_ANAANA-1 ;[E3] WORD FLOWER_YUKA-1 ;[E4] WORD FLOWER_LDRU22-1 ;[E5] WORD FLOWER_LDRU45-1 ;[E6] WORD FLOWER_LDRU60-1 ;[E7] WORD FLOWER_LURD22-1 ;[E8] WORD FLOWER_LURD45-1 ;[E9] WORD FLOWER_LURD60-1 ;[EA] WORD FLOWER_LTST-1 ;[EB] WORD FLOWER_RTST-1 ;[EC] WORD YOGAN_UPBLK-1 ;[ED] WORD YOGAN_YUKA-1 ;[EE] WORD YOGAN_YUKA2-1 ;[EF] ; WORD YOGAN_MOVE0-1 ;[F0] WORD YOGAN_MOVE1-1 ;[F1] WORD YOGAN_MOVE2-1 ;[F2] WORD YOGAN_MOVE3-1 ;[F3] WORD NO_DOKAN-1 ;[F4] WORD TOGE2_TOGE2-1 ;[F5] WORD KAMEC_BLOCK-1 ;[F6] ; ;************************************************************************ ;* course BG write sub status data * ;************************************************************************ ; ;-------------- kotei data -------------------------------------- KOTESB EQU $ ; 00:ok ; FF:error ; ; 0 1 2 3 4 5 6 7 8 9 A B C D E F HEX 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00 ;[00-0F] HEX 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00 ;[10-1F] HEX 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00 ;[20-2F] HEX 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00 ;[30-3F] HEX 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00 ;[40-4F] HEX 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00 ;[50-5F] HEX 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00 ;[60-6F] HEX 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00 ;[70-7F] HEX 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00 ;[80-8F] HEX 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00 ;[90-9F] HEX 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00 ;[A0-AF] HEX 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00 ;[B0-BF] HEX 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00 ;[C0-CF] HEX 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00 ;[D0-DF] HEX 00,FF,FF,FF,FF,FF,FF,FF,FF,FF,FF,FF,FF,FF,FF,FF ;[E0-EF] HEX FF,FF,FF,FF,FF,FF,FF,FF,FF,FF,FF,FF,00,00,00,00 ;[F0-FF] ; ;-------------- kahen data -------------------------------------- KAHNSB EQU $ ; 00:normal [ 4 byte : (type no.),(X),(Y),(X wide) ] ; 01: [ 4 byte : (type no.),(X),(Y),(Y wide) ] ; 02: [ 5 byte : (type no.),(X),(Y),(X wide),(Y wide) ] ; FF:error ; ; top bit: x_fugou ; next bit: y_fugou ; ; 0 1 2 3 4 5 6 7 8 9 A B C D E F HEX FF ;[00] not use !! HEX 02,01,01,02,02,02,02,02,02,01,01,01,00,01,01 ;[01-0F] HEX C2,C2,C2,00,02,00,02,02,02,02,00,01,01,00,00,02 ;[10-1F] HEX 02,02,01,01,02,01,01,82,02,C2,C2,01,01,01,01,01 ;[20-2F] HEX 01,01,02,02,00,02,01,00,02,02,02,02,41,00,01,01 ;[30-3F] HEX 01,00,01,01,02,02,02,02,02,01,01,01,01,01,02,02 ;[40-4F] HEX 01,00,C2,00,C2,C2,C2,00,02,02,02,02,02,02,02,02 ;[50-5F] HEX 02,02,02,00,00,00,02,02,02,02,00,02,02,01,02,01 ;[60-6F] HEX 00,00,00,01,01,01,01,01,C2,C0,02,C2,C0,00,00,02 ;[70-7F] HEX C0,C0,02,00,80,02,02,02,02,02,02,02,00,01,00,82 ;[80-8F] HEX 82,01,01,01,02,02,02,02,02,01,01,01,01,02,00,00 ;[90-9F] HEX 02,02,02,02,02,01,00,02,02,01,01,01,00,00,01,00 ;[A0-AF] HEX 02,00,80,80,80,80,00,00,00,00,00,00,01,01,01,01 ;[B0-BF] HEX 00,00,80,80,00,01,80,00,01,80,02,02,C2,42,80,80 ;[C0-CF] HEX 80,01,00,02,01,01,00,00,00,00,02,02,02,02,01,00 ;[D0-DF] HEX 01,02,01,02,02,C2,C2,C2,02,02,02,02,02,C2,02,02 ;[E0-EF] HEX 02,02,02,02,41,02,02,FF,FF,FF,FF,FF,FF,FF,FF ;[F0-FE] HEX FF ;[FF] not use !! ; ; ; ;**************************************************************** ;* * ;* buffer set main * ;* * ;**************************************************************** MEM16 IDX16 BFSTMAN EQU $ STZ BGUNIT,X ; セットする場所にある STA BFMAN900 LDA BFMAN358 JSR YPOINTST ; Y point start pos set LDA BGUNIT,X ; セットする場所にある STA MPCHKSB050 LDA !UNBUFAD,X AND #03FH BNE MPCHKSB100 ; INC !UBFSBCNT LDA !UBFSBCNT AND #03FH TAY BNE MPCHKSB090 MPCHKSB050 EQU $ MI16 ; memory , index 16bit mode JSL >UNDO_GO I8 ; index 8bit mode LDA #001F1H TCS ; スタック ポイント セット M8 ; memory 8bit mode LDA #BANK UNITST PHA PLB JMP >UNITST ; MPCHKSB090 EQU $ LDA !UNBFSB,Y BEQ MPCHKSB105 INY TYA AND #03FH TAY CMP !UBFSBCNT BEQ MPCHKSB190 BRA MPCHKSB090 ; MPCHKSB105 EQU $ TYA ; MPCHKSB110 EQU $ INC 2137H LSR A LDA >213CH ADC >213DH PLP RTL MEM8 IDX8 ;;;;K;;;;; ;;;;K;;;;; ;;;;K;;;;;**************************************************************** ;;;;K;;;;;* * ;;;;K;;;;;* ランダム ルーチン * ;;;;K;;;;;* * ;;;;K;;;;;**************************************************************** ;;;;K;;;; MEM16 ;;;;K;;;; IDX16 ;;;;K;;;;RND_RND EQU $ ;;;;K;;;; PHP ;;;;K;;;; M8 ; memory 8bit mode ;;;;K;;;; LDA >2137H ;;;;K;;;; CLC ;;;;K;;;; ADC >213DH ;;;;K;;;; LDA >213CH ;;;;K;;;; ROR A ;;;;K;;;; PLP ;;;;K;;;; RTL ;;;;K;;;; MEM8 ;;;;K;;;; IDX8 ; ;---------------------------------------------------------------- ; ; 固定 データ イニシャル セット ; ;---------------------------------------------------------------- ; ; ;**************************************************************** ;* * ;* ジャングルコース 葉っぱいろいろ イニシャルセット * ;* * ;**************************************************************** JUNGLE_HA_X_DT EQU $ HEX 002,002,002,002,001,001,001,001,003,002 ; ; JUNGLE_HA0 EQU $ JUNGLE_HA1 EQU $ JUNGLE_HA2 EQU $ JUNGLE_HA3 EQU $ JUNGLE_HA4 EQU $ JUNGLE_HA5 EQU $ JUNGLE_HA6 EQU $ JUNGLE_HA7 EQU $ JUNGLE_HA8 EQU $ JUNGLE_HA9 EQU $ M16 ; memory 16bit mode LDY WTR_BKTSTOP MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* 食道と腸 イニシャルセット * ;* * ;**************************************************************** I_CHOU_SET EQU $ M16 ; memory 16bit mode LDA #00010H STA KUIKUI MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* スペシャル コイン イニシャルセット * ;* * ;**************************************************************** SPL_COIN EQU $ JSR BUFMPCHK ; buffer map check & buffer point set MI16 ; memory , index 16bit mode JSL >SPLCOIN MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* イニシャル スタート コースデータ イニシャルセット * ;* * ;**************************************************************** STAT_DEMO_UNT EQU $ M16 ; memory 16bit mode LDA #00010H STA HILIGHT_SML MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* カベ コース マンホール出口 initial set * ;* * ;**************************************************************** KABE_HOLE EQU $ M16 ; memory 16bit mode LDA KABE1POS MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* ？ ブロック initial set * ;* * ;**************************************************************** H_BLOCK EQU $ JSR BUFMPCHK ; buffer map check & buffer point set MI16 ; memory , index 16bit mode JSL >HBLOCK MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* ＢＧ 家 イニシャル セット * ;* * ;**************************************************************** BGHOMEST EQU $ M16 ; memory 16bit mode LDA TRRTKS MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* つる左側の葉っぱ イニシャル セット * ;* * ;**************************************************************** TRLTKSST EQU $ JSR BUFMPCHK ; buffer map check & buffer point set MI16 ; memory , index 16bit mode JSL >TRLTKS MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* ねずみ出入り口穴 イニシャル セット * ;* * ;**************************************************************** NZMANASET EQU $ JSR BUFMPCHK ; buffer map check & buffer point set MI16 ; memory , index 16bit mode JSL >NZMANA MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* ２ユニットの草 イニシャル セット * ;* * ;**************************************************************** MID_KUSA EQU $ M16 ; memory 16bit mode LDA #00002H STA DOWNKUSA MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* 矢じるし ユニット イニシャル セット * ;* * ;**************************************************************** YAZILSI EQU $ YAZILSI_SB EQU $ M16 ; memory 16bit mode LDA GURSNTR MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* ぐるぐるバーを 乗せる台 イニシャル セット * ;* * ;**************************************************************** GURUDAI EQU $ M16 ; memory 16bit mode LDA CHKWSML MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* 花コース 第２ 岩その０ イニシャル セット * ;* * ;**************************************************************** HANAIWA00 EQU $ I16 ; index 16bit mode LDA #000*2 LDX #00004 LDY #00002 BRA HANAIWA_SET ; ; ;**************************************************************** ;* * ;* 花コース 第２ 岩その１ イニシャル セット * ;* * ;**************************************************************** HANAIWA01 EQU $ I16 ; index 16bit mode LDA #001*2 LDX #00005 LDY #00003 BRA HANAIWA_SET ; ; ;**************************************************************** ;* * ;* 花コース 第２ 岩その２ イニシャル セット * ;* * ;**************************************************************** HANAIWA02 EQU $ I16 ; index 16bit mode LDA #002*2 BRA HANAIWA03_SET ; ; ;**************************************************************** ;* * ;* 花コース 第２ 岩その３ イニシャル セット * ;* * ;**************************************************************** HANAIWA03 EQU $ I16 ; index 16bit mode LDA #003*2 HANAIWA03_SET EQU $ LDX #00003 LDY #00002 BRA HANAIWA_SET ; ; ;**************************************************************** ;* * ;* 花コース 第２ 岩その４ イニシャル セット * ;* * ;**************************************************************** HANAIWA04 EQU $ I16 ; index 16bit mode LDA #004*2 BRA HANAIWA05_SET ; ; ;**************************************************************** ;* * ;* 花コース 第２ 岩その５ イニシャル セット * ;* * ;**************************************************************** HANAIWA05 EQU $ I16 ; index 16bit mode LDA #005*2 HANAIWA05_SET EQU $ LDX #00005 LDY #00004 BRA HANAIWA_SET ; ; ;**************************************************************** ;* * ;* 花コース 第２ 岩その６ イニシャル セット * ;* * ;**************************************************************** HANAIWA06 EQU $ I16 ; index 16bit mode LDA #006*2 LDX #00004 LDY #00003 BRA HANAIWA_SET ; ; ;**************************************************************** ;* * ;* 花コース 第２ 岩その７ イニシャル セット * ;* * ;**************************************************************** HANAIWA07 EQU $ I16 ; index 16bit mode LDA #007*2 LDX #00002 TXY ; HANAIWA_SET EQU $ STA BREDA MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* 地下コース 滝の上に置く石 イニシャル セット * ;* * ;**************************************************************** CHIKATAKIISI0 EQU $ CHIKATAKIISI1 EQU $ JSR BUFMPCHK ; buffer map check & buffer point set MI16 ; memory , index 16bit mode JSL >CHKTKISI MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* 花コース 敵が隠れる草 小 * ;* * ;**************************************************************** KUSAKAGESML EQU $ I16 ; index 16bit mode STZ JGM_HOLL MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* ゴール床 イニシャルセット * ;* * ;**************************************************************** GOAL_YUKA_DAI EQU $ M16 ; memory 16bit mode LDA #004 STA KUSANOEEG MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* 花コース 第２ 小円 イニシャルセット * ;* * ;**************************************************************** HANA_EN_SML0 EQU $ HANA_EN_SML1 EQU $ HANA_EN_SML2 EQU $ HANA_EN_SML3 EQU $ JSR BUFMPCHK ; buffer map check & buffer point set MI16 ; memory , index 16bit mode LDA HANA_EN_SML MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* 花コース 第２ 中円 イニシャルセット * ;* * ;**************************************************************** HANA_EN_MID0 EQU $ HANA_EN_MID1 EQU $ HANA_EN_MID2 EQU $ HANA_EN_MID3 EQU $ M16 ; memory 16bit mode LDA HANA_END MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* ドカンコース 滝の始め イニシャルセット * ;* * ;**************************************************************** DOKAN_LFKD EQU $ DOKAN_RTKD EQU $ JSR BUFMPCHK ; buffer map check & buffer point set MI16 ; memory , index 16bit mode LDA DOKAN_KD MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* ドカンコース 部屋の四隅 イニシャルセット * ;* * ;**************************************************************** DOKAN_ROMKD_X EQU $ WORD 0FFFFH,00000H,0FFFFH,00000H ; DOKAN_ROMKD_Y EQU $ WORD 0FFF0H,0FFF0H,00000H,00000H ; DOKAN_ROMKD_DT EQU $ WORD DKN_ROMKD0-1,DKN_ROMKD1-1 WORD DKN_ROMKD2-1,DKN_ROMKD3-1 ; ; DOKAN_ROMKD0 EQU $ DOKAN_ROMKD1 EQU $ DOKAN_ROMKD2 EQU $ DOKAN_ROMKD3 EQU $ M16 ; memory 16bit mode LDA CHIKA2_ICEHH MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* 地下第２コース 氷柱 イニシャル セット * ;* * ;**************************************************************** CHIKA2_ZRR_CNT EQU $ WORD 00005H,00004H,00003H,00003H ; ; CHIKA2_ZRR0 EQU $ CHIKA2_ZRR1 EQU $ CHIKA2_ZRR2 EQU $ CHIKA2_ZRR3 EQU $ M16 ; memory 16bit mode LDA RND_RND AND #00006 TAY LDA CHIKA2_CRSTL_CL,Y STA CHIKA2_YGIWA MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* 地下第２コース 乗れるキノコ (小) イニシャル セット * ;* * ;**************************************************************** CHIKA2_KNSML0 EQU $ CHIKA2_KNSML1 EQU $ M16 ; memory 16bit mode LDA #00002 STA RND_RND AND #00004 STA RND_RND AND #00001 STA RND_RND AND #00003 BEQ CK2_SLMKN_PAS EOR #00003 CK2_SLMKN_PAS EQU $ STA EGGBLOCK MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* ＦＬＯＷＥＲコース 落書き イニシャルセット * ;* * ;**************************************************************** FLWR_MYU_X EQU $ WORD 00002,00003,00002,00002,00002 ; FLWR_MYU_Y EQU $ WORD 00002,00003,00003,00002,00002 ; ; FLOWER_MOYOU0 EQU $ FLOWER_MOYOU1 EQU $ FLOWER_MOYOU2 EQU $ FLOWER_MOYOU3 EQU $ FLOWER_MOYOU4 EQU $ M16 ; memory 16bit mode LDA FLOWER_HANA MI8 ; memory , index 8bit mode RTL ; ; ;**************************************************************** ;* * ;* ＦＬＯＷＥＲコース 岩いろいろ イニシャルセット * ;* * ;**************************************************************** FLOWER_IWA00_X EQU $ BYTE 005,005,005,003,003,005,005,005,003,003,007,007 ; FLOWER_IWA00_Y EQU $ BYTE 005,005,006,004,003,005,005,006,004,003,006,006 ; ; FLOWER_IWA00 EQU $ FLOWER_IWA01 EQU $ FLOWER_IWA02 EQU $ FLOWER_IWA03 EQU $ FLOWER_IWA04 EQU $ FLOWER_IWA05 EQU $ FLOWER_IWA06 EQU $ FLOWER_IWA07 EQU $ FLOWER_IWA08 EQU $ FLOWER_IWA09 EQU $ FLOWER_IWA10 EQU $ FLOWER_IWA11 EQU $ M16 ; memory 16bit mode LDA KAKUHO_SET MI8 ; memory , index 8bit mode RTL ;;;;K;;;; LDX YOGANYGBK_100 ; M8 ; memory 8bit mode LDA RND_RND AND #00002 STA RND_RND AND #00002 BEQ JNGL_TLUP_PAS LDA #UT9912-UT9900-2 STA RND_RND AND #00002 STA FROWER_GIMEN ; M16 ; memory 16bit mode LDX #BANK GIMEN LDA #GIMEN-1 JMP EDIT_SET MEM8 ; ;++++++++++++++++++++++++++++++++++++++++++++++++++++++++ ;+ フラワー コース (土だけ) + ;++++++++++++++++++++++++++++++++++++++++++++++++++++++++ FROWER_GIMEN EQU $ M16 ; memory 16bit mode LDX #BANK FRWR_GIMEN LDA #FRWR_GIMEN-1 JMP EDIT_SET MEM8 ; ; ;**************************************************************** ;* * ;* コイン BG initial set * ;* 点線コイン * ;* * ;**************************************************************** COIN_COIN EQU $ HASANCOIN EQU $ M16 ; memory 16bit mode LDX #BANK BGCOIN STX !BLKCOIN LDA #BGCOIN-1 JMP EDIT_SET MEM8 ; ; ;**************************************************************** ;* * ;* へこむ床 BG initial set * ;* * ;**************************************************************** HEKOMU_FLOOR EQU $ M16 ; memory 16bit mode LDA YSIZECP CMP #00004H BCS HEKOMU_200 LDA #00004H STA RND_RND AND #00003 STA RND_RND AND #00003 STA NORML_BOW_PAS LDX #BANK NRMLBOW LDA #NRMLBOW-1 JMP EDIT_SET ; NORML_BOW_PAS EQU $ LDA #00002 STA RND_RND AND #00007 STA RND_RND AND #00003 BEQ CK2_TNKN_PAS EOR #00003 CK2_TNKN_PAS EQU $ ASL A ASL A ASL A STA BG2FKN_CP+2,X BEQ YGN_MV0_050 INX INX INX INX INX INX CPX #006H*19 BCC YGN_MV0_000 LDX #006H*19 YGN_MV0_050 EQU $ LDA BG2FKN_CP,X ; スタートＸ軸 セット LDA BG2FKN_CP+1,X ; スタートＹ軸 セット LDA BG2FKN_CP+2,X ; Ｘ軸 サイズ LDA BG2FKN_CP+3,X ; Ｙ軸 サイズ LDA BG2FKN_CP+4,X ; ＭＡＸ移動量 ; M16 ; memory 16bit mode LDA