`a"6cqHkhrɲ"MC}ˤ#!Mc<,AVBX"I&ZeGfMup?C;NsR6g@ sj!eψlv*kgձ;Oę9&ē1*/U htj@nlnOLr+htC"]ց~>9 &;,S5 *j\ ך,xJLj SѾS':2u!0 uKu0hЦ3pYAQ!h鴸4P+c*`Wю9Zsz݉>'g=i;Wj\熧8!T5o>kԪMzORUlpB.ʋ~5$.OMyjNAVH^-vG]FH3 #Z6$}Aj= ppG3ZbzGANjEH8}*s-.7rJMm O`=v<5]wI w[K K@4 5O3LH-5 3H5mcsyK/'Gp2| 2t>sQt3q u9pU$ĒD\ ｬ ?{XkZfM0'j8?ju(z֑Aa1a&2K6UQa j<>wt"J25['jP6E*4W:J.WJ%%5N9bfG(:kL1![]/"t'q)05"cGg|09>J&@$Xmmp|VxTt_ WM\!(M6D1)t)Q$RYf"LLN,wc?{o?sQ|‹_0(Xl\S6XB[dl㨃`5`R]F"HO`@tx`qIob52m>}Eg dCPhsT tQ{F"M*Vo'=uh7Aqeb@6EN.\Cd/)uQi`0V:-.U͝c-2"g^65.-TYڸV;%[è==tR1`ox)FEp`iH.a q%#!MunmE)*[&D;CU.=&eZ)ME% ¯Uth]}ed%EX:4'{)S/)%MOtREU0s߸kH`\L]).X}Ne2 [흈EO#LIU )J|ه?uJ3;fɃO%~ mQ.^D±S}R jLpQ|I{_ѝo9ChV$-sb`G5Nz!âZ8*،[Lfy*p w梶{ :k$68"h [v=+0K/^}IՠB Wǣ'PfcX@9F˪=O  dO4 6h˱<9 #,[Jm[ 0%[L-X2$+; P2*ZQ}TL,QĞffwS LI[Q3H,;=~=G7c'91;)^_Bmc@-L1OO<_^FP'ևc S)|]bse#fǾj ݨ~.mԸ!EuQi@҂1bi늨¢e7KƃӨJgq'kRvu0͐~ĶH76"CMįoWjm8J+ZüKf{]+"ZPl[ac&)PF0)ZkKnt |n>;˓'ѓ'K:L$$f|8f @UTT!_B{=WcZRMm-^ζ@@3@9Jή8KdBZ-eikw<DL.)#:I"^bK! 4EobN yJOqT0 twd$WJq8]^8$fD13DV1e:)f՛=bN$A)麻) X$Dw|AoM {2fz!̈y7*$lؑΉ48Q2egDe6Pf&PP (@NˊQ([)J%!Lj!5h^8SM@MM֙V6 W-pVޱkal^ҾeЌso\QͼSfɚRv2>e)ǧfS& 8dTEP`QL*GPY"L&W]ؐ%4Ds:f%>(xxbީr})_|bϪ26(~ "ɒlHjK.-5a-'9xuߥoߩovg[#477} mv6ߥz};[oҰ5#] i^Uo:?X ߪߢokiUOPiNM#Qb6CYo7C7E𾿝K[ލ:?`MJR$CnfE/lFȎd: .Ve nVA* .Y#T-?C~Fa/ I~s~u_Ωï6l z>OGq %4=?ohhmּ͢k;F;!]K6}eӇ41<$P#_%)4H)JLP1 q2Y\0fՂDhDW6W{.DqR*~pwÛ?ss|BҨ| 8IVP]bʠX@hè 8*͗bC-vqpɡ)1:L|c>-LcD;X, ddY+<' l").1 g&BYu(UF֡; t;;0kt9)'20{/0djCRЌxD SjcdOjo&\sJE( dEtX0XS)$&)DE+ 2qʅ;Ef *UM( S8.%yA #jЋKՌ;Ur|Ο"LgeefBg{/:?EC8FT?mƝnkrvbFh<-E;x*6.TM\yFe-/r^tܹ$ &=윷jCmޡc a;̊D4.NSv)u`%jeB3AcLNP9f!>YPⳔ` q$A>7#VG{j1sAuA Ȍ]Xb`1s#LQcT"T{jtm5A02]12Th1?V%h'C% nG᧦4Duw (;jpX4&A6'z2O?v9g '" 7d'+ %dYNdE P;I~n2QmFt(*Ff&@ m?煝:u!OOnY!* "dS q"~-lh5-}6<W  clean.bat}H DF2_SRCTRz%΃rG…pΚL.F[6Jy$rߓ!4gu^6~} x]pԜ>x {-lh5-F# DF2.CH DF2_SRC {6uo1@/NvT L$Ӊ4qIK43%sdA)xSM,Ii'l A5mXFW$vQ<:7Z@|qO$i6k[a{|;ɻqgom;wisTbrz H^+ŠpAL8G2;lT}.ݬYĸb\5(ӡ7ꋲrҐ]?ȓZ8H-* =UBjOYMRc[cNH,;"6yue+yK}eVY% G[xmj5#ѷwA~*qH#/\^at /o ֥`Φ,X6%5+VGVhM.ryM$\ (,NNjQAN2 4Yʼ<*XHTX\#C6T0*Ӗ-㭞*=$SBY[~( Xخ"4nkuyL_\]W|`cL3 zgѣ*?ekHѝ2X714kJb 㟓ͯusݲ/ r"DNO-V3&dFRd0O`o]d ^x~^[lDgMU܌v{Lg fT6ɉH=bO3`uBO]-$yv& d#]F c"DXӲݼ.6@^d v}yOAN(c@*o0`6eyedOH)B n#H#N&?Ų{`J`P ;L]W@LO7w Y5d"ZnKtOEZHbDa΢VeUD 5H񜒮Uia8-/cM$Eq &L#3nd}"%eVYEr&E〫{ s:t0VX]_mLuѠԓzA|V \?l^g;//_x;0|vǑ+ؼ3})ݗD_~gy~X EoAC2stcMjg)U矰r9 `cuvvr{<_A)S2Z20Gt@ 됚bMRVTczLqf.m<+3 "WN~=yEGhͶ/`KE_}eXr`ԊUJ$b h V)KMEpV&n&TԚyuR"7y|׸%x?I8^]3?+sg%-D $dQq5K5`4'W<9s5~Lx7yJA`{53ƿIo 3%dlHe)U-㘷mƖl0w>P2V{"{טpTk }%$m5,ǿ/ٌTf\\cFxvM88=Uo9^6X-C]s6L[Y/\ŝTn_[!P, g{9>^!uGWv=1̃Bwϐ}֖ldg7'5n;Fc)t2_Ij:ҥ~XENPBz>:o&lrBZy(3cKwGJlЖT:"H*E2,}tXO)=U%-G`|S! `iJc{dftTwi S] bv0 1Pz>x{^s6E5NÃYy4ǙaɩYG4to]2};ؗ2d!U+e1=q6AghG $>{K_ ?7 TUƆB(ʤ.!(BE cA1cv5Q@ۆ.}1껆"OWr 1!u0M]e=;k[P~Ᏼݠ~Bq@>-a8P@ <@<@8 \0 p.` p8@C)?81rt|p&à|ˀp.c 8r,Nqq2Tȟ CTml0BaPBlp ‡-g~[q<1zf[N5|a9) <Ҧ 3!xӋry#-UQgQS?z!ntUs?ݎFњ1P1*n֣mR)zʍU&`eq=֔:ñ̉y/v'?j;{:ytVKDC7Z|+rAvddRo~&}cNf:OF{ʢ4n 4o-кPE`GEZJtvNt t]w=$&٢##I+@hCQDm9?rtCp\FmOA9W} .% o}OKM/%nƆھ>"Atz}ܸcE) #ZpjӹQm$F0b.\l4 =ǙM+ߑK)bT:u~㊎ xfqL R9E6\y.-kű.@QNQ+W}S.+"]S$Jz#3K8AFepƁW ,ykWtޮ 2+a,09X-TRzTJAS6a C9ׄÃc\5VAֱBYdlA%jA9)av&S2n ƹLBRUDM+XudbHq"$q+n "ð- //9M.2&6T X6rjVX\Dl1dQXCV S6*"smcN18QÑ#Lp7] r];JHoj]UT^3KAǺ/k6R7X8Xn߅yKdm}Mޜx`\n :Q/Zi+Tv A]*vU$]E22q;tq0B1T%u}?M5JM1)Q?evi.I-3iKI O-lh5-I*! DF2.H`SH DF2_SRChRZ5Zcؑŗ5o%ɹ9ά!@f)"H O2q]"^;6k]:p.=HcRrƃ[:6v0}R JF䶹%]Uj, dS$lP! Gm;keBG#yYHwjm廉LᨲKRF%吩#*&O./?]e0#b}\Vj|X~-/ϧ:~騧%7NL-(MEE|\O1KזHTD 'xOxN=+]*|롤JC*+Q}%jnʼn -NjWaH+(-9Qi%vu_VګFwW@;誺%ESo0GGȉ!:>lCiwN"DA2Y;8JC_[_d% lf)z{x%gj IeXĢVLX 2qս1WU7eY@Bj-ץR_J/ԇ ܑ$nH<(* ^4G$\I\_߆Kˣ+~~WsWq&Pcg?Lj7kVGViR( *{P!`@\?d~喫. 2*x=V4vf$gQLD$2⌹ jG+ifWs٫rz]nM1V*tir 4 mI[jHU`itZ+{[݀< %B0l<6]ݏ=ߣ_:NCl'Q߇[lJrd&޷f&Bl=Aj B)4~6dXcmdG̏ HbFBeiɴRR~f>lGؼ\;[>2bHv -GW@΃{XLC5S㇤d2aC9-'$=)>M|#E 4jThkњ6Ubz8Ȕz *d"̔[c{,0_bc+xlΐ& Mz3DY=㟃aAG]򒜌⤳! "| 8BI 44ƨQcm7(lpA{1>W|ݠ> h)6e8㟽~{M,)/Mo87 0[,YdԪ&˰&𭶮a,öڸY\,򭶮p[,6#D Ko%Ol{6-$~+~9gC@]phQ#SiȘ,[Lk)AŰr%Pa8pp89=~?7|!7$%AS_H_X'^$ЧEē\ƐqFڅeN)}i:كfVy[n;H-IB&3#t~fSD 4Hn9r'+=.V/I#vCz^|# -lh5-#!  DF2_MAIN.HH DF2_SRC_[Rv%@x#ʣd!$ `^A]q^EºRѐ1V9 AQPAQT3V[2 Z.E\:nGL:3~7o'-lh5-z # DF2_SOURCE.DOC:5H DF2_SRCbեnx]Fm쵣SdZmj ߿N}qE%)HH5bx#n>=' 6u5$!B@ @Xhg6Oc( G5iv-)1˙fEX8p8Mf?jwe}&T8J6Aaa^Ɉ[ a=)xjg:TlaSu b>f 393}$F&KRʀri'JSZ0Uz5)QAr&0ex&Ιa+oک})֮>0y'g~?'Iǽ'!eimE67ܕE'Y:~4>{dޣA:m%:Za}̟O _rTrpq&#2桛v$.-lh5-G)( #  DF2_SRC.HEDtH DF2_SRCgbO:M=(ہ8kT,֦-2^[ˮ8ApmF"a/\7%`0U? 6ܗ]]Hr+R9° c@{@at(>ye3 1@)EDLȔ*:>#ɾsa܇{`v*q->a:.@B$!*y%(xS'sJ\&ǡ{ ֣gMOtPÝ.>S`&hV0T+Oٯ~ vל8{O'59~|g{7=)'F&."'7Y$L([[Is<3\C?aeD1CZ Wpm!hЋw(l^e}&b+ Lm #RI216O;= v Ic┢TY;h?N@Nk:akF4^(SVJy.YSYA&X8fΦjfN:-]oitܺxӳz,8m<-7m-lh5-x ƶ" BG.CНHDF2_SRCETC`jAu |_5t'[tɇ`8ZXNZwW+Ao܏|0QEk!q0qWǁwGy_}u-W"|/ssask,0ҮfK蒬}&GY2L auu+A D-Oyp:ٵ)3#wRe8AD)P='!c̲¥RVed op/}uD.xxctzd*C;rޏ{ s`BR?vl'\jsGάfī< 859i2 Cܥ.b:W(rM&Va=ԒiTYziO?8z5TPjL&!]C_@ئ/UU|ԤgXJZG|)# #((}ݢEݠrqмj{ MLIP|t7Zvݹ'dN^ջAQfbF ^MjC򑛅P6L,!q*g  !;BT~:czàM':C=_T?"cbI;p/xxZh6ͶBH[YOr)' 6I5dA9:[Tw(Y^p6ō֋K}あ,_ 2+uK Ϙ4^D \.RkOk0o>@ErqE2uIu`|==Akqq('8~(~ yƄ_t)ޡj(F)K!)>鄝)(c6Ds's'nuvݾuR)cmmI0*$*+ m,,\DDS{|wwvHR BXa+QQJb T\JJ !* F BB1,0;n6d$đ{6HJ!.쵺ŕ@'M9$ kul:޵$ѽ@.b1\? awa}:蜟$H)DD=14E~ӄEA)s_Q42yjM%037my]aUT6)})Lo!Hqi;;H9|22T$~q&z>2;3zoigi9D a@$tlZ'zFFԡ%6D MYǞr@Tw'=4S1?3@rzwjTUNÁ)A7P lZm7H GFi#ޞf[-X1<S.V4?<&r.րÑ )LQYD Nneeʰ53 hCS#zW aC&X£+`%&uaF,9@߳U]V-bt: 'ޛ )}`ވ3IMɠ} c}<)EL1ӫ|@u 3 0tmcܝ2JL]Dں.K*6SMz `g{z7bnD! '"4g5ohg83⺕[Ӯz;N$oZ5{۸k'+]P[|*kx)y?%4 FIgE8  %8r`VoJW,-"RGϠG DӭҖ)z-0O cp'>5K&u40&^4(KQ""7ש"RuCzJP1C@ y]}}DDizIiQ;E̠sll&7zes<|"ɒRA[mU;}juz$(z0=0H`&{3wrpηYR({Gު (avæjgHTIK>"9P- mqoA7ިbWhFL^ LJ2 _P LЧAlHsedqӑF2T~d W(KKz0Ճr86'.Oeq|A{v0e 3`exwezvەģG# $e0 `޷Jn)h’~Yz,g.IӽIq}–c"8¨1< >aQ6H(A~C>y `6ސG4)z0/ˎz7hv*WrK{$7*YՄ߅&H[EBG #Vm4Q){G8 :w9|1{!w wIw{m:,f)q{%$#`6WSZ&Vڸ׉Y.֖:)k[ &*mթ!kR!nQ:N Ooi`i=3'%]N*ҍR/HFZh`EWf*(Y^hVCv/dA_A_Zǁ?*IjW ZX44S--TǤW9*\iNr "E\Y@鞈< z4j,~4m&@lmqsYhD^[-{^BKŭh?adzν"ީ+AJ򇥨GJA~{ }2mI#ȒfXW @fXX"Ǫخ[$ Cf7mplҝfmHb|,f.r̶4=bGĽEM}`1ǵ~0u qݾYSJ_Zŗ_e@2 .}'ĕ"R*ԻOjH۵jߨ[h>k>/ʔ;M+hG 4ATM[6SQE00c2r%N@>ҧM2r혞Dڍ`03M,}Au=H*ZQ_ !3QM7adŽz*rt{ 1t<ƅSSj9jEZ*].bB zckBo<4zw&9*I`Sh˪ H1J~%zt/pd{tN\c ~|QqͧyR)-՗j^]LC]8%{- v{A&))11dGtafnV}^ňѮAH\,˘ts ('C ٖ3C=u`bʼӂ_C[Pq CRT䄰X({N$ = %;ͪ(> ReF?~AFq)Y:pԣ4, & pO2Ӡ\8u:s?_a {Y_~y&Hp^s>e.MQP<Á6>i<斐KiM*z %B\LܮY/V C%WK"DOVS4m:b|nogL35]p.k/?/Ycduߴ&1q^jb::aU9z]/H{Gȵh]MݠZ[ :hcB?5yX^q99MPӇ24394U(("LNgݙəhIBvWs2+spB>>2_>VBF'~.?uQӁ'kNK;:b\Tu%'WY]T~lW0[}F$_B$վKHaL9#hYF*kUTß  ,z]d2' ҧAӓɏ %S%]MZgԁ/+CFw_I]o^r goighJU<'md=q'b\^Z^ڿ?)}? ګ7%Ah"sqw#!_/yVc&"p19T `t ӠKDudV@~Hynn(I O#d4/-Xj}xGTmw|c|R9Tt8cN- "0UcɄzsvzHft|t7ö_6#GM{(xWH%LZ8Ke*h;ގф:č4īSԻ#,}|>5Z 2]H`SnN8/\Ln:sYW?;ߓKOjgvUIȿm;>,0e_X!s wA1?" &ѷbp_Xgb1)?cvɯbܭ*ASa\b m?{yy~MgՎu;-lh5-he! DISP.HEHDF2_SRCETC@JvbXuu $ԻJ: JM <3,RN  IMϡB)B=% PU',Zl;챀!9-lh5-873W ENDING.CeHDF2_SRCETC {X]4Zq>C&l9֑ښeǒ]Q$Oj/$i&%Z KAQFɬf (kIOo$mi-Z(|W߿{mfԘ[3Nkx{1fPioopo; n{RRKnLSrF\TH%3yB"3.g%Try q9sF:ͩSr[.si$BN;#7 ON@.{sքJߎhnSEU*f+w#;=AΉ3BT¨&]ݾQJy8W.b6ix/d0f=JT"fRj ݄<}ak45 5l C]>xmԌD3k˚ LqCy"bhuN49drny`qA㻌4}T}cz TBr}DƯ_y9krFe Y@^(@2slD51KȒ7TsÉDZl"! *Q.I̕dM+Aۃf]7.Ч1*Na$ 9sOHc~`2\Ɉ*A.Ol]Rd7ܑU;LjTfKrX9L'`@/48wOWit. 2H.l }|m#it3oeP w\ `_[}Q$hwA\6C {Ko 6!bibG'-GynU&Rkn +nE]jKb</ֳE>zsɗGD;\^5JL|Cp`-5b L‡B^|@準f\3f9 A *uVn|W ?WW&Q9H f44b/7_sN_oN_N_zttl3iqG aD9 B^T=oҢv' ~\\mBz/(Lq5Rie &MoBQ>СF:6.c+_ȇ?2@*Lq`՚au >[[[08̷VGkG [(C+hHZ^//$DxDo,6CXKιv8v~xq^Lv!SeC Okq:q9hi3TI^CU w%ȪYW!ip_YؼU*[2cO$~HrS)ж%8HB V`83r9y$/!Uy3.{ , ڟ:_>!4x$ Q[0m73s[" ꈞ~66o=ZMyo%5`#6^^ _H_VzƟe #6 (~d;Rae_iʼxjb͂ߧOiEyb!;6-///KP^B"TIj;A KCWtRl ݰt;DMVktǓm;L\:sv˼Ο53?5 ìh OКH',F ~݄{CZoB,PHu_\} G2mex:":p0PM$-A j09u"_2Km.L8~5܄\a{&0< 3EqYK͜X;pSkH~}ވ)HvL(hEQ4q׉YyFC>v{ry:Tnw&jAOxFJB6CoNJS b_t }[`v]ͼ ;%U[x ­?(Y(=!{"=zxFYh 1,*Qq޺BCJZLOqXt# I!zgDLxȢYN`WoX7|XeF;gE -F1&jzƏ֑D> k$G{ \ښIqs֟>/CC_цgqV #''n l{|'w4|Wi/TGh-6V4ttx>yQfc BIAT[6 #,dב"ԕc O $  C?+HtKcҗǧ=:M>ct).sgJ(͗g~ ZOFUOFyAjN$Dy6pzP\p -2ܹ2ʕӉap/_qMPF>1ZF[q4{fhD(<.J^ǡNxȺ0~1S,DE&E4 d'3u:vypr_1/ ^[ҾN%g !>eĻn'@ r)H"RAN;5tʚU|d?LΜK$+ 5EJGf;50eZjbùBW7ֹqZ5nFEH.j.x7K,:/ qXtik'ո[EI:艍',G,jܳ/Znrc/ʿ{vxBEz !܎ULgNT{#Mm/ZEnӟK={~[kVU /icB1hMXQSe07 p] AW )VxI7y(0 -#I- <ogzZGc^ gukm!u-lh5-SV)! ENDING.H7HDF2_SRCETC-KR8D*&lH<Bb mG9d )'yu:ouO-lh5-][ }# ENE.CoHDF2_SRCETCh grcNp+${wd ӺԷt͗ݛ<7;vQ{:ݳuօj4NA {{wdM[^-CsA pg]pn Jw;9"n_nX)F;o.:N0%NsWe7;0[_1͠lf(t*P4 Ժ@[^1Va.8_5x5h]eu*o!qJ?l??KSE.ԸTdhZZZ-N/j0z-g7cd`Jȅǡ\)*XA zDKXY]gU4ҧ!V++qXZZ4g0uo 0>\$ (:CoUU!kI^%bLX_괰YBReXZº4'Gu"A-LZDrF`7- 9k5#C#2=4:lu 8Mԫcaʨy~T|z![ 4a)dW-J +BݖC.tмpEHh )n dhI} -犰7LFm=-A/l'hGFb` )4 !X3T Uh,sa"f2M \Yfӛb¾&%mA P.oafйArLPMihNey"oPdhVRf4KB%+'!m@hй4.k S՚YSJK"[IyOfd:=j^ POoMtf5lV ,H,Qvf#;prPQY+2Dh0 V(Q3FMsv2Ѭ,fgpS ^X L$4i4:͢нq}I4j($LŜW={>ؙLFcE0#Pq.@ 77?sg:O=|禆{]Vٟ8t'Y ʜ<~nG:6|Fٝ|&@'b0PkaEf#LzF,&NC5 xdQо OѺ4ʂ3 DFԻJX#y\E|NM_ߕ=V\!>A K \C[o5p 0{kod!y!2r[9ˋ-I౱C5}&ԳO>5|979>(|~>n9u|^xx nSgfltj(NT:'АL4m-gNJr6(]I Y.%ŐId"z$_j?ْ3x3‹) ?n5N鿶ɯ1Q@דeNS|P|B$0I7)RL Tҝ}9<w5-l'{}䭃+== +5zuB(0r)9@\@NN?Gm^!2R%'\?~~wBK$+Ͱb2.#|$0?6wlىfOOOObg` E"E=HenD/^1SUDKn4=HhLZZ-VJVV C Sq}C?y>ɈC RX#.=&0y}Zs8E>c,VGyl] M[#Tvccd,4\wr%&p>?ݲM0쬆Nj\D! >+21P^]bC<> O41uH%eX)I |fڒB'y|ebF5cnOO S_Y<%Y%ɐ?‘x#\+q7[,*, D ->w`yo2VLyLѩ]!Xu+L-3jZcоË+L3tm1ef2X% VatVB& 2ᆪȰh"-04ę<saǤHE);EII1" ;N487<} Ϥ >$p >-*N "HDj lQA?'3|)ڍCC}X a2e],GN"}r)y1\,mwiS)lr}@hmH6 [2!wOD{OXVqkAI]tUs^:ܰ+/\5+E%Z5wN/Cc(쇕,2} VoC:⛽0r`>R~˷jB福aoVJU y,glw^w,i²]j Yל˭WjF"7/L-N{뾅W}^Iu@KTKzn-g!P\zWկL;K )G7P] -JmOrΗfTsk~e +_?ۤ}߹[~Jk[h 2҉qO9pUXRˋJ e+Qqi\<{\+;>`?Ʉ w uzt*C oiԸwE@]uݑ{Y"("S `[RŮX`Ut_9.P8l`Οp¨ eM3:✆u< 1NcיquXg ^jC80' JvF܀=,xgXsI]ZӢ,\TGk2)7cteDqErkpqsNtf- W-Q,̩B87$E\:w:X|ϞVVcsrLWGO:ReG_,c*2|~Vu#GQ_(>Dhc&>QKL1+\[G(WLg%3_$Ԉ$}Jk8>Ra613)d;iVeFXh_4PQS~l\d= .&GNL-:HChC!)Q%LX.f8,"%l%>Q5K0b q ZTJ`y6ǦfǦfc3*xxXcf<`L1a-%VW%~u~}~WCHOkp']W__~,^--9 wȫ;< ;긎˙ס5xAC tنՕm:9 >Ux 2U7l;)9f'Tff]weWt *.J ˻:8e1~FF4fq]]w@讻"m5۴j&]_p+" Y[∜ ~9ö>#NTĮקH6Zo[ĿfV]|};E#Y|x޼Veʻ̢YOWd]H(ʂtSHqXXՅc0 @냙S+ZeLhw2T]A:7J U=p*U Dŏ XG:ueF\(ozcKgK7}Z a^`7)Fs!{^6X]><]>,#ʐGѥ]@k=+RHQZ$j ٙ`ly l(af+i@[J%m/lQ51Zل,?oڐ2Yo V~$cq2IS-V譥em(2S(2׃gha*C yttc6w:2Bx738о p#o>"͠VN}yy謝h`dZeN2֧'פng<a5΂N}ztVuY+'DY;'t^  z~Oó{ÀA}n--6֦?73b΅ y 72_I31IP] RPS5Pօ3/29__2anQʔM*LDnVn+pypKX-VoQn\";х™^W781"'.\ͯtm o-ξr7`~- 44ta7F6v+Ɏ#iiYiiYiiYiih4~KeixN{mL򆆍HGFyG;F$-K;e,^}E _qy%tQ}qώ/<i/e:_qsj95%<鯳!;@wd_M;ߴ- 7 7 4op`k"L&dIb0#"LdI0tȓ`&BMBMBM%ĘMBN"LF$ 1 &!$FDdID.$bA&'m 4ZoZoi4$ߴ$p&f1S;0) JT1@$ :3 ttsK gru? lW*V+ .Em]p# .z`d#!6g4{ӒE3Atu2*/ԨT_F/Iin~1T_Tj/roùP}7EBMք愚M 7 8 05&ȓ2$k1vĘ&2$D:dI 0vГE&&&L}&'&#YbDȓb#"LG2${"LNd1 ȓ- 7 7 4ot%:E6IUϨq@*/n3/n3/@*/@*/긼Eʍe}`2`2`Q\'*4Eꃢd#!6):GQ~Q~Q|,_Ѩ+Q|I} U׸8C{LrYAʶw/iu1}RgSYIԁ]O SWu'Ou>&Ws5b?fL(}rާѴ"Q]k(1Z|}EAFS71AڄSCT5j`f/yY7AT0r sMA>h]vh[l]+lm4ΰd-B!UA]p[W cT;#5߫vFkݎ}Fj[c3`SQ ͊.xkY6]VqEn/*qM (3"GAVQGN'Q s:qMl1桊AeI6J  7ACsLFP^,Ke*PP(.(-Ast0wNPPbP\P׍(.iƔeƔX1J J P/J AA9Ahh!NPPbPZAlV dh-`-[LB(-M"PPbPW|vFj;c3_zdfsNPPbPYJ J oTAj( CCwNP\{%Ԕ%9 `J!Aexx#qnm)M)`+hӔAڗU e/b`Cqp&@o`s ߣSkS?Nh+*g Y0MT@dmdlKYá0%-lh5-.Vy#  ENESP_SETA.HHDF2_SRCETCZw#Y:g M ێ 5|d#F h8om "-vuA=~ՆB(T!B!*jeˌ").ezzl۽|GҎ=܊|\#qǚUT||znC3!vi{7K^>:ĸnb!42 #1qrO#p_@%-lh5-- ("  ENESP_SETB.C'HDF2_SRCETCsΥzN/Jێ~{!U+2ZVҖTjkKEm!a,*pn!+PG@$pc吰$vJfI$&W5p>#q=V4KkHmEcci xKF6; 6gZ"pEq> p`/|k(uxȷi;v]µrJܢq{k5Vk 6Z+׿|bo'$“œNNbg V1-K/G1d/nޔV USVkY'e|.; R)Wןi =u[[%uۡϊm",;962ki726@Խz/~g]4Ljq>{/| Ŀ/O?׻Fck;B4鮊n]|N>f#䪴Mۜ%ס,Keg7q-\Ɛ-ӝ& \YƑ"f;[[lvsƖtLm졦pܗ,VJΏuqn {Yha@-|Wp;6Wy:J5au ( QJ] slxi32ǘ"c0,y <zvbF=;1NS9^q e1X2ǘc0ns74s,y32ǘ"c0ewWl7V@l en+p[zEn 6V-6Ven#4FV9핸lĎ[&P+qAl ="ml-0+sVp%7Fuczӫ:ي9G<Ȼ)mR*IG47z=lɐ8_o%i<> *lE///ٞg^{tQ>__+0ߋB|O}U~dH1~WSiR^YNW͝lt6iBg+5B=ڴzAzAzA ȉ֠Q%b娔RbQI t6!d:c,}6(Y lQ4أd1F=8RvZc'e1IdbqJlR,tأ` c,c,Rn6c,u6(XlQأf $#ƹyzFR56Yͩ<GXIÔUR(k3OLjÜ?-y64⨠Hǻtsu3*n3]x]wAw1yYiwLw=w7O!q贃4M!;h.紻Ex$]P]ioyx8EH-ʂh-omu(mzTmzPasHEHIL@$]"RS w!9-IhʍtrfԆLE.C&b]"xӆO^/lNzpɣ :ɡ!,zE,ޑfPPɖisE2tWi sIRTMX/AtL0֐XdASFazcq[x=iwh,,\=HVlP,h,ed"(,YBZ Fh=hj 7 B[HXtMZHdcc3(t WƆ(F[C({fрFhCGp! =GDŽE)1M;"hJXR#4q S#Sp&4*&jTrRZJ.MxNբWWnUwf%z|Gu GGW-^#9fy:=^Se@ʑֈ+K̃y&/a=(3 ru2śjPFHy:Y,fPoiRfDFf-Fy-F\Kjg:ǩRѼn**4XH09080Jq8"~j n#Ҙas G3Y6\{o1E;*L'_X\ȷK/_)~l)Ke_εSv]B8oM&XRW2,J{K=cjmcgi28y?+%U-lh5-y#  ENESP_SETC.C-yHDF2_SRCETCO] {}WW#-<$+,gٙӥK730\#M]^NSviʰX n9 ~Dy&lMswdmUe3fC/Ju:[י;~6WzDZ.f?K d~_&4o/ugoosxѹ<^N,~30rO}X2r}Xcsޭs_V4bt9]#;oF9;3z_&=O~_U)=9qc~f6&XczMǿoύνbw]uuz܆'o5+wwɕD [i{߼4~FOcױHѳ4_"%iG!߆f?ɟ;{} lye{4=g_Bߢ'\-I~ܩ]G&38]ݻa`;wYϣ݄S߷Ro5vIwx gw}dv88p>"]+Z>u»C}w,K+»^MTX\,谹$O]+Z>u».ęԺ`[7^ foV@C E>^Ց!]̋Y1]Ya]ݏ]$YarH Ց!]̋Y1]Ya]ݏ]MՔԔWWͺc󈭹J#UѦ+ӘwS0aLsu3f;xt]@ ]w{Y KV~ҁqg(B0;Pc.Ka wZ%C30fa C3^ wpWq m-pg8xɅz^Ř{864=M?صKE>7K~lYu/Kt?[_({@ײɠm!kօa`JpMԛ-x7ϥv{ Y4egϠ )`d T2EiȆKĥ*Ze-hKR׉KdTX%1S>r|܀VgK_> H]B .`ͬ^}tX8_8! R2 FoiA2? `eUǻbŕH2!0]P{R 1y*8^hJڕN*M2&p X-^ϼDKD /{TKuH̶̰ H1m].,`x2Ve dX3>:G-aD8T7uJ#{6#{6#{6#{6#{6l{@jyn{L[J^f i{n0\=Z1Fb}+w'7vVNmI[9g̦i1~e7J_MҴLfPefP.f6s!o%wŋ~B3ƻ?(DmH_yFNǽ@ Q`BZ&=N =N-"mł,Kl+!g77Z8Y 9X(6 nYzWxq8 n,7gY_ oY+GC}bů%Z[^u Hy`c{ ?cϬz,zd̨sVc X,\c)c'`g۟z@*>bXӡ"OӢKztT*&v<=%cChFhFiHVZ>»+-?idHYhP}N4ub|}՝iPD"Ҧ`EPV}wnŎ }3*yfD=CE;~,zDƄƔeLVW .$`+̅e~$:3BLfbmaڅ_n  >Ąz(&Zd^#=;%*W QFR JSJ "qR)vX5jωO&EY h.jD0R)K`^]a mu6-mlm Cmm-89h[oENж| +Qp_M1L R6e{{~>-ي^e/ y6 v DA;mu»+XS>cpԪXEYĊ$`{]+b+.Xn'ˊ|B{O}e\߼4Yp>ǹ!0bv]>PSE>[%\S>}eX+b R* (nkz{"QQOܹGT[djs_ T U8m꒢,)s[>)<6IY&m꓈ALNz-|6I~@ RTS>_ⷯU?nޠnV_neM>3[w-|:Qƥn[(t{[㈭b iJ_]Jf(Ip)YǁEv V5Z2!>  9xr2%B+ f+i 'dY;[PYY|뷤Fl X16=0^RA^́0+]ݫ{]."r۪Qӯ(uJ:wy+[fV].:}|u"Z$W7KDq-2ZeU>#=% ߜU}`WysDwM{Y>"}qފc6%e ipd( ,K&FTl YK,y(Tc)c,V"F]$ O׿n]tleIcv.%Ѣ쥔I"]2%ѤR҈FD4m܋!ۤ>tnӠ=ib!i[?د<؁e,~; e+tۧ],nRn)c,~ 6鲖?n{ySɮk2 JCŵcC0S|Si[s|({SCl FP3@Dn֝zMaTX)P LT{]wPWuEwXWu]wdWv]҉wlWwD. \Hq$AS:겸"H3s.jXuwTWuw_p[:bJ_UaĖőժy OtG ;,z!Y;=m&cd(T_mobȼˋ=`Ygdps(T\y,Lzg>ֵ[Km0UU!iZhV'bлص\Cl\U*݊nű==܃>d엉&.AvI%E,.[nxT ;1Sclm)SvR@QلNm1f66pmݻf vigdfv h9m ϶ v@MRZR'n86svێ n8|n㾠uɥ(}7ǽV{صjWRWli{WS2_rݏ[bĵo Q>t,},kkZid_.^6STZ b̍) LySnR}YX⨖-+֮X<<&6oq=W`QlL.5l CSceT+.#6=o.h=]kx&S6N-Ai0(ul&L  ML vO8,&k : ϐӿ[)Ou$ 3\SW|p*4Uqvl!lEarI.I,|D OH@Qh8tCx-0o8 :b@ W`*P*7B 9O T.o<1P]4H3a?*\b-`B P T. @1]+b@1]X*ob@1P, ഈ-ZAQuv I-[ 6;lT1[(-PlC W] X1[8 VT1]` V7W'^DjNwܰǭ^Oi:^h{y}cVYٴ}\m=n+Rߕ}hcr."bJJ( oJӋܖ";t[EnG^ϽJgjst]M@٬acRRE.PuDiH=jʝ>.ys~߼7hw/ە3 F:p1etRuu1OF^dYQWu'5tZGbs ww@Ҍy8bbcAs{$r9y| Notgu9MGf~uuTQSѶbFmHdV\L 9=l5f2}.fS*1{#G)w d~dKs6?"U/ezOp} 7p_yy9w;7&U𷜂kM4#خww*-%D:5 %>-lh5-Ty#  ENESP_SETC.H~HDF2_SRCETC`Zw&Pt/[rݵ60Qh`#x mNb[Ee<[#{(g}3K1=7n4,(S5_+w L^ԪVyvHO; =C?͢޵C8 y޷vpG9| :he0e;jW2תhFV2!:y/xUDhZl'~@%-lh5-gd!z#  ENESP_SETD.CHDF2_SRCETC uzX< %zy.Hu'@oI-Mfs*7gA Hv'ARXZKB{}ԷRMs4IFoZy_a􄱷PLp.mϸW\>ș7w}6L,;S/w{.w8T&>Fu]]x,/Oc ynqܯN3yϥy?\븝}ZM;½3 Y'|ߝoo2<9/"FEGgOB;K__c=}9f>]*q0/h^ּV>9E7{6u> &:b?i<9Qff O Ta ga`Lc͡?8t|xDžMJy/f0+ȉGrcL{kkG|;ݕ Thyo/%=?Lö^a0/¿`!?gĽ[[bM36^C5;oَH5 ׳gPcEBRo]Çs7%JPY$~HPX,=%Žº4=T;ďtP=;@IXheogcrʍr}v.,v ذOS!K0"=pjC^ė꽅^xؕd=y y<ljAy/"7Iyo+}:]R%n8+q4 ҷJjV[+q4ynAVnBvenBV@ҷ"&"VK+r&i[9nI$VW+r,i[QnS+rҷ(o qVZ}R9:wR3cFI1%dr>cE~+>*֮FBKC#Uu+_///WcIW_/Y/~/V_ܿϝ_2mяƥr*35e2wShT;3Vsۘ0?n`~s n'G^AwF*W8[^BtF/f x7T<qe5?!/R@ X`PşKƯbV<-sW|.?6dPX}M)POBG@'\O ^}9>B8'>vkwڋ6"O/=%Mzs36KZMz5z.]@]ݏ&6tAw N. ɪ|V=QABe$ЙJx#/ -(He|8Łw.܀PCd١h{~F_Ň&%f7gnL;K%KOv=;'Xۯ{GUcEIC{ C{ C{ u#!kEIJm%@*JTT)T#h*fRTz@rDz7NHgœmy}Ԍs<=aD_;na)[3˼ţs7ƥkp#'DSQԝDdvD|wXI&jOԜ 58 Gt> " Z|5|Ȁ|Q#./@>+p>*a`jEpf<2# 'I (s)؞Ȼ8Ox>N$z@&~|!me)Aj+y 91c8h4 ;_ ynq[/ꯒ7:zr2…:] IXBkk}ӿ&{/*_'R7jP|[AUk[ŘT+UګX!{. _|BS>X ;QtK$&cgn?D ׯTvO[J+o/%^ݿM6nݦ[7mʩ돷GW1~cGwqԲ] /aŵ3WtwLp9SkW#Z1Oܠ qwB ]8.6>F?bwË;y^*Z3g:oun?յjNcPנ.Ul2-R.B*W*H6dMȿ:RA%s)bݠH'ĵy"1RS]>.2| sn|C2i8v`'8utԐ:X,.ҟO@N mW ^;VykP0?ST?0*Č?Č3#F=)?V\ZI)諪E5,q[c{!6 "5DSP8=D{H$`'1(]p>TzCB|Z|ߑp?*&Obd*>>U5NO85BQKL_n4\N NE (8 T֫v咿Ḓ9])U C\)@,I Z=/?~TSLFRF(d4~R 2JTe[KV/ ey6/9'Hc;zp*iQ:wo(gW_=9aIRSĝ5J}~Wuuts_saq['U" LdӺ+u JW*52XJӭZl5kyO|ze7_$?P3}/=]c¯}ez)fgavڕ[[,,yh,-jPY@}dM쥍VLZw*VV&zՕ3֬YaVutk'vÝzA<GVg\ZZ-֋Wz֋jyGx,@e֋zSZz7KTYwE#b]̖"}7oS4Mdh1C|@lph>[+<m/ 6e1PkfY}v>@>Kh짰u GO/y>@rxo=/>h4m#g߮,qNi|||'Wz .= D)!RB"(Q hI8X }h>e|@"; $€@D"Nn4P]Qqg ;,w\]Ӂw x*N.>@P/"?OڷwW~فl[0/ٌ;/>(ܧ׷- <L%Yp:]"g\~gT? c%M*",q|߸R-s=n_Jx K{ t1'Mc jWWnkl.?m{*_'R)V8E 1` ҴuPzm J %pJ%? :^B=}ZEϺm DAh6qQK8>B>wH7WPe4 VҊj-ZzRZx`{"/ţ$MMihUiCg\ReӗYRg^ζȹވ:jU6}Sevz*Wu;f5Πj-R-R†bRf%BSe*ϧ՚Ջ]Ex6U|pܺ2lM=\ jAȉS3xWva*X^р)O,mTK@X|ooc,}py+zbA%zz@U6%V}ez)fg-&vR d&gZ;ĕ^ċ++fl=jʙV[Q,:946Iqb{#Mw&bU@3vTZ-֋Wz֋jyGx,@e֋'eZ׵M=T&-=)[B8S&Fi>|Z6ԾobPP)5,]qJ 2RB=K:Re|{jXi.)H7# HF>R`?p"vH]Op)T-4XU* Y̧F!xSfK:Br`-JC;Zdf$fs$sB;1P::ζ$A><۔Y6gB_ysGN;ht|fvX(S0eV 3Oj$){ɍO]:WzJ:ƬƍAst|)vkZ,kEϱۣvv4adn}u8>7&lWe6%-lh5- !z#  ENESP_SETD.H0bHDF2_SRCETCZw$= .1Ȇ 6 iu8MFǺ> > >]` v# J/zוiۏP'|>'R԰Zy1S=FUMHM3$6hF,^wp8 -phu`o+8&I +EgFah}ŕY?잃jm_AC|% -lh5-zFz#  ENESP_SETE.CԣHDF2_SRCETCq !s%N/,%qǯydI߅-j mM#sJ9 6H8H28S$#mۓޕ-垎}5Yu"BxK ; ɸr9r8tk#r2s92NdJǗx|+K} J<x^˙2Z~}~s$߿7֛>s~_r1ə%]IoDD/&O+#*Iؼ^64N,os4?(1;>Wb@(ILw+&Ď'q|8/)|Xp,6w΋DgxJOߎ#t2ď,;Z^-?u8ʛ6W?6:sqr<hbȥ'ș!PݎO~QH%e;VJ~\U NVL|0#˒ u&cW&eϓo' qʠ|ZY>aۚ=6d,>s74yV9 G yw].嬻qw=x..]˃)oOSut]฻/3?6/Gw%z?+-Jm;ݴ8hq{ҳ=YՍՍՎ6C9 !:E|}ruqܝZWVw 46q ͍͍͍˺;'xn.]bq)4n MtRh OkĐ`QmDvwHn4kqY>+V ybyEC1A.C^:{Λ9l'j3mQ"gMvkg1M6sg1M{:oDŽHlGH{?W3ppp/z'(?? /z$$$W3$ e{+ܕ}]+2W ^#h *`7_Nx$W.48;^ , xD+k-US W#W*¸\$"Ư܊.vXNs3ū:YyWƳcY ֑WR^R31\Ip4(].~r5@;[eKSgf"7Gq fb/[ Fsp1ip2ѬmieҨ4{< ^C좇PwcE*5 :T,١ 2͘m/4ݻȋ粗_Ɋ:Bt69\yF6Z{J=1l'= lQ;.YN wOl~Nчz-A ѐzZn Dq8vo<4nvJr {{E{`>>mNX;\Vw BZQ݁+h* Ss^.KaqH.  zB6[z &u{J>@v;{ѵ̎ҎƂJ: E|AWGGA;!z{õFh"GNJf6DI1co98~"eHSx>yqˉ*I=n`ޘg;f1_a/Q/a9x"œW!Dމ9xg)q#Hg /7a28?࿽sC/{?{vG<|1$iܢaK),y%.To0591DW xO.<9P>偗\rӱJ226O'#*Q2#crDa#ÓrOS?ȱOo1"D 49r|0s3p E̍!"𜬔"7;G#LFSϾ7ÕyE,1 >oQMD|>bOTNM 蜾$2q \89r$dEǙ׮o<;g&hiYPIO6_#uz}鼣\w.o>abA y@oΓ $/'`9Y0%Uv)s~fOR|~ `ىOc_~kyR _uc1G18Y5xni</+踲Ž>ʺ:;Gh;u$wbj^l:^m^n^pZ8k51tf֝wњӹ3&FW~FWַFW.FWFk[+ ѕktez 2_=&'pzBp R|'OHf=!JOHg\=!p ҩB 8HpnJ"VOHh=!¸zGp ףm z(YQ<%z'Q8# ~%(ShU}>}4~DRigt;)}ٔ T6FӡWƘ%}^(}D_64JdKKK8] gzCRƂ F)W,Ἀ\GS Gҍ-Y0pHFqxNt Bx1UO>|jtNϥN"; ܘeqN*]kifT**|*\JJJbe;i@&ڶ6vҪSTm)gƭ1K򝴪Jb;iAi@VҘNUJO1IV҄&m[JH*(S'M[J VҘ9On)en( VAH[H[֊`[MJ9t݊6݊3n+qhQ]VQGVQ1V[ EoR}2b2b28֊h g~P7GAv-՟kCŐB~u; ?E]Ww03?|#|o(ozf%5F4Jj=4h)bOȓ127e]f Bwk|}sp{5z2|)M^uM5f7Vi_b9!n""LB!jw`7\s Cv݀DG+$~aj0w`ן:19n}*_R)UJw U3=(2)CoMt](Q+[o4vZ:굹tkvjiǎjG/x/cy|jwr0?軑jp˿l||<0)%Rx#CmƎ۹ۮ_.|q /Y?e&^®^5ϜOjMDwh$ۗsBz0o}o}6Ƨ'۟Yt{t1i$o}ItbҪ"L2b솺z y>liQ97.b'$K8 w<7 7{H{ @`yʋaOuQ᳘5O? ݍGXtP/Yk t]#+b0F`GώrW`@@P;`@:`303BSjt[jxEjqV"8VjqV8jsO zSm6[jtjt[jxEjqVPjwBZxr%ax t|侬"^j]Dc Nb RcZcV??kSvk]]Wf5ٮuvk]]Wf3]o3\a5vfj}9G5ѭL[ᓢrXTWT(+r/Vҳ* oڐUwY"`]`)qJ7`m.MuT"MZUTW@J]:!t5]}EA?7v;F<<r444Zi@ `"12qo0:>e~)RGsVǟ{ܬUUOU5^ޥ*nXj(w_F{ʴMJfȏ+շP p*?bP;;`v)ݧEWV˺ ]u$c9 T_bsjb/s X84Z8XZ]` l/͙7r+MSuŖEH1;,_'18kW?AB?A?"NXFĈ\؍|1Gȍ;pH)/bV<̕b<5c} Y#±ٶۏ|dE-p(\[, 6xI OڨkG!$KBѣ AƇ;eÊ"-`)KKu<"irMj>kA g1vٲQ@Ʒ ɗ"..1oabqp!!5q_ @Xr:OhAy%m U"LS 08d l;AK3,6 ء`4:B!.#gjsS\@ a? Iho A,d%,?Vu րrgE ;w)qu&[L؅x?CT!K.dǮ+c.7S!oS X `wSXQHla؆$pPd `5>mxخH`!4,sEpazx?qV7f3J,@dA/4y^$DAkń+T^XE&&.6>:6F_`B5b }z­~v,iLtsZNI` TdebqH36Lx1pV82>| yxƊ:aP&%SK3, *\x{S_ أМ. 2e5EB+&>EcsL+jj3{{4j2% DSK u, -~5u0v'G͡:s#324IMd6\M9 !4RhrBC/RYre&dʞ=(,$Y␣c[f!4+,f#..]6trNe@,dːK9}itzTt6,0a:>Ƶ/wgWOU* ~6KAzײf'3O~sCNnt b AAANt;!໽BnlV1^φ2є?bC9?'%~khL s(ɺjE>-kt~r86"AHl.:@_B䧎wÏ~pկ2PIfvF koߠ7Q1@ ^DC=(EB+W(-<^'=yx; bRS(y3uElovmٷfSX_-lh5-4窿" ESP.H%HDF2_SRCETCZc4D2S -L imD?Wlܴn̈́," %C a|#APTZHQcB0$TBa7Z ;pTd дjӓěc88|]]g*h.|Y~NȚ#cDQfUZlg.}3Y?;`&U&m}Zi]1vxP9JNP U_y-SOqa7rb!Ϋ#-lh5-lݑ#  ESPUNIT1.CHDF2_SRCETCs {̘Ӽ].Wwww4)RJ[D(MEBJpIm `x%anE `рkmDJз8m6zpgw Jo= ykT 绅~rw:.?M£Q$C <8Q ^¿ qsk{ivEvo+5A3P.ƬH=yVu#Yf$*%MYH5٦{f+JIkVfۣBJF@Eڡtz@Pu)xf8 XdϹy=B}TPb5@H9Y1ϥ&:{XXrՊXm1IF_}|W޵j@)Yf}bƐDR ջvYuV܅4ESJAIU>$ ;Մt ңxAׄ`}xA6l6浰_1b?i\O=)G4W4t0s++ĥ1(y,5|?x>zz*X9qTp4 I[~)O7#%;0a!=eGu#!~qe.@yУG"QbcD76&FۺHl:]Jl(}mmږN"/c9\8HdDÐDGߟJ&۸{tNhDbCD{}ͮpoWl,Gg,A22YeOg?;AIakˆX}5iB׀Z CP!Ñh8Y% =yډ" ;@",dDJXD' u1!fuؑĆ -iL4B3w紓*7Z)?TI~k>{B:N #'u{퉩?&ؙMMLp0;/SK?R1cH"K^kyQQp0#uvBp~0?|EW׏?{.E:vktw߆3ǿIj Rq\X 'XuQǪ~_K Ȥ^ Os=%XLϘ4.0$O o>fds#9d`0bEdʩlj_k#_-ME< b[/%e^ nIm+{>qqrc>֮Oӥkd#u|[SLZz6f.Ory֘)V[r1ǖL YHY5=)81{;4f8@I+n s63_)+1/n% #KȻ0R_fomd[ CM͛ #E $%A!S܏9حmN@J"2 <}H0Yc@ @uIkb*/5\ & vs1!v |$#ߩm72˱XϪ:Xw|oۋۘ[7@0CU)k4iIQ4TatH:lRwBT:]v l"WpLto3pBr42/3Oj =$~] 36j}#+ZqO gw/Ѿ~VwQ$C骺D0̖A^.;;{NȣtDZ`o%O61*\ϙc4GlAC:;S`CuP00opdXXXPB*#K |ثM 0ZZ; RM&m,'T$E?DҦ6?^~$Js7[dztRP季5 $@WEdY$Yxd[-Af@XܛM :e<:M&LlsKD.wSњ[./GT;o =ι&$3,ȗBEheWtߑ1r< C/D*z$VZ\9$,#-lh5-96~#  ESPUNIT1.HK#HDF2_SRCETC2+Z´\MJ UDFie,tؕvdbs| .+nz PWUL_I@\IR"(#R݊+_3u655vhʨBG1X{qz]_/[3FW!&gwjF_~-ד_0/ ,V' xV! e wϯ_v:FefD`{>c#(۩Ģ7B/0#-lh5- I#  ESPUNIT2.CHDF2_SRCETCpssH8a*9}??6Ct$rEpk [7%EG%Kd HH [, aQ P97-$er?y$8I#%MrP +쐲8sp:N3n2wk y]tJ">i=:'m`Nzu/5|sNm`5bøo.ʻh>wom hϭN7Ywp;> k,S@>Esz-\`j#F Z)ЇU4yVW=:⦞ZO졞KµsG3pv/-x9@SӥWh; 'G??` syg}kL735}Cf~sSg'G4{8?>0 lUWCbe 4)p‡ $E #E _ (Ā3Oچ \?k?#5sfZ5}306|>.Cq1XrcEJXQȷ`iI25-q`j K-|y'_in4֎`Y:amSIvߐ0m h> "a[*J:b!\=QGQQG(UHrc]Yjڪ1jP,lC/۩թοj=;*96~ŵbSmʨsP1Oاۈ"d E@rd N@'u  Rޅ |O:9h> '.%/qjL?̛@7LJbr]{֮ii)w9V!9q6 gkPsaڶʲm[A%Yx62[FJ\'ˢJ *GxWWq;; P(gpj0R5t5snl(s-۷ZK{3B NN\p≔I!b ;*3=5C!G ;h!J By9Sn\=17O0d uR?6Цk><, JcnnL 2_t])wi~/䊺Å̉Sń,{Sč34?hAŀT3z%- ;|LbQAA.'@k.# *d--=YFS}I̘قُ !Aҽ`hY "k1˽_ҾMAnHa{#5-lh5-r#"  ESPUNIT2.HHDF2_SRCETC/[[)1`) Vm 0׼ U:ڋ@@l :BU!P:q4}4(Y4ү9,:a<_dRV+ TPR R"0Thl$%rCs̪IPG04~Xd;d8)f$Ddԅlb:`#(-lh5- &K#  ESPUNIT3.CHDF2_SRCETC3>Yrs6q $۞LɧGluIYm$ѤI:M/ܒ95:l6.q-ഷ5(T(`/$^^i;M/(M'3^-tTH` 8(n917V8 n=;Jm{o_ ŸǺO lNS`ʆeYq-@Q\4Eg%DaAW3&aXoτ>G[z_`/CsPZu?n@"(!x:/ç^|8`Dk.AYaoH{ 7%' oigSo Is !C@"𼜗-7GzOC~79+%4~a}p8s}D:},/GvD k|rJm/G %j@1!z!CbDn4%pv–@T(p*\5q/cy1yP&%sˡ٫n$=ջG0mMp|?=(}d4bUS;I6P̰s]哩`w6sm c.f`c42z%+XBOJ<XgUf]6auUnUY{Əy\d.k 3h?oaaS%=Ac+Tdy/Csr#pNü#mkYX'_qŧL\؟Mȁ6uŽuq'3dʤeP#*$.!{`2Z5_[тOMQz$> K?/>8o@`v҈OU T C]mЏ^Wjz Md$d PPkϻ&'" ؟i 'O4%҈Xw:{b hL#TwTWaX ?i/ z]i$¥-j.kZ7uJ6X J}ye|dLru&iRiL `EEwJՎ T85P&Xܱ]:cU]Ms=YVqe2=Ϲ) (3C-Vd}3QB,rg* Y3ZJ 5u- @CGbOܣ64O)A팶 b $"-/G*D\^3 } vhJPFBWF:5Тh~m D#NG,TJ TL2=ebؤnٽF%1y?*Tߛ1`Jƿ:l#a^-:/2홃Tσks2̸ qEnr ӡj9(wT!n%P!PP"Cj|uVO%~lZo]kڦ>o?O'zI(\}^SҥX V~>A4a1'bըjbV-Z\ơV3".nH-Ǹ1'1P> .xLY 6.粧?]mw}ü\np5[xʭ=J?˥M;Pwb9aDZ X @lCCEꖊOj/-nʱc+.mvpj5͍%le'sc:^Xu?겆tc_Chج#VLLU ebEXrRRR)6Rj%zRs*WeQ̪%^@K&Wp-kUPYO({:tv*/"])%JP,U Ptĕ1'1J.؂H*N}B!|8߹^/}o&Wd͠r^>; |rs>[ ׺mbĬ]ޚAHÐf.VJkA5:CMp}h ƥN "]ނu+]ւvY*^ddd Z50M!T悴 kr0Bz4}M9-Ɓ>2M^q5fGڐc;v1k=숚>ݑo9i +=O2 ;z N@H./FChe펧#hL$#*'a7o=8"r{_`hyD?̬jkkhE-#&u6+WM1u-%-$<U-;nM@˓޲{|⃊9ʖ͚tw#Ecw\8:([V oq`j-:wlq4OS&バ$EOw uo7T9"&..qՕLBm ?EP1HJ xa >At0a=?f(aTEkn]\w~{ MmEQ.KHk6_b xBgzH7AjG%NiEI#, xG.x%- Q9 ~r*xb;X50-0wJ\tj2FVVKUNjed  DxǢ jt1m01:iIÍe֖[/lԜjOq?N6Vl55p&c6U0yȇelӽ\dlk Q.'v.I.#rQtzw'T\{ `=)P^bI0I!O$"L'2B#~NHAbW6 "# ewBU/g-ԉ+b>b&1˚[Zho !=Cd'3BOl .0 ѱcqb/Dqm b,.; `iʘL3er2 wKapR^ yOH/U Q'S9x|(S,"R?נ ӘyO 0)c4S <$(\6"Dhpb1/$˜Z =!5 A!2Б* 2YPдM(~%A >E3{w9+ ߲7+"#_b=+/*G订_ߋv)o{eAX7;KR LqM7ْd8 9^yA@"h1DICU0MF#=-lh5-Tv~#  ESPUNIT4.H4HDF2_SRCETCRw)Fx-6'%!J pM8,ov xe w5X,MLA]_8JGh+ qtẠ!fQl+44u08 kBRװzgRґU `TXd`VA-C~_6;'9zG{+àr@#2-lh5-t'#  ESPUNIT5.Cp5HDF2_SRCETC {ڶd}; E{ȜW[ Q󚺪RFT**mڊ=[%pIua,]@aX eh%t}|O$)Im"=OlwpD-h5 QeQ /qͰnϸ ׆-wuF dW|!y}aEtV',Om-{q 0`]UV9a/^P>Gbm9H# 803z uXNrnrF /^tCVa)|hQdpy!Mgyrx yu|Iok+f| WП90D@xS}y"+1aȝEXO:!BuSmV#7l7{;K;& [0;6.t m/`@e2E9h/ ^8*ewyyW/q`a1j~O?Sz/C  LhV{x5~^uXU/Dž|Q|a~pd_ 'cAfrzWﰝVh 3)«, %a7&%0k bQAEk.(`T>P(` 7$ L 0Bj r|~' 9+B%*O}$a-{^ ).wf18.Jf19ӪX98z6Ōc13< kY? J9| mNg:Vq0\Mf,aƸ:o$wMng-NO00As}1AE77pO⏩@wuv$*SN[wM6mNd@Ïnۅĺ!?wwLjJK~[?[sjЮNt[..U/vn dGNb.8HRri.82T eF0)@iO7T lX z}"_w\+r( ϮWZ( ѫzKj~/e#$N.sTʠӤJ&7ռ@+j(f.YG<`YƬâύ@QZqK Q_}}8G./|A(a:Eq;,+eQv>Зlĭ|ݦ;im %J %u% m B (?la+}Ph.qJoth%o7{o34а|/ÏGKXy#?i=Y :Pl[:w^7mB̷ٍ֮ZHj=6_ؒp 6N.7qeL>Kտu:9}j4cc}d{/k g*5۶Yg֮f7S`Μt\*?յT[\l?=$`FGEz( s.g$^O^F;M3Ly@Y"32fy )YVoB̹f`]H4@4,ҍ,QzKRhJQK~%FO*\'EfMs[(ql"H& M!ӂ%}yF;|o"Ox#, D9h(X- dףٍ`R:xMtr dN}GG9 XFb]]!49$fP]VkQwi"c> i4-P&ǰiu ,& i%3#0;s PT/ #*4YӦ0L=T{nn\at~c+RNٱ|&&~#nu&&*Rm*MAI݊)6ߊ&Vnu٥\6U F*Vw_ ;"$S)Խ^'V^ͭH ~ݴFE.g$M%nI)c$}[\l* 1y 'Ib:\+e@rHF.Gs#J*V~tӁSX}0y]Lp9K[jjHTd\}+5t?p9Ǖ%?qgin|t}N*CeDNJ⒒ (c ɪnzu,JRIs5E&OA{g Ie<%>aalH,ޘ\|EqQ,(P^g>9N! }0#Z(`V c`:SYᙐH$O19-/?C\[1H @GgNZAX_:7C{ww`YȶF25̏e\ɛ& B jW/`UoCBYޘ{MNN^sqSƪ=su Ы8vj 55OT|C[s%Aީ' 덃yy.*A`1sx J/E/GMb7ks;cQ(o]񿻄~c݀`o@9ajj߅"O/3 *h|G5 @!L^q^G4ĵ8q/pz B9Or/7%cM82UʴX֠ҰA+?-2HpZ[Uk"aK&dP9w3ryL1z ^S膅-ݳn [0f%s!=e|nՖWnsNJ^ĩ.Vmg.m%rpm۫ʰS҆"{mmmI4~3xUz 2GRoyOyfW EbA }iJL;>hioEv;'%-cY82S*wcHsp,"k# Xw[kX-1MF =pf,- `1*BF\$?jWGk|Ň2" Iz-eVbJ>zyyxd%I7֕ZTjH^hM8jIR< Ph~|ؠs Z8L?lSvE_]{]!W'| $R'FPGREA-s}v)$aDܫ#9y`H%{S2Wi&;5~ߔ Cdj3u.RbwPiMxa()3ut-!ʕ^o~/K&þywVRE [(JQ2Pm*bQr McSA@8: b^P/4_1~TM&K9\|_ đ!!ylXõ S1)N.qd}O EsFUCz`'ZKRV`F//'j{x7Jr5mz ! *(29nTFG: Ðmok(߯Q4e&}}9?ʽکJR)Dԋ;T6MH0G1@QrE֣'ҷ-4~R)1Fy"/"*^.M1tIVCI3=\}y- ]߲Z'I~|=I2ᬔirm1M43N9 DȂLƻ TJY%--nMHhʕ]OޕWm¨F."Y}ugcgl\1/{[[{ 1r{=gF@qGąbvM&1U0>ֳ2<@ĵw ›J Q,[[A99辝,G1R+R,Y҄6(J*ZV1T)R3Wգ<^拤x'H1*Ԇ*hy62)rBh/#R&ApzΐBCJQÝu6' r D҉GO:sCRDڝ ک٤qe<)⓶Z4K><ΐf63'QSbu/t4 9KxU\"H?{Fe/=2iz&dfM3LO3>2/왍#8t8wgTֺy33 0Ef(0ײڭhEY>ث@# -lh5-6ZX"  ESPUNIT5.H^3HDF2_SRCETCZ)W<MŹ+=!尛pcնR0l oSr8X.K# ]P\ǥ$r|خ)q{J=Dmtf傴VɗmFc|̙=?+9}ENj Bdփ~%؃_A)qGZxU  գ򱂁%EW`\ayd2aq}gAfUZXc нf1nQ#-lh5-/#  ESPUNIT6.CHDF2_SRCETCSr{&pE~n8Fr7[8-%m0쮸r{ߜb.dS6ACS0d^Cȸ8T^WoޯͶ^JKjc@.APTyr.YoNdHz|r[b>ciF$,4#djkkmZCBX0l^f<4fڢY0hѧ.M:j=D299N6|l1(2GxxY vkIgנXo{~$pg 0 P>|6,;eTJRD"]no/vՏcZr&GA<`;#Fwy!KeƻtV;wzy\/)0DI} boqq}h$JQ͆@߬/g#{L= }X=.O#N;WZ*Yâdk,,Ɔ)tFjeeV 2)~Se8U1fCPD@1L򠮉5eSj!Ёn a@po#8mˮ861s&ۗ\sVg:gVUYg\jǵLcOeI{&qBx9jZ/faXqVtxÞjckVwp~6(aDo ROOu b|ty /!W#$ KTsGUwGa.,Ql\mazA?~˼U%Ԭ^n<" c.186YVg^P%*27(IY\.Liqozk4Bf9)"-|c+e게eVVQwʷeVVS}FSl8(,㳭FQqڬBB^4wԙ3\aRfkJLqI2)35U&f̤̦3'á wП-cCjfyۗ}Aйu-JH8 A~0u킹xӋ]| b]}>}v#_> z/A hz@lPq9A7||3r*z ʹNgI90N Z\ _#.EF~EoѮ6ʿjÎl3Ƒ+z$"N+5>)rawO37K65UqMXB+٘H7#7d?FhYÅ"@x,ㅇ)ұ8SOT([ /)@3#8ٵ[D^p XV@JqP^ N&:hZ ljA (4樕.77Cf`X+J"ň`Gw>7#7r\"zN&)\OXU^'7#MyqmBt:t..v(z?yeߊ y\Y#gwւm? 6 mlw.RxEMcWBv[ʕlq*\WZ?i^,o|ryȢ"Ubƞe_KK:tLM[61I͍y\p@%:O>ϔQ%r-Q²yIuSY',:K?0V@UDy[a˂OcUmwQ( FVJ!~I"õԠ yu޾.8SSĪ!-lh5-@b/2W EVENT1.CA4HDF2_SRCETCB {*We𛓜ͶvUKeZBFH9j4I$K -F6/ڇj}`5LZKB,ej*ao?9͹a-Txr-6o&T #"$ol8{},Y6,yDJ99u]5-)XQx GxEWX&& +B:X0JOm&TeɣWõ!1$%G+F4@7v֛[ۋk ꅊ{ߦviާpZ?sm?Aǘrw([!(Y4kqvDcR%{KȔS'|qQci cWɔ[敶v}qxHmϥ~WE2|1JbJbJJ$#ET>ΌsX!Ӛ:jsS(P|Pd ߯GǛFed5Ywt 8fnL,mT |P X!_ (-,k\npDL4Z3<rp qPŽC=|HOt=%Z8xUF^Zu--kw*32mS,{w)|4\v65CD~^gŴm-JZvlluCq[pYhTiFJrS^2BT6`ݭWO074lkØ2>W9 <:;ֺg8n[r)upham G lԿGEUY2ؖGd2L)H bo蟂yB7fω/~0tL%*5*?U1a͖tY atxs'.~?.PzMŘefd)Nirβls\<<^v;5Hj(߲E$Dp F#_Yk"i颓{ Ɏ\BaHG 4:ɚɚWeD]9]\Wx_n$ A'J)s]ۼ1P,9QXs_ #s=;4 h~LJ~N*:ǝC߈ǿS޺_9tU22 W&x WO{aPz s" V;U ީzSQS6EPyC=Lbo0n0nhR4IC@ 5*Ua9tY2_Ǟؙ7Ϥ#]|w*F`o8VЫC㾤+,@U.t""ݐHF6k\6l|SVl18 XB݅zL Ԥbԇi1"n3Iai8ndуh &4`dF|yH\/yLxNjRÎtȃQ,/??CRXa~O Z(fL=IuߑCLRH~7f$Il,T@sv;] wCYJur-hh 5y4r/PNV1NA\WYn5/SK06 X5^k;0a>VхF9c; iJestRGhS4x4tЪxH bytYΖWbv;Rxgwpo9xYu!&`<ܲ[nY;; `gkl3Nj8Y^,_!u"k'KWS9V99^xryahc-B:h+lυ /D^W{`5Ec `p)-w_Su}O*7:|_-uj!bI@~oRCA,tT\md{Ԃ嘰?f2pLlF +4ΒTu>h9Ci`'5Cu $߂GMk 2(n mro"W4iUsS&?xK>@Q{P7̒/@scq FVGɬ@CZ.iC 0mw霋 ~!-lh5-ex[MK! EVENT1.HHDF2_SRCETC>KVQvC&2*?zvSdn 85@1(aХLo=I,xs\E8!f-lh5- 2W EVENT2.CHDF2_SRCETCes^iR w;>ﹶκv)tI/WssqsU퀒Y- B `,e1oʋyO>r8[&ڬ!~6sFm &W-JSU~&3o*Vl,ia4tfB Ă g2TteJ.^qSQLx`v l7Mb$͍&bn3tHm#ta?!0^wm񎏄闱\:-SZNa ڴVs'E|u8vբ(7+^Э5RӜ!ͫQE02pi O{^~=?bκuD޳{su{ -$ !S&* pW>IA(5-v~"D ؄e{FD 'Wv[rl?cKCdxu vPBqv_4~tf[+TƫeL&%XQ凹Ghnb׳wiUVG28~~s<>i',lR1 N@*xI H ȴ_0-=IW( {/8 HlKH}^7 :t sNn;`8R&Q|;}x{3{wPݥPF6M"w9l>le\ Bܧc%Uz", a2^"'&F4}vjiȄ!bmg@2(%,Al 3Ǎ//$\x*3DJvbX~2 SKaS'{7l5㽺)i%` !-lh5- I)2W EVENT3.C/HDF2_SRCETCl: b{muS MN͒rI3skv^7εo$Ilil<adBEUU[ d@`@<6rIeKm,  emT+ T+u÷s].Vj-qw%swR\S)IdɕJA12NC86e)eP%eg(T^$_*F,SSa0X_/~:/z:L[寤(OD} +, 'Xo-PTdQnA܃QƇol<`~,>Q D>0b%H>(_"O#݇G! 5/OGaBo3~|O&$1 dA-zHÜ[qSË3}x<4U{q{W%g&tP,y˒xf>ax7Z&Q|SLT3ݫ1`l8hOxc5|B'ąK %#I'̴(/iZb`4rq: zskod^cɸ|Ce;%>vL3=&f3PNav/6*OC| 9 h=u5,%k(z$FNDXqǦ9M\#L` gTɰ NH@-8N*&j67ft0{d3IlP]=_N@YЋ5 EɄ>|tl'S {r VB&]ca=߇Hwä=!4ԟ-ܪ$lOYhpF^ICĔ?Y;( "i 'S+>jM.}C?u=m]5R'#v1%!$uLz{hs5t9y1Ԧ7)oX(׎J?MVC"95h}]?j!GI)$j~5 -k)OLA G9ͳ(k6g- Nl([VcZG!da ŧC;' ۣIt;>zC>-( 83'OnqHL :o{C hjox7+Gr2 kib *QI6lu@/Ǎ}ľ="~hTYV }_'@Q7n/p<L+km hy`تSr0xl"> ,j'd# u)ݳbt#{`~Z,j@|0dSN77p[aBh6z07r$'4H1a[,nKcrxq7~p>&|lnЂ줋m j+?D!8]!b'{)])v"xXe!~FT 8so=,YZG34cA@HAB C- Ii)CHCA77D>!d|jd!o`1sG&NG4QGl+2FnF7q,/u|իNKߐ+IW>Öǯ+ɚ_ifU5HT:m4'w'БӴUPv;J׾N66Ԭ:>ajy-<kľO>y`':xxOIL;"dl UI T-:!`'*pP}L k__=ς&\ ʭ8>hsD ))K d)Zh2nd{.`4p"B3j OƱߚDd<;_H\1b %\%ùzVDW/QaQ8Q%W@ lKt)3c ΘA ɝ9߅0kec:p|!,-lh5-ex[MK! EVENT3.HzHDF2_SRCETC{>KVQvC~BB'!oQlgF7l5㽺)i%` !4-lh5-| 02W EVENT4.CQHDF2_SRCETCt {F]Z&'~mW$vz9KBI^r>u6Gj`Iee!jd,`mi.6aloϻlxz<7'y,wwu)xdV)Kmٵ&e,Kkf񒜎"5vXK[WeٹkkqL2[+k2cr84>qEYVۣ7!`X#-Lkd%$VO' 6 rFtJR*5ku*5\Wv|»QV\5w+mfͩAVҊnG3Ni[jeLJIK6|)jV/n!tab1aM WVVE|oBN "Jdm|1凍L$-=* T?͝Fqng^hw!W3Mcx8B0ŷ\?85UEvqYߴ|YQ|dP[l+ 2Y۲7w5ogP  ܄TT!j:&>?hʣՀY$J[Q= (ߢdJDXPd:D&@G<4k\x9#K~.RB)\vx7F> ͻ.sC= ~!}RhdII=3xss#}w.+ä!X:`sٕt?fQ83\[tGGH} d9?% <BEҲWGOt.@V5 _8"F 2 pz^8":7Zx<_ PDipEcҬ\ cTdwTNp[[-D&(,{&(G.IΝSǘ 'Mt @ab³5᫪hd=9!1"~'}ﾾ_ÿ۲M0⿴w7#1 n>MX42c~ .XV&x 05n:Ό:5FuC^s8ou%4[:m $XoB݆LBPc2YlnrWhLM^Gy{s4oI@!Qf~x!_ 9.NG,Hw58 XF|HI;?e']_Ee:\  'UDWDز r%P%E-J=I ]kF~nTҰ6lc6>hM X 1iwMq,qNi<>9EW#SUf$t*4ȟ /ïfr2rS$+5UDL=:=|`>߲ˇVAOˇe\=Akq̸z{;eڰ?ˍseWZX_{6;nB&TM { "eBL&=zSuۻTXɼo+yP3]~ go1y h)KK?wqGiq>X:췓H+fukl/p ё%Ւsg$888IRȰ\LJsr o̳3;RP&oNiZ FeGadSd9Tdbd]P6 [P@e?\_^!O5D<&nSLuƿ{כlѓ1/YʻݫKw鲜U'c|HG;_Aaȕ)8c dcaB*g#p!-lh5-ex[MK! EVENT4.HHDF2_SRCETCL>KVQvC~fB:'!oQlgF7l5㽺)i%` !#-lh5-o k2W EVENT5.CHDF2_SRCETC }s6ڥJ{26rGbMIzkprҋ?I5,#-|.EB*xY\x~nKcYd́,wwuܘW#ѯBU)U `R:ߴ^xBgir!~Ο//x_o>zt&ODq2q\FXXVq-NRw׷c`fTRYT N#t*E zl-" JfzJS}MSKd!ī(:hQ)DD8RfN+tmOtdǸ*))J! ;/r36Fٲ#q3Cp^tE :0ݽ2 ݴ릭? {V-Gn=v—qn+:M^_[pW,Ю^ Lt7SP[~xo`rá=HR5Qjk]Cx5erIr97l2sFFjG L*y~amP_a1]]|7m qxtVM3Sk7kcβ^ɪ;_UH޴ĩᆶ@5`t[5g*XH, @^X+z΀q=z,U Vvʞʝu9~b 4pNϦpuz^y5tT삈 :V}Z";p7 Ӈ *fKnp\]^s+gc4R'-8%~BID v#< !P~ݏA{SUϮ^&01^u~c(xo:5T$-pCxs:݆Dbdd!.|kCsU̬ۗhgAC2hh '&42kQlx^VDO8( D"eeE AaCZpNlDHay$=(}ϯ4w:v}V!ºlHs.<bZG~jrAjC09HzBl"}RYN2ЍJ[m6#0 :2)9od]FvIax2d#Ƒ$Ôэ;%6JR$T%̙<-$~z*_xD$ue(*__Q5'>1<B\ Y Xdodb/]vM=iPGCˉ2%KVQvC~$FB2'!oQlgF7l5㽺)i%` !-lh5- M!2W EVENT6.CH HDF2_SRCETCȘ{mJA7o9;n)TG"sq7ZC$94DKx?`BFTPe|B6HJ2ͷmJRxS$xwfmq@/Mp8Ѕw =cIQ4Hr.8n?-*4CӤo̪2[ft;?[;~ס+%nLN\e/4v< i,4ƜU֌sWB$cLvHT@O]~?H2eد6*r%+O9NV &@v1\g.qs[Lf12Ҙ2 FkG@廎?.I\]D_B»n)8@3&7rk9Vœ&$irs$kk"$xgq?K?1Ay3]/Tt=22 `v3+)VfLV,)@e/yF^\@!FX* XM>p;?%BU,fSfRIS%AdM9Წ_iYҵWR7#dF +p BY TM[VfY"4TI$_$C5sw)svGeME`YybkKu?[X}E4ԓ=A-T\KgfAo͂̃TߐmR$1`tF 9X款i9g)gwkNd|<-DI8RNJt-(#1|يz:+hO^^t|5gy .MDU +6 ڃX`toi{t.C3#*>64m>}E?N0cH!t8OK(rh-.A[ǝQ-L]"ҙg Y']LJfgMYta7ąw %q&gBN,(B?O@KC|>ֶw?f A! 3S%W NVBbDT[%R(bܻ< $ߺՠú9xZR'QI^n.nPdlw|( | w1ʬ|utYܦ)*ں4fCb[Nt)ܛfhGbZRY;A#> ; aiğ [mxbv\ԧVc~kԻ/zE^xӾM bNNӊ$"@X_˃V,]rel˩p[mzm.ku krܞIf16EnM҇"L%UŃ8T n1db)0,W1~9Y3ƭn}ǖDعJ`9ڞ)cnL侽_#uͻG+p,5Ȅn[%A6I:g7˄ M.Ix13ݐb7.'QRNxld©I “KN϶E T}N2V^ $ŋ|Z{ jCn8JxA?0!֧B~A"ACԲ%*r;[;cS}Fb[Cg> {:$veV ־-ic{㇔bDm} kmCEsU ]^WڌARL@z-x/%&ɀ|manY\?ڰ1 zM_OSjhylOEyۢeH`WϛDTާ5&ۀkn AY3B"'8;t$?ӷu$w4YfbBI-zkm"(y%_&Y5$3yiH) S;cN׮k9OfI4ʅi~иf:^:8'٦*phCZ2}P^fRРYLrV[b!ON"D"fuۊHh3(m Sc:femK)lb GL"5CYsn'|^Z|u' ϭspdB܁){|!5-lh5-exƙ! EVENT6.HHDF2_SRCETC>KVQvC~4&B*'!oQlgF7l5㽺)i%` %>-lh5-T"  EVENTMACRO.HHDF2_SRCETC s{66s./{]elQJwgt$ti.XJ{ٌ֬BcB3=NڵK%\kVK\,"d9`|e۸v6ܳI y]jp{0=.wGkpDG@@'A2$Yj @/a?qp')"ɛ1Ҝ9t͛3jvc)UHwNv@]QeS*S^8 e`sÚ'h Ru~S T`p LTGf0Pz)%zLu2E-A*52#6bn]qդo Li0n`ݴ֓oM0>1n'qiX݀@6.|#`M&X#Im hi 1'eXjwy#J#vF(Q;D܍@䡊Wl؎+ͳJ\kZC}`-AWu͏ ha 1r`Dz|x=q Yb KQC GBb`mOY 5LPm(D`M:<']g(g;Ga6T^QwAZ'jxS.A򟗽rܹVA\ .mۘd7Z#sLmWq_δ1skރd'tunnk7v/w|縐 v\\hbns]́Ō-av:OOF>?sOS̘^C G*,0+aD>IOt|YXUgj}MkAܺɺ%)5@G;Wr7#kc^LɪԮRM~[`ӫ`S )2j`eo},˽ bփ:+Y1d&`fǕ֒3S}HJNd.&t8Ј#Y:1V&&&UXi k-% H,SNdYFVaEccOs=˜|w>c{Rr( z (+L|M|BMЊX+.rKS{AvJKRrYT%E9s,-"T3ۡ*l'rSOΕUeZ4f!-lh5-# EVENTO.CCHDF2_SRCETC{6bDۡ6Ί7z{TK: Fxw7w)ӁŁ`VXJ`ĐXPX0Y ]SGa bfOͤ{[czHO4YP I*D/*a8{sKBCvFsjd%DQg~#bѼfI?ɻ\TGFăVQ=#/pEk{ bUbSȨ˭F85=`kVu($Ym'ŵ- tY}q2+pϛ0k<xG,''tǞ8C?:;m_`m> erbx2R\P_[wQ"4Fm9;^Z_QEGU_8a]m@c^5{!t0 ۾@y1"nsnٝE\/a,Ԏ7CܲEijکQuY[8OLIc~U>К2cc٦jv]0ʻȼtt6IR~Q5!wf=b^ ˡ"z`!;-lh5-j~꾌! EVENTO.HHDF2_SRCETCUBRV[LuJ1D +#dcX7Z ߖW8Z$,4=_ЦHE{"-lh5-/z#  EXARRAY.HHDF2_SRCETCbc6QK 654QJruw]q`aMsbX 0`0B@`#Y}ѻ0-(\Niɤ ^>0]rl=l|;Go$s=Z5WY5v,VңףWB&HАBI$)Ɉ@xl6 m~|> |J^Rv#߽Q'w{ca5``Epx~[}bЬ35Z5/zRP(D"`k f0ɿhRP(D"Xg,HXM*0xUMn9$bw%y#BIRT)*B8cr~{Lb0RL)f .@$*gBb% BjLM[uH8]!gec6hDx&պ\JΙ=_/.rZZt2,^Bx?Jf|  ZƣѰ^f!>M?T' ;{ i= Oz[׵oA=Ƙ=!7y^ j(:ò{[H - I淐bHxLux 9S0>᩶;{ 1AOVǯbIxcshbbBDDc?> 킈ȅ>SOŒO;CfE1ˉW0nHnXgX⎰vd⁘Ǿ=F^@$R&>9ˢsh`3m\۝M>9 !D[vۛq\ƽl!WGFuE[V:k *WYf8Y@f|0qPy-L6_Eռ8?=E48:pc'``]D>H]5q@IqĚ!uJѭ]\_VbuXFim.ؠkcF(]e mífc,PeF0kpP(9`5b nskYZ5(Yb8'9@w[ṷׄ`ykB*ZKA'}ڴ5盫n6 i^9RNlnM.5R ߦsP@R mL(^^!{kӛPַ<޷6}%͍kz K:10U) xEL=D 9ݐTTƄT#ȧ b58[ H`H;UMHbܒ7ᛠh'Y[OT6%N I Tq]S[50kxtty/l%o;,p(e^5LE7Bf%ԧlM-KqI^{SJv^-.O&wKI\dVP4YXLT1Nlu˦PP. @$~/DLj}lupy' Xԟd_S1ʔ_D]B.0b;LM]t>R6`M rLynȳX쫦,қ&&nSpMpSqզ~|p8Jn)C m|ă eÅKD(YNȿ얙b#-UL .>@:نYF pMXS-ήd?y@uP,(uN4% -9,BQ=8thQkP'S|z{sXW-j|dBt] /S2}ʗ.e y&vdR\Pi <..m`\ _Y/1N7aqb,SelO=6'Z qɊr;k\?<Ǐ7Tt~\(?|4i][8Z)5&c,GS_l.bMDݢ㋙Mx4]Mg shr9L#&q_J6i6RY+ej 孵&{ܞg>Yϸ̳3g_g,|Bq?҇"$es.6$@9.Jz=R?7"`A dL _POb{@$D?6S "lI/j ȰQ$ݶiMPxA5xcfF2g˕zN:2NFܾ&ڔ2 hgyAy⦊}2|މN:pW.^(cEY!]ek=,|g# 4T.~jWW`vvoK*k2`ꈺ$Zi PhL>wz p[Ń ̀QTu1kC\rQ1 5#x-lh5- r#  EXEMOVEA.HHDF2_SRCETCMZw-#vJDQS!2X,Ax'h' ̠Xj|4 >q~pֵr") ɠ=205;QaHg I„ h4 p! X]aŠ@普SꂻuҽvBw:n p9~Xh#-lh5- Ao#  EXEMOVEB.C+HDF2_SRCETCݷsiRʈ> un]j%g]#pmʟiElY*,Ym-o["l -jͶrI$ܮZ#j,o0_9qC๼sqiEou+EVkh=X#QmdWI9lr$Ǻ&@eTUԐEҽK/,_ks1..;uъV(nF6#@/Rn"6EDTaW k]vZ]P}cWPw_y]eQd)۾U2jtJ7J$KuƿteOK)ZE6mEΗ#E/\qr׮.^u/4^@xKj,}oW5\ERKo@Bx dd)`‰g&̝ .Ҿ¼1hWz=6rRDh ”czrdZBwq.,'1J,iSw,l.Az[V .b IZWk_vMm6]~aBHF@籎ۅŃ_SWuUNcKE̽|nb/DdžMhR|p!풒q/)5ՈM2X0nehg+!!D0Q6JmTSoO6i\z|wI=;_RxUչ%;_k勭,^JFa#21&hBTbňcVbmJ^a)G: 2R bX`!=)v 0c#Yu񞾏s4㔢Qf759!Ug3=9Uh<dB]ص4l! !Lm(\f<;da I"ttDX@‡,#g8Vm(လ:"r XL}t3xd쑊 X:I`?zЋYI2nTPl:9X6mȠ:@釂-v|w^YSUprM ^ |_&.w ToQ&B $xכzc}&ky eV"hurg,L}y0 zMd<2p]"Zh= @[/r1r2RJ]&_9y>,7@8N=kcC`G'(UTBkM1i)pY9=t 2i8n!@nHm:{stʆO q5yp˱3VÓeD/CbJ-e:6|#DP„J1`PkO}R7-æ>]sS&?QF߲e qI=YwzYU f1۬sz;NkEgEjyjV>xB-/ +@%OOZn+S<(=}:B(o5x '-(M[GA MtmY>}B QzPMC5d'u&;Uɚ242I!N2юF?4_!Z[˺1d:KlUv\.{w"Q,n#i~|R*N@`'. Ŋ/8xoizD+&&Yiz0ha~$ItT`ӭ5A`1ꨣvPE#Q]lof%k =ʶRKQ^B7u>!K+ F|(`P{Cx+Q݇mg(\cUBU[L!KIbdGZmaAzP[Ӣ5UfdP!_˕:nN7t\6.r%W0l=7yc7QgTk9d 4#-lh5-~4-#  EXEMOVEB.HPHDF2_SRCETCNRw.饋KJGeRv\wJx2Ys #WX< 8Hm'shӖ1lՖ-@:* DHˠ#t-lh5- #  EXEMOVEC.CPNHDF2_SRCETC {_g& 5_zhc%q[%p7|۱Fףq9%@*j]oU'Cp w{qܕ#GKAWqʊs`r; BF)L# aئdYq ~U.C,4Fq_T]$n~HWC ʢ<:;?UUdW`ýC6J*WW{D-YTenxUoҷ"5a3uc\k8`fOjSV>Yz҄B;׏;8⧨O7OR=7j:klu65GM͜Žs#Ueo7>V !I=˥<;" ۧwq#x }gO]7TT<ߏLQ[u珷;ŹHP\????$}Q^{Y ۙ[K`/fl;-t:wׅU/K!ĶP.{BtH[J@O#mKXΘ"c(o݇`D}peG\Iݏ|߀?i}m "Ȝ>ٮukljo`[1-؝Mȸs4"Wi+vnāk,ߊήpcYO/Τ_L2a~s<00} ;_ M\ԧb؏?)rŌ>yXB{⏈=}?6 ErL#1 \δ6S 9#WF1e9u9{+wggQ6-[K;k-G\X+Z9PmRgck5AU,)"FHgLzAنAAf4 N\E Ծkd uz-xENw1T'P_ٞ=JaUņN7Sq- Ԣ}bCLCC;) 3B5sP9"rg!?O_b<$n2[넟lSX4$e]%&^{CO a>W V8[܈ԝ/ATl0j ,Yʌ\ `yS6BPW[kh԰iJYWwAN$/j&T@T[T P^U}BL/U4=J]!o@-( ށQg'$3P*G۠UGh~ϠUE|BP*2ggP*u}\# ԠU)t ԠU}G2ST 7Fe+: {T 9 KayV zG%(&0A|x/ F\>"Wo;S/+! ?e4˥RAX\Edww^>WІ1$vɑ'N 'u( <b|7pBn ip7777 0/Xp|7p|7 uCt ڶNɎ%NP Z:J[ Y(.{D}|@*zE~j~ H񇏁bZm/5k7e[cu7,s5u무޵~2aeB(q^liY=q^I|sԯ=fXe>0)fP*mLC~w&-\"SySp*jd\ w~} x%]ގ;OO wuO׫v:0  =Jv!#Ƈ>w=xx?+ї3'w1S y^li~)&ޖ~d''vyO9 {Zބ9-׼׷Ȅ1(JڂY%ZtF u6Xb‚M ^}k2*+9Ym)7ɤ= Y, NxeϘ/ Wz l.1ݔQ7UN084_$pSl8StLy5sH]E7A44ҍoV5Sָr! r"`w5 FpDS]H΀Uԍqs^s \z[^7LVb}pm:pfm13qڮJQҍ"=51G6nX 'ބB:7gx%MH;9Zj5mܘ%0Jl!|6Y\jI6w#hѰ#L@h4Y=c@މ6r#M zw{Y/k3Eek3Ee转뽬^^im=p|KbНInN;s+GB\E&J 2$zFn@jBG^6$ uSq-f`4C M%VNJ*x|?!/ /0Pv+XN_9fdBRxO<d4&v@"P#_jғVե&)~+hiDn҆mbGGwdIc:fPxMY샶DY'}f 8k -78<{xS@Yt.>qƏ4qh8dv'e*@&|H$XH7V( 0Œ` IhVXSsjJCLO*rCa#J&ͷR'֒ (rI##8óe3!>q<۠è0&q8 U][I-LDHmh?͝m'c!,wL9sK_rM(̓f굤n-RDSi1#4DgPѕ*:XQ)Dᨎ1^HIrp/)Q ȎNzN\AOSz VOR!zLy萕c]{x3`T CmjXj^@I4Sͺ+F] 7$Fy NP aQ0 //]ą|OMI #Qd$Q(VqN ) dӼO:ŵoလ1g *xfWo-Rhu WiR8rMKT,}2ި ..;zkz6u@-ϳMggEZF@]-Wm``u 7^{ xDSw~X"fԭKE!#-lh5-Dv#  EXEMOVEC.HKHDF2_SRCETC9wRs4|K Z±C Lۋi`17Px2Y 4`(D6t9O'[qi(sǡIX(2L+2cؐp F|YBB/TKm%@}L+B[˥w2G#N-lh5-um#  EXEMOVED.C2EHDF2_SRCETCM z|Y<dzt {wKr67m)}Mp&ܞw}4I$I$a;ab#cQK.] 0`d&{ܒimH@@4B\e˥.;s.ˣ4˥t.ѻwF 5- 56o`ڿmôy`[Lt: y7Eu]T8Ćjjnբ 81ITUKnbE:VIøÕĊdڪ~#kz_ڤFiku[4z/| yuzuy2y}6[+WN8>]PkCJҭTLJB6Vx0Զ_ "t-=[cu'PmEub_|}yB[|ybqvbF]j-^=/.^H5-J8+6rqB1jaAK8[A@/KsM["%^=sCc !B+d-]52ɑe+H p>,YJVόit Կ0 r1p܋^i0> *d\[<0vոx]O`zOlWֿS\QV.ysש5IݍHY^$LHCJ$0X5bK`eo~ K5i/oSFS#MMu9V Q6[*ObNGj:Ď4?%:,XۤJk9+ʰǽ`uVL/%R%ùr];Iz?0&/nOMӁ_ 5xPb| =5 &v)9Ïll`E riq'e 4I>.aysIi9 %l9.|8d N/3Hn_5WHcr9@Q弄&rk$JNHM1ӟɒL+OC$ɛG<ӍB_m8ny=tѣOm.UuTtjW0\)0%'a"azʪ :mDv|Ρz3d-?3=h*&\}con=WE(ӛ&QQm%yE}!aRgM_-a?8hEsEj8p4T Ƨ _=hZց~^rDBZzl 9Mu\ڽpn ]ctx5e]'ۗ~b7^ao/ an|smnm\s[ד*\=FX3Fk!0B">B=&1ے2+[ s2*p_E m@cz<~ ^f8> s݋X:o)vccDɓw\2`-yN΢È̐qzd\$]qf /eY8&C ^KԅРJ1z-.lfT0i%Iόr3JBSSAɠcGLHZ'$#QE.5cܵ!,{5KxlLv3e3eMLjHI- #u!&(9(G@ * mr)G:eZ/$I,49F5Hlf6(r2;{;2A(`CH䨌P:v(7b/g)ߩ ,5E:|h=P"EDQ\Eh<MvJͿr>\,IإQ*;]ϑU[=Ŕ.m#`IH*=R\1Dtc9м_](d8Br!%ط;Q gg(4{ c=һ8y`|g{9 +!ΦhEsCj8p5،s!2mh-ᢜ  6Yjju72OanN~ 0v 0jA[ 6}ZY=l۳{ۿwyy09hgs㒞wl -T.ӛhn673MI[w~c$j#W`׃8 6>ƯqMx[GHB)&uK Z/;y 16(騼"`~͓L|^7v2LS6 7syB@::^sN0AX$YBE2Z~BH9 X6Tׄ<("5 ph\0z Y =(_R w8'&c?6(`m\_s"~aa8@ ~MiڿpVG8YLB>ũ{yy"V40+.̔lj}jNL({]sxɐ=mX?J޷?~]ncN3@s! ?zp f۾[>5AV#^g 2GcWU+gǬE"KP"LLIGZ>oC1n6\r |+~&E%G@qDzc!.&ۨ%@M9QAyKTg&Ue1?qj4{o5׎>ܜ2Ex1yq_g󡥓(hihmUP_C_GGeB%f gҡ-`a-d΁TB8(΍hgclmP< pt)'(`[O `R :H fY6f =2rpG;*vU?s*#*t7!\|-AsQYGtm/HnMd{V*a-(Jɒ5i_928;v?+eXZ= U֣9 \^[x-[¥ަah+V覕#F?_\?jWGRHk^ubŁ`b©k3kk'q`Ȧr>.KiB5\\yQ+tX3$}|x_x.]j;&uj2 7;~mF@Jn A`q? (Wfl/ֺRa#RS\(H;(I%$-f k%%o2A,qŹ' ( տ RKq{8k &Z4˚nkIiX$ة2VꐪdUG^Hca\T2bF'1˪>$`",Ŧ-Y sHm)_%YMcX-l0NyiXDRBH>`'6s8>H9p6D+)vbl k'̳b \6^ZFفkTyi* KzԒ}ochJ+L{XH,SζLsr(Bl0A#-lh5-#  EXEMOVED.H֢HDF2_SRCETC'tR{u4{!1z=fqwx^ȧNWboi)o||f逮@Nϕ 18賏۟F FiK(U )޼lF-K3UVh%Dcd}(3 ܜo>rNrtѕhT#y-lh5-!6#  EXEMOVEE.CWHDF2_SRCETCW-]r̓_i2FI^#u '!`jimI˾=4]efB7 G>A&o!W*(ژX RJ$&!{'r +Y ; n(qFBYv0v^k d.bE~`tp28I,gkǚX**6p'{CG>KoTU4;9xrmGЛ6pC~`>V6|O,|AC揈\ESVA@c8:^n.W,Jq Y71̔cB- *q\VY {I8x&X!˸.{vC?晪OD!#`yݸ;cLk7d}qG]4130b=X(TT| ~ Z4m!CW/dao>IB}1P@.)Qa/uIPԸl.(ʎz n碁bcH tG-:Oa>zUnp iWK o!< s=<|8cP,'>& gG! utF5& I$wHDPkՠqRm 8"pE+npF:)>H2t"B,K!2fr.9)f}S9 )3mGHjQJ2nH!jh[&,Q4p"{ZzKa.W ӧ/^!?vTxśx܎Txb61Z%ρ>Lhh% ?OL`f L.4m"bG`<»Em$@{}AWfI>L?ܓB$$"Eq]l+80mw0Gl]ŝ&uIXUzMMn,iJI C~eC5!&GNj,B|4`r~j欼"w -a_ kƾ=k|?P&._kvpmX.-u[d3`CMY;eb鰩%Ve- \m9)FC~1Z5PE2wzHa llA BM- 0OJ#T6`RZ[)j4? 'Oyc1 H/ D?Y7u\_>p}NFΫt&sK 1,^m7ݎC`>kϲtE{A^8r#%u`qKR${www}rHr/ru˭;R ڭ`RªjKq {w6Xwmְs-=W#3ks7ƸSyw& hQQWRAǼb.]ȻwxA5s6T TYzH:Vpں#i~_N3k "9WMԐAg.C:qt552|7)'x?## ,+w<=''^pNnں{f΁R%^>-݋ ǼϐFaoE c@XZ|\.^B,/W.`qDQiCz\0.|sֺ K;[HքsՅ)_"|Gw95hpHn;ڊ{@)mCLvyĽOXc uP^Y1oY񒺄^#@2F X}kgEڋS!N-َ[ZÉdό&`|hwJv#wvzqN2xeb-c2fKal29 Buyd<"v*\`BKz 춄nu45r8ƠKXDzqOTޗ9,hlX^C]Z);IJFlro6=YHJNzR'%d_˧`^]F M|CQBHãu*TY D%^Ems0+SH,IYIJhaQ7j ݜy8*ƅ׊Mq=;t'h{N(5QسP$Jچޥ`uBsdݟ+^TTcFUv|͏'_teQSͫg\ykrR9nku>tQnp|[.d9iZZ赫mCKag+z8MChު3[9N,d pCQʧ@]˂yIhm1ªLQ_q"#d 1]l4Lt%To4:%W"iĘk} R}WW3X슓 ]Zۋ x-м ǯuEԹJOƆ:926|h-gO;} ؽ."c3*\D!O)ēa&[DJZ+egq'1.X/ ?bǢW? w;2A䘟[."(v(7"X{鲋'1G(GqbTԇ@]F& EyE4(Wk @㛃"܋ʃZЍ^̨=.RǘneW@ǟ_܋6H!.W*ǮYy&U&qjXE%޽dFcٮhEqC5G[ ~uU0GA=zȌ: |M㆚: ~5l5Fu'ޱnN1~p eEM]P{]k. 9W1ʮWx]wîmw$)rjGܞQ}Zk\SҮ]%E!̢jU7CkChMr}ȯ$ecYgqu h}lN|[!!Ip*-X伿K) y^t^Q0?PqR]Ȼ?Qdg*MW9%8j|q7"{SN ynUPʼn|ڴ/XP8A"-!z>;,]Oz*4JTF* t]aY~zBK42oON}mL`k,7nW)Ӣh肻͢ (]9bM'Q|j,yTYFEťE}}"4W41*+n̗}>+Q\F>ʽg@"R(2!g6^"NibXҕՏ|IuG'R1#}X}Vl$R-cJ; q co8.˘#,ie'd ѓq|/qpn-¹fОNc瑓]#BGmqui7ж.Cȧ@ wc_ =&'C/?"1=5,usgbQ= z"yFRmMKc-[{)3琯``?/X wt/l|G+WWĵI2gU1v\AcgᄩC/Ӹ]Anq)tiI¤gsyjO,CLQuD o8 >Ԝ= N J螜 he@f<,,YJzy4*\XYu [t8fWt=n8CuxY!GJ-Cp|dž&U*pEUNUZuU}ڪ*hSG۪#M=TKT'Ҫb-T6El]OpW#/[/XS$l0ՓBJ zZZNPf|ݞbn În_ ?qʸhQ5C ni{ab뫏xJ.$iK}GMJԕKRC ?S(&KjV D "L\j2\Vƣ3vݤ)ctn"0NjSՃ5} |?v ϐ E~ikD{X&U,G[6Qhj4r7Ov:^^ uo'kb5,-TEF Y8>F(3b2(kuarR4%+ADi*"b𬩮_#Hso(u]>l ƬjDغ3#β}lAg‚*^8TR4vh_ h_GB:пGFhO6 I~:-(h*[9h7<̨=Ehڰ:e;BVHۋ]Z#Ilx@W/W$(;="u\Ccx¹ʣj7`9CVJ"eW! msI^i: >_6S]]K%Y NXG-]@/h]FK-Ե(V`5-z* &VS ښA9^WUAgPwQ-w>D󹕆 ୍5˩+-nX}pnmaEV,Ŗ8N<>@>v? 씷E /`"Ջ|_]CUV5k_5{_1(-hK`"~E=.hPg5ZcG9nhCL8j.[#N2}5唰NsNdZ/;Ӻ ^{{n+&5@h8wnW`iĿD]1 >jm;U(X}g#0u8uZo{$Sc8mvAm2Z0RX= )'~E6qE6+Tqؚ 'r,`+~ ÁӮ-eA3UaOC ՝ե(G@ TE[Geݍ-a%֛dc٨CZlV[N4bJ@#-lh5-@#  EXEMOVEF.H rHDF2_SRCETC_Rw)&x-6.H"M5#9lYdftwGb* $X7d0z `4 DL,"bXjL˷xbڹnK#& t /NDWU)O#OLd:vo'*K^w0p> gz+Q3s>?#==n0ǔP)۷tUX'),gLNJKcd.\5妣|`azi-#\H8|[:B9nbB&Ə)(R}5&`xamF-ue ҡ+Ш(ŢhL[ ŨOZvWTl ZϽ1|ح~n5oIØAxD|!B-ai^q p-׬,l EeHeJIJΛ?ݟO2(9Gka AADɅc\ʼX nʐofyJc亵Wq>6Uҝ?;Rcpy+IQ"WCҔ MirZի #&ݴ&ATm-] _mS cmTre޷1pSm1]K]FQFV O#-lh5-j0! EXP.HvHDF2_SRCETCmRv% ̠}x9-6 !%8nS0v+} d,IdvPm4sb%P2U~iŘ6IG.4ILqJQ,oy`͝*E=@9\V͹W}e܊x=-lh5-k# GRP.C:HDF2_SRCETC`jcڶ"7i= pqKm6,F=ls_z͹{_Q+2C(2pljw=;Bct i#ߵ9q2HPLJ}V`I.&zgϱ7*< VZ}|E_Nõ?!<~|:nM,-ǧE^f-?YmQDfG14Dl 1| '=a eMu/PB?9'#֨ƝH㥑DJj$-   5Pd:*(#}efs !Xf ~_㚾&9LBV'nl6/'x QA"><(Bg B? u2U< V:k}ƣM=DJRׂV72:׏kҮFi0 \_B'17ox* Ao+fgw,6\=믎ѭk?LM Ml[ 8Z @6k$/@|>|Fa`>}7C ݹ};an/F}A{fcch=p={/o񈻰nf}I(GG<,Ҩ_l\űhzz:O b>Vmqk\Oִ~tyǼys7O9ʎy=Fq,R^8'iMFQ*?"c)OoˑƖY~y:8OSusĝ}»Sf%MvCJD '&ħ0 9ؓIIY}2Oc 8t.$yxcGHX&d84CRHj:?8En I .]xnj۸(„5@s8G!V đrįd7+}b* @&Gq|Y3Iҳ0Stu6?r?^/w+0^>I:bV# ,#0c!/u$&gma}ROg1\Bյ7h*@VuWiRH7h MGG[_+_ϰOZLSg=M Hedas"$b8@Q.jؐO^J cГ]ax ©;&[[&ܜbt v&I2O -}BrYlN1LIȽ _V1qeX8OvR%o@rL$qi2=2b ک(F[зs3 ɋ GAI {֓yR~䓍A'&-i)Rikgw{ ;T*,{+&_t #&F M.pvϓ_"H`L(vo?}j4m1Z^4]$ݺH5O._"wwWQX6nϙ(7.-9AysK857\k-%W$n^۔.ގrU=FUWC~up5@/R^xfGMN;=o4ZP p ۷4ixdWh/Hx+1h}i-'Ե~|_IyϽjqK:AiRO- o}Ćؑ"FZF{$aԈQސ0 ? F`Oo>4$P~툟҂5G?$}F}H萺ϿI3pI'`2d4?x 2ZڮUڭY<9^Al5Iӭ:[ ?4nܪ%=pINc􂮾I2 $ ]~PY'|  ć/Ι9ݰq]a|ƾ. [#㴓Oiq\z(v 0I9ߖuS}m 8~H@ȫ!z^J"]|3E+@k8}L=E=6'T-? '6(H+2%z؄ =גYs)3Sɱ$hY[28[< 'i4bߚIk{u"d6t_`pWte$juq6n[?F y{^pDӬ TS?ccP1'bEc9EZyLB@)mYO2ua2 vߜk#tWca:tϗ]^Dɒbboft=Y_6 I^8M!"Na|4: .j$U@fPhPn?)|eiUgQ6Aō"D¬zeFthI!1E??B?(q&-v5B??@ʸ>O@?7HzcfCɦoXNq D,( n`e@UZ*kU tzkP76A#c\}p# " ހҬ8rh:BL 錅2$~V'LD}C8⍮3JA_/ t57¥ef( Q Gd 6'm\Yl-{uGOݢ[Rڹtp][{^^[zܑ7Dm?[gfM<3pWwh 0ڶEjnGwnM'}0#MgwdXˀj [ˆIxHhWADCHw9X[*V QXuDkY '<'5=G5|<UΜl3IuqPz0v ً̗tz V@5b6j Vp][z˫po[@@m`Ck%'Xa(*ďf"e;qL5-45@N%/kP:'P:0av5|ڰ$+I<:. Sn:eԐA0$|4k6`W׊_'Vd淿I5?d%\ pC緊8uu6FG$EDb煪㇁љ''6FAa]%쿳 LA2C]]H8!éLT晦3*~ wl7~6X/%1p)c&U-d6wJԟD˯,huL +nd'=cdp4Yˋl l `T%]Y-gisP_[[ZcšZX;Ia+͋/@/!8]LPi}R'2!ڪW_ N aF0l ofWIsY,:+#:Q'n!wɕ^ ˣ^K(bKQ߿'"$od]20XUc0 `yHbSKK/-v[j&]["FBӰ3}}U ~ʲ>MeZq߱8ύèV+3EJi1*?T-{Dt_%&9z O; )(D L0y6Z7]kK=iDuy-Gb 7- ˂V- @^xeAmVvGA5ڪ:+iҏ$X+x@-gm,͜OL~u/(B1z.G7QDQf`#$ɪ}QIث+V&ˍ 7UnbX$HI8]uL)C,xeQ"PNE {d@kxXN"dH[-;2ϒ S"4ufB0c@UIX5K0e¸Y$7:et_eX8pt ȅ3VW +ߜ[4Խz\sMMxWU5z޸S&T Uo[7A"AGt}mseM'o< B[uhzpՃ>HR7ҍxʑSێuLc@猶A 4 Ӹ\hlAQ@1. Y3ܖ-A7ִ>PK 02g$%Xh 5SYdɏb$~ 7b7 "e.ޖUph09p!-4`fM GC݆pa[*tfZXJtEB~O Ț F>qq ˃ DXkIJ~8 n }.~{7G4΄Kx: j! k=ltw^[ֆ<ވ#P!l}l48߇Z3.5[@2a tLȽT@Ù0r`aP@""ƻԟ"KE b Q YiX۔矠$X_hf"7Q偞-XZx1fD4`7[40Fj7޸E' [8'9p)+2pNÕ/^1'tB0&iԢVIƐͩ%^p=GYF 1OM"DPT043;s5 їiT !LV#["Z)-0zTX6anZ*r+8%N##oSl6V'b9/9+$!6 Zy & llB?z SFU3W)0r<.¢&j>4RvFܭԒ ZBcJH_rP:NOG3q}ۆ@˺HG첈Q@$L2=ٱcڀI[hϽ_{mWo{mQa HY!W[ kͽvش a|? z\(PXw~[æ׏P\34n>IUf YZmy<\ \ĝwR,Lt.ZeSt_]O3v4.y]h<©BP4l^ ?%;-t=Z>ɍeL/*W'Ds"X…tIs)\U˕=6@$6hHߗ @u>\~QI$_'v@J::,IW-lh5-+I9# HIT.Cf*HDF2_SRCETC҅ sΥzw$h䶕6 l a8g#m8!K$9ln [jjSJDa䲹 e}ymP.A PA-m29[ef[~Ym҃NJ dYبBb&'3/EX0"[f _Ͽ"]nŏ{.|h&mч܁R 4N=j}Jzd. (n+@;_ $0QnvxmƒOu'mnlEZ۱l<LE"=ywO@ۥv{QKO Bz9avBk7]եIy:^di^F=jP5POekX2T*}JwtNڧh1u}^xTC:yN/۵}C?F5u GNqST"쟚~tDj*q2BG3|+Cd,lUg4ǾxW8c坌'uS:7($ U#|rY҃ ZBI뗐*B|!A~6NXOJ{E^!OQĭ) ˊcEӝ59 "i} OtgP(4H*Ay 4R(Ae+%nn=PnQ0 Y"`^e'0~kk"+1y6~@S bA4kجI =d!@Gk*9qTYCB Rw.S]Hu, 9hz6Ē% 䠥z!cYxA!p0-)LAj슜l8ƽ ]떀Dg D0w‘l|;`=:Q84擼NM.8n-5ã8coT!1)tѳ᭓wE(b}Kg lvA_G&(kcSc0<%q FPRn9mx&_LOmΜU}crSW_ a3+5}JTl ey^EJHPuHޙ*׼zcۙKؕ9مś4.x^@Nx6殍m1 F#a1MÞD//A Kca( p }ڐ3d&/6!DFНqkeuiq:\ dqug.Ba-h`)RWq5[QC)HevU2PPELut #lmg2:T2}Npl_25+]ో-{: S_Ԩ8b693rgGN. / ,=izVEN8qY̓"W#-KXvrͼʃs[B(pEjQфӄh%Ł?sF낯//JG.[<5QC+xzy~a xW8LSiXGl/]Oۦ}"RwJ\ m~YAf#(*=w){-M@ky/nS̈#TOe7x8n@ޒFARիy@Xy&'#{\L L16zr2|csa6[yNٙH [|6@aamU9ghMr(} =`ЕVLRs=(#hI4ld>"y9O Y MrWnjG5g~$U71壭QuZ2Q8s6zt3!E3;tz]WN v.wN6YU=:Q R()?-ܷwrws.j`9P\bB斨 ?d2k@'iEEDm9W6l`{{8ˁ\x]ȸ+=\A&0a u¿MbxpwP_t]͵Œ>0 "u)T' r Y/kSΕ_̕cP+Le^g̬9#G)ٯp 띂w|e̥vd ?[й˦= j"2#~$Z55U؃_cWS_9pUώ$V!{$-_R1lKH]\D~P,-0 [ ^$$ ,S@e&{;)h2vmT[] Mo888UKaH*XR43# K[ҫ&*#| q.嘢sZRqwjnb%}AK&ZSzպqNߋ /Rd){ľ-UR HTz=*MW͓&^ەϋX2CazY!-xϚPɻ5}]vһkyM/]v\j+=3&zב  ,K `S3H3 Ybg'y;;;:^\ . ,CiBgf2Z{2T k2_'^?|[A#Ʉ=rJ(6ށR*6!=0RFd^zQhM~Dkrn,[z46[r \SAlB7dB&ٱbFw7L|Nmx7P=]"/Ul`f`~:"GTðbyQ}{1}4 b=DQQ?.d`sߌ#Ҍ'60c ͌7ی;ی>bb*Zc{ִ|1Z? KѥXS[iҡsфS6Cu,=H!goA@(%88JgY~~,-lh5-RT'L*! HIT.HtHDF2_SRCETC&j,JrzNb:44m L~.Agx@$8n*(ϱMY?7q~P-lh5-# JIKI.CEAHDF2_SRCETCEk5GRCFBZ11EplDԷ{kަs4i@ YcL39AXY!.χB1c3## xx]X7w^mS`: j&KUTO毯t(kXVX?}|O29ȅYa<_oɆE8OŅ|`/Xū+kv#0~t.\H9[yG1 T"G ;5N1E?vc_/GwqYo|yY7rB[<ȅl#EϓBH)42!4u*j#C8C{‡qc9}!!Ls=+IX.\+z ۓܜX"̗9Y?_z68FI'ӝ=^E[$63VHIGBHJ].Ȋ3)*j yI,Nu '8M!8z;ʑH]|P} DZ[$ɨ@E>8EO($_>u1Ѯ_0HN}װ*)EYROؐCq@~!/ S!j#嗴)tH#p;CL= t mX30H5 2{cϑߕߓ ך>?r[|bSӫAN{ IJJ\ަ1lHRL~øw+|%F9G8EX* Џ#{p <@ l͂%L1H6>DTR"HWhuki,x(f 6B m8)(SJkF\d-JC ǜ>x{T#K68ŕl'ٯ!ʏtj}ı+ߜ<X#˸> :8lGiFT-^^hu/?=ZĚ~ui5.c+Emʕy] ry:IPB{jq<쏿'Q6L1FG.'Lcbh4 iNc݃dU)|z 0#abip6/@@w m`?V~zd=R^(->ν7ɴacN =WC^ *j6pd>ҶVc ;d3sk29fԫnM|ic ϡ J?v^7 )f?w%D>?,,@%#OX|Pԛ N*,XX+І1$}(tNQ_9FFr+4 &{f=?u4屲(6uv3ԝ2IdZϤ j pfj]Am]aY1c3O+J?_4?0\񌁄d)fkpL4d4K[?u͇aGBs 1k'q $ 3z;P?P)JJR|P4˱QKwYYfҡ!KkPkkTwv8C1B9WU>H07\0wfޖbr|0Et);g3J(|/> /Gzˤ !|# d@O?Gٽw ʮ#dSNG*(h[x(>#R(hU-CJU{[DFeрM2oHW+:XT!-lh5-SUǙ! JIKI.H#5HDF2_SRCETC#-JV82\"cD4?Vx3 GS0#aP}N$nCw .-lh5-jx! PIECE.CyHDF2_SRCETCA6bc6 %`nuQC vDst uַ:a 2 Vae[v2a  ak 2JN*Wiikkkeh> Ǹx}GbquK䶶4ɡYEE > vO8r`us^q/@ }8|/xotx])8'0~M'e{x<܃mxihs MsTa@MTWlD> VI`()xbDOSK-lh5- !# SHOT.Cg%3$}h!a\e}̏e{BZ8>]aP]|8U 2p#$)WLWa ົay|kW]]) Akjٮ[K||NFk0,N% P )RF|EaB#f#7JP ZXfmߢab@W;A<UC:0gvAh6b2~U,~&Ww@'\ql&7f No]/Z浟Q"[3Dl @!]gy/8[ rqb,r9Dv3fE(k,E3p6&fnGV' 䨰نBZ*1H}?.n# OG(FOX׎10cħ"E9/ʃCSS!,aHI;mpӆGzǣ͇y X疴.j-)>2y@43CSZԋ*'7Wx-hzTRJ CKp&WZ\ f^E޽TT vڠ#56K 79$moCB(cDb#_ވGiyƒѠ쬸cv*e!OoV6z%,˯d#17h0ڗ܂z=|Na@BRl?m=\R2-n@3}ltvk\R;[Sg=%J7p~aohڠ(iV=jV3Qiu!49T{Ozfyu6}2._m˞C={!w<Խ6aSw&Ώ!b|ŝJ;aJXk$s׮[IFq1Rd~1(؇i3-jbqɒdH2$^ o6BZ_Z%5¶=fq*^7\jO COX-daUGHN@]h-vz*@rv=['ƌc ]28gpI["U6ǔ-k͈sl6nHJ=PZ$Ȳ_XN>9ҰjVSpmZj FYoxw[ø|`gy6)["Xs_l`m݀vME_!x!8W\d=7WO`>eރMz r)%۾FރlFA`7i-ƪȸjt {j b T0:! ¿c^ᗤO=u^1l온/ JԡAe^GDS2{3h[bD-15e^#DCoA ]%npH]b/W>A!oy`.cT庑O#'-lh5-xb["  SHOTPTN1.HHDF2_SRCETCLKRV!_V&$YX ;!X$~F /i# ~}6a$v,>5Vːּ{c*T xZ;LMS|>Lpws6eM,D)d4k%H0LgjƈC=v[}irc =*R)obJ0T)BY2+ 9ns† c2mhlԠ!KEq2zx3{f߲,tPݿ! Ps΂3Vg[-%G]~0.Uf3z_f!'TG/14 r9ӲsΓֵ8ϰ֧T֧9 OҞB G'*$BQT:% fO+pҋ0E0WFN^U_֪ BTT@‰=l 5'j_ʍp=,q׋(/"yav/=(Ʈ!Ʈ(||n$VqZI\.'2ς̬b2-qU8KUczeuFFqt£Z4sTA' #F A (@1*>Lllj˘zyX& q&[K-zXǁe|3ˏɁ_ X20qtb}7З.Ӌ2H["fnTL(E,zዖ"<5ā'kn[[eU݊# Js0Φԫ]KG:;n÷'K=:ӕOiON^/iƁ2VS;:vN}<6ZkqaO&aOOݢ*5UaVK hjt3p#5" =xՎŌ^/W?Jܡ׷(|r}-11I3L"sw֖ťjSc?KG\>. .#n-lh5-W#  SHOTPTNA.H,HDF2_SRCETCjSw5t*]Pw6Z6F:<x, i!EYKطN篅]KYVQ]g!uTm/&‹Px;?LS#~H$t/9vvq~ S#-lh5-A)#  SHOTPTNB.CAHDF2_SRCETCN9jFx;%ҡNٳdouDAZӧVkmzMm hqA8KtkDym(k ,pc \\G_{,Ѹӕ#_6I.;+h0'K& qz2l YYnUW^Faf,ےieI-ܵs-x;;1>4ewuꕘU%M]/N֑X~8Kaƺsvzݍknmx`m *NA.4]&=l􅴉se(m:d&̕ha_A]]Fwl $kj(mK%HIs[X)득sX#^I2Adw?^a|淲{f,eRXB* K 0%~`K)MIx/Շq"9d BO]s2L}u.sm}|5}6j!nKq <1ֱx_V,P3 @8\x@#~S~5U%GbRV10lys;4|&)QSC g#LgNONDr,!oaE'gfרB;ꈧq$`#15Ƌ$F׍G" 阝 ZI# 4B+]5)3=PZhgR.cH CLDj$yYd+"|. *m,|'!XT~j~Yҋ3N0z "AN};@;}%qh%1`CqDJXuF;EԂq羟|PEAɿd?ޑ||O#XoU9r( bԸfB}8sqg:֛wp ggDmLUn#'?N~8凰1@zGvI;?n۽sH `0'-&q+ 1Vص8KB%fB4kp3x[aaϏC\ϣ2i(TPqB4ЋP(G, xz_}i>ҳ YZ_ƃ$6dFAyok*Y4U?ځ$xߝG6x?p~w1AX@5i)yB(GUv%P?+zХVMÆiK2c ;|Z|' ɥԿw\#-lh5-%#  SHOTPTNB.H HDF2_SRCETC}hSs)5rBKT]#`X"꤄cQ4"{Qd82YkIh5QOɠ@`x  $oo(`]Ʋ.w7^-LV6ŏS~^"`jxq@((_s#-lh5-F4#  SHOTPTNC.CHDF2_SRCETC~2^j{5dr m{m^xako^󶷋\1[НAሰl3 ~mW^[˹WD9V C@Sa2*f)afoJJ;JR)R qm;E$h!dԗ1T[ρSqx4#ٽ=tFNH!Rb4_Y0Kp.E_]qHnetY`F]1 {2>c(z;iP`UzNw-b- \ 0Crpn?.F|^,._ê޼k=E@BQsL`˨^qҙ;SphѝPGgz1@&3p @$-@$=2Cf![p-׀:hNbb0jvũ٫b+Yup^^uxy^]QratJ-l0\L=iz!J1ΣQ: BrJb rx#y[c e۠RT3őϠȐa򫇨Xz댻$Y2k&@Jc<]U\&K \/ wY7ױ?[=ݚ٨Y_*:!(\@4; v 1[K5VD3!{9v2>NeIM)󞸊ߪ5kj7}T?Aǣq6noϨgd.-B Q!jO%i0_Kw&ư6Ae*N֗˧_?܋]KY;A+l3>ÿPkC@~j j E~ w8ZO%E'B- t-,J&r;շ oK#$V7TJ2-a4Kf^,긞~s "}3+Dj֐yܾc'kz񹿱MC?ֵ8è֡s5IaP??%G'ChfWjbq~-ٻfyunun]7VuhVuhVVH#-lh5-w1#  SHOTPTNC.H HDF2_SRCETCoRv%%΃+zYĔEE*(MvwP^ ^Xk `i#p)Y/w\uʓU]V񳪙іu}NYvʭo^*Dj4 QC~qh+⩄ ;E8YG6cƩ.#-lh5-a@#  SHOTPTND.CzoHDF2_SRCETCűr[k҅!I/OKm،EՒޙq.U""3OI}ٯ% l[Cb2Yuu^tQGSAAE{௻mh_ɇ먱'ɀl;#K iMIa(:{jq/z;^:W+_+uu޺roS#DN:ÛTLf~8qD|opv{yJ)9]i>q{xa0o ڠCv[.e{fYB r>HW^Ɍ|WPWvE C Vَ{n..tܼ[fpp0"AR<j;s84(驳L;[Q XA K-/dDd[jzu\M\)%.4Egz$XrdY F'm!RP -a+4>F?7:C(L,XYɞש3 Yt BҀ^hTY-(=T{aԈݼN'Z)ҊsbtD_ 9GP<˧FuK2ЃL%%X29AeMHP\(V \s)~ sWM[Qsj.\R yh.kG00ݨ KxmjSnMV 6:TԦ6 *m\i8":u7+pJU3<*yl5d'Jj2/x/Հ&#9RcNj_,s Ѝ 풌ȆiR5^;${:JE9݅oKCj&F~WaS00r`j륈-Zx\aL<> <ݥ:kt5B,!Ƙ Aͪ`a"$6`a7Cʆ xP]C$KP<4Me z3T1q#%e }'!Ǣ5៍K*ˡ>6fIRlWp9O*.dsr ?-/%_ _n<G-o#bű%n֊# Cj 5v@Z/7BD^p?sa1s&y ݸFmO0!αvB;=BҢFhe 0;xSO< ! ?_/O\Kb$ҎL`<]PZvnAhXyÍCu_wȵfd R^D <߹\t_ѵs 8х9ST)SS? nU f!2Fp9 Ly$,`-,yu-G3KR:*x)(z%ψ|F27/]̱d3qn/GwMO%-J/gBsy8(q6D:a~x' aB*}05|j4}UGi; 5|hQ(׋t0S5(5prPnQ;F|"&+U[J/jYFQ!>QJ@p UW2楈˰V_CAE 8|l N]\T%4u1%<FgU#FvJpq}l.ZĩXkW9+;yףBmZm TIW!gLX."3$ uLUUb؂-&Ʃ a~!]afĠ ,EnV^n*p[kq)ߥip}6-mj|p4kpn9sIvyO\l#-lh5-+H#  SHOTPTNE.H=HDF2_SRCETCbknRv%%΃+Ĕ9k+vwP^ ^:,55G#KN[Y7ǮMg_(`.ŕԺMGNh eV&~Itrh;GoHY;JjooըZYRp#.-lh5-y]#  SHOTPTNF.C!HDF2_SRCETCZw(t څc;!CQXVVl[Q)E0hG4]Sf :h(PHMz+]1~r%ǴF.i1uР<%z^2|@os"񅌦!Tx6gj.M>Ηiz^D*$D ؄ £*~3[=1L1of^ilc@#-lh5-nmpx!  SHOTPTNF.HyHDF2_SRCETCFSV)& $A:`N"0^>y~-)"Xf`< fwUrj}VRP!-lh5-(s# SHOTSP.CoHDF2_SRCETCn=j7h\ ]]+AA(54ztWIEւ9߱_뭚?|~m}^oXɺFbўȅ%MaK.T/"[Hu^{ <X'Hc쳱[uXﯰo;= yؠF8g_ q/=+Ah?LZ9!b{ܕD .B/r˭~\h3s{At:g + 9! r:ηy@Y-rgr5c|wy q\(V^ ?x}eIDit׶?Ť%Ɵ_v [/& ZKXie5{Zprnxפ6֚%x@!-lh0-?+$bv" SHOTSP.HHDF2_SRCETC!void shot_sp(); /* @ero֘A */ -lh5-A# SUB.CHDF2_SRCETCgOk4ԟć}̄Cx5-e9 G /vu-%ied\| b6 tLtU| fhdXY_wuR`fCM{Ѷr!CqB,$a_򮩎S`%*<<$YEXV>ǡCgJÅMu1>4@bE$!ZrM}ZkSEv/hVq~+ Hz4,NG`=QHmCq p0m8'طJ5#"g8X!s1ǝ**.IEt'n\FStnbF|а[!%;ѷc'o;4P-؝qD<ބI4p1'#+&9nHM*Ij$LwrK $J(0@غKҡ q,vҏRh RlNn)AJ6n fQLqNA-^7{ALz`ڏJO9`>'ӎr6X7xGl9JYC&hN$VJXJ{}eL~ e̗HwAfO2 I.1Gy3Cc~un! ,^׹$XCGnC2ŏ;Cb5VV499|ykcp f͂pcll%]CƷ{klcJ(cvo!%8tx` F2'1(s # 8xcܵng4CLl_ G[r\-lh5-STǙ! SUB.HqHDF2_SRCETC0,JR8L}M|>Lh !1E|<`} 29 I?85\]Xt-lh5-# SUBS.C59HDF2_SRCETCtVjFL Bd-JBVصDe=7vt )dzK8QTpZZ8sWUPRfgwt2. \PKphl;Jkm^]hs4q߀^[w˰* kQ]LZB\NmihB 4A732iz uTq23vyYOehbPvQoC~hX4B6XUg[dd35pԡEӇW"\[2tY`&p*`ܠp2vD*,4T,yCveib!ņ2IhF"z# 0};Q;Rm>.Ke,Q1&Dr\a2 4IקZMd[2c^iU* ʑ*J( WiY ^k~R6#k,@ڠ_jv%/z_tHͫ)k(-WQ_YmH5_DZަ#ӃytƧXL6j)6zb+sYqhQlN3XlK*2DYmz ".4 D(,9cs"UptbOM\l,&R%_\6%J!Cx8}C]e %wS6@,/ߗ 7a3ϢS-&,'>j`2ǼkD‡ߝ2a1<\ڜƯxU&R"0$IFn '_ u.g) YL1>a'be679J[Nq08/.ڥ. 0Q`E6¡]!;*LtX| dV;ЙY {ڭw_B$;O}G`ɛ*\ݍsw }ܔ—ҧYK ]n!"WQ8<(#|y8O*r-_y8TKtUr*q7\4uN ǬwN! n^*#6~J!?ǾzEW ;::0x؁ fglﾲs$bT{'n<Η/bʯJw4ʆjvӠ"2eIFaPQ d(5$3XG[\5~kuĒ[%gX-M4[{v d4S{z"fT2+1RA_9*RYZ_C6p~a)nڟH<ؕk5sq'|ɑidBuFݛ[IYbCkN-lh5-J # SUBS.HQHDF2_SRCETC9bc6 %`^ZsfA5kmNZ6׃^(1(& `` c,9(n jM&<'ovq 7<9:bV a;,ber(i;7YGʄ~?(G҄nL 4Z 6^hJT2!Aa&C"C#pQmT-N ph+ nn]>bȚ+u8RS1+*'iH‘'8 B-lh5-slل# SUBSP.CHDF2_SRCETCFkw6DtK4^En¨K]BWMu wtU,a?6kHCcJFNlnaaTfy1@x5<HCwkl6y+QBAx󙠴ۜkN+TKI~5+LS#8 gد ^bek@7vidj*N(ҬQ1zZ“}$K;-pO'-A|}R[?M1ss[BbdRNjF{l+* OYR/EWSf'82N"ijNƀDS'ϗ>cS.G\x3 |ES:c*xc:k ǎ"\7-&U/\ӎ" HmENGDqd^$ynGq2,[7/ll.yPu.L% .DRw2NX5,AE*I XIO}?L|??s@^W;]5?HCu!9.FWݷM{fgfãI E32v؉E7Ee0V/aacヿ<]~6MtGM02Ô*ݣk]+l We<9JU>?Dd?Jޱ0k칙E}6u3W.>y>2gl )@<񙾾 cW\29b:s,2aTp>J[b,+uUS wH"Mzhרr O 2-Hn*qļ/i aVDmv ,cy: M$v{.;OiE}$7yrInI?s]h6abZi$*Q% |/e_8q-<ؤur;ഭ"c ɂBýD/$/.ɬcf,vOVd+W\Kr3,6XAôc+y9:@7Hsghgond|HٝK"0$'\׾y5%;iN*l;qMu3dՔ N`sbqv$q IE.԰8d,GP浌  FEE"hZ_=OD?0ckuBOsfDu k,Xc i K/ө<7(# ~(}q8x< -lh5-w{h" SUBSP.HhHDF2_SRCETCWKRrY:- Y 0^QEA [T`^x4 R)Ţ8~Â?Qoa5˩E7Wl~:)AmMȻ @-lh5-!\'3W TITLE.CZHDF2_SRCETC̓cjg Ӿ$:O#CۻKzuƕX#ƎFy0]+ylu{yy}|K^pǓfNbN4zu/mX=T~DUo^zbEaxזòp]ng</q9i4/r()xPl47B`6^ked#h:ammV5[: amD,.bȉ6,R1ܿCV3Y䳎̊Bח"~*دqkGMӥLY+;ĿgHu YkʈV~qVb~T+!4j-}(ו?HVP{A̦ܜ{]ww} 6S'<\En|n/g~{0%x10xJDkR~^GKmPb!=@@Rx=X(R0MXw9nmDtPl-9ܩ rcs<П۩B~;ndD-Ӣ::o9f2K z/4?*t5gt"#cdŜWdKƅw M]GHS̝W:ї\\pn8#.2 qϵ̐xMع5R͉5ً;g|BYv(wh\2J~ʵm}w*jV -ig,YR&"@@e$R"Z\]ĜcZ%`U1m=&vR3F{~G߄ukuނgM }*)ύ:XAeUMqXYַ±diȃaHZLIQh]pPF +3p9~>QBd%F"vF@Lr /}gXFVşS4#NZEf=fdayBr=C\Ҁ̌ il 0.힍$>Ή'VG%IyKjסEHnݙNv@mܢxPzܽL!0^ ofR>y< U-2Х$坦a\g.0CrW}t􀱰r'֗ K'K;",uugs$_yݘt-=#gn{И:`6( *ծVt2g"\ P碨*J*W^ ~`⧪-J,o!-WЮ&(STt>Ed) D*UpbpRlڸڜݐtDuU!~|oP$ߤQ]Q  Fhxi)"Skh"3=/,_H2n|tEߕ0r$xv~ ?J( 1t(uO]jXx diAT;pKRi gNiy=$g~6G񗒼tt4kE[qL#n (b~X1cH#JER%K{uQe1 ?F sa?F5oĽR%騞Ζ'\+-!BPkg{}z}1|{#nQsatv `Av\Y' a3{ nB찎MGd,O~w*as?kke|!wy~+{AxNDs8o3hWْVn?*۠=1{/bR65(R3 #Lf͡7H8[]VΣ>:QɌPmY )$UuTsNPM`E8|vy{ Z JL}=EX?ơXx⋔:̈mH-7[ȗ[bqr]^XԿOn_wUi6aqc`K$&b?JTٍԅֆFlf*?4K:uӝN_ux2}N ~ ڊNF7hEs=NTʟ_mQMZ %Ks%NTr.wPdW\Nm%7JZnB;c˗7WK䭐?[d˴ga;'0ERȁ_Wq_ }oc̟=5 m+2V41zRiʍ(23Iގ)qP5`6 5_b/Z-b/ޞlzzWa!}ٞg*:;y\/^o]J;U),*3g}7GCCTH_S~?xj✤mA~ZF&P^X׶1n_9P(z]އr[w:Wj'A6S?>眭K%S<=sDYn ;$Y59elx8%[MCnP &.b8H`b5Pb]S*<:y駉jAq 殴e>q)fmPel eTg'UhTOWOhSvJٞʸZ)qg3/WpWr y~xECdS1:gv~ʽZ \ƪ:J9!]߂zW^$jZ5 .e֪nQn]|JP f!iXq d(P^Xt 킬\ɴ[Óu{¾xzX\mm:m u^vd:^eKA[ݕR^v,vJf'RA75e_zƱUF:ebzP`s+HC ߕG+ cqJc> !9ßԾ @P ꀕpmſNV K~N通F[:&&}\gۃ}r 0Ȃ W^N~N~'Y$Kg ]yUy~?Ur ‰n g&жIh@S~7Q :vNѰvΝ<L=c;A?`׹kObxB:@lh)=MߔT5QwG)WO#աF3Yx.%^/3>oۘ0 䰺.J^pvIz=)z ^\&t4g7͑+Du1@ ˃3eONȉã ]Lޖv[:zZ0 /vIZ&Jf p0D8DxO ;79"D+;ޡɋC[ 㲢ԏ hÍttAq1ccBi"#.(ꕺ,㇛&%e\5 IR344#}RQZ\~F'#b3Y·)?,I_RS@~t &ⶋ %!(0#@9ʖod4w?(]֜TAbH0;z _13 H'@hAx??al:@8qy2_vWpR({>ESBvޔ=}H4m9ߠU:k⠘^ߗ?U~'Ԥ.*?j4t4 īb̀,4@5,74a#ɳ(w)륕/`luޜ=^ +^.? 1D~\xhqU>JʣN .|m.fƛD@ ujY\ 8%hMԃ7S@ ⏞)܁ ``ۊp"Dg\r2k喝F=?G_VTY, wwڴUܹ:?ƖW},"Y\ YXD˄" y\[1pS?s}tG0+NYN^[\_ ٿ%͙$=-HE_I+CHu՜69` ΋8ta4^qպh~jH1-ؒ&< <^0}U!F*vFZ;0x}h@FZ;iX7&b˥ۋ焽zQ=T;g~iO噫mnboi3Sڶɋ-d%ifNzj=xjnרknkoʝ%@7(P/_F9PKcZO3 }GQy@? gۨz -lh5-Vce! TITLE.HڀHDF2_SRCETCzi0Jr|K Z[>=x2[pY2/v&7P~i+ijR@ -lh5-H" VDISP.CٝHDF2_SRCETCsFtJdZPQn{nnzҀQiFy񯻛{k;ؐG[0A \@+Da*1 /{wwy-R"K0-pO5gGȳFmt9׭[C`{+Kj!.>'0B0PE5~????ө-?jN/i3F}8/e@])-ƩF؈X 4kк4-X9XUI<=|GgvyHxSVgPG#[y+!YB2"CkvlRܖ#2ͿL|ё@y"M,b[C.{=摣);f24^F8/j2yI&+AQG4];⏮>%WɩOKKHclƨv䫐%+;SD z V*i{E^`߄~B(@4. #;P jc2T4}`[D Vyhū,%:+ڎـlPg xzj gJ QL@zAML%ol"m7TM&k Dڂm14pК& IibQ4p*EUU\UWUURB12pЙ\2&X. $¥‚e2aEQ0ppQ&.  vˆQ.p\XK%.@1⨖dK0%92 KBC1ЖPDPơDx&&ZzN+u wr8y+͕fʇM墐hLvn&W;;*|͝!X7}jThyvu39JLˤeBqY"V?\`F*+HaTf + xE_JC #JC[ݞvBnQiںJW3PtIoہIމHA숰q`(ԀHn4fcLtLaIiXӽ,ƀw5zE;&y^b"<X`M Q: R3>Nicpx%)'}ݰng|E׿U[x|3뽧q IG͏|l53ѧRsk.'M nKٞňhڱۥf ~c$!-lh5-BF?;W gtnlib.a RH DF2_SRCU{Ѧߧo?|\uHX!`YuWox۟cMY͎EiuR5EcEU֚/ribVZZBB) A}6Ih,Vv"[)o3-o+yo3~+x߁{-ڷ#nI_cv- L v-Q(+j%aJE{ Au vP;){H6T݄+Gz6!C_uP#Vb2o׸Uգݘʤdw* Gl_ŮWʦ- WV;-j%ujP`jHUn= *́=K('>1\;ԅZ[m*Z]rnY@c]rm.f%xV5kЬ|hDݨ &e`D/#?^YFLi ڹbU|ꭇ}> #6Pe;ZmHYi4~G7 $*s0QPFiD>|UB劅F|KRdz Ug6=Ov`U!nz/*蜼N8|vx=o@"?65Ys"qX{V2?. T~z / ^[#շXQ+/-d|֬!aΝ?Wlѣ@ 8p>mPᄖ^gi2·GCкj~VU/幺z5a.F >!T@#5n}pn81`VX16ydfˢiD0c`Gk_0/5فyhD;v]n˲v]/v].˷eau66VuЧѫ>twFx(z,Emh{#U>>]#qsAu0 h(iϰ!-BehW#˯#q Pum=;4dsND6Zɥzڭmjɓqx+!#-\X<|ԶY^1M)[kz8`f'sjE;oKE="ptBT1s0C/6-]fhh )IcO`~42%Ut!)Cۻ &Ťc a(:A:0Pʨ<^tT,aب<ɇd#4b9u >eAF6(?o ߩQA&.{TOh}'o@N|LBr[DIly$4-y87wC'+7qcy6Xꕗ)^!JUyJȈsٱmm#?qH/BecJze W>ԷiV v|U? ax^d$p )apc -f!˺aen[)X<ڮ/xrx_^`N< \1Hsr9h̬[ Xcx-ÑuA+j[A'9k\n!҃uu7?Vm3Ԭh 'R.]O9i.h'u9 >cX_bCR5KCšȡee>xCϥQ1~H-'HYh}~M?9h8mnIŘn%(%I7-y4۾D;nK9mRRKuJ`CDwJdC+w'әK֒ЃBKJ:@ 抎ZF#'CE/FV&Tqϗ@ ]#` KsYsx֤O 1G:(ÝWuiά:dʜܣvT lY]YE#A)}벹GYQܹί:eNuQٖK~p߂-Z' [WEN:##zޖr+(xqncc(vԄ爬9;0K;qs4 .?>Ə.Tn"eC[XZ3-K#)#l-َ/`vTI!U0QY꿊7K褩.jKUL R+')&jn;*a*^ew?Q__DXz'Xz8 z8 }eO듔Iaǵ~Xy7:W!rd r9N4{W%a/"OVܿm-nǜnzX'ԻMltNM&l6O:qД6q}V5$IHkƏ ~{3ψɟb>(>eڇBY ~ SIwǟ=-DaYCx֡B#u^cKjqNT?R @ 45qPٟm~v7 ̮*Gvvf(5@|`an} osڒySލy<Gs0KY+Y$}(<vٸ_ ηX>IvlPi'nj6< ~4y mSa;7v4ӵ. IaGȳRo6t~J^6 B,ھwDۉTSc8%/>rk O "lMkjs16:jŚPşٶMA#rV`sYVgi'gܵH%UF~֨g ow1oJD[ذh$Ũ~ztR?Pr_oܖk*Ey]L: _qIlhҥ!˹R?~=h?7?5hysܪ;2:Od8|wIş!οr8sNچl\aD |*>mAd ]xl1𳸜pM4r*INKPm.ۻe~|i/˴ӎhc{n M(lCNXKQ~ɢY%qp-jC@ ><-aE% 6|* ~6:b[RߐeZZLWd\@Z15VՋ+jZZmPj>I^:;8a~ˇ1s_<:P|cbkMӆS=/ikI°|~bqhgd9f/A8"󳹆ŌkA?zf*ګ;+%mtH򸇬BEKlkH}5a-Aj5hA{JGO\IѽmxA g9,VCQ^-e9ٹb5瓍_)#_X-m';Qacc+\&J㑛.lA QqbC{8͟knak1YyÜ7=,lٜL =}sn~ h]WUoθ# 떽ⱶnyBIʣu~Òg{nUwq_<̷TP,O+wZ]lƣ1@+t.{aZx5(cڀtJh%P@sKCq@O-t}JW8(Oml,!'{+ؕր6%0sAqddab|(G :pǂ !-lh5--BHZ" GTNLIB.HH DF2_SRC r{Ӽ],R".7ZhMof,y&[( .ImQ(JIl66uJ-&n;eb`=6 E[\ EwǏIeK< . ]߁w}q*ͮ_gA-kt~wx q9D+i)lߩSPl )>8'iMFQ*?"c)OoˑƖY~y:8OSusĝ}»Sf%MvCJD '&ħ0 9ؓIIY}2Oc 8t.$yxcGHX&d84CRHj:?8En I .]xnj۸(„5@s8G!V đrįd7+}b* @&Gq|Y3Iҳ0Stu6?r?^/w+0^>I:bV# ,#0c!/u$&gma}ROg1\Bյ7h*@VuWiRH7h MGG[_+_ϰOZLSg=M Hedas"$b8@Q.jؐO^J cГ]ax ©;&[[&ܜbt v&I2O -}BrYlN1LIȽ _V1qeX8OvR%o@rL$qi2=2b ک(F[зs3 ɋ GAI {֓yR~䓍A'&-i)Rikgw{ ;T*,{+&_t #&F M.pvϓ_"H`L(vo?}j4m1Z^4]$ݺH5O._"wwWQX6nϙ(7.-9AysK857\k-%W$n^۔.ގrU=FUWC~up5@/R^xfGMN;=o4ZP p ۷4ixdWh/Hx+1h}i-'Ե~|_IyϽjqK:AiRO- o}Ćؑ"FZF{$aԈQސ0 ? F`Oo>4$P~툟҂5G?$}F}H萺ϿI3pI'`2d4?x 2ZڮUڭY<9^Al5Iӭ:[ ?4nܪ%=pINc􂮾I2 $ ]~PY'|  ć/Ι9ݰq]a|ƾ. [#㴓Oiq\z(v 0I9ߖuS}m 8~H@ȫ!z^J"]|3E+@k8}L=E=6'T-? '6(H+2%z؄ =גYs)3Sɱ$hY[28[< 'i4bߚIk{u"d6t_`pWte$juq6n[?F y{^pDӬ TS?ccP1'bEc9EZyLB@)mYO2ua2 vߜk#tWca:tϗ]^Dɒbboft=Y_6 I^8M!"Na|4: .j$U@fPhPn?)|eiUgQ6Aō"D¬zeFthI!1E??B?(q&-v5B??@ʸ>O@?7HzcfCɦoXNq D,( n`e@UZ*kU tzkP76A#c\}p# " ހҬ8rh:BL 錅2$~V'LD}C8⍮3JA_/ t57¥ef( Q Gd 6'm\Yl-{uGOݢ[Rڹtp][{^^[zܑ7Dm?[gfM<3pWwh 0ڶEjnGwnM'}0#MgwdXˀj [ˆIxHhWADCHw9X[*V QXuDkY '<'5=G5|<UΜl3IuqPz0v ً̗tz V@5b6j Vp][z˫po[@@m`Ck%'Xa(*ďf"e;qL5-45@N%/kP:'P:0av5|ڰ$+I<:. Sn:eԐA0$|4k6`W׊_'Vd淿I5?d%\ pC緊8uu6FG$EDb煪㇁љ''6FAa]%쿳 LA2C]]H8!éLT晦3*~ wl7~6X/%1p)c&U-d6wJԟD˯,huL +nd'=cdp4Yˋl l `T%]Y-gisP_[[ZcšZX;Ia+͋/@/!8]LPi}R'2!ڪW_ N aF0l ofWIsY,:+#:Q'n!wɕ^ ˣ^K(bKQ߿'"$od]20XUc0 `yHbSKK/-v[j&]["FBӰ3}}U ~ʲ>MeZq߱8ύèV+3EJi1*?T-{Dt_%&9z O; )(D L0y6Z7]kK=iDuy-Gb 7- ˂V- @^xeAmVvGA5ڪ:+iҏ$X+x@-gm,͜OL~u/(B1z.G7QDQf`#$ɪ}QIث+V&ˍ 7UnbX$HI8]uL)C,xeQ"PNE {d@kxXN"dH[-;2ϒ S"4ufB0c@UIX5K0e¸Y$7:et_eX8pt ȅ3VW +ߜ[4Խz\sMMxWU5z޸S&T Uo[7A"AGt}mseM'o< B[uhzpՃ>HR7ҍxʑSێuLc@猶A 4 Ӹ\hlAQ@1. Y3ܖ-A7ִ>PK 02g$%Xh 5SYdɏb$~ 7b7 "e.ޖUph09p!-4`fM GC݆pa[*tfZXJtEB~O Ț F>qq ˃ DXkIJ~8 n }.~{7G4΄Kx: j! k=ltw^[ֆ<ވ#P!l}l48߇Z3.5[@2a tLȽT@Ù0r`aP@""ƻԟ"KE b Q YiX۔矠$X_hf"7Q偞-XZx1fD4`7[40Fj7޸E' [8'9p)+2pNÕ/^1'tB0&iԢVIƐͩ%^p=GYF 1OM"DPT043;s5 їiT !LV#["Z)-0zTX6anZ*r+8%N##oSl6V'b9/9+$!6 Zy & llB?z SFU3W)0r<.¢&j>4RvFܭԒ ZBcJH_rP:NOG3q}ۆ@˺HG첈Q@$L2=ٱcڀI[hϽ_{mWo{mQa HY!W[ kͽvش a|? z\(PXw~[æ׏P\34n>IUf YZmy<\ \ĝwR,Lt.ZeSt_]O3v4.y]h<©BP4l^ ?%;-t=Z>ɍeL/*W'Ds"X…tIs)\U˕=6@$6hHߗ @u>\~QI$_'v@J::,IW<-lh5-  - KEY.HHDF2_SRCINCLUDE[kwV6$:i3{]ۭ5.59]28VaDTNV|f>U(,8O 6Ho͸}$ tFsC2=0XR-|HzxP('|^ɵ|?6*  ߁C!%h.oo\)v9U(Vxp?pN-b=e`c,L8Y| qS-U> 1yeZ/$ \^oY'YŀrD Y|q`Тm2ieJ\pe.!-lh5-S> 8W makefile>RH DF2_SRCXj}v5t7m` `!oWo[yC7De(i7d(0m_sxU #p< 0pp(t> ;n8vuu\ 68#3^V^T ÿԾ-֟O0?Bn?2= eO=_/nԑYV 89~I>1SHs݇@eZ+>_lhߏ:p@y^ KP7htMRpg>ܘ}R)bonxΰo";oZ#zu;}zw?&A;~"S?7V˔3ːlG:z=x4P.O;»L0_{9)/*DJT:$ `4uV:V'VK@@[WI,6 ?*hlkyV;>:Z.hk*uʥk+uk+uk,uk,u%k4Xj_!nHgF>xw1 ,M|E1.-%!YXzO„%~.D} --+#]f%nXK4k-B({mDwB" { CGhh4Zl bmYngvx]6oxzzgLT䖸j~\~ T5N"@V~j1UBI\1)hq1ۧRSU6vP]˭Ȫ\ Ӳ#چʸfTN>;fȀҊ䂷NvJnPnnt7&}ɽ_/zߘY:okfQ!9!h&)F(I;l+5Q{1Ǔ{7gYVЯш+iK)uؗ9Y^YSAYmB+-+,r+/V\evLKĺ Lj9ܧ 942sC=dfPVP ꕻ$NNx>]S 5:"q8h>lLNb*i&Խ٠=0g$ʘ4g4 LUuIb&,bڤŶI1dA1}Rb$I Ʃ1cLa$PLgT1&2e;fR؆^њYSp7WLqx'K~Gv ג(Md(x_+Ëþ|^ß9 \n)+?OI<vT?@@`ܬ^/zwܜ<~^.fN=40FLyh-\b5&hMEMDk&65ēFh=h4]A5&Mt M Zz5d"/= T;>P{\^??:Nk ގ~d7|^‡RFDoX " $͂#" $ADAIb#Gl":%:s oF%RӞ_i=㎍y{qxX>367z83Oc7@Tv im5;ZkM%4ʸ}vvq.%(rrJ*6FT ʂTqGQ*8TT*:GvʎQԕ D7iVdF 1 #Q@P'x-lh5-OB# SCH1.CH DF2_SRC4 {ݷX Ӽ\J)#SQYb&گ8m4ݭ\flj<$.f?tĚI4MK -k fgEbt`5ar0MhKﻻq$Q6Iv@#oӤ ;v4Vˍx)^16gq]Zcא;+czd~_t;DžQʔT1Q,!?vwyS<31=eZuNGo.M9,A))Mx06ޅ:ibbcmB9SP 汾c |.,"U]:KDbLqZ}5W:IQu[eL" =‹W}Rl؅"[ew!> 78 a7r5 *Ғb*;7++d}z 5GeP%t%J+"+=8Un``)"1AȎNg?`^t)Sn0z>i`]!xJS#c!dTE9[̚2 h CQ}c4m&7s:nVK3{brG^b|UIi k?rg?ز5TPsJ]sky4v1ؖ,4YN!Y0̔SzbV KuEi!tiԤXYBd6S { 1 Ts~vzW+3.jI)WN>wW+O`__atL$\M"M1’NVAje|{Gl;sr6E7]W@v3q|s,>*̼MI+ʗ@l̻>ʰ:?LR-wFĮ. EGXKKd\B{:h2\ G8!wN_.;M ,GCXjf:ߜӮ[]&HsP'Y[K%<">0 2\.Da(YsٶLQ,[6f jSz2n[p㳥Cۄ,ƕf>ONPO-1rGvS`қYO KdZ\G(KcVfE#"! UfIP Xϗ+X 8Aȝ'~WHUB19ϭk<WCֵ Zw>nFoשYp84:rek8 Xgt&yta)RcW2LD4, )2/s2k4A{Z6`_^u~?Pʄs(h%FQdFf,}ƥȀB׸ESIWPlIr@hnjł3mt230vyF4D:p>ZʟhsO6`&s[#\x,gUHW0P).M! FD-!=)X ]ϭk>OoE !ln]*$w2@XD+5gs@$NsT1U{:'x"CearF;|20 ]fKO+Dd -N7\[Oΰo٢,_!܏))uFl"oVӃK3 bV#qu\r5[N5 <Ս{¼J6$d9S @x^ᨆkc 1hev3'K/{5H|eKswsJk ˝Gw#:'>0K!qMOX=n&8CEbI>-A烾،T ib't,*a9秹_JI);`fS|.. X6gfYxa ^#{umqv`|& f>f@:`1*C^O,5R(^VNVl )ʃ& 7ThXUɯ"OM#P|Y)#*Lכ2F͢peW:| Yx|?,׃ްD4!^k#7g^fwl}Hy֤Zۏh{b??!xaH;:iݼgq.d$#YEB+2jӢu;XbE-]XgC QrWUO9,ٴC/|@ƺPkkH8A"9us'LDVi@(ՑsHt5{狚]7V>@)1?-`kc&3j9JO:xR:/7mE(k;rВGL)p -L.hpD,<}b]CAarlGCPhj] ChiCO5_5rk:ZFWZ964qkJ툙AKÖJ6;^4S:e5Xr3]J o]Sb-v?ؑ`(JL3n%kyVU%RűB\j .bΘZ>GI{ { hywZp &"H\`YV `똏2k1n/KeB/ yA2Wq45ˑ82EvыN^6_Z; b"vHOhI/L8x\ &KBKpž檒[Epvt)ҭS>Ls+4ڴ 2tM4 sScE@#OWaH4KӗАy}=zUp <iƵ-AW2;-8Gcj*5~!yXF֓+%{K}sPߎ:\0/8QTJ1`1.KUqfѽ;nvzwNGo.сG lvIC;]qYA~Gof3}zƦA.?gKb ҼVfV"\vׁZ伫#lx0-lh5-9# SCH2.CLH DF2_SRC {qݷ"ܹ%Ĥr,EuCq=[oǻ}L$\\ 2M&I5.`5=l0٥a+QQ@6P9I'wrM7ĚY v {cnFY*&fERb)oŠM&ku{y3 ]&X yQg~_ }_7+dR \1Y*e_zg!i&yt=̿Qukd_3~BP1 NR&ͽJ+)j5|ȿL#Κ%ELJz)Jt *@Yy j詯̪Uj UgXSJ^ ZDH/ Ǐ!&&Û%Er^q$x|MIlgx(]qqSyMs>}G+:JV7kh+*I=8a&=Oj99:D)ÑOOW/h^5SW 0 q\X Q4bk~Cy$J kUdB0)> M-3Z${Y6jstUQ9}Y}-Uè}@KQޮ]DYeq&2[szV窫C놳rEo 1M']]VP%keY1h/MXZڟwGn[$@Q禚9jsP7p ں ,`V ߮{; eqe h@`'rf-7 X4]i47 7-q/Se2qT \y w2)`{ h&*5SO~Hʀ۶S|$ٝć"-^ue`Qf8(8 %6qRa1*3#A2Ãj{0H7:tu+}?u 75EB}Pp`4^ؽ1}aƐC_?͑dǢ .LM  )i #+(\xŬ¯82fVUp8]|#MKK e֠ED.\6 !A.A}y7+(Fv&}$wS͋x&9>Eطȶ&A Sd%FߐVӇژF$@D:<`X> HIJs %𧒰2H ]Ta!4BИ9\9\ EÞռfjCֈv.jc&`EkxHu&Rb F:; Uڕ_x_AJ+TE 餫bKrڏ:Ddz=ֲ:QE塗h/_+KAvCǀ @0&ćaٶ&k+h]N) ʡ&2f"Ќ{p{dk ۤ+%%M#ǢtE)X !j{OY3>QW*)s7vͼi\3+Bp\xtV|!o9֢])CU۾E0+EykI3CD[۷_!@.YE:bhv]"ӛ$lwf-12 p~.wn}*`|]Q\ =gLL\n`>bebp'||~W Pyqdp'=aZnZ sPA;Έ9=zrQ+#FY'%T`}O˒N4n!0,Umg[x܇i ^\${d.mqv9%ef>fHBRpmb9ByFJ@ uM]2v@:HFEe\ 55b=`s<?By ^m[g|t<2ޯ}Z_!k_@&wX"QpB}vk`ntOXD}}YD{uפ\~h{b:r8[pK7K+Aܛ3' Yp1PzJ3K%ɖ7s$˙cy2QؒGZ2xV x"L:H\{%CihyB~lR&HBO=-R/TNM2gwȺK J #Ak'.[qn%w|eb3RI43M5ItV!huE`Nw0RUZl7T!zE*[nx0?:lpp{2&ׄψ韄nw.B5gnj~r8BԺ;|F0'm;Yf]tʏ2em~PVWnkk:eK/M|&í:Kт|MTm7bǺ۬7b -DG|=!3oWݢlo3YyQ̎-6LWޙ!UZOzʕ3}otL*?:l`QXJ1M^zp=/%(پCN%$o![{LMOpy .湻k[j p#v7 A-\V6dxM}zsB$#`Z*j _MOl-lh5-"<# SCH3.C:H DF2_SRC% {ݷXӼ\J)#Ĥtb:mޑfĮzqhO4&m4V-Dmvx-YQX uk\ -j% wܸSIn&L= |;w cmQULQ^1۝øUBbn;ajȰcױ;/~{Bz7Wα:=&jIB{骍6w;);E^FO-V TLݯ7ꨑːJjb,mƜաS{;H|))-&kⵆEV9m|.\v*FRB2/UfUag}謬$R{Ǎ&xF}j$lғ%?OP{Vj&ZH 6~Dd A@}5q8C"=:aSUU'VZ֢tƢEcLjYUS[_L\w1<\by\~''GJGM:qiBr||G&)&3p5iEjU[, A5ar,r~qX ;:)ը>zuMd"R\Ag5{F I .$MrL5Z>н["gSN</ y#\ c.AxNt#k%/dRǢ]sa l @ 1ZK_/?u?9CF0}̟{2 }{AM>e no#GJs 0CS2Bvժ}`lܫNbu |b2۳؋UaAѫZB ˓U*opf)uu2$P"و*KCLdGR9 a}A&! JP O\)[UI5[aFQ} /:sn{u,q]qւ u )|sX$"p>L"'O8e^_eXKm`O‟eeU$ Xt*l%(vRDž¡y$4P Π.CnQ#GH^^o6c -OMwrپTs\a,xB jËKiloBdPU ق~ 蔷˓g ;{%k.lT oM=R<0#hkF:Bڴi7keCݤ׈[Ce;6v.n,,JI!2BGeml}m }[=Y"re9s\чdf,@`w 6ͬ)Ȣ).G#Yia,dĕ.EmuR~4\k%`pd *"Lڧħ?%ڝ"x fѣ? 0H]:2KggÕs]0R2)Y]R @F7 0ÏZ_܂剽:| D|Kns<9 w!O43*kd@諪  ݞku:$ l{JFdQ ߼/X.~  ÂPh&t>v p8<,NZr;͜ә98W {9/Q뫚F##iA(qhqʹÅ8|vsW N[IRsf2*^üY` CXm\ 'y: 'NqkF.W//5AnZ)=ީDIWP Qjlכ#ihVHInP- 62agpBHfp D:4X>q8۵rڟlu:Q+H΂sTtacBgduP}\h},  b! \c,W=y̳1zXml aԪ8]淑x1x)ܿDނHg/DpNϋz|N1xl!QrG<ۂ6(D]dӑ!:B˗'럙Gb-a OŠNaaNԙ;6ot̰G{68OI୹E'E ]Wv9Tsl֥9i+TECjDM/hDעQieO<]`3Bd L -uqZ#0l."ѧ7 #M0Cۖ|Sq$dOi\ߍq0@O7ua *rԻpc öa=.kݱPJN:p|4 Mٸ!S?xP1K2b9(\J#卶CK }"=k4?Q2" s<]&P'<]#y\e&nQX!:@:hFEႮNyG ]R9tЩ3r8jٴgt|=tL{Gܺ_!i_g<=͞IlŋqDyQCձu .=WTM4~O3GܾN靁Nv.Cp!ߞF1;]?G' WU`s)μ]SR5뙓^LikɎ~}٢2xX |. ;#ˌiCh|D}O]iO1&A5X;ahj 2HE@gI<~1.$i%ISH雏ipgнΛ DQٻ.<1bu@IEdΌ20]+e~a4 ??\ ͺ|J'vW/EZuEV|7п|yX__WXQ#b%9PbuuwDGp 1jMDIpfRSdܲ)lN Vf>g\Uj& UCt({Ym&)H-2'\Խ`$]s)Ufk;K+SQZ29aoo{ /hxg~ [[ ˵K XfR_{P|D^QD[ Tĩ~"R>U]nO-zwOY<ZpˀWH%mBsc#۷nڥ9M3lH:C屷%wKA7%.jT@e Xl2lothxᵴ_ۄ3 Mf m`1Ld"3kŐQ{oNv|_}T2mN(RyAsEc/91M}Mw7ƠA<|~I[ nIx; ͐BrAvYLsjgm7[ѵgSJTI: qڒ'-L`o6 yN^txUV,|Z "$]#79_荃-t]v?p1-lh5-<# SCH4.CyH DF2_SRC {ݷXӼ\J)#܊I:Yz(*ޭflj=$.f?tĚI$M[m6m ieiEzH`5arP0K;oI$I& ˽ÿwn6t#:'E'&o{oUX&&{weդ;{?':e_qo^FjRNIRIDgcw_J&%E3rQZ4NGpnE9G,A(Mw73{FlNsߡwtf pX]F:N:at.rp*.x*t1U#ȕ*3{$1pFM)r蚶+:%w!<*{Rs(%(Ǔ2@Eּn7#t!A<0c~Y>OmkJzt|V+;M%I_+ؓ5ӒMbcr~ RSd`ZaB>$|N.4~? y||^Qxn/'G‡ RarEZW!=V:,dⱔLx(xU33>vW^kOj :tth^E* gk80 )XScE~nGWݰ0Fގ Q$ MEа/2D@ැ6c>h\^xJC#1 I j-x>E>pW3A11jʉyE/SPR}WIJHǙ>{6fkd!I.E nGMnZ\ dDl29q}K!hZ} La/"LW*$B<^5pthҠj1eUa *wWPpI%)Όhp:b ꥰ˲WNX;P\r\'4OLZ9ީ3  fɦju{Z(mGwS(Xҁ S4EF[=A#B 3$V?t( ?3>pzb#6kc2! r{u`F݂X5jh fuI8^ Ykp ?x)QF [_t* kW`5 c"rK/gKj!2ctn}|VYfh LX {+@Jk%XM1:40%cXvNo D r~T?܀xLf({)enkn(z=^XqN፣xݭ b&9'玄VE|Yvf8>ާ0l@ Ô.m#M逻`{,$wB-."7'd,j1&df '3;"|ٿ^jGiƾC+4D(\-ǎX ԇ 4#T|S4?JB(ͨB;)MJTHu7!R dѣO<@P}_PYIPC_mWȖZ >Ywݎcq&,e3o6<;FP?[ lRI@5v$?}0L{hw PymllNSNhwQ  FFz7.iF '7D|?kmp 9]uʦfyl uFdt=z!a Boš17*9#cOלgVB;ǐ*Rys8uOvlqe=qxpvkVXᅅs,צ"H 柝G/oʚ{tDQ;(^H;^k%>AiFFx3"RPw %ޡ\1ئ/Czƺ7Gh lX(SgG ٫ f!@8Q+tҍ1fev}e@V-{5nsK\u)0+nf!S34:IӾtgpoDBl hўu{)X ϩk>[/D_h^_$_rˁ c RL25laН3/G_̟t.hls.O[HʎQN<86/3 |N1<ݥl_:ݴ1΍ʘDz;ݫMPNKKZDgd>V]SIc][LC4mQNW+toҹ]%+;8XFwԜ TFo5\ dh@: FQ**P6%=g,vy5@izjυ|咎?Bf9 +Futfڞ֗i}2 T 5.4) oP'a"Z.G|y\6BL|C75Bvd&3_I7 ҝ(F.zGC<~/R_Yԡ I*|K1gW T̜] [j@77eNjXX3(soգs<)73j CA~R 5w4:&%tU u""&K#-2S߫v Nsk]|{ZW|//K`Qp#9VH'j){oDw`p _"H^@nK 9;&@UtLd2ɑ]HlߖDx hw'tĪ}h|c蝢=\}>nof ±}4FLi>^=z%4VXv%/Ͱ9 󾙩2RǯD)7 ˥%)T3`dXS U.fYۆWv"K"{k?  U]~R<9d !JXXf*<;ģ$(J3JCt7O +op_Lq7:v'A/U/a7tD@o^ƈ h*c'hЅY/~!eE}_Sİfx1U 5T ? ?h_]qp[d(.q^$"{f{7up䐬v=?|5(S?qtCx)d0S%,? EJEM:iR|8|,Y@dykbϊ|X^r5FW)!iђ * JK'UYgKށ}"ʟ>LTW%J+"+q933, R&y 34a}1}}|PJ@.qqO$]{6 =)OO1=p$R/©̚okIJ"qY6>k<s':κ}3YCbS)H<+IJhItRp2Ιg^TKdDj9Lg .%ȴ]ot#|N%WJWƽ561ӹI3 )ԙW(-=Wf^Z:Q礒9)=bb R%봜WaDL:.!A@.903 ~weM GYi<^V.(2O(@ w21Ƞ0@fT}j ͣ^S.g$BigѤ](E8TDӖUT>R)6P~aexTƑXY[[]kƕ㉕Eu&&Dĩ\_]^ǩ!+fk3QaEw0f*R 5˺Oo8?싵:360PB1x*4hʁylαS "srJ4Аb 9lL2tsI@+?up$=R$JFtXc! uʠgJAb"$2" sU)ksLZ~gL]} ߩ"}> $d6-fGB&{mFe~C@#e]sEw$t2rE\ZQy%yR獣c\S>'4ܛys)"#bWcT%OIs6Qβ4:쏧i{Qi54fh#cl"mV`d pM38:; J$Xue`s4#e :0hiDzik%7& G D)1ut7j2t HZ_kCɮmlR}O"b9̱. s&d'?Iw4M=fĖ ;I~9?NYRrz>bH ̒=6) |д S 'WcpR3R UYylo6pMb3C1cl`Tc5[p^5rUcp95k&#Gb> bxnwس%d} EW.??Jt: )Z0,`Ygʙ1)mWW3w5QAB%ZRye~2 n<:A{B66j Iݏ l:G?F&^YM\'r"Y)ы"3gB0ݱCLT51JL! nY8*"A.svZa͇5ՖI;D^"wkP Ho#Fuz3D"%W>1) Y\ j<5q'yTf9V=lAGkN:>r QiEziߑeYK&R`(F3;sZղqhSTkk!Ɩw3 A13P8D-r܆:Or].`sE0Z$ZThJ,~*0D2/ܣX{KC:XC(Nь~{퓎uHaEէfQ8^Nj|͞RDo&$vh el|s5앮a\#XW#zX:k_# " 4*CȔ N>@O-!'BtQ,QW: /T_p^O4_zF۲k"`Wپ޽:s"sE.Yq LPe>1+ 6Aخz/H_.CDh$pFO l[pv_JJ]QW4s7vЭ}VzĐ/c'$Z [n|3Q-SGV$וd+ӟ)Y3iљ!Ku"!L.ob 5uX][DLX؜@\.KCw/:/FPb$ܳS7#e\~;>. oBXt|TGc G#9؁s'nJzI Nه٩SFZzK ^9 qkGVnʹ.%/;lGRrN|!*KLEol1h rJpDLF{"& lHL xWY)#.okFY 78es_!i_H˱<>ɖGmCi0E//Pr}A-7t9?ܰQ47yȺ`C>jňc8%ln} ,>[O ,}ߕFj)P:eEKt_Ɖ5L\nqޒ_U>)q"ޅNHt8F'<O'񝖀Cs<'L kVFo@rTT 4拞V'6g㎈8IETd&xc(^:iOD䎍MxaZإ!x$…fN~kW L~%Cq-@g%DŽ9r$63^7ep5 CA~ ?Akq?ײo:%~spe+SJs" g3[cCČBSd{ueQYe.Sq S_:Y_X__WXQp,EB䝧IOSkeaP FrH$.0nuSB!>>!&C2f)3V;<9bCdĆb1^꘱vW&+SE/ S6Y8CNN.tXwZ5=/W,@"w6&s׽OfqKח-{`;LǷ6 fΦwr/{cJ3v#08[1,C'~,eCkasv E0\{]B>S тW.lkBξVK49=,G2 vߘH}G T|~7eL#1ypJŃwc L>-R_7}Z1ﰍߑm kl#wCp8/*ͦdx ۿnĿ!VG;堝]걺Z ]1'5ލkR^\]W;Mv]xtR;}uᒇdI3UI(q7;O'݄/9%IEu}z"A< <@l^_l_`lnA0H yy8Kڋg Pg(C)J~҈?iD7Ls:(Q#ACb`׻````۽lm{mUEGB%!Ɗ0v2aO9 Ǯ?yo-rTp`-lh5- :# SCH6.CH DF2_SRC_ {ݷXӼ\%1:Yb(*mܱeĞlzqHO,&M&Ra-Dmx-YQX uk\ ,j%o$ﻻRIn6p:0[߀ÿw cqTuDUVSnG1PsmEjmvc*YPLj33e{peg0wO颡 㢙1^rg iQfyY~Wj%U7W ߑY$ TSR<ͮS22t*D͖aO1i;sgdcUXģ {](Njk(9&OxdXĐ?ΈϯBrVgT/d2'YNYֽzF(]@Y$ { ]kTNF)o<'4ʏko;eE""}aiR{ٸi@O›5/co|CNty\^sAV)!Sԫ552@Dy1IJe,^zϛg(tZ׻r*L4|ҥr-Xc#0N`MF$7Ⰸr#E/FuDkdo$|c>kYP^Ơu~[3dp(}uKEtOK/0W:tW+((asni*zt,IĈf2 ׶>emź^däKp']R >zL"&- x–_1$<4.ޖbyc34|ҏ-Sc]5^lXC_N+./s[w Pw $L sE봩D H0k6M7V*>k=þLi[cJ. 92o zU5QiA͛t}׫Ŕk"i9J(6o1(M,ڵVѝ`XzMyTEi cjẪv_EH!*$J]t&ƴdXaI"Ec%,WXFavT,HZ3p}~}P mb%=׃ޔ B!=EQ RZ!:Ti+tD]wR n *<ݰAh3MдSEgFrq񢐽M X_١qAx\n4HVpp}qv3z:c7E5' J-Y 7w5!nN3 Aaf|{Ealyx07 Gأc nGqfȱCI{o2T:}1:|gj?TQvZ}d$b}@6]])XcZ|ʉi vL_|G"[ml'MNu4V}&$>ٍ;b!C}o]tYn3؁LBl7%ɳC]XDdX .]MR:011XS xl!!qb^`ii>nd9O 핯x9aS+jyVb\wI/9f ƚx(\B&$d"sy#MnIg5%揑s>9Go4M2Hg<[3-1O퓫Q.lHv?`{y8&1!`/0Ábp){\Fֹˣނk_|I! шG[]g{z\{={^BW^z,KiACqk% k) k- k1 k5 k9WlFoWJgU2LI: *lccB[qdCcpي@ ON|bKcG;fP"kBɒs`i<Th,wM;ad\2)ڸuqJH! nT4!4)k>v1Z #[g x" WM x.d[Z3?Fs4!Uw T t4 oNy3S7yR 3;3@c3&k\(WG~!z16 <3\dsxo2yC/ޟ"VTMY|Qi5!)9Vg(‰;qg_:öHdkYO0T)2Jm:'Kmּ mn['d ϮX/$xh$ȲRqc>//j!u["TܑX pHGjz&]ssC`9AL`8}-91o-RE5yjYmXF.K'gg+^1t`fckXxadB_d:uEha41.W$lzFG]VUdÑBBs.?/O0_քX .ҮiN捋5jl5+B{8*GsMDLVƮ7VگNrhW|sC_A-a!8.YEv:=v>u D!lw^ֵrQ1 pq1{AijqNsFGTf P:Gg}b6TpM8]7Py7z=aN\t[̘GsqCݟnrQ+# ɟP`}ON,1/,*[mg[xFڝ^;{g.+WG2cmc޸#BCq&7Q7l 5t wE@dsDj6FD7 5$b=`g Q?BfK ^mVgxt\2sKټ]_!i_wOg&u0Di1vbI6vˡͅ7i"{|?'M/F" V.,FC-|% qg z,Y7sXNj7 OPS3mv⷟$dX<R#*7QOzJ~TB |BE~9bq0- Olt5K)$v)t*%>i5@H@GDL8~1.R_ԡ P$?ĉrܳ-gW MK1M.nٿI{c˴,K}x4Z6C<"7cH6Oq ?6N ӿr 5b& \+&m\E.YYeu)-M\ UUSIg.WXŕ16'PFqLG}/Ey![@O2ui6ch<(J&ijW٥)kdi:"}Q{V}")WX cWηh ͂+d8Rsh)>-`W$f>Wijq:}f<8L)r (hV63v,㋪/t_[`j(WF<5g091_w CX6@ooVߌXEpzpkŗp24Mꓓ~ q*}d+{fK;):MfYgw62̅fΫe,xax8f8 5&pȹ O+Ւ!0ADQ6.h\F7Lk6 + xA o&l5{+zˊpېYV~o-xU $-lh5-?t#  SCHEDULER.CH DF2_SRCju |\G5I$M,(kee^O't;]}-[D pDP6n(Kӥˊ |bD6walmg5ԣQQx6j/nnU$]H786Eh1A' :Ns"C\mS[3[=҉0K2O[;'|'І64RZ㩲5۞qxub/N5iRB!RȄ9+>*Tp6 4ƕxch Y:Bc$L|-qb|'zW9d0MwA|* w Nն4O vDC'db$yH_%%wImGVm>2"+?lhl#>6F6M#[&#dkCd;d{Cfم6aɿg~&Ǭ2v@\&YvO? .G~=`O)vS?C.C\F^"ٗpPA 2a~_.8hˉ"WsHi>KԛE7. !P1Km&WjUIwwNJGO ɵA< }e=X?ƫ~xseQq[u.x25B~YeCYJ &DJԥK 퐟ze-Ck:>xPN9^VJ\{B>/\\ٗt.l Eljx?! %Sm;֨ TU}펐,gG:;m(6U0Ǒm0PxlXq8ӣ , LrJ&92#I2X?<@Ze.9VկDa^ϙ4&EŜt -lh5-  %L" SEPCM.HH DF2_SRCbxkci!2 ҳ%I'I.!j`` [%5۲c-n7'km@m'r[ FB0k3؋o{ٟZ)eUI[s}WdO5v˝I Fx(~к+s\X25ڔL ʻ+3x8ecyF8U24+ْ.e<)!q?6!g Uk jbW.]U"UaW._]W-Irj0U7쫖P\Y`Z01R1Ĥf@ŤfƤm@134T A.euc*u:8>rkg\>6r-Q\ Oy+?'k& j:*דұ yB?s,bq&R"023o"B-lh5-@M#  STRUCTS.HH DF2_SRC3h{ֶ}1@.Nx HE) a&jDM&R(eIpNL"WHE&0 kr[+3th0hIbEہ{$Mql p0po| ;w}qw1Ռn>Nqca0U‰U/l޾{YGfr]ݝˍu~YgggHZc$VfҠۭAeC6W(vc`ӮڊbHaY Kc0&,B'Nqi k\j/n7:6jJ |^߾_ۇotI |N]^ Ep$E{d@ |U=hS E:{B-vݵJxAc&4llXjkzXx+>*G COs#23YKku޾csuq{k,GǽC)ƁX YaJ*ȕwX*e_ꪍwY) jB7؅e޽95B9Fyۂ0J<C%/X2:@ oVWĒ J]ip`6;<`vKDs$`۟^, u`Wּ6&֯<:^x*#ϊ(17Aai܏3̣𫌞?~ 19e+&4&cd&~0s7zreX1,ra''7]Kql%ucIyDyrahI̻?'ʝz3! H&fv~%+<T<GBHgץ R-!syyt@.Rח*f{DI(Eb(7onw7J aVCe h"\u]c*Ro@O>(1zʇXP7 qp$ JJڠK4ªQσrZ -f_5_f*~'i>b8tƅT?ݑ/ISaldb+y$#~[(gwJ;q Nhщ1_LF-[lߦĝiU' !@p ,7hnttZvBϫl.JFbsn.KD*L O@0\l^lZhRlC5 3tadHT?P*/'»3? K >[ +HO*p77Jrq3Ah_ hL CSrtߧ"hr"^$UT:oM$nvmG6(j v}05r5ʺSo"v0-0%`,1WQo7#q(g?|B@=2''D}!FF=? 'Nz.,U.6gxٲڊób<2%H%Y"fm!:p 835)D%"0|tՆPT9xoH/eWGqUyfI|8:rc/; koLڸpj<Ejdgsќ1(q=jIf + ^P!2+kT$kh8/Uɶ>I2?+GVv,ҋ<$ػ GeKEr*mZG#LjTu/rEDm%U3By?p(lSw3E_l+WHnѐ5~`vDu;q?v74,(\E1uTQ^N"aJ=%Ƹ: 4jɽ۹0#";s2MӪg>M!̊s^\k; l_8㫛uJ?we9s١27hCFA|_U=40n e4>H9Ne+Z=㳽o$Wt jv41 J^NT ~fOW ykqN h \Nh.|ʷ}ňԫgj1J5Q\*5_ҠkN֮=Bб^iE7rǔ\~H^^<$uKBz0R]$LFBx^>8e1Bڰ b]#|#H[.{@Ay}A0ѫUiLK g;G q,5Vd5LDgH\eTT#PiL003qD >1) 6Ux.LJf\QPoj^(x7|C5 W[ƚlϯUPʝ%~J4rIӇpɒTZFSEΑ%⁆)\Ņ3  KTQ%@s^lʁXJPϔtV;c)(ng?z cQR6DnD v,ZGML1&W1ti7k Xi@ShN0,l5PS0FX$HwEi\P_U| mٴ܎py8PJZ$S24KH@Wm1yZ|zS 5!|=(#{0oZdVd]mG?50+vBf2]=ټ@/GPCWfVCv_cNpVw9;qS?vv?WTEr"XG*@ޮ˗ܠ$!Rr.YdwkIKC~QEbE&IS2ЕCX%XA~Y +  kTkA˿B -|Ջ4GӵME1N9:`Ûe2ٜ딜D6yqЌ>41Օl-CJe%.ޡޱD_h•<] ;-d"gOAA"v)I= W&/#+hFA)'JuY\qk72RA\EXE5_Xn:P",ɽYRGI" e{yfhD~Se]Qz (jء'N99a"?DdSe١T t즼曫/&駓e]4;KX2ˎe;ka|sN:{O vt閎C:K%6a_LLD5\ɼdEF GIgX,ll)pEX#^25?z.3o|cneU)y< f2J?4 rs#dp7[:,l?` SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0xF0,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0xF1,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0xF2,0,0) SP_DATAST(ene_data->x+40,ene_data->y+24,col,0xF3,0,0) SP_DATAST(ene_data->x-24,ene_data->y+40,col,0xF4,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0xF5,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0xF6,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0xF7,0,0) SP_DATAST(ene_data->x+40,ene_data->y+40,col,0xF8,0,0) } /*------------------ Gro\ENUM10 -------------*/ void enesp_rsQnum10(ene_data) ENE_DATA *ene_data; { static short col; -lhd-:W0HGTNLIBADDEX/=-lhd-:W0HGTNLIBADVRL? -lhd-:W0HGTNLIBARLC-lhd-:W0HGTNLIBBETAS-lhd-:W0HGTNLIBDATACPYE-lhd-:W0HGTNLIBDMACPYt-lhd-:W0HGTNLIBDTOI-lhd-:W0HGTNLIBEXT_FNTG]-lhd-:W0HGTNLIBFSIZE-lhd-:W0HGTNLIBKEY_GET-lhd-:W0HGTNLIBMCMALLOC`-lhd-:W0H GTNLIBMM-lhd-:W0H GTNLIBRL-lhd-:W0HGTNLIBSCRN_PRW"-lhd-:W0HGTNLIBT_CLRw-lhd-:W0HGTNLIBT_SYMBOL$-lhd-:W0HGTNLIBVCC-lhd-:W0HGTNLIBV_RANDOM@-lhd-:W0HGTNLIBZM_TREAT f ~-lh5- ADDEX.CHGTNLIBADDEXRncwMJ9rC e[pFb5jYpI풪Vm5Y!C6Ze a;[r[azxxmWn'޳Q23YZI}Y=}+O=yp#tNj+'5enXZFZ??!,>Z:˘zhviYk+ k3RpF电w~TO5«&USZItq<Ȑ\@^4{[hF1AQe]XD/fca:`b hr7%8~"|tEe〪IHwO}X?,},@qhdRRǰ:&s80U:0⯞;+a*@`&%,UdfL\Yp3'*PŇPwrǁ[`꡴,x, r >r$(!{=8 ((*S"G`h Ot;ɎCrPڮ0Hmy-(V2").OYKhVq"F KO2d 4zCʧ5n佝.> fНxRf|&XWIx],ƭU,Zyt$ti\W䈞)ii<ۯ#"}Km!c-cu{&>2zཛྷ!/)-h\&وSٞ9{9t/a4'-mE"ģ1(QG!2BDaW1ƣ◞};/*YA/8e{12<%c-ZY[>zx2 Иx'y*GB)!o&W;RE!Pr%#H^̎M _ϔKi2eZT&L!$pW  i6.RӫwPPu U?!+ Jy| p^d#l!F# Zz1L<]qF+-Lt ˤ-+yOJbZR?>/(*txH,pwő./C.y>xz-F 62xr{5a xUS+5boQѩ/a.Իņ{Q aEv",N^]l/[ڍO/8lπa-bkEqx4t@S/KUD<_׍c"?-lh5-S n BETA.C HGTNLIBBETA_Uj{66d u:&400u]{crwvr49]nTX("ahX,ͺS9 `_ Irdi?7=B \ybobćPNOʼn^ 'oF #̃JYkC~e voZ ~s[eм >2; G3jɃa԰3S8}XFr5kA2})΂5u|Ta+fӫ&)NX/+V|8uqtM4*7kgG?6{PL2 (CN^O=L=. b0-yjg*4}.D{JǟAvo^ mC;f&R.FzTU[7gXZeN,I|#ж-Y뚊9T͵2S10 GXG +i'q!x) XYL.p"qՄęb8 ybt/ǎGnll#p6nO뗚VФ0*'=|Y7rxT[ '쵦gَt7 ẋ PԴ ]!ЭmS 8fI2ind{5"-lh0-)|:W  clean.bat:%H GTNLIBdel /Y *.o del GTNLIB.a "-lh5-*  DATACPY.CHGTNLIBDATACPYX4mɟ|Vg곗s jEF ]1_FnU*oI~ݱuD-9\cA~yyP xryS}й_zA=Áx\`m5> yhG[w1?[.6o8Lw%NJ#|N1HRhVbxHa{J4r.;$#)2 XoN_t֬Q'xa$SI8e.>!Cb:X`oBo4 (`r#VI` ei[YOD yidUWӪG_yϔk+rC&/9`K|> 93r;Wa\Vx|h/Nn.pQָY/K,r0`Fۓ#sNuxuM2|k[9+ CyGInh38*ɪf~8;ELt//Suv,K $䀲c:&D8 <-@$ 3FϚ9LRj*өwa7(<11n%D/+  s9s7yH9ٿiIP?-lh5-W P! DTOI.CYHGTNLIBDTOI} Z{E{Mw"] *VX}Dv:BbBaXUk .]6Ṯs>PeD,R\{!,1r6a8 C1;/j1|-cs:əf Hb>#(TZ $o뵻4nϘ{InЙ6:d4bpjՆ`.m..}J>q])ZIR>41G?yVQ|:Cʈ3u447f#-lh5-lzf  EXT_FNTG.Cz)HGTNLIBEXT_FNTGB!Ykw6Dtk;$:HI; Y:K&u Kc bLYD$00H %sEuBB1$91ýZq2vӾ[.}ر{^LpVϟxFrr/ nG*v"[6U\ŽϟRVZ݀^ҹu(;hb`令 @}L罌V^dyMyS:<ݏg1!?5G,-H8~ݸH㼃0b K}\ ?>:g+my?>lzX z*^Ɂ{? />!#8z|ȁ1ċz\{LZ<}*\ l\$Xk۰ݐ^rw"=J7}.UCV I}YUzIcbqv'vbĂ^~OOaB\\h YFFhƼeFB:GMB9G9#B<#aB5S̾ܺz>L(aD{ #QˆG=(aD{ #QˆG=kэm֜Jeށ=J 2TJpkŒ)Ƞ> *c*LOUj8ccAJ2raQYqP+$XBe̢vCj&0UMG^kNQ2V|j̬~/PDNq7h<8e  !4Cf6d!N6d!4CN8iІp 1jg N!5XC2pki+iO>kGzew0[oNoUTfJ?8?o︠ҟJA_fA72^K{9/k%̗C&L?U0x%棧&MGSMGTMGUMG2i595=5j:j:j:j9s]ih#-=> ?<@ -lh5-; FSIZE.CHGTNLIBFSIZEpZwX_-rdC C]u{٥G&DF舢 CDbw]rXMP+MI %I6&I{G~:=/R^su},W@c;qjV'w k7&m)ql8ԾI,*qljHRh`~3:Cvv3b5 i߱JO--GҒR7P xl -f=MVby zj&Q͝,~r@!-lh5-,BHZ" GTNLIB.HH GTNLIB r{Ӽ],R".7ZhMof,y&[( .ImQ(JIl66uJ-&n;eb`=6 E[\ EwǏIeK< . ]߁w}q*ͮ_gA-kt~wx q9D+i)lߩSPl )>8'iMFQ*?"c)OoˑƖY~y:8OSusĝ}»Sf%MvCJD '&ħ0 9ؓIIY}2Oc 8t.$yxcGHX&d84CRHj:?8En I .]xnj۸(„5@s8G!V đrįd7+}b* @&Gq|Y3Iҳ0Stu6?r?^/w+0^>I:bV# ,#0c!/u$&gma}ROg1\Bյ7h*@VuWiRH7h MGG[_+_ϰOZLSg=M Hedas"$b8@Q.jؐO^J cГ]ax ©;&[[&ܜbt v&I2O -}BrYlN1LIȽ _V1qeX8OvR%o@rL$qi2=2b ک(F[зs3 ɋ GAI {֓yR~䓍A'&-i)Rikgw{ ;T*,{+&_t #&F M.pvϓ_"H`L(vo?}j4m1Z^4]$ݺH5O._"wwWQX6nϙ(7.-9AysK857\k-%W$n^۔.ގrU=FUWC~up5@/R^xfGMN;=o4ZP p ۷4ixdWh/Hx+1h}i-'Ե~|_IyϽjqK:AiRO- o}Ćؑ"FZF{$aԈQސ0 ? F`Oo>4$P~툟҂5G?$}F}H萺ϿI3pI'`2d4?x 2ZڮUڭY<9^Al5Iӭ:[ ?4nܪ%=pINc􂮾I2 $ ]~PY'|  ć/Ι9ݰq]a|ƾ. [#㴓Oiq\z(v 0I9ߖuS}m 8~H@ȫ!z^J"]|3E+@k8}L=E=6'T-? '6(H+2%z؄ =גYs)3Sɱ$hY[28[< 'i4bߚIk{u"d6t_`pWte$juq6n[?F y{^pDӬ TS?ccP1'bEc9EZyLB@)mYO2ua2 vߜk#tWca:tϗ]^Dɒbboft=Y_6 I^8M!"Na|4: .j$U@fPhPn?)|eiUgQ6Aō"D¬zeFthI!1E??B?(q&-v5B??@ʸ>O@?7HzcfCɦoXNq D,( n`e@UZ*kU tzkP76A#c\}p# " ހҬ8rh:BL 錅2$~V'LD}C8⍮3JA_/ t57¥ef( Q Gd 6'm\Yl-{uGOݢ[Rڹtp][{^^[zܑ7Dm?[gfM<3pWwh 0ڶEjnGwnM'}0#MgwdXˀj [ˆIxHhWADCHw9X[*V QXuDkY '<'5=G5|<UΜl3IuqPz0v ً̗tz V@5b6j Vp][z˫po[@@m`Ck%'Xa(*ďf"e;qL5-45@N%/kP:'P:0av5|ڰ$+I<:. Sn:eԐA0$|4k6`W׊_'Vd淿I5?d%\ pC緊8uu6FG$EDb煪㇁љ''6FAa]%쿳 LA2C]]H8!éLT晦3*~ wl7~6X/%1p)c&U-d6wJԟD˯,huL +nd'=cdp4Yˋl l `T%]Y-gisP_[[ZcšZX;Ia+͋/@/!8]LPi}R'2!ڪW_ N aF0l ofWIsY,:+#:Q'n!wɕ^ ˣ^K(bKQ߿'"$od]20XUc0 `yHbSKK/-v[j&]["FBӰ3}}U ~ʲ>MeZq߱8ύèV+3EJi1*?T-{Dt_%&9z O; )(D L0y6Z7]kK=iDuy-Gb 7- ˂V- @^xeAmVvGA5ڪ:+iҏ$X+x@-gm,͜OL~u/(B1z.G7QDQf`#$ɪ}QIث+V&ˍ 7UnbX$HI8]uL)C,xeQ"PNE {d@kxXN"dH[-;2ϒ S"4ufB0c@UIX5K0e¸Y$7:et_eX8pt ȅ3VW +ߜ[4Խz\sMMxWU5z޸S&T Uo[7A"AGt}mseM'o< B[uhzpՃ>HR7ҍxʑSێuLc@猶A 4 Ӹ\hlAQ@1. Y3ܖ-A7ִ>PK 02g$%Xh 5SYdɏb$~ 7b7 "e.ޖUph09p!-4`fM GC݆pa[*tfZXJtEB~O Ț F>qq ˃ DXkIJ~8 n }.~{7G4΄Kx: j! k=ltw^[ֆ<ވ#P!l}l48߇Z3.5[@2a tLȽT@Ù0r`aP@""ƻԟ"KE b Q YiX۔矠$X_hf"7Q偞-XZx1fD4`7[40Fj7޸E' [8'9p)+2pNÕ/^1'tB0&iԢVIƐͩ%^p=GYF 1OM"DPT043;s5 їiT !LV#["Z)-0zTX6anZ*r+8%N##oSl6V'b9/9+$!6 Zy & llB?z SFU3W)0r<.¢&j>4RvFܭԒ ZBcJH_rP:NOG3q}ۆ@˺HG첈Q@$L2=ٱcڀI[hϽ_{mWo{mQa HY!W[ kͽvش a|? z\(PXw~[æ׏P\34n>IUf YZmy<\ \ĝwR,Lt.ZeSt_]O3v4.y]h<©BP4l^ ?%;-t=Z>ɍeL/*W'Ds"X…tIs)\U˕=6@$6hHߗ @u>\~QI$_'v@J::,IW"-lh5-(  KEY_GET.C}%HGTNLIBKEY_GETߛZw9x:K nsKUE66F01ww;|k/"X 0_\0kZ0ڧX:&s~ws8!P=k}i$y.}q\HpkcA>.J7ק&'Ӑ)pP]%0fOu .Rrrr9s/Ô6sBxq״d(H649Y1K!D Df~rYb(X Μ5 ˆA^V5bR0bHaЖ$ٹUZ='Z0>2PZؑÂHܕ;)Wc2Yk>f}ͬhbCXx?Y]D}\.|/Է0^)3J|⍕P۪^DRNYN%)iˬnm8v"R%ҷ;"3HKʝK(1;PeV۲$$>:k%8)+1Q SBP2 M 7u,̠݇ao%uՌTT=ZjuTQm TdFAUUUN~š&l+aKy6EbʻWZ!`U!_b_So}qqJZM;NR:qejMLs}˟rݡ}s1lm}S]AfB:93d>1EEڑqb:h6n[^n-'zN"*0lDXc4fL]'ouFZɤ>odц聰eTEDpm8Nz͍loI6ᾁ#czᾅVp^H67w;vlo<;NALqՍ=?:1o5rčVXɩ1 XYgΖ$2BraUE6Ë,Vaރ*nEs[Zgl\=h-D!c,s{9~@9h A ё.1d͒%WbJfZq̽˗ CU5ǒ]>,ףЏ6;%.&%eǣ}ueBFtS i MմΩp?P-Sޜ !(]v.Ö,H8CW)xpgž xXb_++N߭Nu7S_UqGc(dP(g`͒_8<9V { ñ fb&^O -lh5-g4 RL.CAH GTNLIBRLʂj'K<2lhѼxr)ql{X{'x&Ycmo<^ RɃL7{Ik-.[ O&smնwYy*+{)7B,ćB{ic$"pIIݓy7/q,]FC=Pt퉙[doo_Ķd+g|MٴW &rt~oE@¥y/3cJ@SREH (^n1p, x'JCr]A#W$AV"Ch8 fDCD6{1("qrzWR#?j#1 ?2l^ʼײd{5XS9>CD^Dj׷$Xm^Fս" H3 ᝖U{8rK*0Ň%[Fs;U<%"n7*DE?U/7zЄjNr!sOCA g d&dSD@ԁ21A})M?3Oy^/aÁB'C `6+1ӳ&ҝ*C8XbÎF_|Mt?͋h(TQ~ٮ~?Y 5Pg\ǒA|Bmo=1{C{p|HUߗZ- mv#mHbZ~p)WEI2>2W`shlj7~*1 <;_ dncC@Un[+tEL:Jeí$cҺK\W#)](6Xmۢo0]궼!!oM%e4__tc4'X:|Mcsjɒ\k0rPQ_S ~JU3*[Ri5PI4\|S>>0O!g{՚ :~CqO)v(u<[\~jEmd UySA=DjOQ;S[[~y|O;e={_?{#9-lh5-EAl  SCRN_PRW.Cv'HGTNLIBSCRN_PRWbc6q KQ Zm^m෻uw ƺX) &# :hD>ۻ7bư4͓+쟲}3;GmPrʀߞ߬"}9xڲ jzU#== v?/ S0 P=$Yȓ_i`شP|c0~ '~} exYj^GoVmabÏB//ĸnC~x>xЙ;kj P ϻc|;gߐw{aR-!YU!e.c$Fb8mB*?v#Տ7xY]up tVvбd Iƙ4Fc>RLz+@aWXg&5-6Rd'iG iǗ"Br9+LBZZ.㈌tF &oS_@,H J-lh5-Z" T_CLR.CHGTNLIBT_CLRYRs(vgbe7X,h>H{A6 ]{5XzҘ9N,7AR쎃rP48\o>@f\Խy㟮twpEqtR$T H88g RI09w8}bZ|&/tm |Vlp#L-lh5-9W  T_SYMBOL.C+HGTNLIBT_SYMBOL/p^b7iօE֯/xqⱖdLmW>xkNN٨6X?qx(ٱ‡4X#,3m L(QFh}e̡>et ^I *GZ5pCG 5V;o{i@HN<p;&P2/0Q}..mm^uwnMK҆<$N "'*tQȶWb'>@ oG>qyA׉"OXwÏu&%Z٤*Њ4m VW@F,0-lh5-zBJ| VCC.CHGTNLIBVCCjsszzN/em=Dq[bZ%*pm!'8-ƺ]8rB{mUYetK%vSUvVB(pvG+fE1Ö85[9i׹7y,{ݫG#WR7yИ>8T 45c~O ŏpp<ÎƝ>BO8 yAyMUW\aX6YJ4>1_4>k49yDZ`ð/48qzsMv;VӅRpT2J\` ,Ѵ5QN$4 HI /Ljצ ,h ɆcXc.60@y_Z;rJ1: ΝbpSXY9-Q,Xe`}3(:L}T.\ UEFnQcE)(&:h9B֔%P>G@r mu7Q4F4G[fe &v7o9.uQ:;?ǡ!4e@^I&;)! qҩ?B&!w(f=e d.[,ylccǎ-`u lQ`7jD[fXev D_vZ,F`-"bvKX,%l#l'l+CYK"[,d%ei`-;<_Xݜlgglgg¶XӳȶXӳ,}i,}i-UvvwQIT[*qg0@p#PN^.$/1c5ڍvXU \ϽOT=%.\~,28]8 ƯNNNMq. ŁygIUf}yA2"DJuFHfoˉK=ln9|;9}_tvڧ! :>Z|N>v+nEU"=tms Zen{X"v?mY}cm'TtR҈Æ~d˭TΛEyhc3ZX }0 =6HS=u3&:3o[ŭmr϶c>:PczaAqW&*uiؼ͌'mL H\ ۲w1z|Ch/0 =5(FX=#)X=3kC,R9K(G p= )3sp2K_?{?,Osut+?BZ|iv{Y v _x\\J|ә$M9??9ʴsd{StY9+Oů+d7+ W'dr^rpcn;`JSk m JI[D^iVvTLztoI#Ɲ2AFubs+e+tU5u+습93C_+lǡ6Ig@> |̯;gtV'O- Rkw$C^Sn-lNPt7YgZm<vxWO"m't.;"]#?5PUyU6z=\ea \Wr20 ݽz@a d^- 7n7iZ zy5[#=`zhXmBAw@1,1/bP<Ġy@Ġy@%Ŀ/ĨĨĨĨx]%I%I%I%Kĩ<ĩ<ĩ<ĩ6%vRsSC5ρFs=fL*\zG+P\ho[>-CE(p\e@}gMc P|gF@7`0EIy"~}fHAL?\>!Mvx__FץM܍r6#k܍r6#o P}!I~`yܘGms@kbd"֮#\Kvsc .zȎ%8 #-lh5-%  V_RANDOM.CFHGTNLIBV_RANDOMbx 29Ck *dYoUC6/z Å#ÂdA ʢ!Mex`MԀ/wvpIe컖ITL0ml-7 x_`̽ 4Mf< Fel~$O!9$+H1jF8AH:D8l{_=b«f8gMޞ٠sf MR9|oGf8cO=(ێ}h=V<.n{>򰪮8&ۣw)%ѕ'n;AL_]KqE.?~u>:}iU\q|VQ5kNeqP:垃z|,Ȣ|T&<[3M2"-ЈOTOTO^hlWC}Sh/ ̭UʉG>zuɩ"Aێ#~,I*)t*U̺ez9<ޥckY}<(Kyargq-lh5-7! ZLIB.HHGTNLIBZM_TREAT\w$̖ۘ-<Np}7KZ[`h:+ m4s,#7OO6 Jpk\R ߑŘچYh:n!4+QQ *yC[oh}ڬg=KM_xzMoN+>+1 ٧!`zD޶ Z/Zեɩٟ]deסP-Y#VvW=@~-lh5-G 2> ZLIB.S5"HGTNLIBZM_TREATykwmTi%Q@|a]{Ii=+ BE9#?;##  m;;VmP^y%˖_,%dɗ& ~K/^T ,Ysqge\JXMΦ驮8<ϼ\baq+G[iɪ%QT #(-lh5-;!  ZM_TREAT.CuHGTNLIBZM_TREATojڶ@;>l kF16$OzYR{jx=7Һl <[c/ VE(/Br&G8a/v-Jz*+QWZv5\(/Y\JE LjBH--=xnش,%}m^"Ԛ%\l%J@ɵ =VvK.|k/]pkٯY#=|q}֯Xt+I-]cX}p(zs^oA)f$@˄D <ҋq5 o?}}#\`C4lePͤiF/[z~r۱t}J<B~}eiYejz .}av!Հ@8*&;f^YXwAVzyڿs/B_]XzK@V7-gRI "i܊Ζ:gZ{&lCFDCZ4$[B|!t{ˎPG({Hcb-o.oe&ƠA~v-"G,G@>IjMjjGR<_O87v?x ,ene_data->y ,col,0x29,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x29,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2A,0,0) SP_DATAST(ene_data->x+============================================================================== DuelFighter2 \[X ============================================================================== DuelFighter2̃\[X̃RpC@܂ ‹ RpC̃CXg[ vÕRpCɂGCC̐^qłlibcg܂B ЁuGCCɂX680x0Q[vO~Ov̕tfBXNCXg[ AlbgŌJĂoCi_E[hēWJEĂB CXg[̕@ɂ‚ẮAꂼ̔zz̃CXg[菇QƂ B JĂdf2.x̃oCíAtfBXNɎ^ĂRpCg Ao[W͎̒ʂłB gcc version 1.16 Tool#1(X68) Based on 1.42 XC̃CXg[ XCɕtA[JCo𗘗p܂B V[v疳񋟂ĂfBXNC[WgāAXCCXg[ B JĂfBXNC[ẂA{[Ⴄ̂ŁACXg[G[ ɂȂĂ܂܂BfBXÑ{[ύXĂCXg[N B {[̕ύX@͎̒ʂłB fBXN1 -> vol /S XC#1 fBXN2 -> vol /S XC#2 ‹ϐ̐ݒ RpCɂgccACuɂlibcg܂B autoexec.batȂǂɎ̐ݒlj܂B iGCC A:\GCC ɃCXg[Ăꍇ̗łj rem --- GCC settings ---- set include=A:/GCC/INCLUDE set lib=A:/GCC/LIB set ^q=A set GCC_OPTION=+ set GCC_AS=has.x set GCC_LINK=hlk.x set GCC_NO_XCLIB=yes set GCC_LIB=.a RpC GTNLIB.ÃRpC GTNLIB.lzhWJ make s܂B RpCʂNAꍇ clean.bat sĂB df2.x, BENTI.x̃RpC DF2_SRC.lzhWJ make s܂B GTNLIB.aN܂ARpCςGTNLIB.aĂ܂B GTNLIB.aɂ‚ăR[hւăRpCENꍇ́AWJ ㏑Rs[ĂB RpCʂNAꍇ clean.bat sĂB ============================================================================== DuelFighter2 \[X ============================================================================== DuelFighter2̃\[X̃RpC@܂ ‹ RpC̃CXg[ vÕRpCɂGCC̐^qłlibcg܂B ЁuGCCɂX680x0Q[vO~Ov̕tfBXNCXg[ AlbgŌJĂoCi_E[hēWJEĂB CXg[̕@ɂ‚ẮAꂼ̔zz̃CXg[菇QƂ B JĂdf2.x̃oCíAtfBXNɎ^ĂRpCg Ao[W͎̒ʂłB gcc version 1.16 Tool#1(X68) Based on 1.42 XC̃CXg[ XCɕtA[JCo𗘗p܂B V[v疳񋟂ĂfBXNC[WgāAXCCXg[ B JĂfBXNC[ẂA{[Ⴄ̂ŁACXg[G[ ɂȂĂ܂܂BfBXÑ{[ύXĂCXg[N B {[̕ύX@͎̒ʂłB fBXN1 -> vol /S XC#1 fBXN2 -> vol /S XC#2 ‹ϐ̐ݒ RpCɂgccACuɂlibcg܂B autoexec.batȂǂɎ̐ݒlj܂B iGCC A:\GCC ɃCXg[Ăꍇ̗łj rem --- GCC settings ---- set include=A:/GCC/INCLUDE set lib=A:/GCC/LIB set ^q=A set GCC_OPTION=+ set GCC_AS=has.x set GCC_LINK=hlk.x set GCC_NO_XCLIB=yes set GCC_LIB=.a RpC GTNLIB.ÃRpC GTNLIB.lzhWJ make s܂B RpCʂNAꍇ clean.bat sĂB df2.x, BENTI.x̃RpC DF2_SRC.lzhWJ make s܂B GTNLIB.aN܂ARpCςGTNLIB.aĂ܂B GTNLIB.aɂ‚ăR[hւăRpCENꍇ́AWJ ㏑Rs[ĂB RpCʂNAꍇ clean.bat sĂB 2023.08.05 TeamȂ ɂȂ邼I\n"); printf(" s`aŋIɃm[}[hɂȂ邼I\n\n"); VDISPST(vd_task,0,1); vd_count=0; while(1){ char keyin; keyin=key_get(); if(keyin==KCODE_ESC){ VDISPST(0,0,0); EXIT2(1); } if(keyin==KCODE_TAB){ VDISPST(0,0,0); EXIT2(0); } if(vd_count>10)break; } printf("JEg R\n"); vd_count=0; while(1){ char keyin; keyin=key_get(); if(keyin==KCODE_ESC){ VDISPST(0,0,0); EXIT2(1); } if(keyin==KCODE_TAB){ VDISPST(0,0,0); EXIT2(0); } if(vd_count>56)break; } printf("JEg Q\n"); vd_count=0; while(1){ char keyin; keyin=key_get(); if(keyin==KCODE_ESC){ VDISPST(0,0,0); EXIT2(1); } if(keyin==KCODE_TAB){ VDISPST(0,0,0); EXIT2(0); } if(vd_count>56)break; } printf("JEg P\n"); vd_count=0; while(1){ char keyin; keyin=key_get(); if(keyin==KCODE_ESC){ VDISPST(0,0,0); EXIT2(1); } if(keyin==KCODE_TAB){ VDISPST(0,0,0); EXIT2(0); } if(vd_count>56)break; } printf("fnII\n"); vd_count=0; while(1){ char keyin; keyin=key_get(); if(keyin==KCODE_ESC){ VDISPST(0,0,0); EXIT2(1); } if(keyin==KCODE_TAB){ VDISPST(0,0,0); EXIT2(0); } if(vd_count>56)break; } VDISPST(0,0,0); CRTMOD(4); /* PUFS[h TPQTPQ */ G_CLR_ON(); SP_INIT(); SP_ON(); SKEY_MOD(0,0,0); C_CUROFF(); superin:SSP=SUPER(0); /* roǂݍ */ betaread("benti.sp ",SP_DEF_ADD(0),fsize("benti.sp ")); betaread("benti.pal",SP_PAL_ADD(1),fsize("benti.pal")); superout:SUPER(SSP); x =(short*)mcmalloc(SPMAX*2); /* roobt@m */ y =(short*)mcmalloc(SPMAX*2); hx=(short*)mcmalloc(SPMAX*2); hy=(short*)mcmalloc(SPMAX*2); dx=(short*)mcmalloc(SPMAX*2); dy=(short*)mcmalloc(SPMAX*2); for(i=0;i10)break; } vd_count=0; while(1){ roop_count+=1; /* [vJE^{P */ if(vd_count>56*5){ /* TbŃJbg */ VDISPST(0,0,0); break; } gx[0]+=1; /* OtBbNړ */ gy[0]+=1; gx[1]-=1; gy[1]-=1; gy[2]-=1; gy[3]+=1; gx[0]&=511; /* }XN */ gy[0]&=511; gx[1]&=511; gy[1]&=511; gx[2]&=511; gy[2]&=511; gx[3]&=511; gy[3]&=511; for(i=0;i (240*32))dx[i]*=-1; /* [ŕ] */ if(hx[i]+dx[i] < ( 8*32))dx[i]*=-1; if(hy[i]+dy[i] > (240*32))dy[i]*=-1; if(hy[i]+dy[i] < ( 8*32))dy[i]*=-1; hx[i]+=dx[i]; /* ړ */ hy[i]+=dy[i]; x[i]=hx[i]/32; y[i]=hy[i]/32; } /* \ */ work=grp_add; /* OtBbN */ for(i=0;i<4;i++){ *work++=gx[i]; *work++=gy[i]; } work=sp_add; for(i=0;i border){ /* \ */ printf("Ȃ̃}V́A\ˁI\n"); printf("doblg܂I\n"); VDISPST(vd_task,0,1); vd_count=0; while(1){ if(vd_count>56*2)break; } VDISPST(0,0,0); EXIT2(1); } else { printf("Ȃ̃}V́A\xˁI\n"); printf("doblgɂ͂Ƌꂵ̂\n"); printf("oblW̏풓͂ȂI\n"); VDISPST(vd_task,0,1); vd_count=0; while(1){ if(vd_count>56*2)break; } VDISPST(0,0,0); EXIT2(0); } exit(); } /*--------------------------------< uc >----*/ void vd_task() { vd_count+=1; /* ucJE^{P */ IRTE(); } 6,ene_data->y+16,col,0x44,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x45,0,1) break; case 9: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x3E,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x3F,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x40,0,1) SP_DATAST(ene_data-# 1 "BENTI/BENTI.C" # 1 "A:\\GCC\\INCLUDE\\iocslib.h" 1 # 1 "A:\\GCC\\INCLUDE\\cdecl.h" 1 # 17 "A:\\GCC\\INCLUDE\\iocslib.h" 2 # 1 "A:\\GCC\\INCLUDE\\sys\\iocs.h" 1 struct _boxptr { short x1; short y1; short x2; short y2; unsigned short color; unsigned short linestyle; }; struct _circleptr { short x; short y; unsigned short radius; unsigned short color; short start; short end; unsigned short ratio; }; struct _fillptr { short x1; short y1; short x2; short y2; unsigned short color; }; struct _fntbuf { short xl; short yl; unsigned char buffer[72]; }; struct _getptr { short x1; short y1; short x2; short y2; void *buf_start; void *buf_end; }; struct _lineptr { short x1; short y1; short x2; short y2; unsigned short color; unsigned short linestyle; }; struct _paintptr { short x; short y; unsigned short color; void *buf_start; void *buf_end; }; struct _pointptr { short x; short y; unsigned short color; }; struct _psetptr { short x; short y; unsigned short color; }; struct _putptr { short x1; short y1; short x2; short y2; const void *buf_start; const void *buf_end; }; struct _symbolptr { short x1; short y1; unsigned char *string_address; unsigned char mag_x; unsigned char mag_y; unsigned short color; unsigned char font_type; unsigned char angle; }; struct _regs { int d0; int d1; int d2; int d3; int d4; int d5; int d6; int d7; int a1; int a2; int a3; int a4; int a5; int a6; }; struct _chain { void *addr; unsigned short len; }; struct _chain2 { void *addr; unsigned short len; const struct _chain2 *next; }; struct _clipxy { short xs; short ys; short xe; short ye; }; struct _patst { short offsetx; short offsety; short shadow[16]; short pattern[16]; }; struct _tboxptr { unsigned short vram_page; short x; short y; short x1; short y1; unsigned short line_style; }; struct _txfillptr { unsigned short vram_page; short x; short y; short x1; short y1; unsigned short fill_patn; }; struct _trevptr { unsigned short vram_page; short x; short y; short x1; short y1; }; struct _xlineptr { unsigned short vram_page; short x; short y; short x1; unsigned short line_style; }; struct _ylineptr { unsigned short vram_page; short x; short y; short y1; unsigned short line_style; }; # 1 "A:\\GCC\\INCLUDE\\sys\\iocs_p.h" 1 extern int __const _iocs_akconv ( int , int ) ; extern int __const _iocs_bootinf ( void ) ; extern int __const _iocs_hsvtorgb ( int , int , int ) ; extern int __const _iocs_jissft ( int ) ; extern int __const _iocs_romver ( void ) ; extern int __const _iocs_sftjis ( int ) ; extern int _iocs_adpcmsns ( void ) ; extern int _iocs_alarmget ( int *, int *, int *) ; extern int _iocs_alarmmod ( int ) ; extern int _iocs_alarmset ( int , int , int ) ; extern int _iocs_apage ( int ) ; extern int _iocs_b_assign ( int , int , int , const void *) ; extern int _iocs_b_badfmt ( int , int , int ) ; extern int _iocs_b_bpeek (const void *) ; extern int _iocs_b_color ( int ) ; extern int _iocs_b_consol ( int , int , int , int ) ; extern int _iocs_b_drvchk ( int , int ) ; extern int _iocs_b_drvsns ( int ) ; extern int _iocs_b_dskini ( int , const void *, int ) ; extern int _iocs_b_eject ( int ) ; extern int _iocs_b_format ( int , int , int , const void *) ; extern int _iocs_b_intvcs ( int , int ) ; extern int _iocs_b_keyinp ( void ) ; extern int _iocs_b_keysns ( void ) ; extern int _iocs_b_locate ( int , int ) ; extern int _iocs_b_lpeek (const void *) ; extern int _iocs_b_print (const char *) ; extern int _iocs_b_putc ( int ) ; extern int _iocs_b_putmes ( int , int , int , int , const char *) ; extern int _iocs_b_read ( int , int , int , void *) ; extern int _iocs_b_readdi ( int , int , int , void *) ; extern int _iocs_b_readdl ( int , int , int , void *) ; extern int _iocs_b_readid ( int , int , void *) ; extern int _iocs_b_recali ( int ) ; extern int _iocs_b_seek ( int , int ) ; extern int _iocs_b_sftsns ( void ) ; extern int _iocs_b_super ( int ) ; extern int _iocs_b_verify ( int , int , int , const void *) ; extern int _iocs_b_wpeek (const void *) ; extern int _iocs_b_write ( int , int , int , const void *) ; extern int _iocs_b_writed ( int , int , int , const void *) ; extern int _iocs_bgctrlgt ( int ) ; extern int _iocs_bgctrlst ( int , int , int ) ; extern int _iocs_bgscrlgt ( int , int *, int *) ; extern int _iocs_bgscrlst ( int , int , int ) ; extern int _iocs_bgtextcl ( int , int ) ; extern int _iocs_bgtextgt ( int , int , int ) ; extern int _iocs_bgtextst ( int , int , int , int ) ; extern int _iocs_bindatebcd ( int ) ; extern int _iocs_bindateget ( void ) ; extern int _iocs_bitsns ( int ) ; extern int _iocs_box (const struct _boxptr *) ; extern int _iocs_circle (const struct _circleptr *) ; extern int _iocs_contrast ( int ) ; extern int _iocs_crtcras (const void *, int ) ; extern int _iocs_crtmod ( int ) ; extern int _iocs_dakjob (char *) ; extern int _iocs_dateasc ( int , char *) ; extern int _iocs_datebin ( int ) ; extern int _iocs_datecnv (const char *) ; extern int _iocs_defchr ( int , int , const void *) ; extern int _iocs_dmamode ( void ) ; extern int _iocs_fill (const struct _fillptr *) ; extern int _iocs_fntget ( int , int , struct _fntbuf *) ; extern int _iocs_getgrm (struct _getptr *) ; extern int _iocs_gpalet ( int , int ) ; extern int _iocs_hanjob (char *) ; extern int _iocs_home ( int , int , int ) ; extern int _iocs_hsyncst (const void *) ; extern int _iocs_init_prn ( int , int ) ; extern int _iocs_inp232c ( void ) ; extern int _iocs_isns232c ( void ) ; extern int _iocs_joyget ( int ) ; extern int _iocs_line (const struct _lineptr *) ; extern int _iocs_lof232c ( void ) ; extern int _iocs_ms_curgt ( void ) ; extern int _iocs_ms_curst ( int , int ) ; extern int _iocs_ms_getdt ( void ) ; extern int _iocs_ms_limit ( int , int , int , int ) ; extern int _iocs_ms_offtm ( int , int ) ; extern int _iocs_ms_ontm ( int , int ) ; extern int _iocs_ms_stat ( void ) ; extern int _iocs_ontime ( void ) ; extern int _iocs_opmintst (const void *) ; extern int _iocs_opmsns ( void ) ; extern int _iocs_osns232c ( void ) ; extern int _iocs_paint (struct _paintptr *) ; extern int _iocs_point (const struct _pointptr *) ; extern int _iocs_prnintst (const void *) ; extern int _iocs_pset (const struct _psetptr *) ; extern int _iocs_putgrm (const struct _putptr *) ; extern int _iocs_rmacnv ( int , char *, char *) ; extern int _iocs_set232c ( int ) ; extern int _iocs_skey_mod ( int , int , int ) ; extern int _iocs_snsprn ( void ) ; extern int _iocs_sp_cgclr ( int ) ; extern int _iocs_sp_defcg ( int , int , const void *) ; extern int _iocs_sp_gtpcg ( int , int , void *) ; extern int _iocs_sp_init ( void ) ; extern int _iocs_sp_on ( void ) ; extern int _iocs_sp_reggt ( int , int *, int *, int *, int *) ; extern int _iocs_sp_regst ( int , int , int , int , int , int ) ; extern int _iocs_spalet ( int , int , int ) ; extern int _iocs_symbol (const struct _symbolptr *) ; extern int _iocs_tgusemd ( int , int ) ; extern int _iocs_timeasc ( int , char *) ; extern int _iocs_timebcd ( int ) ; extern int _iocs_timebin ( int ) ; extern int _iocs_timecnv (const char *) ; extern int _iocs_timeget ( void ) ; extern int _iocs_timerdst (const void *, int , int ) ; extern int _iocs_tpalet ( int , int ) ; extern int _iocs_tpalet2 ( int , int ) ; extern int _iocs_trap15 (const struct _regs *, struct _regs *) ; extern int _iocs_vdispst (const void *, int , int ) ; extern int _iocs_vpage ( int ) ; extern int _iocs_window ( int , int , int , int ) ; extern int _iocs_wipe ( void ) ; extern void __volatile _iocs_abortjob ( void ) ; extern void __volatile _iocs_iplerr ( void ) ; extern void _iocs_abortrst ( void ) ; extern void _iocs_adpcmain (const struct _chain *, int , int ) ; extern void _iocs_adpcmaot (const struct _chain *, int , int ) ; extern void _iocs_adpcminp (void *, int , int ) ; extern void _iocs_adpcmlin (const struct _chain2 *, int ) ; extern void _iocs_adpcmlot (const struct _chain2 *, int ) ; extern void _iocs_adpcmmod ( int ) ; extern void _iocs_adpcmout (const void *, int , int ) ; extern void _iocs_b_bpoke (void *, int ) ; extern void _iocs_b_clr_al ( void ) ; extern void _iocs_b_clr_ed ( void ) ; extern void _iocs_b_clr_st ( void ) ; extern void _iocs_b_curoff ( void ) ; extern void _iocs_b_curon ( void ) ; extern void _iocs_b_del ( int ) ; extern void _iocs_b_down ( int ) ; extern void _iocs_b_down_s ( void ) ; extern void _iocs_b_era_al ( void ) ; extern void _iocs_b_era_ed ( void ) ; extern void _iocs_b_era_st ( void ) ; extern void _iocs_b_ins ( int ) ; extern void _iocs_b_left ( int ) ; extern void _iocs_b_lpoke (void *, int ) ; extern void _iocs_b_memset (void *, const void *, int ) ; extern void _iocs_b_memstr (const void *, void *, int ) ; extern void _iocs_b_right ( int ) ; extern void _iocs_b_up ( int ) ; extern void _iocs_b_up_s ( void ) ; extern void _iocs_b_wpoke (void *, int ) ; extern void _iocs_bindateset ( int ) ; extern void _iocs_clipput ( int , int , const struct _fntbuf *, const struct _clipxy *) ; extern void _iocs_dayasc ( int , char *) ; extern void _iocs_densns ( void ) ; extern void _iocs_dmamov_a (const struct _chain *, void *, int , int ) ; extern void _iocs_dmamov_l (const struct _chain2 *, void *, int ) ; extern void _iocs_dmamove (void *, void *, int , int ) ; extern void _iocs_g_clr_on ( void ) ; extern void _iocs_ledmod ( int , int ) ; extern void _iocs_ms_curof ( void ) ; extern void _iocs_ms_curon ( void ) ; extern void _iocs_ms_init ( void ) ; extern void _iocs_ms_patst ( int , const struct _patst *) ; extern void _iocs_ms_sel ( int ) ; extern void _iocs_ms_sel2 (const short *) ; extern void _iocs_opmset ( int , int ) ; extern void _iocs_os_curof ( void ) ; extern void _iocs_os_curon ( void ) ; extern void _iocs_out232c ( int ) ; extern void _iocs_outlpt ( int ) ; extern void _iocs_outprn ( int ) ; extern void _iocs_scroll ( int , int , int ) ; extern void _iocs_skeyset ( int ) ; extern void _iocs_sp_off ( void ) ; extern void _iocs_tcolor ( int ) ; extern void _iocs_textget ( int , int , struct _fntbuf *) ; extern void _iocs_textput ( int , int , const struct _fntbuf *) ; extern void _iocs_timeset ( int ) ; extern void _iocs_tvctrl ( int ) ; extern void _iocs_txbox (const struct _tboxptr *) ; extern void _iocs_txfill (const struct _txfillptr *) ; extern void _iocs_txrascpy ( int , int , int ) ; extern void _iocs_txrev (const struct _trevptr *) ; extern void _iocs_txxline (const struct _xlineptr *) ; extern void _iocs_txyline (const struct _ylineptr *) ; # 201 "A:\\GCC\\INCLUDE\\sys\\iocs.h" 2 # 21 "A:\\GCC\\INCLUDE\\iocslib.h" 2 struct GETPTR { short x1; short y1; short x2; short y2; unsigned char *buf_start; unsigned char *buf_end; }; struct PAINTPTR { short x; short y; unsigned short color; unsigned char *buf_start; unsigned char *buf_end; }; struct PUTPTR { short x1; short y1; short x2; short y2; unsigned char *buf_start; unsigned char *buf_end; }; struct CHAIN { unsigned char *adr; unsigned short len; }; struct CHAIN2 { unsigned char *adr; unsigned short len; struct CHAIN2 *next; }; # 1 "BENTI/BENTI.C" 2 # 1 "A:\\GCC\\INCLUDE\\doslib.h" 1 # 1 "A:\\GCC\\INCLUDE\\sys\\dos.h" 1 typedef int dosmode_t; typedef int devmode_t; struct _inpptr { unsigned char max; unsigned char length; char buffer[256]; }; struct _nameckbuf { char drive[2]; char path[65]; char name[19]; char ext[5]; }; union _fcb { struct { unsigned char dupcnt; unsigned char devattr; void *deventry; char nouse_1[8]; unsigned char openmode; char nouse_2[21]; char name1[8]; char ext[3]; char nouse_3; char name2[10]; char nouse_4[38]; } chr; struct { unsigned char dupcnt; unsigned char physdrv; void *deventry; unsigned int fileptr; unsigned int exclptr; unsigned char openmode; unsigned char entryidx; unsigned char clustidx; char nouse_2; unsigned short acluster; unsigned int asector; void *iobuf; unsigned long dirsec; unsigned int fptrmax; char name1[8]; char ext[3]; unsigned char attr; char name2[10]; unsigned short time; unsigned short date; unsigned short fatno; unsigned long size; char nouse_4[28]; } blk; }; struct _indos { unsigned short indosf; unsigned char doscmd; unsigned char fat_flg; unsigned short retry_count; unsigned short retry_time; unsigned short verifyf; unsigned char breakf; unsigned char ctrlpf; unsigned char reserved; unsigned char wkcurdrv; }; struct _mep { void *prev_mp; void *parent_mp; void *block_end; void *next_mp; }; struct _psp { char *env; void *exit; void *ctrlc; void *errexit; char *comline; unsigned char handle[12]; void *bss; void *heap; void *stack; void *usp; void *ssp; unsigned short sr; unsigned short abort_sr; void *abort_ssp; void *trap10; void *trap11; void *trap12; void *trap13; void *trap14; unsigned int osflg; unsigned char reserve_1[28]; char exe_path[68]; char exe_name[24]; char reserve_2[36]; }; struct _comline { unsigned char len; char buffer[255]; }; struct _namestbuf { unsigned char flg; unsigned char drive; char path[65]; char name1[8]; char ext[3]; char name2[10]; }; struct _freeinf { unsigned short free; unsigned short max; unsigned short sec; unsigned short byte; }; struct _dpbptr { unsigned char drive; unsigned char unit; unsigned short byte; unsigned char sec; unsigned char shift; unsigned short fatsec; unsigned char fatcount; unsigned char fatlen; unsigned short dircount; unsigned short datasec; unsigned short maxfat; unsigned short dirsec; int driver; unsigned char ide; unsigned char flg; struct _dpbptr *next; unsigned short dirfat; char dirbuf[64]; }; struct _filbuf { unsigned char searchatr; unsigned char driveno; unsigned long dirsec; unsigned short dirlft; unsigned short dirpos; char filename[8]; char ext[3]; unsigned char atr; unsigned short time; unsigned short date; unsigned int filelen; char name[23]; }; struct _dregs { int d0; int d1; int d2; int d3; int d4; int d5; int d6; int d7; int a0; int a1; int a2; int a3; int a4; int a5; int a6; }; struct _prcctrl { long length; unsigned char *buf_ptr; unsigned short command; unsigned short your_id; }; struct _prcptr { struct _prcptr *next_ptr; unsigned char wait_flg; unsigned char counter; unsigned char max_counter; unsigned char doscmd; unsigned int psp_id; unsigned int usp_reg; unsigned int d_reg[8]; unsigned int a_reg[7]; unsigned short sr_reg; unsigned int pc_reg; unsigned int ssp_reg; unsigned short indosf; unsigned int indosp; struct _prcctrl *buf_ptr; unsigned char name[16]; long wait_time; }; # 1 "A:\\GCC\\INCLUDE\\sys\\dos_p.h" 1 extern dosmode_t _dos_chmod (const char *, dosmode_t) ; extern int __const _dos_vernum ( void ) ; extern int _dos_bindno (const char *, const char *) ; extern int _dos_breakck ( int ) ; extern int _dos_c_cls_al ( void ) ; extern int _dos_c_cls_ed ( void ) ; extern int _dos_c_cls_st ( void ) ; extern int _dos_c_color ( int ) ; extern int _dos_c_curoff ( void ) ; extern int _dos_c_curon ( void ) ; extern int _dos_c_del ( int ) ; extern int _dos_c_down ( int ) ; extern int _dos_c_down_s ( void ) ; extern int _dos_c_era_al ( void ) ; extern int _dos_c_era_ed ( void ) ; extern int _dos_c_era_st ( void ) ; extern int _dos_c_fnkmod ( int ) ; extern int _dos_c_ins ( int ) ; extern int _dos_c_left ( int ) ; extern int _dos_c_locate ( int , int ) ; extern int _dos_c_print (const char *) ; extern int _dos_c_putc ( int ) ; extern int _dos_c_right ( int ) ; extern int _dos_c_up ( int ) ; extern int _dos_c_up_s ( void ) ; extern int _dos_c_width ( int ) ; extern int _dos_c_window ( int , int ) ; extern int _dos_chdir (const char *) ; extern int _dos_chgdrv ( int ) ; extern int _dos_cinsns ( void ) ; extern int _dos_close ( int ) ; extern int _dos_cominp ( void ) ; extern int _dos_common_ck (const char *) ; extern int _dos_common_del (const char *) ; extern int _dos_common_fre (const char *, int , int , int ) ; extern int _dos_common_lk (const char *, int , int , int ) ; extern int _dos_common_rd (const char *, int , char *, int ) ; extern int _dos_common_wt (const char *, int , const char *, int ) ; extern int _dos_consns ( void ) ; extern int _dos_coutsns ( void ) ; extern int _dos_create (const char *, dosmode_t) ; extern int _dos_curdir ( int , char *) ; extern int _dos_curdrv ( void ) ; extern int _dos_delete (const char *) ; extern int _dos_drvctrl ( int , int ) ; extern int _dos_dskfre ( int , struct _freeinf *) ; extern int _dos_dup ( int ) ; extern int _dos_dup0 ( int , int ) ; extern int _dos_dup2 ( int , int ) ; extern int _dos_exec2 ( int , const char *, const char *, const char *) ; extern int _dos_execonly (void *) ; extern int _dos_fatchk (const char *, unsigned short *) ; extern int _dos_fatchk2 (const char *, unsigned short *, int ) ; extern int _dos_fgetc ( int ) ; extern int _dos_fgets (struct _inpptr *, int ) ; extern int _dos_filedate ( int , int ) ; extern int _dos_files (struct _filbuf *, const char *, int ) ; extern int _dos_get_pr ( int , struct _prcptr *) ; extern int _dos_getassign (const char *, char *) ; extern int _dos_getc ( void ) ; extern int _dos_getchar ( void ) ; extern int _dos_getdate ( void ) ; extern int _dos_getdpb ( int , struct _dpbptr *) ; extern int _dos_getenv (const char *, const char *, char *) ; extern int _dos_gets (struct _inpptr *) ; extern int _dos_getss (struct _inpptr *) ; extern int _dos_gettim2 ( void ) ; extern int _dos_gettime ( void ) ; extern int _dos_hendspio ( void ) ; extern int _dos_hendspip ( int , const char *) ; extern int _dos_hendspir ( int , const char *) ; extern int _dos_hendspmo ( void ) ; extern int _dos_hendspmp ( int , const char *) ; extern int _dos_hendspmr ( int , const char *) ; extern int _dos_hendspso ( void ) ; extern int _dos_hendspsp ( int , const char *) ; extern int _dos_hendspsr ( int , const char *) ; extern int _dos_inkey ( void ) ; extern int _dos_inpout ( int ) ; extern int _dos_ioctrldvctl ( int , int , char *) ; extern int _dos_ioctrldvgt ( int ) ; extern int _dos_ioctrlfdctl ( int , int , char *) ; extern int _dos_ioctrlfdgt ( int ) ; extern int _dos_ioctrlgt ( int ) ; extern int _dos_ioctrlis ( int ) ; extern int _dos_ioctrlos ( int ) ; extern int _dos_ioctrlrd ( int , char *, int ) ; extern int _dos_ioctrlrh ( int , char *, int ) ; extern int _dos_ioctrlrtset ( int , int ) ; extern int _dos_ioctrlst ( int , int ) ; extern int _dos_ioctrlwd ( int , const char *, int ) ; extern int _dos_ioctrlwh ( int , const char *, int ) ; extern int _dos_k_keybit ( int ) ; extern int _dos_k_keyinp ( void ) ; extern int _dos_k_keysns ( void ) ; extern int _dos_k_sftsns ( void ) ; extern int _dos_keysns ( void ) ; extern int _dos_kflushgc ( void ) ; extern int _dos_kflushgp ( void ) ; extern int _dos_kflushgs (struct _inpptr *) ; extern int _dos_kflushin ( void ) ; extern int _dos_kflushio ( int ) ; extern int _dos_kill_pr ( void ) ; extern int _dos_load (const char *, const struct _comline *, const char *) ; extern int _dos_loadexec (const char *, const struct _comline *, const char *) ; extern int _dos_loadonly (const char *, const void *, const void *) ; extern int _dos_lock ( int , int , int ) ; extern int _dos_makeassign (const char *, const char *, int ) ; extern int _dos_maketmp (const char *, int ) ; extern int _dos_memcpy (void *, void *, int ) ; extern int _dos_mfree (void *) ; extern int _dos_mkdir (const char *) ; extern int _dos_move (const char *, const char *) ; extern int _dos_nameck (const char *, struct _nameckbuf *) ; extern int _dos_namests (const char *, struct _namestbuf *) ; extern int _dos_newfile (const char *, dosmode_t) ; extern int _dos_nfiles (struct _filbuf *) ; extern int _dos_open (const char *, int ) ; extern int _dos_open_pr (const char *, int , int , int , int , int , struct _prcctrl *, long) ; extern int _dos_pathchk (const char *, const struct _comline *, const char *) ; extern int _dos_prnsns ( void ) ; extern int _dos_rassign (const char *) ; extern int _dos_read ( int , char *, int ) ; extern int _dos_rename (const char *, const char *) ; extern int _dos_rmdir (const char *) ; extern int _dos_s_mfree (void *) ; extern int _dos_s_process ( int , int , int , int ) ; extern int _dos_send_pr ( int , int , int , char *, long) ; extern int _dos_setblock (void *, int ) ; extern int _dos_setdate ( int ) ; extern int _dos_setenv (const char *, const char *, const char *) ; extern int _dos_settim2 ( int ) ; extern int _dos_settime ( int ) ; extern int _dos_sleep_pr (long) ; extern int _dos_super ( int ) ; extern int _dos_suspend_pr ( int ) ; extern int _dos_unlock ( int , int , int ) ; extern int _dos_verifyg ( void ) ; extern int _dos_wait ( void ) ; extern int _dos_write ( int , const char *, int ) ; extern long _dos_seek ( int , int , int ) ; extern long _dos_time_pr ( void ) ; extern struct _indos *_dos_indosflg ( void ) ; extern struct _psp *_dos_getpdb ( void ) ; extern struct _psp *_dos_setpdb (struct _psp *) ; extern union _fcb *_dos_getfcb (unsigned int ) ; extern void *_dos_intvcg ( int ) ; extern void *_dos_intvcs ( int , void *) ; extern void *_dos_malloc ( int ) ; extern void *_dos_malloc2 ( int , int ) ; extern void *_dos_s_malloc ( int , int ) ; extern void __volatile _dos_ctlabort ( void ) ; extern void __volatile _dos_errabort ( void ) ; extern void __volatile _dos_exit ( void ) ; extern void __volatile _dos_exit2 ( int ) ; extern void __volatile _dos_keeppr ( int , int ) ; extern void __volatile _dos_retshell ( void ) ; extern void _dos_allclose ( void ) ; extern void _dos_change_pr ( void ) ; extern void _dos_comout ( int ) ; extern void _dos_diskred (void *, int , int , int ) ; extern void _dos_diskred2 (void *, int , int , int ) ; extern void _dos_diskwrt (const void *, int , int , int ) ; extern void _dos_diskwrt2 (const void *, int , int , int ) ; extern void _dos_drvxchg ( int , int ) ; extern void _dos_fflush ( void ) ; extern void _dos_fnckeygt ( int , char *) ; extern void _dos_fnckeyst ( int , const char *) ; extern void _dos_fputc ( int , int ) ; extern void _dos_fputs (const char *, int ) ; extern void _dos_hendspic ( int ) ; extern void _dos_hendspmc ( void ) ; extern void _dos_hendspsc ( void ) ; extern void _dos_k_insmod ( int ) ; extern void _dos_print (const char *) ; extern void _dos_prnout ( int ) ; extern void _dos_pspset (struct _psp *) ; extern void _dos_putchar ( int ) ; extern void _dos_super_jsr (void (*) (), struct _dregs *, struct _dregs *) ; extern void _dos_verify ( int ) ; extern int *_dos_importlnenv ( void ) ; extern int _dos_lfiles (struct _filbuf *, const char *, int ) ; extern int _dos_link (const char *, const char *) ; extern int _dos_readlink (const char *, char *, int ) ; extern int _dos_symlink (const char *, const char *) ; extern int _dos_unlink (const char *) ; # 301 "A:\\GCC\\INCLUDE\\sys\\dos.h" 2 # 21 "A:\\GCC\\INCLUDE\\doslib.h" 2 # 1 "A:\\GCC\\INCLUDE\\sys\\scsi.h" 1 struct _readcap { unsigned int block; unsigned int size; }; struct _inquiry { unsigned char unit; unsigned char info; unsigned char ver; unsigned char reserve; unsigned char size; unsigned char buff[ 0 ]; }; extern int _scsi_cmdout ( int , const void *) ; extern int _scsi_datain ( int , void *) ; extern int _scsi_datain_p ( int , void *) ; extern int _scsi_dataout ( int , const void *) ; extern int _scsi_dataout_p ( int , const void *) ; extern int _scsi_format ( int , int ) ; extern int _scsi_inquiry ( int , int , struct _inquiry *) ; extern int _scsi_modeselect ( int , int , int , const void *) ; extern int _scsi_modesense ( int , int , int , void *) ; extern int _scsi_msgin (void *) ; extern int _scsi_msgout (const void *) ; extern int _scsi_pamedium ( int , int ) ; extern int _scsi_phase ( void ) ; extern int _scsi_read ( int , int , int , int , void *) ; extern int _scsi_readcap ( int , struct _readcap *) ; extern int _scsi_readext ( int , int , int , int , void *) ; extern int _scsi_reassign ( int , int , void *) ; extern int _scsi_request ( int , int , void *) ; extern int _scsi_rezerounit ( int ) ; extern int _scsi_seek ( int , int ) ; extern int _scsi_select ( int ) ; extern int _scsi_startstop ( int , int ) ; extern int _scsi_stsin (void *) ; extern int _scsi_testunit ( int ) ; extern int _scsi_write ( int , int , int , int , const void *) ; extern int _scsi_writeext ( int , int , int , int , const void *) ; extern void _scsi_reset ( void ) ; # 25 "A:\\GCC\\INCLUDE\\doslib.h" 2 struct FILBUF { unsigned char os[21]; unsigned char atr; unsigned short time; unsigned short date; unsigned int filelen; char name[23]; }; struct PDBADR { unsigned int env; unsigned int exit; unsigned int ctrlc; unsigned int errexit; unsigned int comline; unsigned char handle[12]; unsigned int bss; unsigned int heep; unsigned int stack; unsigned int usp; unsigned int ssp; unsigned short sr; unsigned short abort_sr; unsigned int abort_ssp; unsigned int trap10; unsigned int trap11; unsigned int trap12; unsigned int trap13; unsigned int trap14; unsigned int osflg; unsigned char reserve[28]; char exe_path[68]; char exe_name[24]; }; # 2 "BENTI/BENTI.C" 2 # 1 "A:\\GCC\\INCLUDE\\interrupt.h" 1 extern int intlevel ( int ) ; # 3 "BENTI/BENTI.C" 2 # 1 "BENTI\\..\\include\\key.h" 1 # 4 "BENTI/BENTI.C" 2 short cost[]={ 32,31,31,30,29,28,26,24,22,20,17,15,12,9,6,3,1 ,-3,-6,-9,-12,-15,-17,-20,-22,-24,-26,-28,-29,-30 ,-31,-31,-32,-31,-31,-30,-29,-28,-26,-24,-22,-20 ,-17,-15,-12,-9,-6,-3,1,3,6,9,12,15,17,20,22,24 ,26,28,29,30,31,31,1 }; short sint[]={ 1,-3,-6,-9,-12,-15,-17,-20,-22,-24,-26,-28,-29,-30,-31,-31,-32,-31,-31 ,-30,-29,-28,-26,-24,-22,-20,-17,-15,-12,-9,-6,-3,1,3,6,9,12 ,15,17,20,22,24,26,28,29,30,31,31,32,31 ,31,30,29,28,26,24,22,20,17,15,12,9,6,3,1 }; short *x; short *y; short *hx; short *hy; short *dx; short *dy; short gx[4]; short gy[4]; int i; volatile int vd_count=0; int roop_count=0; void vd_task(); main(argc,argv) int argc; char *argv[]; { int SSP; short *grp_add=(short*)0xE80018; short *sp_add =(short*)0xEB0000; short *work; int border; if(argc!=2){ printf("vO̎gԈĂ܂A_iI\n"); printf("‚ɂPAoblW̏풓A풓\n"); printf("{[_[wlw肷łI ȂӂɂˁI\n"); printf(" A:>benti.x 700\n"); printf("킩₵H AxAg\n"); printf("Ē킵ĂI I\n"); exit(); } border=atoi(argv[1]); _iocs_crtmod (16); _dos_c_curoff (); printf("<< ĂƁ`x`}[J >> Ver1.00 by.-= fsm =-\n"); printf(" ĂƁ`x`}[NeXgs܂B\n\n"); printf(" ͗ǂłH\n"); printf(" ~Ȃ獡̂I\n"); printf(" drbŋIɂoblW[hɂȂ邼I\n"); printf(" s`aŋIɃm[}[hɂȂ邼I\n\n"); _iocs_vdispst (vd_task,0,1); vd_count=0; while(1){ char keyin; keyin=key_get(); if(keyin== 0x01 ){ _iocs_vdispst (0,0,0); _dos_exit2 (1); } if(keyin== 0x10 ){ _iocs_vdispst (0,0,0); _dos_exit2 (0); } if(vd_count>10)break; } printf("JEg R\n"); vd_count=0; while(1){ char keyin; keyin=key_get(); if(keyin== 0x01 ){ _iocs_vdispst (0,0,0); _dos_exit2 (1); } if(keyin== 0x10 ){ _iocs_vdispst (0,0,0); _dos_exit2 (0); } if(vd_count>56)break; } printf("JEg Q\n"); vd_count=0; while(1){ char keyin; keyin=key_get(); if(keyin== 0x01 ){ _iocs_vdispst (0,0,0); _dos_exit2 (1); } if(keyin== 0x10 ){ _iocs_vdispst (0,0,0); _dos_exit2 (0); } if(vd_count>56)break; } printf("JEg P\n"); vd_count=0; while(1){ char keyin; keyin=key_get(); if(keyin== 0x01 ){ _iocs_vdispst (0,0,0); _dos_exit2 (1); } if(keyin== 0x10 ){ _iocs_vdispst (0,0,0); _dos_exit2 (0); } if(vd_count>56)break; } printf("fnII\n"); vd_count=0; while(1){ char keyin; keyin=key_get(); if(keyin== 0x01 ){ _iocs_vdispst (0,0,0); _dos_exit2 (1); } if(keyin== 0x10 ){ _iocs_vdispst (0,0,0); _dos_exit2 (0); } if(vd_count>56)break; } _iocs_vdispst (0,0,0); _iocs_crtmod (4); _iocs_g_clr_on (); _iocs_sp_init (); _iocs_sp_on (); _iocs_skey_mod (0,0,0); _dos_c_curoff (); superin:SSP= _dos_super (0); betaread("benti.sp ", ((short*)(0xEB8000+((0)*0x80))) ,fsize("benti.sp ")); betaread("benti.pal", ((short*)(0xE82200+((1)*0x20))) ,fsize("benti.pal")); superout: _dos_super (SSP); x =(short*)mcmalloc( 64 *2); y =(short*)mcmalloc( 64 *2); hx=(short*)mcmalloc( 64 *2); hy=(short*)mcmalloc( 64 *2); dx=(short*)mcmalloc( 64 *2); dy=(short*)mcmalloc( 64 *2); for(i=0;i< 64 ;i++){ x[i]=128; y[i]=128; hx[i]=128*32; hy[i]=128*32; dx[i]=cost[i&63]; dy[i]=sint[i&63]; } for(i=0;i<4;i++){ gx[i]=0; gy[i]=0; } for(i=0;i<32;i++){ struct _lineptr lp; _iocs_apage (0); lp.x1=i*32; lp.y1=0; lp.x2=i*32; lp.y2=511; lp.color=2; lp.linestyle=0xFFFF; _iocs_line (&lp); _iocs_apage (1); lp.x1=0; lp.y1=i*32; lp.x2=511; lp.y2=i*32; lp.color=4; lp.linestyle=0xFFFF; _iocs_line (&lp); _iocs_apage (2); lp.x1=0; lp.y1=(i*32); lp.x2=511; lp.y2=(i*32)-512; lp.color=6; lp.linestyle=0xFFFF; _iocs_line (&lp); _iocs_apage (3); lp.x1=i*32; lp.y1=0; lp.x2=(i*32)-512; lp.y2=511; lp.color=8; lp.linestyle=0xFFFF; _iocs_line (&lp); } _iocs_crtmod (0x106); superin2:SSP= _dos_super (0); _iocs_vdispst (vd_task,0,1); vd_count=0; while(1){ if(vd_count>10)break; } vd_count=0; while(1){ roop_count+=1; if(vd_count>56*5){ _iocs_vdispst (0,0,0); break; } gx[0]+=1; gy[0]+=1; gx[1]-=1; gy[1]-=1; gy[2]-=1; gy[3]+=1; gx[0]&=511; gy[0]&=511; gx[1]&=511; gy[1]&=511; gx[2]&=511; gy[2]&=511; gx[3]&=511; gy[3]&=511; for(i=0;i< 64 ;i++){ if(hx[i]+dx[i] > (240*32))dx[i]*=-1; if(hx[i]+dx[i] < ( 8*32))dx[i]*=-1; if(hy[i]+dy[i] > (240*32))dy[i]*=-1; if(hy[i]+dy[i] < ( 8*32))dy[i]*=-1; hx[i]+=dx[i]; hy[i]+=dy[i]; x[i]=hx[i]/32; y[i]=hy[i]/32; } work=grp_add; for(i=0;i<4;i++){ *work++=gx[i]; *work++=gy[i]; } work=sp_add; for(i=0;i< 64 ;i++){ *work++=x[i]+8; *work++=y[i]+8; *work++=256+1; *work++=3; } for(i= 64 ;i<128;i++){ *work++=0; *work++=0; *work++=0; *work++=3; } } superout2: _dos_super (SSP); _iocs_crtmod (16); _iocs_g_clr_on (); _dos_c_cls_al (); _iocs_skey_mod (-1,0,0); _dos_c_curon (); printf("ĂƁ`x`wF[%d]\n",roop_count); if(roop_count > border){ printf("Ȃ̃}V́A\ˁI\n"); printf("doblg܂I\n"); _iocs_vdispst (vd_task,0,1); vd_count=0; while(1){ if(vd_count>56*2)break; } _iocs_vdispst (0,0,0); _dos_exit2 (1); } else { printf("Ȃ̃}V́A\xˁI\n"); printf("doblgɂ͂Ƌꂵ̂\n"); printf("oblW̏풓͂ȂI\n"); _iocs_vdispst (vd_task,0,1); vd_count=0; while(1){ if(vd_count>56*2)break; } _iocs_vdispst (0,0,0); _dos_exit2 (0); } exit(); } void vd_task() { vd_count+=1; __builtin_saveregs () ; } ,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0xCF,0,1) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0xD0,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xD1,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0xD2,0,1) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0xD3,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0xD4,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0xD5,0,1) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0xD6,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0xD7,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0xD8,0,1) break; default: SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0xC0,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0xC1,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0xC0,0,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0xC2,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0xC3del /Y df2.x del /Y benti.x del /Y *.o del /Y scheduler.a del /Y *.BAK del /Y ETC\*.o del /Y ETC\*.BAK del /Y ETC\enesp.a del /Y ETC\espunit.a del /Y ETC\event.a del /Y ETC\exemove.a del /Y ETC\shotptn.a  8,col,0xC4,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0xC6,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0xC7,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0xC6,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0xC8,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0xC9,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0xC8,0,1) break; } } /*------------------ Gro\Enum25_c -------------*/ void enesp_rsRnum25_c(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=8; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x13,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x14,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=16; break; /*----------------------------------------------------------------------------*/ /* */ /* Mission Duel Fighter II */ /* ǂIII */ /* -= fsm =- */ /* */ /*----------------------------------------------------------------------------*/ #include #include #include "gtnlib.h" #include "structs.h" /* \̂ typedef */ #include "df2.h" #include "scheduler.h" #include "sepcm.h" #include "etc\\vdisp.h" #include "etc\\subs.h" #include "etc\\hit.h" volatile STICK_UNIT *STC1_IO; /* WCXeBbN */ #define ENE_MAX 20 /*--------------< vg^Cv錾 >---------------*/ void b_maker(); /* ubN[J[ */ void jiki_bmake(); /* Ƃ̂͑|B*/ void shot_bmake(); void sub_bmake(); void ene_bmake(); void eneshot_bmake(); void disp_bmake(); void triangle_bmake(); void hit_bmake(); void esp_bmake(); void zm_bmake(); void piece_bmake(); void exp_bmake(); static int unrsw; /* A]X */ static int piece; /* jЉ]X */ static int shotse; /* oJrd]X */ static int special; /* XyV[h */ static int scdisp; /* XRA̕\AȂ */ /*------------------------------------------------------------ _ ------*/ main(argc,argv) int argc; char *argv[]; { C_CUROFF(); comline(argc,argv); /* R}hC */ STC1_IO=(STICK_UNIT*)mcmalloc(sizeof(STICK_UNIT)); dummy_smm_in:SSP=SUPER(0); /* X[p[oCU[h */ b_maker(); /* ubN[J[ */ disp_cont->unrsw=unrsw; /* eXCb` */ disp_cont->keep_unrsw=unrsw; disp_cont->unred=0; piece_cont->piece=piece; shot_cont->shotse=shotse; all_cont->special=special; esp_cont->scdisp =scdisp; vd_wait=1; /* uchro֘A */ red=0; disp_cont->vd_mode=0; VDISPST(0,0,0); VDISPST(vd_task,0,1); CRTCRAS(0,0); /* X^[荞ݏ */ *ras_data->enable=ras_data->en_off; /* X^[XN[֎~ */ ras_data->r_sw=0; /* ݋֎~łEEE */ ras_data->r_on =0; /* MiV */ ras_data->r_off=0; scheduler(); /* XPW[Ƀf[^n */ dummy_smm_out:SUPER(SSP); /* [U[h */ VDISPST(0,0,0); CRTCRAS(0,0); exit(); } /*----------------------------------------------------- R}hC -----*/ void comline(argc,argv) int argc; char **argv; { int i,c; unrsw=1; /* KA[h̃ftHg */ piece=1; /* jЂ̃ftHg */ shotse=1; /* oJrd on/off ̃ftHg */ special=0; /* XyV[h̃XCb` */ scdisp=1; /* XRA\̃XCb` */ if(argc==1)return; /* w肳ĂȂ */ for(c=2;c<=argc;c++){ i=c-1; if((*argv[i]!='/')&&(*argv[i]!='-'))continue; /* IvVw肶Ȃ */ argv[i]++; /* IvVw蕶 */ if((*argv[i]=='V')||(*argv[i]=='v'))unrsw=0; /* KA[h */ if((*argv[i]=='P')||(*argv[i]=='p'))piece=0; /* jЂ */ if((*argv[i]=='S')||(*argv[i]=='s'))shotse=0; /* oJrd */ if((*argv[i]=='D')||(*argv[i]=='d'))special=1; /* XyV[hɂ */ if((*argv[i]=='T')||(*argv[i]=='t'))scdisp=0; /* XRA\֎~ */ } } /*----------------------------------------------- ubN[J[ -----------*/ void b_maker() { /*----------< eubN̏ >--------------*/ triangle_bmake(); jiki_bmake(); shot_bmake(); sub_bmake(); disp_bmake(); ene_bmake(); eneshot_bmake(); hit_bmake(); esp_bmake(); zm_bmake(); piece_bmake(); exp_bmake(); /*-----------< I[\̂ɃN >----------------*/ all_cont=(ALL_CONT*)mcmalloc(sizeof(ALL_CONT)); all_cont->stage=1; if(special)all_cont->cont_max=7; else all_cont->cont_max=1; all_cont->cont_stage=1; all_cont->jiki_cont=jiki_cont; all_cont->shot_cont=shot_cont; all_cont->sub_cont=sub_cont; all_cont->ene_cont=ene_cont; all_cont->eneshot_cont=eneshot_cont; all_cont->disp_cont=disp_cont; all_cont->hit_cont=hit_cont; all_cont->esp_cont=esp_cont; all_cont->zm_cont=zm_cont; all_cont->piece_cont=piece_cont; all_cont->exp_cont=exp_cont; } /*---------------------- |Tu[`ǂ --------------------------*/ void jiki_bmake() /*-----------< @L֘A >-------------*/ { int i; jiki_cont=(JIKI_CONT*)mcmalloc(sizeof(JIKI_CONT)); /* @\̗p̃obt@쐬 */ jiki_cont->jiki_data=(JIKI_DATA*)mcmalloc(sizeof(JIKI_DATA)); /* @ް\̗p̃obt@쐬 */ jiki_data=jiki_cont->jiki_data; /* c`oɃN */ jiki_cont->init_left=3; /* ŏ̎c@ */ jiki_cont->jiki_data->sp_ptn=(short*)mcmalloc(fsize("sprite\\jiki.sp")); /* @rop^[ */ Wbetaread("sprite\\jiki.sp",jiki_cont->jiki_data->sp_ptn,fsize("sprite\\jiki.sp")); /* ǂ */ } void shot_bmake() /*-----------< @e֘A >-------------*/ { int i; shot_cont=(SHOT_CONT*)mcmalloc(sizeof(SHOT_CONT)); /* \̗p̃obt@쐬 */ shot_cont->shot_max=12; /* f[^\̂̐:16=I16 */ shot_cont->shot_data=(SHOT_DATA**)mcmalloc(4*shot_cont->shot_max); /* |C^z쐬 */ shot_data=shot_cont->shot_data; /* c`oɃN */ for(i=0;ishot_max;i++){ /* ް\̗p̃obt@쐬 */ shot_cont->shot_data[i]=(SHOT_DATA*)mcmalloc(sizeof(SHOT_DATA)); } shot_cont->insite=(int*)mcmalloc(4*ENE_MAX); /* |C^z쐬 */ shot_cont->target_x=(short*)mcmalloc(2*ENE_MAX); shot_cont->target_y=(short*)mcmalloc(2*ENE_MAX); } void sub_bmake() /*-----------< TuVbg֘A >-------------*/ { int i; sub_cont=(SUB_CONT*)mcmalloc(sizeof(SUB_CONT)); /* \̗p̃obt@쐬 */ ALLOCREAD("sprite\\blade.sp",sub_cont->blade_sp); /* u[ĥrop^[ */ sub_cont->add_data.add_rx=0; /* ljŮ֘ */ sub_cont->add_data.add_ry=-36; sub_cont->add_data.add_dx=16; sub_cont->add_data.add_dy=8; sub_cont->add_data.power=4; } void disp_bmake() /*-----------< ʊ֘A >-------------*/ { int i; disp_cont=(DISP_CONT*)mcmalloc(sizeof(DISP_CONT)); /* ʐ\̗p̃obt@쐬 */ /* OtBbN̊֘ */ disp_cont->grp_data=(GRP_DATA*)mcmalloc(sizeof(GRP_DATA)); /* GRPް\̗p̃obt@쐬 */ grp_data=disp_cont->grp_data; /* c`oɃN */ disp_cont->grp_data->fade=0; /* vZbgl(^^; */ disp_cont->grp_data->send_palet=0; /* XvCg̊֘ */ disp_cont-> sp_data=( SP_DATA*)mcmalloc(sizeof( SP_DATA)); /* SPް\̗p̃obt@쐬 */ sp_data=disp_cont->sp_data; /* c`oɃN */ sp_data->sp_table=(SP_UNIT*)mcmalloc(1024*sizeof(SP_UNIT)); /* roe[ũobt@m */ sp_data->sp_table_init=sp_data->sp_table; sp_data->sp_table_max=sp_data->sp_table+128; /* ܂ŗƃI[o[ */ for(i=0;i<16;i++){ disp_cont-> sp_data->fade[i]=0; /* vZbgl(^^; */ disp_cont-> sp_data->send_palet[i]=0; } for(i=0;i<128;i++){ /* l(^^; */ disp_cont->sp_data->sp_table[i].x =0; disp_cont->sp_data->sp_table[i].y =0; disp_cont->sp_data->sp_table[i].code.mixed=0; disp_cont->sp_data->sp_table[i].prw =3; } /* af̊֘ */ disp_cont-> bg_data=( BG_DATA*)mcmalloc(sizeof( BG_DATA)); /* BGް\̗p̃obt@쐬 */ bg_data=disp_cont->bg_data; /* c`oɃN */ (short*)disp_cont-> bg_data->bg_control=(short*)0xEB0808; bg_data->bg1x=(short*)0xEB0804; /* XN[WX^ */ bg_data->bg1y=(short*)0xEB0806; /* X^[XN[̊֘ */ disp_cont->ras_data=(RAS_DATA*)mcmalloc(sizeof(RAS_DATA)); /* RASް\̗p̃obt@쐬 */ ras_data=disp_cont->ras_data; /* c`oɃN */ ras_data->start_raster=40; ras_data->end_raster =540; /* {ATST */ ras_data->e8=ras_data->start_raster; /* dWOOPQ̒l */ ras_data->r_on=0; /* nmM */ ras_data->r_off=0; /* neeM */ ras_data->r_sw=0; /* Xe[^X */ ras_data->enable=(short*)0xE88006; /* Cl[uWX^ */ ras_data->en_on =0b1111_1111_0111_1000; /* nm̃f[^ */ ras_data->en_off=0b1111_1111_0011_1000; /* neẽf[^ */ for(i=0;i<64;i++){ /* ꉞA */ ras_data->r_array_x[0][i]=0; ras_data->r_array_y[0][i]=0; ras_data->r_array_x[1][i]=0; ras_data->r_array_y[1][i]=0; } /* sws̊֘ */ disp_cont->txt_data=(TXT_DATA*)mcmalloc(sizeof(TXT_DATA)); /* TXTް\̗p̃obt@쐬 */ txt_data=disp_cont->txt_data; /* c`oɃN */ (short*)disp_cont->txt_data->crtcreg=(short*)0xE82600; txt_data->txt_on =0; txt_data->txt_off=0; txt_data->txt_sw=0; } void triangle_bmake() /*-----------< Op֐֘A >-------------*/ { int i; short costt[]={ /* RTCe[u */ 32,31,31,30,29,28,26,24,22,20,17,15,12,9,6,3,0 ,-3,-6,-9,-12,-15,-17,-20,-22,-24,-26,-28,-29,-30 ,-31,-31,-32,-31,-31,-30,-29,-28,-26,-24,-22,-20 ,-17,-15,-12,-9,-6,-3,0,3,6,9,12,15,17,20,22,24 ,26,28,29,30,31,31,0 }; short sintt[]={ /* TCe[u */ 0,-3,-6,-9,-12,-15,-17,-20,-22,-24,-26,-28,-29,-30,-31,-31,-32,-31,-31 ,-30,-29,-28,-26,-24,-22,-20,-17,-15,-12,-9,-6,-3,0,3,6,9,12 ,15,17,20,22,24,26,28,29,30,31,31,32,31 ,31,30,29,28,26,24,22,20,17,15,12,9,6,3,0 }; short acostt[]={ /* A[NRTCe[u */ 100, 92, 89, 86, 84, 82, 80, 78, 77, 75, 74, 73, 71, 70, 69, 68 , 67, 65, 64, 63, 62, 61, 60, 59, 58, 57, 56, 55, 54, 53, 52, 51 , 50, 49, 48, 47, 46, 45, 44, 43, 42, 41, 40, 39, 37, 36, 35, 34 , 33, 32, 31, 29, 28, 27, 26, 24, 23, 21, 19, 18, 16, 13, 11, 8 , 0 }; for(i=0;i<65;i++)cost[i]=costt[i]; for(i=0;i<65;i++)acost[i]=acostt[i]; for(i=0;i<65;i++)sint[i]=sintt[i]; srand(12345); /* ɃV[h^ */ for(i=0;i<1024;i++)vrand_array[i]=(unsigned int)rand(); /* ^z쐬 */ vrand_count=0; /* zYJE^ */ } void ene_bmake() /*-----------< G֘A >-------------*/ { int i; ene_cont=(ENE_CONT*)mcmalloc(sizeof(ENE_CONT)); /* \̗p̃obt@쐬 */ ene_cont->ene_max=ENE_MAX; /* f[^\̂̐:16=I16 */ ene_cont->ene_data=(ENE_DATA**)mcmalloc(4*ene_cont->ene_max); /* |C^z쐬 */ ene_data=ene_cont->ene_data; /* c`oɃN */ for(i=0;iene_max;i++){ /* ް\̗p̃obt@쐬 */ ene_cont->ene_data[i]=(ENE_DATA*)mcmalloc(sizeof(ENE_DATA)); ene_cont->ene_data[i]->type =-1; ene_cont->ene_data[i]->count= 0; } ene_cont->ene_map=(ENE_MAP*)mcmalloc(sizeof(ENE_MAP)); /* Gzu}bv\ */ ene_cont->enemove=(ENEMOVE*)mcmalloc(sizeof(ENEMOVE)); /* ˂ށ`ԃf[^\ */ ene_map=ene_cont->ene_map; /* c`oɃN */ enemove=ene_cont->enemove; /* c`oɃN */ /* ˂ށ`ԗpobt@m */ ene_cont->enemove->type_max =70; /* G̎ނ̐B50:G50 */ ene_cont->enemove->count_max=512; /* őR}(endcode܂) */ ene_cont->enemove->dx=(short**)mcmalloc(ene_cont->enemove->type_max*4); ene_cont->enemove->dy=(short**)mcmalloc(ene_cont->enemove->type_max*4); ene_cont->enemove->atr=(char**)mcmalloc(ene_cont->enemove->type_max*4); ene_cont->enemove->buff=(short*)mcmalloc(enemove->count_max * enemove->type_max * 5); /* f[^i[ */ } void eneshot_bmake() /*-----------< Ge֘A >-------------*/ { int i; eneshot_cont=(ENESHOT_CONT*)mcmalloc(sizeof(ENESHOT_CONT)); /* \̗p̃obt@쐬 */ eneshot_cont->eneshot_max=20; /* f[^\̂̐:16=I16 */ eneshot_cont->eneshot_data=(ENESHOT_DATA**)mcmalloc(4*eneshot_cont->eneshot_max); /* |C^z쐬 */ eneshot_data=eneshot_cont->eneshot_data; /* c`oɃN */ for(i=0;ieneshot_max;i++){ /* ް\̗p̃obt@쐬 */ eneshot_cont->eneshot_data[i]=(ENESHOT_DATA*)mcmalloc(sizeof(ENESHOT_DATA)); eneshot_cont->eneshot_data[i]->type =-1; eneshot_cont->eneshot_data[i]->count= 0; } } void esp_bmake() /*-----------< dro֘A >-------------*/ { int i; esp_cont=(ESP_CONT*)mcmalloc(sizeof(ESP_CONT)); /* \̗p̃obt@쐬 */ esp_cont->espunit_max=10; /* ő吔 */ /* \̃obt@m */ esp_cont->espunit_data=(ESPUNIT_DATA**)mcmalloc(4*esp_cont->espunit_max); espunit_data=esp_cont->espunit_data; /* c`oɃN */ for(i=0;iespunit_max;i++){ espunit_data[i]=(ESPUNIT_DATA*)mcmalloc(sizeof(ESPUNIT_DATA)); } esp_cont->espunit_max=5; /* T‚W. ɒ߂ĎgꍇɁAIɐݒ肷 */ Wbetaread("sprite\\shield1.pal",esp_cont->s_palet[0],fsize("sprite\\shield1.pal")); /* ǂ */ Wbetaread("sprite\\shield2.pal",esp_cont->s_palet[1],fsize("sprite\\shield2.pal")); Wbetaread("sprite\\shield3.pal",esp_cont->s_palet[2],fsize("sprite\\shield3.pal")); } void hit_bmake() /*-----------< 蔻֘A >-------------*/ { int i,c; hit_cont=(HIT_CONT*)mcmalloc(sizeof(HIT_CONT)); /* \̗p̃obt@쐬 */ for(i=0;i<8;i++){ for(c=0;c<8;c++){ hit_cont->ene_field[i][c]=(int*)mcmalloc(4*(ene_cont->ene_max+1)); /* obt@m */ *hit_cont->ene_field[i][c]=-1; /* 擪 */ hit_cont->ene_field_init[i][c]=hit_cont->ene_field[i][c]; /* ʒu */ } } hit_cont->earea_bx=(short*)mcmalloc(2*(ene_cont->enemove->type_max+10)); /* ܂ubN(VOp^[Ԃ) */ hit_cont->earea_by=(short*)mcmalloc(2*(ene_cont->enemove->type_max+10)); for(i=0;i<(ene_cont->enemove->type_max+10);i++){ hit_cont->earea_bx[i]=0; /* iKvłj */ hit_cont->earea_by[i]=0; } } void zm_bmake() /*-----------< y|ltrhb֘A >-------------*/ { char *zfn[]={ "bgm\\bgm_boss.zmd" ,0 }; /* ylc̃t@Cl[ 0 ŃPc */ char *pfn[]={ "sepcm\\bl1_2.pcm","sepcm\\bl2_1.pcm","sepcm\\exp2.pcm","sepcm\\expc.pcm","sepcm\\zbomb3.pcm" ,"sepcm\\zbomb4.pcm","sepcm\\bexpd.pcm","sepcm\\bomb1.pcm","sepcm\\bomb5.pcm","sepcm\\bombb.pcm" ,"sepcm\\laser.pcm","sepcm\\pause2.pcm","sepcm\\action.pcm","sepcm\\action2.pcm","sepcm\\appear4.pcm" ,"sepcm\\fmove1.pcm","sepcm\\fmove2.pcm","sepcm\\fmove3.pcm","sepcm\\setup.pcm","sepcm\\shot.pcm" ,"sepcm\\sstart2.pcm","sepcm\\fret.pcm","sepcm\\main1.pcm","sepcm\\blade5.pcm","sepcm\\hit1.pcm" ,"sepcm\\hit2.pcm","sepcm\\damage.pcm","sepcm\\add1.pcm","sepcm\\click01.pcm","sepcm\\click02.pcm" ,"sepcm\\click03.pcm","sepcm\\click04.pcm","sepcm\\click05.pcm","sepcm\\click06.pcm","sepcm\\click07.pcm" ,"sepcm\\click08.pcm","sepcm\\click09.pcm","sepcm\\click10.pcm","sepcm\\click11.pcm","sepcm\\decide.pcm" ,"sepcm\\display.pcm","sepcm\\lock.pcm","sepcm\\target.pcm","sepcm\\warning1.pcm","sepcm\\warning2.pcm" ,"sepcm\\noise.pcm","sepcm\\jikibomb.pcm","sepcm\\blade4.pcm","sepcm\\edamage.pcm","sepcm\\st3bossblade.pcm" ,"sepcm\\st5bosswarp.pcm","sepcm\\st5warpin.pcm","sepcm\\st5warpout.pcm" ,0 }; /* obl̃t@Cl[ 0 ŃPc */ int size; int i; if(zm_sdinit()){ printf("y|ltrhb풓Ă܂\n"); VDISPST(0,0,0); exit(); } zm_cont=(ZM_CONT*)mcmalloc(sizeof(ZM_CONT)); /* \̗p̃obt@쐬 */ zm_cont->zm_data=(ZM_DATA*)mcmalloc(sizeof(ZM_DATA)); /* |C^z쐬 */ zm_data=zm_cont->zm_data; /* c`oɃN */ /* Œf[^ǂł܂ */ /* afl */ zm_cont->zm_data->zmd=(char**)mcmalloc(4*20); /* őQOȂԂ̃obt@ */ for(i=0;i<20;i++){ if(zfn[i]==0)break; /* ǂݏIH */ size=fsize(zfn[i]); zm_cont->zm_data->zmd[i]=(char*)mcmalloc(size); /* obt@m */ betaread(zfn[i],zm_cont->zm_data->zmd[i],size); /* f[^ǂݍ */ } /* [9]܂ł͌Œf[^ */ /* obl */ zm_cont->zm_data->pcm=(char**)mcmalloc(4*SE_PCMMAX); /* ő100oblԂ̃obt@ */ zm_cont->zm_data->pcmsize=(int*)mcmalloc(4*SE_PCMMAX); /* TCYi[ */ for(i=0;izm_data->pcmsize[i]=size; /* TCYi[ */ zm_cont->zm_data->pcm[i]=(char*)mcmalloc(size); /* obt@m */ betaread(pfn[i],zm_cont->zm_data->pcm[i],size); /* f[^ǂݍ */ } /* [79]܂ł͌Œf[^ */ } void piece_bmake() /*-----------< jЊ֘A >-------------*/ { int i,c; piece_cont=(PIECE_CONT*)mcmalloc(sizeof(PIECE_CONT)); /* \̗p̃obt@쐬 */ piece_cont->piece_max=30; /* ő吔 */ /* \̃obt@m */ piece_cont->piece_data=(PIECE_DATA**)mcmalloc(4*piece_cont->piece_max); piece_data=piece_cont->piece_data; /* c`oɃN */ for(i=0;ipiece_max;i++){ piece_data[i]=(PIECE_DATA*)mcmalloc(sizeof(PIECE_DATA)); } } void exp_bmake() /*-----------< ֘A >-------------*/ { int i,c; exp_cont=(EXP_CONT*)mcmalloc(sizeof(EXP_CONT)); /* \̗p̃obt@쐬 */ exp_cont->exp_max=20; /* ő吔 */ /* \̃obt@m */ exp_cont->exp_data=(EXP_DATA**)mcmalloc(4*exp_cont->exp_max); exp_data=exp_cont->exp_data; /* c`oɃN */ for(i=0;iexp_max;i++){ exp_data[i]=(EXP_DATA*)mcmalloc(sizeof(EXP_DATA)); } } +32,ene_data->y+16,col,TOP_BODY2+0x1F,0,0) SP_DATAST(ene_data->x+32,ene_data->y+32,col,TOP_BODY2+0x20,0,0) SP_DATAST(ene_data->x+32,ene_data->y+48,col,TOP_BODY2+0x21,0,0) } /*------------------ Gro\ErsRbossbody attribute 4 -------------*/ void body4(ene_data) ENE_DATA *ene_data; { static short col; static int i; if(ene_data->flash)col=15; else col=4; SP_DATAST(ene_data->x+48,ene_data->y-32,col,TOP_BODY+0x12,0,1) SP_DATAST(ene_data->x+32,ene_/*--------------------------< vg^Cv >------------------------------*/ void comline(int,char**); /* R}hC */ /*-----------------< 錾 >---------------------*/ int SSP; /* rroێ */ 0,1) SP_DATAST(ene_data->x+32,ene_data->y ,col,TOP_BODY+0x17,0,1) SP_DATAST(ene_data->x+32,ene_data->y+16,col,TOP_BODY+0x18,0,1) SP_DATAST(ene_data->x+32,ene_data->y+32,col,TOP_BODY+0x19,0,1) SP_DATAST(ene_data->x+32,ene_data->y+48,col,TOP_BODY+0x1A,0,1) SP_DATAST(ene_data->x+16,ene_data->y-40,col,TOP_BODY+0x1B,0,1) SP_DATAST(ene_data->x ,ene_data->y-40,col,TOP_BODY+0x1C,0,1) SP_DATAST(ene_data->x+16,ene_data->y-24,col,TOP_BODY+0x1D,0,1) SP_DATAST(ene_data->x ,ene_data->y-24,col,TOP_BODY+0x1E,0,1) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,TOP_BODY+0x1F,0,1) SP_DATAST(ene_data->x ,ene_data->y- 8,col,TOP_BODY+0x20,0,1) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,TOP_BODY+0x21,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,TOP_BODY+0x22,0,1#include #include #include "INCLUDE/key.h" #include "gtnlib.h" #include "structs.h" /* A‚͊{ */ #include "sepcm.h" #include "df2.h" #include "df2_main.h" #include "etc\\jiki.h" #include "etc\\shot.h" #include "etc\\sub.h" #include "etc\\event1.h" #include "etc\\event2.h" #include "etc\\event3.h" #include "etc\\event4.h" #include "etc\\event5.h" #include "etc\\event6.h" #include "etc\\evento.h" #include "etc\\grp.h" #include "etc\\bg.h" #include "etc\\ene.h" #include "etc\\disp.h" #include "etc\\vdisp.h" #include "etc\\hit.h" #include "etc\\piece.h" #include "etc\\exp.h" static void top_init(); /* [v擪ōsQ */ extern void raster(); extern void trans_bg(); extern volatile STICK_UNIT *STC1_IO; /* WCXeBbN */ /*--------------< C >---------------*/ void df2_main() { int i; static char keyin; disp_cont->vd_mode=1; /* VD荞݂̓w */ while(1){ STC1_IO->mixed=*((char*)0xE9A001); /* WCXeBbN */ top_init(); /* [v擪ł̏Q */ bg_count(); /* afJE^֘A */ /* afJE^Ɋ֌Ŵ */ /* ɏˁ */ all_cont->eventer(); /* ܂Cx^Ɍ݂̃Cxg󋵂₢킹 */ if(all_cont->stage_end){ /* Xe[WI */ disp_cont->vd_mode=0; return; } if(all_cont->all_clear){ /* I[NAI */ disp_cont->vd_mode=0; return; } jiki(); /* @[`ɐ\̂^ăR[ */ ene(); /* GR[ */ shot(); /* @eR[ */ sub(); /* TuVbgR[ */ eneshot(); /* Ge[`R[ */ hit(); /* 蔻 */ grp(); /* OtBbN */ bg(); /* afʂ̍WvZ */ exp(); /* */ esp(); /* dffectro */ if(piece_cont->piece)piece(); /* j */ disp(); /* \ */ keyin=key_get(); if(keyin==KCODE_ESC){ /* |[Y */ se_adpcm1(zm_data->pcm[SE_PAUSE],zm_data->pcmsize[SE_PAUSE],SEPRW_PAUSE); while(1){ keyin=key_get(); if(keyin==KCODE_ESC){ se_adpcm1(zm_data->pcm[SE_PAUSE],zm_data->pcmsize[SE_PAUSE],SEPRW_PAUSE); break; } } } if(all_cont->special){ switch(keyin){ case KCODE_HELP: /* HELP Ŕ */ dummy_smm_out2: SUPER(SSP); VDISPST(0,0,0); CRTCRAS(0,0); exit(); break; case KCODE_TAB: /* s`aŋSTAGENA */ z_stop(0,0,0); /* afl~ */ all_cont->stage_end=1; break; } } } disp_cont->vd_mode=0; } /*--------------< Q[I[o[̂Ƃ >---------------*/ void g_over() { int i; VD_MACRO /* uc҂ */ CRTCRAS(0,0); /* X^荞݉ */ C_CLS_AL(); G_CLR_ON(); /* ʏ */ for(i=0;i<128;i++)SP_REGST(i,-1,0,0,0,3); bg_data->bg_control->bit.bg1_on_off=0; /* af */ SP_ON(); *((short*)0xE8E000)=15; /* RgXgA... */ for(i=0;i<80;i++){VD_MACRO} /* RgXg߂̂҂ƒA}B */ Wbetaread("sprite\\gameover.sp" ,SP_DEF_ADD(0x01),fsize("sprite\\gameover.sp" )); Wbetaread("sprite\\gameover.pal",SP_PAL_ADD(0x01),fsize("sprite\\gameover.pal")); VD_MACRO for(i=0;i<200;i++){ /* f`ldnudq */ STC1_IO->mixed=*((char*)0xE9A001); /* WCXeBbN */ if(STC1_IO->data.trg!=3)break; VD_MACRO SP_REGST(0,-1,128-16,128 ,(256*1)+1,3); SP_REGST(1,-1,128 ,128 ,(256*1)+2,3); SP_REGST(2,-1,128+16,128 ,(256*1)+3,3); SP_REGST(3,-1,128+32,128 ,(256*1)+4,3); SP_REGST(4,-1,128-16,128+16,(256*1)+5,3); SP_REGST(5,-1,128 ,128+16,(256*1)+6,3); SP_REGST(6,-1,128+16,128+16,(256*1)+7,3); SP_REGST(7,-1,128+32,128+16,(256*1)+8,3); } *((short*)0xE8E000)=0; /* RgXgƂ */ for(i=0;i<80;i++){VD_MACRO} /* RgXĝ҂ */ G_CLR_ON(); /* ʏ */ C_CLS_AL(); *((short*)0xE8E000)=15; /* RgXgA... */ for(i=0;i<80;i++){VD_MACRO} /* RgXg߂̂҂ƒA}B */ return; } /*---------------------------------------- [v擪̏Q ----*/ static void top_init() { static int i,c; sp_data->sp_table=sp_data->sp_table_init; /* roANZXv[ */ ene_appear(-1.0,0,0,0,0,0); /* GĹuxƌȂ|C^v */ eneshot_appear(-1,0,0,0,0,0,0,0); /* GeuxƌȂ|C^ */ if(piece_cont->piece)piece_appear(0,0,0,-1); /* jЁEEEȉ */ exp_appear(0,0,0,0,-1); /* EEEȉ */ for(i=0;i<8;i++){ /* Gl~[tB[h */ for(c=0;c<8;c++){ hit_cont->ene_field[i][c]=hit_cont->ene_field_init[i][c]; *hit_cont->ene_field[i][c]=-1; } } } 8,ene_data->y+16,col,TOP_ARM+5,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+32,col,TOP_ARM+6,0,1) SP_DATAST(ene_data->x ,ene_data->y+48,col,TOP_ARM+7,0,1) } /*------------------ Gro\ErsRbossman_l -------------*/ void enesp_rsRbossman_l(ene_data) ENE_DATA *ene_data; { static short col; static int/*-------------------< vg^Cv錾 >------------------*/ void df2_main(); /* C */ void g_over(); /* Q[I[o[̂Ƃ */ AN+1,0,0) } /*------------------ Gro\ErsRbossman_r -------------*/ void enesp_rsRbossman_r(ene_data) ENE_DATA *ene_data; { static short col; static int i; if(ene_data->flash)col=15; else col=6; SP_DATAST(ene_data->x+ 8,ene_data->y ,col,TOP_MAN+0,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,TOP_MAN+1,0,1) } /*------------------ Gro\ErsRlaser -------------*/ void enesp_rsRlaser(ene_data) ENE_DATA *ene_data; { static short col; static short y; static short temp_x,temp_y; temp_x=rnd2(); temp_y=rnd2(); col=0x0C; switch(ene_data->anim3){ case 0: SP_DATAST(ene_data->x+8+temp_x,ene_data->y+8+temp_y,col,0xF8+((ene_data->count>>2)&1),0,0) break; case 1: y=ene_data->y+8; SP_DATAST(ene_data->x+8+temp_x,y+8+temp_y,col,0xFA,0,0) while(1){ y+=16; SP_DATAST(ene_data- -- c eQ -- \[X Presented by.TeamȂ 1996,97 With DoGA CGA SYSTEM ̃A[JCúAc eQ̃\[XłB df2.x 쐬邽߂́ASẴ\[Xt@C܂ł܂B st@Cf[^QCXg[fBNg̏ d˂悤ɂāAWJĂB J̃fxbp[ }Vł́At@C̔zuČł܂B ̃A[JCúAceQ̎st@C̃Zbg DF2_X1.LZH DF2_X2.LZH DF2_X3.LZH DF2_X4.LZH ƓɃAbv邱ƂƂāA]ډ‚Ƃ܂B ҂ւ̘ÁAɕKv܂B 1997.08.06 TeamȂ -= fsm =- as 㓡 G >status>>1)&1)),0,0) } if(ene_data->hdy!=0){ i=ene_data->hdy-1; SP_DATAST(ene_data->x+8,ene_data->y+8+8+(16*i),col,0xF3+(2*((disp_cont->status>>1)&1)),0,0) } } X68>GAME>c eQ \[X =================================================================== y ^Cg zc eQ \[X y t@C zDF2_SRC.LZH y zTeamȂ y ]ڎ z y JeS zcXN[^V[eBOQ[ y ‹ zX680x0 + Human68k y ]ڂ̉” z =================================================================== y l z -- c eQ -- \[X Presented by.TeamȂ 1996,97 With DoGA CGA SYSTEM ̃A[JCúAc eQ̃\[XłB df2.x 쐬邽߂́ASẴ\[Xt@C܂ł܂B Q[s邾ȂÃA[JCu͕Kv܂B st@Cf[^QCXg[fBNg̏ d˂悤ɂāAWJĂB J̃fxbp[ }Vł́At@C̔zuČł܂B 1997.08.06 TeamȂ -= fsm =- as 㓡 G A*); void enesp_rsRblade(ENE_DATA*); . =WH.. =WG C ƶ"Ix G H Z2"LeISP C ]#MISP H !peNDING C 73Wq8NDING H )!VNE C }#[NE H 2$!NESHOT C rK""9NESHOT H k!!NESP_SEC TAH2WۦNESP_SEH TAVy#.NESP_SEC TB"(NESP_SEH TB"WNESP_SEC TCy#NESP_SEH TCy#?TNESP_SEC TD!z#AdNESP_SEH TD!z#w NESP_SEC TEFz#yNESP_SEH TE;z#NESP_SEC TFiz#NESP_SEH TFSz#tSP C #%SP H 窿"SPUNIT1C ݑ#lSPUNIT1H 6~#SPUNIT2C #ISPUNIT2H #""rSPUNIT3C ##&KSPUNIT3H c~#6#include #include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "bg.h" /*--------------< afJE^[` >---------------*/ void bg_count() /* afJE^̂ */ { static int i; /* t[܂̏ */ bg_data->bg_y =bg_data->bg_ny; /* ̃t[́ÄʒuB */ bg_data->bg_ny+=bg_data->bg_dy; /* ̃t[́ÄʒuցB */ } /*--------------< af[` >---------------*/ void bg() { /* afʂ̂ */ static short old_y; static short *bgdef; static int i; /* XN[܂̏ */ old_y=bg_data->hy1; /* Pt[Ԃ̂xWۑ */ if(bg_data->accel1){ bg_data->dy1-=bg_data->accel1; /* I */ if(bg_data->dy1 <= bg_data->target_spd1){ /* I */ bg_data->dy1=bg_data->target_spd1; bg_data->accel1=0; /* I聙 */ } } if(bg_data->reduspd1){ bg_data->dy1+=bg_data->reduspd1; /* I */ if(bg_data->dy1 >= bg_data->target_spd1){ /* I */ bg_data->dy1=bg_data->target_spd1; bg_data->reduspd1=0; /* I聙 */ } } bg_data->hx1+=bg_data->dx1; /* WύX */ bg_data->hy1+=bg_data->dy1; bg_data->x1 =bg_data->hx1/32; bg_data->y1 =bg_data->hy1/32; //C_LOCATE(0,4); //printf("old_y=%6d : hy=%6d\n",old_y,bg_data->hy1); //printf("seg=%6d\n",bg_data->seg1); if(bg_data->seg1!=-1){ /* W؂ւtbOEEE */ if((old_y>=32*bg_data->seg1)&&(bg_data->hy1<32*bg_data->seg1)){ /* ̏uԂɏI */ bg_data->seg1=-1; bg_data->x1+=256; /* WX */ bg_data->hx1+=256*32; switch(bg_data->segoff1){ /* Xɉʏ */ case 1: /* ʏ */ bg_data->bg_onoff=0; bg_data->send_onoff=1; break; case 2: /* rsSł́AafGA㕔fqo */ bg_data->x1-=256; /* WXLZ(^^; */ bg_data->hx1-=256*32; txt_data->x = 256; /* sws̍WXiafswsɈڂe(^^;j */ grp_data->dy0=-32; /* fqo */ bgdef=SP_DEF_ADD(0xC0); /* |C^킹 */ for(i=0;i<64*32;i++)*bgdef++=0; /* G */ bg_data->seg1=0; bg_data->segoff1=1; break; } } } bg_data->hx1&=16383; bg_data->hy1&=16383; bg_data->x1&=511; bg_data->y1&=511; } 8,col,0x35,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x36,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0x37,0,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0x38,0,0) SP_DATAST(ene_data->x-24,ene_data->y+24,col,0x39,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0x3A,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x3B,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0x3C,0,0) SP_DATAST(ene_data->x+40,ene_data->y+24,col,0x3D,0,0) SP_DATAST(ene_data->x-24,ene_data->y+40,col,0x3E,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0x3F,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0x40,0,0) /*---------------------< vg^Cv錾 >-----------------------*/ void bg_count(); void bg(); l,0x42,0,0) break; } } /*------------------ Gro\ErsSrivEsc -------------*/ void enesp_rsSrivEsc(ene_data) ENE_DATA *ene_data; /* type `FW̕p */ { /* Pt[ anim3=0 ɂȂĂ܂ */ static int i; /* ̕\̃`‚}邽߂̋̍ */ static short col; if(ene_data->flash)col=15; else col=6+(2*(disp_cont->status&1)); //if(keyin==KCODE_U)ene_data->anim3+=1; //if(keyin==KCODE_D)ene_data->anim3-=1; if(ene_data->anim3<0)ene_data->anim3=0; /* ꉞ̕ی@\ */ if(ene_data->anim3>45)ene_data->anim3=45; if(ene_data->count==0){ /* ŏ̃t[EEE */ if(ene_data->setdir[4])ene_data->anim3=7; else ene_data->anim3=2; } /* {̕\ */ switch((disp_cont->status)&1){ case 0: dmacpy((unsigned short*)(&(sp_data->transsp.tsp_buff[7][5*5*0x40*ene_data->anim3])),(unsigned short*)SP_D#include #include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "enesp_seta.h" #include "enesp_setb.h" #include "enesp_setc.h" #include "enesp_setd.h" #include "enesp_sete.h" #include "enesp_setf.h" #include "disp.h" #include "vdisp.h" #include "subs.h" #include "shotsp.h" #include "subsp.h" /* Ge */ void eneshotsp_normal(ENESHOT_DATA*); void eneshotsp_roll(ENESHOT_DATA*); void eneshotsp_big(ENESHOT_DATA*); void eneshotsp_(ENESHOT_DATA*); void eneshotsp_(ENESHOT_DATA*); void eneshotsp_(ENESHOT_DATA*); /* j */ void piecesp_big(PIECE_DATA*); void piecesp_small(PIECE_DATA*); void piecesp_roll(PIECE_DATA*); void piecesp_fire(PIECE_DATA*); /* */ void expsp_small(EXP_DATA*); void expsp_normal(EXP_DATA*); /* < vg^Cv錾 > */ void sp_manager(); /* XvCgǗ}l[W */ void grp_manager(); /* fqo}l[W */ void jiki_sp(); /* @Lro֘A */ void ene_sp(); /* G ro֘A */ void eneshot_sp(); /* Ge ro֘A */ void piece_sp(); /* jЂro֘A */ void exp_sp(); /* ro֘A */ void raster(); /* X^[XN[֘Ȁ */ void trans_bg(); /* af̓] */ void trans_sp(); /* ro̓] */ void trans_grp(); /* fqo̓] */ void trans_txt(); /* sws̓] */ static void dummy_func(ENE_DATA*); /* _~[֐ */ /* G\[`ւ̃|C^vfɎ”zǂ */ void (*enedisp_func0[])(ENE_DATA*)={ /* ZbgOp */ enesp_rsPnum16,enesp_rsPnum10,enesp_rsPnum10,enesp_rsPnum11,enesp_rsPnum11 ,enesp_rsPnum2,enesp_rsPnum2,enesp_rsPnum30,enesp_rsPnum30,enesp_rsPnum6_1 ,enesp_rsPnum6_1,enesp_rsPnum16,enesp_rsPnum16,enesp_rsPnum2,0 ,0,0,enesp_rsPnum16,enesp_rsPnum16,enesp_rsPnum16 ,enesp_rsPnum6_1,enesp_rsPnum6_1,0,0,0 ,enesp_rsPb1body,enesp_rsPb1bul_l,enesp_rsPb1bul_r,enesp_rsPb1gun_l,enesp_rsPb1gun_r ,enesp_rsPb1arm_l,enesp_rsPb1arm_r,0,0,0 ,enesp_rsPnum1,enesp_rsPnum1,enesp_rsPnum1,enesp_rsPnum1,enesp_rsPnum1 ,enesp_rsPnum1,enesp_rsPnum1,enesp_rsPnum1,enesp_rsPnum1,enesp_rsPnum1 ,enesp_rsPnum17,enesp_rsPnum17,enesp_rsPnum17,enesp_rsPnum6_3,enesp_rsPnum6_3 ,enesp_rsPnum6_3,0,enesp_rsPnum6_3,enesp_rsPnum6_3,0 ,enesp_rsPriv,0,0,0,0 ,enesp_rsPlaser,0,0,0,0 ,enesp_rsPnum21,enesp_rsPnum21,enesp_rsPnum21,enesp_rsPnum21,enesp_rsPnum21 , dummy_func ,dummy_func ,dummy_func ,dummy_func ,dummy_func , dummy_func ,dummy_func ,dummy_func ,dummy_func ,dummy_func }; void (*enedisp_func1[])(ENE_DATA*)={ /* ZbgPp */ enesp_rsQnum10,enesp_rsQnum10,enesp_rsQnum10,enesp_rsQnum10,enesp_rsQnum07 ,enesp_rsQnum07,0,0,0,0 ,enesp_rsQnum14,0,0,enesp_rsQnum18,enesp_rsQnum18 ,enesp_rsQnum14,enesp_rsQnum14,0,enesp_rsQnum05_t1,0 ,0,enesp_rsQnum11,enesp_rsQnum11,enesp_rsQnum11,enesp_rsQnum05_t3 ,enesp_rsQnum05_t3,enesp_rsQnum18,enesp_rsQnum18,enesp_rsQnum05_t3,enesp_rsQnum05_t3 ,enesp_rsQrivEsc,enesp_rsQrivEsc,0,0,0 ,enesp_rsQnum04,enesp_rsQnum04,enesp_rsQnum09,enesp_rsQnum09,enesp_rsQnum09 ,enesp_rsQnum09,enesp_rsQnum09,enesp_rsQnum09,enesp_rsQnum04,enesp_rsQnum04 ,enesp_rsQnum08,enesp_rsQnum25,enesp_rsQnum08,enesp_rsQnum08,enesp_rsQnum08 ,enesp_rsQnum08,enesp_rsQnum08,enesp_rsQnum08,enesp_rsQnum08,enesp_rsQnum08 ,enesp_rsQnum25,enesp_rsQnum25,enesp_rsQnum08,enesp_rsQnum08,enesp_rsQnum08 ,enesp_rsQnum25,enesp_rsQriv ,enesp_rsQriv ,enesp_rsQriv ,enesp_rsQriv4 ,enesp_rsQnum21,enesp_rsQnum21,enesp_rsQnum21,enesp_rsQnum21,enesp_rsQnum21 , dummy_func ,dummy_func ,dummy_func ,dummy_func ,dummy_func , dummy_func ,dummy_func ,dummy_func ,dummy_func ,dummy_func }; void (*enedisp_func2[])(ENE_DATA*)={ /* ZbgQp */ enesp_rsRnum06,enesp_rsRnum06,enesp_rsRnum20,enesp_rsRnum20,enesp_rsRnum25 ,enesp_rsRnum25,enesp_rsRnum30,enesp_rsRnum30,enesp_rsRnum02_t3,0 ,enesp_rsRnum27,enesp_rsRnum27,enesp_rsRnum29,enesp_rsRnum29,enesp_rsRnum16 ,enesp_rsRnum16,enesp_rsRnum05_t1_c,enesp_rsRnum05_t1_c,enesp_rsRnum07,enesp_rsRnum07 ,enesp_rsRnum02_t3,enesp_rsRnum02_t3,enesp_rsRnum05_t3,enesp_rsRnum22,enesp_rsRnum22 ,enesp_rsRnum05_t1,enesp_rsRnum05_t1,enesp_rsRnum14,enesp_rsRnum06_c,enesp_rsRnum06_c ,enesp_rsRlaser,enesp_rsRblade,0,0,0 ,enesp_rsRnum24,enesp_rsRnum24,0,enesp_rsRnum24,enesp_rsRnum19 ,0,enesp_rsRnum24,enesp_rsRnum19,0,0 ,enesp_rsRnum02_t3,0,0,0,0 ,enesp_rsRnum25_c,enesp_rsRnum26,enesp_rsRnum26,0,0 ,enesp_rsRbossbody,enesp_rsRbossarm_l,enesp_rsRbossarm_r,enesp_rsRbossman_l,enesp_rsRbossman_r ,enesp_rsRbossbody,enesp_rsRbossbody,enesp_rsRbossbody,enesp_rsRbossbody,enesp_rsRbossbody ,enesp_rsRnum08_c,enesp_rsRnum08,enesp_rsRnum08,enesp_rsRnum08_c,0 , dummy_func ,dummy_func ,dummy_func ,dummy_func ,dummy_func , dummy_func ,dummy_func ,dummy_func ,dummy_func ,dummy_func }; void (*enedisp_func3[])(ENE_DATA*)={ /* ZbgRp */ enesp_rsSnum31_a,enesp_rsSnum31_a,enesp_rsSnum20_a,enesp_rsSnum20_a,enesp_rsSnum33_a ,enesp_rsSnum33_a,enesp_rsSnum33_a,enesp_rsSnum33_a,enesp_rsSnum10_a,enesp_rsSnum10_a ,enesp_rsSnum31_a,enesp_rsSnum31_a,enesp_rsSnum10_b,enesp_rsSnum29_b,enesp_rsSnum29_b ,enesp_rsSnum27_b,enesp_rsSnum29_b,enesp_rsSnum29_b,enesp_rsSnum06_b,enesp_rsSnum06_b ,enesp_rsSnum11_c,enesp_rsSnum17_c,enesp_rsSnum27_c,enesp_rsSnum10_c,enesp_rsSnum10_c ,enesp_rsSnum29_c,enesp_rsSnum29_c,enesp_rsSriv,enesp_rsSriv,enesp_rsSriv ,enesp_rsSriv,enesp_rsSriv,enesp_rsSriv,enesp_rsSriv,enesp_rsSrivEsc ,enesp_rsSnum12_a,enesp_rsSnum12_a,enesp_rsSnum23_b,enesp_rsSnum23_b,enesp_rsSnum23_b ,enesp_rsSnum23_b,enesp_rsSnum23_c,enesp_rsSnum23_c,enesp_rsSnum23_c,0 ,enesp_rsSnum06_b,enesp_rsSnum06_b,enesp_rsSnum06_b,enesp_rsSnum06_b,enesp_rsSnum20_b ,0,enesp_rsSnum06_c,enesp_rsSnum06_c,enesp_rsSnum06_c,enesp_rsSnum06_c ,enesp_rsSnum25_c,enesp_rsSlaser,0,0,0 ,enesp_rsSline,enesp_rsSline,enesp_rsSline_cr,enesp_rsSline_cr,0 ,enesp_rsSnum32_b,enesp_rsSnum32_b,enesp_rsSnum32_b,0,0 , dummy_func ,dummy_func ,dummy_func ,dummy_func ,dummy_func , dummy_func ,dummy_func ,dummy_func ,dummy_func ,dummy_func }; void (*enedisp_func4[])(ENE_DATA*)={ /* ZbgSp */ enesp_rsTnum06,enesp_rsTnum06,0,0,enesp_rsTnum10 ,enesp_rsTnum10,enesp_rsTnum20,enesp_rsTnum18,enesp_rsTnum18,enesp_rsTnum17 ,enesp_rsTnum17,enesp_rsTnum16,enesp_rsTnum16,enesp_rsTnum09,enesp_rsTnum09 ,enesp_rsTnum18,enesp_rsTnum18,enesp_rsTnum02,enesp_rsTnum02,enesp_rsTnum02 ,enesp_rsTnum02,enesp_rsTnum02,enesp_rsTnum16,enesp_rsTnum16,enesp_rsTnum18 ,enesp_rsTnum18,enesp_rsTnum18,enesp_rsTnum18,enesp_rsTnum17,enesp_rsTnum17 ,enesp_rsTnum09,enesp_rsTnum18,enesp_rsTnum18,enesp_rsTnum16,enesp_rsTnum16 ,enesp_rsTnum28,enesp_rsTnum28,enesp_rsTnum04,enesp_rsTnum16,enesp_rsTnum16 ,enesp_rsTrobot,enesp_rsTrobot,enesp_rsTrobot,enesp_rsTrobot,enesp_rsTrobot ,0,0,0,0,0 ,enesp_rsTbossopen,enesp_rsTbossclose,enesp_rsTboss1,enesp_rsTboss2,0 ,0,0,0,0,0 ,0,0,0,0,0 ,0,0,0,0,enesp_rsTscope1 , dummy_func ,dummy_func ,dummy_func ,dummy_func ,dummy_func , dummy_func ,dummy_func ,dummy_func ,dummy_func ,dummy_func }; void (*enedisp_func5[])(ENE_DATA*)={ /* ZbgTp */ enesp_rsURAE,enesp_rsURAE,enesp_rsURA,enesp_rsURA,enesp_rsURAE ,enesp_rsURAE,enesp_rsURA,enesp_rsURA,enesp_rsURAOE,enesp_rsURAOE ,enesp_rsURAO,enesp_rsURAO,enesp_rsUcrystal,0,0 ,enesp_rsUboss5open,enesp_rsUboss5close,enesp_rsUboss51,enesp_rsUboss52,0 ,enesp_rsUriv,enesp_rsUriv,enesp_rsUriv,enesp_rsUriv,enesp_rsUriv ,enesp_rsUriv,enesp_rsUrivIll,enesp_rsUriv,enesp_rsUrivChg,enesp_rsUriv ,0,0,0,0,0 ,0,0,0,0,0 ,0,0,0,0,0 ,0,0,0,0,0 ,0,0,0,0,0 ,0,enesp_rsUlaser,0,0,0 ,0,0,0,0,0 ,0,0,0,0,0 , dummy_func ,dummy_func ,dummy_func ,dummy_func ,dummy_func , dummy_func ,dummy_func ,dummy_func ,dummy_func ,dummy_func }; /*---------------------< ϐ錾 >----------------------------*/ extern volatile STICK_UNIT *STC1_IO; /* WCXeBbN */ /*--------------< \[` >---------------*/ void disp() { sp_manager(); /* ro}l[WR[ */ grp_manager(); /* fqo}l[WR[ */ if(all_cont->special){ if(BITSNS(0x0E)&1)vd_wait=0; /* shift łuchro҂LZ */ if((B_SFTSNS()>>11)&1)vd_wait=0; /* CAPS on łuchro҂LZ */ } if((disp_cont->unred==1)&&(disp_cont->unrsw==1))vd_wait=0; /* \Ԃɏ؂ȂAA */ VD_MACRO /* Aԑ҂ */ raster(); /* X^[XN[֘Ȁ */ trans_sp(); /* ro] */ disp_cont->status+=1; /* JEgp */ } /*------------------ roǗ}l[W -------------*/ void sp_manager() { static int i; static int max=0; static int now=0; blade_sp(); /* u[h֘A */ jiki_sp(); /* @L֘A */ shot_sp(); /* @e֘A */ sub_sp(); /* TuVbg֘A */ eneshot_sp(); /* Ge ֘A */ exp_sp(); /* ֘A */ ene_sp(); /* G ֘A */ if(piece_cont->piece)piece_sp(); /* jЊ֘A */ for(;sp_data->sp_tablesp_table_max;sp_data->sp_table++){ /* gpĂȂB */ sp_data->sp_table->x=0; /* ꂾʼnʊOɏo */ } /* tF[h */ for(i=0;i<16;i++){ if(sp_data->fade[i]){ if(sp_data->fade_count[i]>=sp_data->fade[i]){ if(fadecalc(SP_PAL_ADD(i),&(sp_data->keep_palet[i][0]),&(sp_data->next_palet[i][0]))==0)sp_data->fade[i]=0; sp_data->fade_count[i]=0; sp_data->send_palet[i]=1; /* pbg]v(sɏɃNA) */ } else sp_data->fade_count[i]+=1; } } if(sp_data->transsp.send){ /* ւvĂ */ dmacpy( /* DMAŏւ */ (unsigned short*)sp_data->transsp.tsp_buff[sp_data->transsp.set] ,(unsigned short*)SP_DEF_ADD(sp_data->transsp.target) ,sp_data->transsp.cnt*32); sp_data->transsp.send=0; /* ւvMI */ } if(sp_data->transpal.send){ /* ւvĂ */ dmacpy( /* DMAŏւ */ (unsigned short*)sp_data->transpal.tpal_buff[sp_data->transpal.set] ,(unsigned short*)SP_PAL_ADD(sp_data->transpal.target) ,sp_data->transpal.cnt*8); sp_data->transpal.send=0; /* ւvMI */ } } /*------------------- X^[XN[֘Ȁ ------------*/ void raster() { static int i; /*bg_data->e8=bg_data->start_raster; /* $E80012 */ /**((short*)0xE80012)=bg_data->e8; /*bg_data->rptr_x=bg_data->r_array_x; /* z̐擪^ */ /*bg_data->rptr_y=bg_data->r_array_y;*/ if(ras_data->r_on){ ras_data->r_on=0; ras_data->r_sw=1; disp_cont->unrsw=0; ras_data->e8=ras_data->start_raster; ras_data->rptr_x=&ras_data->r_array_x[0][0]; ras_data->rptr_y=&ras_data->r_array_y[0][0]; CRTCRAS(ras_data->r_interfunc,ras_data->start_raster); } if(ras_data->r_off){ ras_data->r_off=0; ras_data->r_sw=0; CRTCRAS(0,0); disp_cont->unrsw=disp_cont->keep_unrsw; } if(ras_data->r_sw)ras_data->r_maketable(); /* X^[̃XCb`on Ȃe[u */ } /*------------------ @L֘ -------------*/ void jiki_sp() { static short codes[]={0x87,0x00,0x88,0x00}; static short codes2[]={0x89,0x00,0x8A,0x00 ,0x00,0x00,0x00,0x00}; short rx,ry; if(jiki_cont->flatter){ /* tb^[̕␳l */ rx=rnd2()-1; ry=rnd2()-1; } else { rx=0; ry=0; } switch(jiki_data->status){ case 2: /* ------ m[}Ԃ̕\ ------ */ if(disp_cont->status&1)break; /* G̃`J`J */ case 0: /* ------ GԂقړ ------ */ if(shot_cont->type==0){ if(jiki_cont->security==0){ if(STC1_IO->data.trg==1){ /* Vbg̔(^^; */ sp_data->sp_table->x=jiki_data->x+9-5+rx; sp_data->sp_table->y=jiki_data->y+9-8+ry; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.color=1; sp_data->sp_table->code.bit.code=codes[disp_cont->status&3]; sp_data->sp_table++; sp_data->sp_table->x=jiki_data->x+9+5+rx; sp_data->sp_table->y=jiki_data->y+9-8+ry; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.color=1; sp_data->sp_table->code.bit.code=codes[disp_cont->status&3]; sp_data->sp_table++; } } } if(jiki_cont->booster==1){ /* u[X^[ */ sp_data->sp_table->x=jiki_data->x+9-5 +rx; sp_data->sp_table->y=jiki_data->y+9-8+26+ry; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.color=2; sp_data->sp_table->code.bit.code=0x5C+((disp_cont->status>>1)&3); sp_data->sp_table++; sp_data->sp_table->x=jiki_data->x+9+5 +rx; sp_data->sp_table->y=jiki_data->y+9-8+26+ry; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.color=2; sp_data->sp_table->code.bit.code=0x5C+((disp_cont->status>>1)&3); sp_data->sp_table++; } if(jiki_cont->booster==2){ /* u[X^[{e[mY */ short sy; int rf; sp_data->sp_table->x=jiki_data->x+9-5 ; sp_data->sp_table->y=jiki_data->y+9-8+26; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.color=2; sp_data->sp_table->code.bit.code=0x5C+((disp_cont->status>>1)&3); sp_data->sp_table++; sy=jiki_data->y+9-8+26; rf=rnd2(); while(sy<(256+16)){ /* e[ */ sp_data->sp_table->x=jiki_data->x+9-6+rf; sp_data->sp_table->y=sy; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.color=2; sp_data->sp_table->code.bit.code=0xFF; sp_data->sp_table++; sy+=16; } sp_data->sp_table->x=jiki_data->x+9+5; sp_data->sp_table->y=jiki_data->y+9-8+26; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.color=2; sp_data->sp_table->code.bit.code=0x5C+((disp_cont->status>>1)&3); sp_data->sp_table++; sy=jiki_data->y+9-8+26; rf=rnd2(); while(sy<(256+16)){ /* e[ */ sp_data->sp_table->x=jiki_data->x+9+4+rf; sp_data->sp_table->y=sy; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.color=2; sp_data->sp_table->code.bit.code=0xFF; sp_data->sp_table++; sy+=16; } } if((jiki_data->rot > 4)&&(jiki_data->rot < 12)){ sp_data->sp_table->x=jiki_data->x+1+rx; /* 㕔 */ sp_data->sp_table->y=jiki_data->y+1+ry; sp_data->sp_table->code.bit.code=0x7E; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table->code.bit.color=1; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table++; sp_data->sp_table->x=jiki_data->x+1 +rx; /* */ sp_data->sp_table->y=jiki_data->y+17+ry; sp_data->sp_table->code.bit.code=0x7F+(disp_cont->status&1); sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table->code.bit.color=1; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table++; sp_data->sp_table->x=jiki_data->x+17+rx; /* E㕔 */ sp_data->sp_table->y=jiki_data->y+1 +ry; sp_data->sp_table->code.bit.code=0x7E; sp_data->sp_table->code.bit.h_rev=1; sp_data->sp_table->code.bit.color=1; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table++; sp_data->sp_table->x=jiki_data->x+17+rx; /* E */ sp_data->sp_table->y=jiki_data->y+17+ry; sp_data->sp_table->code.bit.code=0x7F+(disp_cont->status&1); sp_data->sp_table->code.bit.h_rev=1; sp_data->sp_table->code.bit.color=1; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table++; } else { sp_data->sp_table->x=jiki_data->x+9+rx; /* 㕔 */ sp_data->sp_table->y=jiki_data->y+1+ry; sp_data->sp_table->code.bit.code=0x81; sp_data->sp_table->code.bit.h_rev=(jiki_data->rot>8); sp_data->sp_table->code.bit.color=1; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table++; sp_data->sp_table->x=jiki_data->x+9 +rx; /* */ sp_data->sp_table->y=jiki_data->y+17+ry; sp_data->sp_table->code.bit.code=0x82+(disp_cont->status&1); sp_data->sp_table->code.bit.h_rev=(jiki_data->rot>8); sp_data->sp_table->code.bit.color=1; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table++; } break; case 1: /* ------ i̕\ ------ */ if(jiki_data->count==0)dmacpy((unsigned short*)jiki_data->sp_ptn,(unsigned short*)SP_DEF_ADD(0x7E),(0x80*6)/4); /* u[X^[ */ sp_data->sp_table->x=jiki_data->x+9-5 +rx; sp_data->sp_table->y=jiki_data->y+9-8+26+ry; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.color=2; sp_data->sp_table->code.bit.code=0x5C+((disp_cont->status>>1)&3); sp_data->sp_table++; sp_data->sp_table->x=jiki_data->x+9+5 +rx; sp_data->sp_table->y=jiki_data->y+9-8+26+ry; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.color=2; sp_data->sp_table->code.bit.code=0x5C+((disp_cont->status>>1)&3); sp_data->sp_table++; sp_data->sp_table->x=jiki_data->x+1+rx; /* 㕔 */ sp_data->sp_table->y=jiki_data->y+1+ry; sp_data->sp_table->code.bit.code=0x7E; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table->code.bit.color=1; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table++; sp_data->sp_table->x=jiki_data->x+1 +rx; /* */ sp_data->sp_table->y=jiki_data->y+17+ry; sp_data->sp_table->code.bit.code=0x7F+(disp_cont->status&1); sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table->code.bit.color=1; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table++; sp_data->sp_table->x=jiki_data->x+17+rx; /* E㕔 */ sp_data->sp_table->y=jiki_data->y+1 +ry; sp_data->sp_table->code.bit.code=0x7E; sp_data->sp_table->code.bit.h_rev=1; sp_data->sp_table->code.bit.color=1; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table++; sp_data->sp_table->x=jiki_data->x+17+rx; /* E */ sp_data->sp_table->y=jiki_data->y+17+ry; sp_data->sp_table->code.bit.code=0x7F+(disp_cont->status&1); sp_data->sp_table->code.bit.h_rev=1; sp_data->sp_table->code.bit.color=1; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table++; break; case 3: /* ------ ̕\ ------ */ datacpy(jiki_data->sp_ptn+(0x40*(6+(2*(jiki_data->count>>4)))),SP_DEF_ADD(0x80+((disp_cont->status&1)*2)),2*(0x80/32)); /* ro`GAւ̃f[^] */ sp_data->sp_table->x=jiki_data->x+9; /* 㕔 */ sp_data->sp_table->y=jiki_data->y+1; sp_data->sp_table->code.bit.code=0x80+((disp_cont->status&1)*2); sp_data->sp_table->code.bit.color=13; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table++; sp_data->sp_table->x=jiki_data->x+9; /* */ sp_data->sp_table->y=jiki_data->y+17; sp_data->sp_table->code.bit.code=0x80+1+((disp_cont->status&1)*2); sp_data->sp_table->code.bit.color=13; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table++; break; default: printf("@\Ō statusl\n"); VDISPST(0,0,0); exit(); break; } /* switch ̃lXg */ } /*------------------ G֘ -------------*/ void ene_sp() { static int i; static int grd[100]; /* GĹAőPOO‚oƂ͂܂... ĂƂŁB */ static int *work; work=grd; /* n㕨io[ۑ|C^ */ for(i=0;iene_max;i++){ /* ܂A󒆂Ԃ */ if(ene_data[i]->type==-1)continue; /* •ʂroǗ[` */ if(ene_data[i]->ground){ /* n㕨`FbN */ *work++=i; /* n㕨̔ԍۑ */ continue; /* ɂ܂킸 */ } disp_cont->enedisp_func[ene_data[i]->type](ene_data[i]); } *work=-1; /* GhR[hԂ */ work=grd; /* n㕨io[̐擪ɏ */ i=0; while(1){ /* ‚An㕨 */ if(grd[i]==-1)break; /* I`FbN */ if(ene_data[grd[i]]->type==-1)continue; /* •ʂroǗ[` */ disp_cont->enedisp_func[ene_data[grd[i]]->type](ene_data[grd[i]]); i+=1; } } /*------------------ Ge֘ -------------*/ void eneshot_sp() { static int i; void (*disp_func[])()={ eneshotsp_normal,eneshotsp_,eneshotsp_roll,eneshotsp_,eneshotsp_big,eneshotsp_roll,eneshotsp_,eneshotsp_ }; for(i=0;ieneshot_max;i++){ if(eneshot_data[i]->type!=-1){ /* ’eʂroǗ[` */ disp_func[eneshot_data[i]->type](eneshot_data[i]); } } } /*------------------ fqoǗ}l[W -------------*/ void grp_manager() { if(grp_data->fade){ /* tF[h */ if(grp_data->fade_count>=grp_data->fade){ if(fadecalc(GRP_PAL_ADD,&(grp_data->keep_palet[0]),&(grp_data->next_palet[0]))==0)grp_data->fade=0; grp_data->fade_count=0; grp_data->send_palet=1; /* pbg]v(sɏɃNA) */ } else grp_data->fade_count+=1; } } /*------------------- ro](VDISP(^^;) ----------------------*/ void trans_sp() { int i,c; short *work; short *work2; /* ro]icl`Łj */ dmacpy((unsigned short*)sp_data->sp_table_init,(unsigned short*)0xEB0000,(128*8)/2); for(i=1;i<16;i++){ /* pbg] */ if(sp_data->send_palet[i]){ work =SP_PAL_ADD(i); work2=&(sp_data->next_palet[i][0]); *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; sp_data->send_palet[i]=0; } } } /*------------------- fqo](VDISP(^^;) ----------------------*/ void trans_grp() { short *coord_add=(short*)0xE80018; short *work; short *work2; *coord_add++=grp_data->x0; /* ](^^; */ *coord_add++=grp_data->y0; *coord_add++=grp_data->x1; *coord_add++=grp_data->y1; *coord_add++=grp_data->x2; *coord_add++=grp_data->y2; *coord_add++=grp_data->x3; *coord_add++=grp_data->y3; if(grp_data->send_palet){ /* pbg] */ work =GRP_PAL_ADD; work2=&(grp_data->next_palet[0]); *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; grp_data->send_palet=0; } if(grp_data->send_onoff){ /* ʂ̃XCb`O */ *((short*)0xE82600)=grp_data->onoff.mixed; grp_data->send_onoff=0; } } /*------------------- af](VDISP(^^;) ----------------------*/ void trans_bg() { *bg_data->bg1x=bg_data->x1; /* Wړ */ *bg_data->bg1y=bg_data->y1; if(bg_data->send_onoff){ /* ʂ̃XCb`O */ bg_data->bg_control->bit.bg1_on_off=bg_data->bg_onoff; bg_data->send_onoff=0; } } /*------------------- sws](VDISP(^^;) ----------------------*/ void trans_txt() { int i; short *work; short *work2; if(txt_data->txt_on){ /* swsIM */ txt_data->txt_on=0; txt_data->txt_sw=1; txt_data->crtcreg->bit.txt_onoff=1; } if(txt_data->txt_off){ /* swsItM */ txt_data->txt_off=0; txt_data->txt_sw=0; txt_data->crtcreg->bit.txt_onoff=0; } if(txt_data->txt_sw){ /* XN[ */ *((short*)0xE80014)=txt_data->x; *((short*)0xE80016)=txt_data->y; } i=0; if(sp_data->send_palet[i]){ /* pbg] */ work =SP_PAL_ADD(i); work2=&(sp_data->next_palet[i][0]); *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; *work++=*work2++; sp_data->send_palet[i]=0; } } /*------------------ Gero\Enormal -------------*/ void eneshotsp_normal(eneshot_data) ENESHOT_DATA *eneshot_data; { static short code[]={0,1,2,3,4,3,2,1}; static short v_rev[]={0,0,0,0,0,1,1,1}; sp_data->sp_table->x=eneshot_data->x+8; sp_data->sp_table->y=eneshot_data->y+8; sp_data->sp_table->code.bit.color=12; sp_data->sp_table->code.bit.code=0xB0+code[(eneshot_data->anim1>>1)&7]; sp_data->sp_table->code.bit.v_rev=v_rev[(eneshot_data->anim1>>1)&7]; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table++; } /*------------------ Gero\Eroll -------------*/ void eneshotsp_roll(eneshot_data) ENESHOT_DATA *eneshot_data; { sp_data->sp_table->x=eneshot_data->x+8; sp_data->sp_table->y=eneshot_data->y+8; sp_data->sp_table->code.bit.color=12; sp_data->sp_table->code.bit.code=0xB5+((eneshot_data->anim1>>1)&3); sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table++; } /*------------------ Gero\Ebig -------------*/ void eneshotsp_big(eneshot_data) ENESHOT_DATA *eneshot_data; { sp_data->sp_table->x=eneshot_data->x+8; sp_data->sp_table->y=eneshot_data->y+8; sp_data->sp_table->code.bit.color=12; sp_data->sp_table->code.bit.code=0xBE+((eneshot_data->anim1>>1)&1); sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table++; } /*------------------ Gero\E -------------*/ void eneshotsp_(eneshot_data) ENESHOT_DATA *eneshot_data; { sp_data->sp_table->x=eneshot_data->x+8; sp_data->sp_table->y=eneshot_data->y; sp_data->sp_table->code.bit.color=12; sp_data->sp_table->code.bit.code=0xBA; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table++; sp_data->sp_table->x=eneshot_data->x+8; sp_data->sp_table->y=eneshot_data->y+16; sp_data->sp_table->code.bit.color=12; sp_data->sp_table->code.bit.code=0xB9; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table++; } /*------------------ Gero\E -------------*/ void eneshotsp_(eneshot_data) ENESHOT_DATA *eneshot_data; { static char h_rev; static short x1,x2; if(eneshot_data->dx>0){ h_rev=0; x1=16; x2=0; } else { h_rev=1; x1=0; x2=16; } sp_data->sp_table->x=eneshot_data->x+x1; sp_data->sp_table->y=eneshot_data->y+8; sp_data->sp_table->code.bit.color=12; sp_data->sp_table->code.bit.code=0xBB; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.h_rev=h_rev; sp_data->sp_table++; sp_data->sp_table->x=eneshot_data->x+x2; sp_data->sp_table->y=eneshot_data->y+8; sp_data->sp_table->code.bit.color=12; sp_data->sp_table->code.bit.code=0xBC; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.h_rev=h_rev; sp_data->sp_table++; } /*------------------ Gero\E -------------*/ void eneshotsp_(eneshot_data) ENESHOT_DATA *eneshot_data; { sp_data->sp_table->x=eneshot_data->x+8; sp_data->sp_table->y=eneshot_data->y; sp_data->sp_table->code.bit.color=12; sp_data->sp_table->code.bit.code=0xB9; sp_data->sp_table->code.bit.v_rev=1; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table++; sp_data->sp_table->x=eneshot_data->x+8; sp_data->sp_table->y=eneshot_data->y+16; sp_data->sp_table->code.bit.color=12; sp_data->sp_table->code.bit.code=0xBA; sp_data->sp_table->code.bit.v_rev=1; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table++; } /*------------------ jЂro֘ -------------*/ void piece_sp() { static void (*piecesp_func[])(PIECE_DATA*)={piecesp_small,piecesp_small,piecesp_roll,piecesp_fire}; static int i; for(i=0;ipiece_max;i++){ if(piece_data[i]->type==-1)continue; /* ݂Ȃ */ piecesp_func[piece_data[i]->type](piece_data[i]); /* \֐Ăт */ } } /*------------------ jЂro\Ebig -------------*/ void piecesp_big(piece_data) PIECE_DATA *piece_data; { sp_data->sp_table->x=piece_data->x+9; sp_data->sp_table->y=piece_data->y+9; sp_data->sp_table->code.bit.color=13; sp_data->sp_table->code.bit.code=0x75; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table++; } /*------------------ jЂro\Esmall -------------*/ void piecesp_small(piece_data) PIECE_DATA *piece_data; { static short offs[]={0,1,2,1}; sp_data->sp_table->x=piece_data->x+9; sp_data->sp_table->y=piece_data->y+9; sp_data->sp_table->code.bit.color=13; sp_data->sp_table->code.bit.code=0x76+offs[((piece_data->count>>3)&3)]; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table++; } /*------------------ jЂro\Eroll -------------*/ void piecesp_roll(piece_data) PIECE_DATA *piece_data; { static short offs[] ={0,1,2,3,4,3,2,1,0,1,2,3,4,3,2,1}; static short h_rev[]={0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1}; static short v_rev[]={0,0,0,0,1,1,1,1,1,1,1,1,0,0,0,0}; sp_data->sp_table->x=piece_data->x+9; sp_data->sp_table->y=piece_data->y+9; sp_data->sp_table->code.bit.color=13; sp_data->sp_table->code.bit.code=0x79+offs[((piece_data->count>>1)&15)]; sp_data->sp_table->code.bit.v_rev=v_rev[((piece_data->count>>1)&15)]; sp_data->sp_table->code.bit.h_rev=h_rev[((piece_data->count>>1)&15)]; sp_data->sp_table++; } /*------------------ jЂro\Efire -------------*/ void piecesp_fire(piece_data) PIECE_DATA *piece_data; { static short offs[]={0,1,2,1}; sp_data->sp_table->x=piece_data->x+9; sp_data->sp_table->y=piece_data->y+9; sp_data->sp_table->code.bit.color=12; sp_data->sp_table->code.bit.code=0x76+offs[((piece_data->count>>3)&3)]; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table++; } /*------------------ ro֘ -------------*/ void exp_sp() { static void (*expsp_func[])(EXP_DATA*)={expsp_small,expsp_normal}; static int i; for(i=0;iexp_max;i++){ if(exp_data[i]->type==-1)continue; /* ݂Ȃ */ expsp_func[exp_data[i]->type](exp_data[i]); /* \֐Ăт */ } } /*------------------ ro\Esmall -------------*/ void expsp_small(exp_data) EXP_DATA *exp_data; { sp_data->sp_table->x=exp_data->x+9; sp_data->sp_table->y=exp_data->y+9; sp_data->sp_table->code.bit.color=13; sp_data->sp_table->code.bit.code=0x60+(exp_data->count/2); sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table++; } /*------------------ ro\Enormal -------------*/ void expsp_normal(exp_data) EXP_DATA *exp_data; { if((exp_data->count>>1)==0){ sp_data->sp_table->x=exp_data->x+9; sp_data->sp_table->y=exp_data->y+9; sp_data->sp_table->code.bit.color=13; sp_data->sp_table->code.bit.code=0x65; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table++; } else { if((exp_data->count>>1)<4){ sp_data->sp_table->x=exp_data->x; sp_data->sp_table->y=exp_data->y; sp_data->sp_table->code.bit.color=13; sp_data->sp_table->code.bit.code=0x65+(exp_data->count>>1); sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table++; sp_data->sp_table->x=exp_data->x+16; sp_data->sp_table->y=exp_data->y; sp_data->sp_table->code.bit.color=13; sp_data->sp_table->code.bit.code=0x65+(exp_data->count>>1); sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.h_rev=1; sp_data->sp_table++; sp_data->sp_table->x=exp_data->x; sp_data->sp_table->y=exp_data->y+16; sp_data->sp_table->code.bit.color=13; sp_data->sp_table->code.bit.code=0x65+(exp_data->count>>1); sp_data->sp_table->code.bit.v_rev=1; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table++; sp_data->sp_table->x=exp_data->x+16; sp_data->sp_table->y=exp_data->y+16; sp_data->sp_table->code.bit.color=13; sp_data->sp_table->code.bit.code=0x65+(exp_data->count>>1); sp_data->sp_table->code.bit.v_rev=1; sp_data->sp_table->code.bit.h_rev=1; sp_data->sp_table++; } else { sp_data->sp_table->x=exp_data->x; sp_data->sp_table->y=exp_data->y; sp_data->sp_table->code.bit.color=13; sp_data->sp_table->code.bit.code=0x69+(((exp_data->count>>1)-4)*4); sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table++; sp_data->sp_table->x=exp_data->x+16; sp_data->sp_table->y=exp_data->y; sp_data->sp_table->code.bit.color=13; sp_data->sp_table->code.bit.code=0x6A+(((exp_data->count>>1)-4)*4); sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table++; sp_data->sp_table->x=exp_data->x; sp_data->sp_table->y=exp_data->y+16; sp_data->sp_table->code.bit.color=13; sp_data->sp_table->code.bit.code=0x6B+(((exp_data->count>>1)-4)*4); sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table++; sp_data->sp_table->x=exp_data->x+16; sp_data->sp_table->y=exp_data->y+16; sp_data->sp_table->code.bit.color=13; sp_data->sp_table->code.bit.code=0x6C+(((exp_data->count>>1)-4)*4); sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table++; } } } /*------------------ _~[֐ -------------*/ static void dummy_func(ene_data) ENE_DATA *ene_data; { }  SP_DATAST(ene_data->x ,ene_data->y+16,col,0x18,0,1) break; case 10: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x19,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x1A,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x1B,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x1C,0,1) break; case 11: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x1D,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x1E,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x1F,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x20,0,1) break; default: SP_DATAST(/*----------------< vg^Cv錾 >--------------------*/ void disp(); /* \[` */  SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x1F,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x20,0,1) break; } } /*------------------ Gro\ErsSnum11_c -------------*/ void enesp_rsSnum11_c(ene_data) ENE_DATA *ene_data; { static int i; static short col; static short off; static short code[]={0,3,6,9}; if(ene_data->flash)col=15; else col=5; off=(ene_data->count>>2)&3; switch(*(ene_data->atr-1)){ default: SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x28+code[off],0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x29+code[off],0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x2A+code[off],0,0) break; } } /*------------------ Gro\ErsSnum17_c -------------*/ void enesp_rsSnum17_c(ene_data) ENE_DATA *ene_data; { static int i; static short col; static short off; if(ene_data->flash)col=15; else col=6; off=(ene_dat#include #include #include "../include/key.h" #include //#include #include "..\\structs.h" /* A‚͊{ */ #include "..\\sepcm.h" #include "ending.h" #include "gtnlib.h" #include "vdisp.h" #include "subs.h" static void econs(); /* R\[ */ static void animation(); /* Aj̃[` */ static void staff_roll(); /* X^bt[ */ static volatile int count=0; /* ucJE^ */ static void ending_vd(); /* uc */ static void ending_hsync(); /* X^[ */ static void arl_ext_custom(unsigned char*,unsigned char*,int); static short p_red[32]; /* X^[pbg̒li[ */ static short p_blue[32]; static short p_white[32]; static short *red_ptr; /* X^[pbgXL|C^ */ static short *blue_ptr; static short *white_ptr; static short t_grad[32]={ /* RTCe[uǂ */ 3,6,9,12,15,17,20,22,24,26,28,29,30,31,31,32,31,31 ,30,29,28,26,24,22,20,17,15,12,9,6,3,0 }; char *pcm[20]; /* ʉ̂obl */ int pcmsize[20]; /* ʉ̂obl̃TCY */ /*-------------------- GfBO ---------------------*/ void ending() { int i,c,d; ALLOCREAD_B("sepcm\\e_bomb1.pcm",pcm[0]) ALLOCREAD_B("sepcm\\e_bomb2.pcm",pcm[1]) ALLOCREAD_B("sepcm\\e_burn.pcm",pcm[2]) ALLOCREAD_B("sepcm\\e_caution.pcm",pcm[3]) ALLOCREAD_B("sepcm\\e_click.pcm",pcm[4]) ALLOCREAD_B("sepcm\\e_poweroff.pcm",pcm[5]) pcmsize[0]=fsize("sepcm\\e_bomb1.pcm"); pcmsize[1]=fsize("sepcm\\e_bomb2.pcm"); pcmsize[2]=fsize("sepcm\\e_burn.pcm"); pcmsize[3]=fsize("sepcm\\e_caution.pcm"); pcmsize[4]=fsize("sepcm\\e_click.pcm"); pcmsize[5]=fsize("sepcm\\e_poweroff.pcm"); VD_MACRO CRTMOD(6); /* ʏ */ G_CLR_ON(); C_CLS_AL(); for(i=0;i<127;i++)SP_REGST(i,-1,0,0,0,3); scrn_prw(2,0,1); VD_MACRO SP_ON(); BGSCRLST(0x80000001,0,0); BGCTRLST(1,1,0); animation(); /* Aj[VII */ econs(); /* R\[\ */ staff_roll(); /* X^bt[ */ free(pcm[0]); /* obl */ free(pcm[1]); free(pcm[2]); free(pcm[3]); free(pcm[4]); free(pcm[5]); return; } /*---------------------------------------< GfBOAj >---------------*/ static void animation() { short *pal_buff; /* pbgf[^̓ǂݍ݃obt@ */ char *td_ptr[45][4]; /* eLXgʂ̊G̓ǂ݈ʒu */ int arlsize[45][4]; /* `qkf[^̃TCY */ char *td_buff; /* eLXgǂݍݗp */ char *work; /* Ɨp */ short *work2; int filesize; /* Ɨp */ char gsbuff[256]; union{ /* int ϊp */ int mixed; struct{ unsigned upper:8; unsigned mid_upper:8; unsigned mid_lower:8; unsigned lower:8; }bit; }cast; int i,c,d; short offset[]={0,256,512,768}; short off_y[]={ 0,256,0,256,0,256,0,256,0,256,0,256,0,256,0,256,0,256,0,256 ,0,256,0,256,0,256,0,256,0,256,0,256,0,256,0,256,0,256,0,256 ,0,256,0,256,0 }; int off_add[]={ 0x8000,0,0x8000,0,0x8000,0,0x8000,0,0x8000,0 ,0x8000,0,0x8000,0,0x8000,0,0x8000,0,0x8000,0 ,0x8000,0,0x8000,0,0x8000,0,0x8000,0,0x8000,0 ,0x8000,0,0x8000,0,0x8000,0,0x8000,0,0x8000,0 ,0x8000,0,0x8000,0,0x8000 }; int off_c[]={0,0x20000,0x40000,0x60000}; ALLOCREAD("grpdata\\ending.pal",pal_buff); /* pbgǂݍ */ filesize=fsize("grpdata\\ending.td"); /* eLXgf[^ǂݍ */ td_buff=(char*)mcmalloc(filesize); betaread("grpdata\\ending.td",td_buff,filesize); work=td_buff; /* 摜̕ۑʒũXL */ for(i=0;i<45;i++){ for(c=0;c<4;c++){ td_ptr[i][c]=work; /* i O[v,v[ c ̈ʒu */ cast.bit.upper =*(work+0); cast.bit.mid_upper=*(work+1); cast.bit.mid_lower=*(work+2); cast.bit.lower =*(work+3); arlsize[i][c]=cast.mixed; work+=cast.mixed; } } for(i=0;i<16;i++)(SP_PAL_ADD(0))[i]=0; /* pbgOŏ */ /* ŏ̉ */ arl_ext((unsigned char*)td_ptr[0][0],(unsigned char*)0xE02000,arlsize[0][0]); /* eXgœWJĂ݂B */ arl_ext((unsigned char*)td_ptr[0][1],(unsigned char*)0xE22000,arlsize[0][1]); arl_ext((unsigned char*)td_ptr[0][2],(unsigned char*)0xE42000,arlsize[0][2]); arl_ext((unsigned char*)td_ptr[0][3],(unsigned char*)0xE62000,arlsize[0][3]); VDISPST(0,0,0); /* uc */ VDISPST(ending_vd,0,1); /* GfBOp̂ucZbg */ vd_wait=1; /* uc҂ */ while(vd_wait); for(i=0;i<45;i++){ if(i==0)se_adpcm1(pcm[0],pcmsize[0],0x0403); if(i==13)se_adpcm1(pcm[1],pcmsize[1],0x0403); if(i==30)se_adpcm1(pcm[2],pcmsize[2],0x0403); for(c=0;c<4;c++){ /* i\ */ count=0; work2=SP_PAL_ADD(0); for(d=0;d<16;d++){ /* pbg] */ *work2++=*pal_buff++; } *((short*)0xE80014)=offset[c]; *((short*)0xE80016)=off_y[i]; if(i!=44){ /* Ō̏ꍇLZ */ arl_ext_custom((unsigned char*)td_ptr[i+1][c],(unsigned char*)(0xE02000+off_c[c]+off_add[i]),arlsize[i+1][c]); } while(1){ /* uc҂ */ vd_wait=1; while(vd_wait); if(count>=3)break; } } } free(td_buff); /* obt@ */ free(pal_buff); VDISPST(0,0,0); /* uc */ VDISPST(vd_task,0,1); /* ʏ̂ucZbgďI */ for(i=0;i<60;i++){VD_MACRO}; } /*------------------------------------------------< VDISP ̏ >-------*/ void ending_vd() { vd_wait=0; count+=1; /* JE^{P */ IRTE(); } /*---------------------------------------------------< Advanced RunLength UnCompless > */ void arl_ext_custom(buff,buff2,allsize) unsigned char *buff; /* WJobt@ */ unsigned char *buff2; /* WJobt@ */ int allsize; /* \[X̃TCY */ { unsigned int i; int w_size=0; /* `FbNITCY */ buff+=4; /* WJ̃TCYXLbv */ w_size+=4; while(1){ if(*buff >=128){ /* Am */ unsigned char c_size; c_size=(*buff++)-128; /* ̂ */ for(i=0;i<=c_size;i++){ /* 肩 */ *buff2++=*buff; } buff++; w_size+=2; if(w_size>=allsize)break; } else { /* •ʃm */ unsigned char c_size; c_size=*buff++; /* ̂ */ for(i=0;i<=c_size;i++){ *buff2++=*buff++; } w_size+=c_size+2; } if(w_size>=allsize)break; } return; } /*---------------------------------------------< rs`ee qnkk̂Ƃ >----------*/ static void staff_roll() { int i,c,d; short *bg_buff; /* afp^[i[ */ short *bg_buff_init; /* ʒu */ short bg_write_y; /* ݂xW */ short bg_win_y; /* `̈ʒu */ union{ short mixed; struct{ unsigned green:5; unsigned red:5; unsigned blue:5; unsigned I:1; }bit; }cast; short spal[]={ 0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000 ,0x0000,0x0000,0x0000,0x0000,0x0000,0x8420,0xC630,0xFFFE }; char *bgm; ALLOCREAD_B("bgm\\ending.zmd",bgm); /* aflǂݍ */ bg_win_y=0; /* ϐ */ bg_write_y=0; bg_buff=(short*)mcmalloc(fsize("sprite\\ending\\ending.mdt")); /* afp^[obt@m */ bg_buff_init=bg_buff; Wbetaread("sprite\\ending\\ending.mdt",bg_buff,fsize("sprite\\ending\\ending.mdt")); /* afp^[ǂ */ Wbetaread("sprite\\title\\moji.sp" ,SP_DEF_ADD(0x00),fsize("sprite\\title\\moji.sp" )); /* ro ǂ */ Wbetaread("sprite\\title\\moji.pal",SP_PAL_ADD(0x01),fsize("sprite\\title\\moji.pal")); /* o`kǂ */ VD_MACRO grp_data->onoff.bit.grp0_onoff=0; /* onoff ؂ւ */ grp_data->onoff.bit.grp1_onoff=0; grp_data->onoff.bit.grp3_onoff=1; grp_data->onoff.bit.grp1024_onoff=0; *((short*)0xE82600)=grp_data->onoff.mixed; *((volatile unsigned short*)0xE80024)=0; *((volatile unsigned short*)0xE80026)=0; VD_MACRO for(i=0;i<16;i++)GRP_PAL_ADD[i]=spal[i]; for(i=0;i<32;i++){ /* ŏ̉ʂ`Ă܂ */ for(c=0;c<32;c++){ BGTEXTST(1,c,i,*bg_buff++); } bg_write_y+=1; bg_write_y&=63; } for(i=0;i<32;i++){ /* X^[pbg̃e[u */ cast.mixed=SP_PAL_ADD(1)[10]; /* •̔I */ cast.bit.red=(cast.bit.red*t_grad[i])/32; /* ԕ̔ƋL */ cast.bit.blue=(cast.bit.blue*t_grad[i])/32; cast.bit.green=(cast.bit.green*t_grad[i])/32; p_white[i]=cast.mixed; cast.mixed=SP_PAL_ADD(1)[9]; /* I */ cast.bit.red=(cast.bit.red*t_grad[i])/32; cast.bit.blue=(cast.bit.blue*t_grad[i])/32; cast.bit.green=(cast.bit.green*t_grad[i])/32; p_blue[i]=cast.mixed; cast.mixed=SP_PAL_ADD(2)[9]; /* ԁI */ cast.bit.red=(cast.bit.red*t_grad[i])/32; cast.bit.blue=(cast.bit.blue*t_grad[i])/32; cast.bit.green=(cast.bit.green*t_grad[i])/32; p_red[i]=cast.mixed; } VD_MACRO BGCTRLST(1,1,1); /* X^[pbgύXJn */ ras_data->start_raster=40; ras_data->end_raster=40+(255*2); ras_data->e8=ras_data->start_raster; red_ptr=p_red; /* |C^ */ blue_ptr=p_blue; white_ptr=p_white; CRTCRAS(ending_hsync,ras_data->start_raster); /* X^[Jn */ chdir("bgm"); zm_zmdplay(bgm); /* aflJn */ chdir(".."); for(d=0;d<1600;d++){ /* ꂪC[v */ if(all_cont->special){ if(key_get()==KCODE_ESC){ VDISPST(0,0,0); CRTCRAS(0,0); exit(); } } VD_MACRO VD_MACRO // C_LOCATE(0,0); /* JEg\ */ // printf("d=%10d\n",d); if((d&7)==0){ /* afɕ` */ for(c=0;c<32;c++){ BGTEXTST(1,c,bg_write_y,*bg_buff++); } bg_write_y+=1; bg_write_y&=63; } BGSCRLST(0x80000001,0,bg_win_y); /* ʂXN[ */ bg_win_y+=1; bg_win_y&=511; } bg_buff=bg_buff_init; /* obt@ */ free(bg_buff); for(i=0;i<300;i++){ /* ҂ */ VD_MACRO } zm_fadeout(8); /* afl */ for(i=0;i<16;i++){ /* g[_E */ *((short*)0xE8E000)=15-i; for(c=0;c<35;c++){VD_MACRO} } CRTCRAS(0,0); for(i=0;i<16;i++){ /* afƃeLXg */ GRP_PAL_ADD[i]=0; for(c=0;c<16;c++){ SP_PAL_ADD(i)[c]=0; } } *((short*)0xE8E000)=15; /* PxA */ for(i=0;i<50;i++){VD_MACRO} /* A܂ő҂ */ z_stop(0,0,0); free(bgm); /* afl */ } /*-----------------------------------------< rs`ee qnkk̃pbgύX >---*/ static void ending_hsync() { (SP_PAL_ADD(1))[10]=*white_ptr; /* pbgύX */ (SP_PAL_ADD(2))[10]=*white_ptr++; (SP_PAL_ADD(1))[9]=*blue_ptr++; (SP_PAL_ADD(2))[9]=*red_ptr++; ras_data->e8+=16; /* ̃X^͂bb */ if(ras_data->e8>=ras_data->end_raster){ ras_data->e8=ras_data->start_raster; /* $E80012 */ /* z̐擪^ */ red_ptr=p_red; blue_ptr=p_blue; white_ptr=p_white; } *((short*)0xE80012)=ras_data->e8; /* ̊荞݃X^ݒ */ IRTE(); } /*------------------------------------------< R\[ʂ̂Ƃ >---*/ static void econs() { MMPTR mp,*mmptr=∓ short *work1; short *work2; int cnt=0; int i,c,d; /* 摜f[^ǂݍ */ work2=(short*)0xE82000; for(i=0;i<16;i++)*work2++=0; /* pbgR[hOŏ */ work2=(short*)mcmalloc(fsize("grpdata\\econs.mmk")); work1=work2; betaread("grpdata\\econs.mmk",(char*)work2,fsize("grpdata\\econs.mmk")); /* GRPްǂ */ work2+=5; /* work2palf[^̈ʒu */ for(i=0;i<16;i++)grp_data->keep_palet[i]=*work2++; /* pal] */ work2=work1; /* ʒu */ /* fqoWJ */ mmptr->x1=0; /* llWJ */ mmptr->y1=0; mmptr->y2=1023; mmptr->y2=1023; mmptr->pal_style=0x00; mmptr->buff=work2; mm_ext(mmptr); work2=work1; free(work2); VD_MACRO grp_data->onoff.mixed=*((short*)0xE82600); /* ݂stat荞 */ grp_data->onoff.bit.txt_onoff=0; grp_data->onoff.bit.grp3_onoff=0; *((short*)0xE82600)=grp_data->onoff.mixed; *((volatile unsigned short*)0xE80018)=0; *((volatile unsigned short*)0xE8001A)=0; se_adpcm1(pcm[3],pcmsize[3],0x0403); for(i=0;i<80;i++){ /* */ VD_MACRO if(i&1){ for(c=0;c<16;c++)GRP_PAL_ADD[c]=grp_data->keep_palet[c]; } else { for(c=0;c<16;c++)GRP_PAL_ADD[c]=0; } } *((volatile unsigned short*)0xE80018)=256; /* fqoÕXN[ʒu */ *((volatile unsigned short*)0xE8001A)=0; se_adpcm1(pcm[4],pcmsize[4],0x0403); for(i=0;i<30;i++){ /* P */ VD_MACRO if(i&1){ for(c=0;c<16;c++)GRP_PAL_ADD[c]=grp_data->keep_palet[c]; } else { for(c=0;c<16;c++)GRP_PAL_ADD[c]=0; } } *((volatile unsigned short*)0xE80018)=0; /* fqoÕXN[ʒu */ *((volatile unsigned short*)0xE8001A)=256; se_adpcm1(pcm[4],pcmsize[4],0x0403); for(i=0;i<30;i++){ /* Q */ VD_MACRO if(i&1){ for(c=0;c<16;c++)GRP_PAL_ADD[c]=grp_data->keep_palet[c]; } else { for(c=0;c<16;c++)GRP_PAL_ADD[c]=0; } } *((volatile unsigned short*)0xE8001A)=256; *((volatile unsigned short*)0xE80018)=256; se_adpcm1(pcm[4],pcmsize[4],0x0403); for(i=0;i<160;i++){ /* R */ VD_MACRO if(i&1){ for(c=0;c<16;c++)GRP_PAL_ADD[c]=grp_data->keep_palet[c]; } else { for(c=0;c<16;c++)GRP_PAL_ADD[c]=0; } } VD_MACRO /* ^ */ se_adpcm1(pcm[5],pcmsize[5],0x0403); for(i=0;i<16;i++)GRP_PAL_ADD[i]=65535; VD_MACRO /* fqo palPTcč */ *((volatile unsigned short*)0xE8001C)=0; *((volatile unsigned short*)0xE8001E)=0; for(i=0;i<15;i++)GRP_PAL_ADD[i]=0; grp_data->onoff.mixed=*((short*)0xE82600); /* ݂stat荞 */ grp_data->onoff.bit.grp0_onoff=0; /* onoff ؂ւ */ grp_data->onoff.bit.grp1_onoff=1; grp_data->onoff.bit.grp1024_onoff=0; grp_data->onoff.bit.txt_onoff=0; *((short*)0xE82600)=grp_data->onoff.mixed; APAGE(1); for(i=0;i<127;i+=2){ /* Z */ struct LINEPTR lp,*lineptr=&lp; VD_MACRO lineptr->x1=0; lineptr->y1=128; lineptr->x2=255; lineptr->y2=128; lineptr->color=0; lineptr->linestyle=0xFFFF; LINE(lineptr); /* */ lineptr->x1=i; lineptr->x2=255-i; lineptr->color=15; LINE(lineptr); /* */ } grp_data->onoff.bit.grp0_onoff=0; /* onoff ؂ւ */ grp_data->onoff.bit.grp1_onoff=0; grp_data->onoff.bit.grp1024_onoff=0; grp_data->onoff.bit.txt_onoff=0; *((short*)0xE82600)=grp_data->onoff.mixed; for(i=0;i<200;i++){VD_MACRO} } /*---------------------- vg^Cv錾 -----------------------*/ void ending(); s.h" /* A‚͊{ */ #include "enesp_sete.h" #include "subs.h" #define TOP_BODY 0x01 #define TOP_WARP 0xC0 /*---------------------< ϐ錾 >----------------------------*/ extern volatile STICK_UNIT *STC1_IO; /* WCXeBbN */ extern volatile STICK_UNIT *STC2_IO; static void area1(ENE_DATA*); static void area2(ENE_DATA*); static void area3(ENE_DATA*); static void area4(ENE_DATA*); /*------------------ Gro\ErsTnum10 -------------*/ void enesp_rsTnum10(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=6; switch(*(ene_data->atr-1)){ case 0: case 3: SP_DATAST(ene_data->x ,ene_data->y ,col,0x0D,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x0E,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x0F,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x10,0,0) break; case 1: SP_DATAST(ene_data->x #include #include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "ene.h" #include "subs.h" #include "exemove1.h" #include "exemovea.h" #include "exemoveb.h" #include "exemovec.h" #include "exemoved.h" #include "exemovee.h" #include "exemovef.h" /*---------------------< ` >---------------------------------*/ #define LEFTMAX -32 #define RIGHTMAX 290 #define UPMAX -32 #define DOWNMAX 290 /*---------------------< vg^Cv錾 >---------------------------------*/ void ene_move(ENE_DATA*); /* GM[ړ */ /* SETƂ̑ϋv */ int power_set0[]={ /* ZbgOp */ 3, 15, 15, 1, 1, 15, 15, 3, 3, 3 , 3, 3, 3, 15, 3, 3, 3, 3, 3, 3 , 3, 3, 3, 3, 3,3500,1500,1500,1500,1500 ,1500,1500,1500,1500,1500,200,200,200,200,200 ,200,200,200,200,200, 3, 3, 3, 3, 3 , 3, 3, 3, 3, 3,1500, 1, 1, 3, 3 , 3, 3, 3, 3, 3, 70, 70, 70, 70, 70 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 /* p */ }; int power_set1[]={ /* ZbgPp */ 15, 15, 15, 15, 3, 3, 3, 3, 3, 3 , 3, 3, 3, 3, 3, 3, 3, 3, 15, 3 , 3, 3, 3, 3, 3, 3, 3, 3, 15, 15 , 3, 3, 3, 3, 3,200,200,200,200,200 ,200,200,200,200,200, 3, 15, 3, 3, 3 , 3, 3, 3, 3, 3, 15, 15, 3, 3, 3 , 15,2500,2500,2500,2500, 70, 70, 70, 70, 70 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 /* p */ }; int power_set2[]={ /* ZbgQp */ 3, 3, 15, 15, 15, 15, 3, 3, 15, 3 , 20, 20, 12, 12, 15, 15, 3, 3, 3, 3 , 15, 15, 3, 3, 3, 3, 3, 3, 3, 3 , 3, 3, 3, 3, 3,200,200,200,200,200 ,200,200,200,200,200, 15, 3, 3, 3, 3 , 15, 45, 45, 3, 3,3500,3500,3500,3500,3500 ,3500,3500,3500,3500,3500, 70, 70, 70, 70, 70 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 /* p */ }; int power_set3[]={ /* ZbgRp */ 15, 15, 15, 15, 9, 9, 9, 9, 30, 30 , 15, 15, 30, 3, 3, 55, 3, 3, 3, 3 , 3, 3, 55, 15, 15, 3, 3,3000,3000,3000 ,3000,3000,3000,3000,3000,200,200,200,200,200 ,200,200,200,200,200, 3, 3, 3, 3, 3 , 3, 3, 3, 3, 3, 15, 3, 3, 3, 3 ,500,500,500,500, 3, 70, 70, 70, 70, 70 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 /* p */ }; int power_set4[]={ /* ZbgSp */ 15, 15, 3, 3, 15, 15, 3, 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 ,200,200,200,200,200 , 90, 90, 90, 90,200, 3, 3, 3, 3, 3 ,700,700,700,700, 3, 3, 3, 3, 3, 3 , 3, 3, 3, 3, 3, 70, 70, 70, 70, 70 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 /* p */ }; int power_set5[]={ /* ZbgTp */ 800, 3,800, 3,800, 3,800, 3,800, 3 ,800, 3,2000, 3, 3,700,700,700,700, 3 ,3000,3000,3000,3000,3000,3000,2000,2000,2000,2000 , 3, 3, 3, 3, 3,200,200,200,200,200 ,200,200,200,200,200, 3, 3, 3, 3, 3 , 3, 3, 3, 3, 3, 3, 3, 3, 3, 3 , 3, 3, 3, 3, 3, 70, 70, 70, 70, 70 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 /* p */ }; /* SETƂ̃XRA */ int score_set0[]={ /* ZbgOp */ 100,120,120,100,100,110,110,160,160,120 ,120,100,100,110, 0, 0, 0,100,100,100 ,120,120, 0, 0, 0,20000,800,800,3000,3000 ,1500,1500,15000, 0, 0,1200,1200,1200,1200,1200 ,1200,1200,1200,1200,1200, 60, 60, 60,120,120 ,120, 0,120,120, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0,320,320,320,320,320 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 /* p */ }; int score_set1[]={ /* ZbgPp */ 120,120,120,120,120,120, 0, 0, 0, 0 ,110, 0, 0,100,100,110,110, 0,130, 0 , 0,100,100,100,130,130,100,100,130,130 , 0, 0, 0, 0, 0,1200,1200,1500,1500,1500 ,1500,1500,1500,1200,1200,200,200,200,200,200 ,200,200,200,200,200,200,200,200,200,200 ,200,2500,2500,2500,2500,320,320,320,320,320 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 /* p */ }; int score_set2[]={ /* ZbgQp */ 120,120,120,120,200,200,160,160,120, 0 ,160,160,120,120,110,110,130,130,120,120 ,100,100,120,100,100,120,120,100,120,120 , 0, 0, 0, 0, 0,1500,1500, 0,1500,1200 , 0,1500,1200, 0, 0,100, 0, 0, 0, 0 ,200,400,400, 0, 0,10000, 0, 0, 0, 0 ,10000,10000,10000,10000,10000,220,220,220,220, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 /* p */ }; int score_set3[]={ /* ZbgRp */ 120,120,150,150,100,100,100,100,120,120 ,120,120,120,120,120,160,120,120,120,120 ,100,100,160,120,120,120,120,3000,3000,3000 ,3000,3000,3000,3000, 0,1200,1200,1500,1500,1500 ,1500,1500,1500,1500, 0,120,120,120,120,150 , 0,120,120,120,120,200, 0, 0, 0, 0 ,500,500,500,500, 0, 300,300,300, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 /* p */ }; int score_set4[]={ /* ZbgSp */ 100,100,100,100,100,100,100,100,100,100 ,100,100,100,100,100,100,100,100,100,100 ,100,100,100,100,100,100,100,100,100,100 ,100,100,100,100,100,100,100,100,100,100 ,400,400,400,400,400, 0, 0, 0, 0, 0 ,5000,5000,5000,5000, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 /* p */ }; int score_set5[]={ /* ZbgTp */ 5000,5000,5000,5000,5000,5000,5000,5000,5000,5000 ,5000,5000,30000, 0, 0,5000,5000,5000,5000, 0 ,13000,13000,13000,13000,13000,13000,12000,12000,12000,12000 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 /* p */ }; /* SETƂ̓蔻̃TCY */ short sizex_set0[]={ /* ZbgOpw */ 13,13,13, 8, 8,10,10,11,11,14 ,14,13,13,10,14,14,14,13,13,13 ,14,14,14,14,14,32, 8, 8,24,24 ,12,12,48,14,14,28,28,28,28,28 ,28,28,28,28,28, 8, 8, 8,14,14 ,14,10,14,14,10,32, 8, 0,10,10 ,10,10,10,10,10,16,14,14,14,14 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 }; short sizey_set0[]={ /* ZbgOpx */ 13,13,13,18,18,12,12,16,16,15 ,15,13,13,12,14,14,14,13,13,13 ,15,15,14,14,14,32,16,16,32,32 ,32,32,24,14,14,24,24,24,24,24 ,24,24,24,24,24, 8, 8, 8,15,15 ,15,10,15,15,10,32, 8, 0,10,10 ,10,10,10,10,10,16,14,14,14,14 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 }; short sizex_set1[]={ /* ZbgPpw */ 13,13,13,13,11,13,14,14,14,14 ,14,14,14,12,12,14,14,14,10,14 ,14, 8, 8, 8,10,10,12,12,10,10 ,32,32,14,14,14,24,24,24,24,24 ,24,24,24,24,24,10, 8,10,10,10 ,10,10,10,10,10, 8, 8,10,10,10 , 8,32,32,32,32,16,16,16,16,12 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 }; short sizey_set1[]={ /* ZbgPpx */ 13,13,13,13,16,16,14,14,14,14 ,12,14,14,16,16,12,12,14,16,14 ,14,18,18,18,16,16,16,16,16,16 ,32,32,14,14,14,27,27,27,27,31 ,31,31,31,27,27,10,16,10,10,16 ,16,10,10,10,10,16,16,10,10,10 ,16,32,32,32,32,16,16,16,16,16 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 }; short sizex_set2[]={ /* ZbgQpw */ 14,14,12,12, 8, 8,11,11,13,14 , 8, 8,11,11,13,13,10,10,14,14 ,13,13,10,11,11,10,10, 8,14,14 ,14,14,14,14,14,24,24,24,24,24 ,24,24,24,24,24, 8,10,10,10,10 , 8,16,16,10,10,40,16,16, 8, 8 ,40,40,40,40,40,12,12,12,12,14 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 }; short sizey_set2[]={ /* ZbgQpx */ 15,15,14,14,16,16,16,16,15,14 ,17,17,15,15,15,15,16,16,14,14 ,15,15,16,16,16,16,16, 8,15,15 ,14,14,14,14,14,32,32,32,32,32 ,32,32,32,32,32, 8,10,10,10,10 ,16, 8, 8,10,10,56,40,40,13,13 ,56,56,56,56,56,16,16,16,16,14 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 }; short sizex_set3[]={ /* ZbgRpw */ 10,10,12,12,13,13,13,13,13,13 ,10,10,13,11,11,16,11,11,14,14 , 8,13,16,13,13,11,11,32,32,32 ,32,32,32,32,32,24,24,24,24,24 ,24,24,24,24,30,14,14,14,14, 8 ,10,14,14,14,14, 8,10,10,10,10 ,16,16,16,16,10,11,11,11,14,14 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 }; short sizey_set3[]={ /* ZbgRpx */ 15,15,16,16,15,15,15,15,13,13 ,15,15,13,15,15,10,15,15,15,15 ,18,13,10,13,13,15,15,32,32,32 ,32,32,32,32,32,32,32,24,24,24 ,24,24,24,24,30,15,15,15,15, 8 ,10,15,15,15,15,16,10,10,10,10 ,16,16,16,16,10,16,16,16,14,14 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 }; short sizex_set4[]={ /* ZbgSpw */ 14,14,14,14,13,13,12,12,12,13 ,13,13,13,13,13,12,12,10,10,10 ,10,10,13,14,12,12,12,12,13,13 ,13,12,12,14,14,18,18,24,14,14 ,14,14,14,14,14,10,10,10,10,10 ,24,24,24,24,10,10,10,10,10,10 ,10,10,10,10,10,14,14,14,14,14 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 }; short sizey_set4[]={ /* ZbgSpx */ 15,15,14,14,13,13,16,16,16,13 ,13,15,15,15,15,16,16,12,12,12 ,12,12,15,14,16,16,16,16,13,13 ,15,16,16,14,14,71,71,27,24,24 ,24,24,24,24,24,10,10,10,10,10 ,24,24,24,24,10,10,10,10,10,10 ,10,10,10,10,10,14,14,14,14,14 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 }; short sizex_set5[]={ /* ZbgTpw */ 12,12,12,12,14,14,14,14,21,21 ,21,21,16,14,14,24,24,24,24,14 ,32,32,32,32,32,32,32,32,32,32 ,14,14,14,14,14,30,30,30,30,30 ,30,30,30,30,30,10,10,10,10,10 ,10,10,10,10,10,10,10,10,10,10 ,10,10,10,10,10,14,14,14,14,14 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 }; short sizey_set5[]={ /* ZbgTpx */ 12,12,12,12,16,16,16,16,21,21 ,21,21,24,14,14,24,24,24,24,14 ,32,32,32,32,32,32,32,32,32,32 ,14,14,14,14,14,30,30,30,30,30 ,30,30,30,30,30,10,10,10,10,10 ,10,10,10,10,10,10,10,10,10,10 ,10,10,10,10,10,14,14,14,14,14 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 }; /* SETƂ ground */ short ground_set0[]={ /* ZbgOp */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 1, 1, 1, 1, 1 , 1, 1, 1, 1, 1, 0, 0, 1, 1, 1 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 }; short ground_set1[]={ /* ZbgPp */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 1, 1, 1, 1, 1 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 , 1, 0, 0, 0, 0, 1, 1, 1, 1, 1 }; short ground_set2[]={ /* ZbgQp */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 1, 1, 1, 1, 1 , 1, 1, 1, 1, 1, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 1, 1, 1, 1, 1 }; short ground_set3[]={ /* ZbgRp */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 1, 1, 1, 1, 1 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 , 0, 0, 0, 0, 1, 1, 1, 1, 1, 1 }; short ground_set4[]={ /* ZbgSp */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 1, 1, 1, 1, 1 , 0, 0, 0, 0, 1, 1, 1, 1, 1, 1 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 }; short ground_set5[]={ /* ZbgTp */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, 0, 1, 1, 1, 1, 1 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 , 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 }; /*---------------------< ϐ錾 >---------------------------------*/ static void **emc(ENE_DATA*); /* ꂼ̈ړ֐ւ̃|C^ */ void (*emc0[])(ENE_DATA*)={ /* ZbgOLʈړ[`ւ̃|C^ */ ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,enemove_rsPb1body,enemove_rsPb1bul_l,enemove_rsPb1bul_r,enemove_rsPb1gun_l,enemove_rsPb1gun_r ,enemove_rsPb1arm_l,enemove_rsPb1arm_r,ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,enemove_rsPriv,ene_move, ene_move, ene_move, ene_move ,enemove_rsPlaser, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,enemove_P,enemove_Q,enemove_mid,enemove_gmid,enemove_P ,enemove_P,enemove_P,enemove_P,enemove_P,enemove_P }; void (*emc1[])(ENE_DATA*)={ /* ZbgPLʈړ[`ւ̃|C^ */ ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,enemove_rsQrivEsc1,enemove_rsQrivEsc2,ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move,enemove_rsQriv,enemove_rsQriv2,enemove_rsQriv3,enemove_rsQriv4 ,ene_move, ene_move, ene_move, ene_move, ene_move ,enemove_P,enemove_Q,enemove_mid,enemove_gmid,enemove_g25 ,enemove_P,enemove_P,enemove_P,enemove_P,enemove_P }; void (*emc2[])(ENE_DATA*)={ /* ZbgQLʈړ[`ւ̃|C^ */ ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,enemove_rsRlaser,enemove_rsRblade, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,enemove_rsRbossappear,enemove_rsRbossarm_l,enemove_rsRbossarm_r,enemove_rsRbossman_l,enemove_rsRbossman_r ,enemove_rsRbossintro,enemove_rsRbossatt1,enemove_rsRbossatt2,enemove_rsRbossatt3,enemove_rsRbosszero ,ene_move, ene_move, ene_move, ene_move, ene_move ,enemove_P,enemove_mid2,enemove_mid,enemove_gmid,enemove_g25 ,enemove_g26,enemove_P,enemove_P,enemove_P,enemove_P }; void (*emc3[])(ENE_DATA*)={ /* ZbgRLʈړ[`ւ̃|C^ */ ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move,enemove_rsSriv,enemove_rsSriv2,enemove_rsSriv3 ,enemove_rsSriv4,enemove_rsSriv5, ene_move, ene_move,enemove_rsSrivEsc ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, enemove_rsSlaser, ene_move, ene_move, ene_move ,enemove_rsSfqo`ҋ@,enemove_rsSfq~,enemove_rsSfqo`ҋ@,enemove_rsSfq~,ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,enemove_P,enemove_Q,enemove_mid,enemove_gmid,enemove_mid2 ,enemove_rsSRA,enemove_P,enemove_P,enemove_P,enemove_P }; void (*emc4[])(ENE_DATA*)={ /* ZbgSLʈړ[`ւ̃|C^ */ ene_move, ene_move, ene_move5, ene_move5, ene_move ,ene_move, ene_move, ene_move5, ene_move5, ene_move5 ,ene_move5, ene_move5, ene_move5, ene_move5, ene_move5 ,ene_move5, ene_move5, ene_move5, ene_move5, ene_move5 ,ene_move5, ene_move5, ene_move5, ene_move5, ene_move5 ,ene_move5, ene_move5, ene_move5, ene_move5, ene_move5 ,ene_move5, ene_move5, ene_move5, ene_move5, ene_move5 ,ene_move, ene_move, ene_move, ene_move5, ene_move5 ,ene_move5, ene_move5, ene_move5, ene_move5, ene_move5 ,ene_move5, ene_move5, ene_move5, ene_move5, ene_move5 ,enemove_rsTbossopen,enemove_rsTbossclose,enemove_rsTboss1,enemove_rsTboss2,ene_move5 ,ene_move5, ene_move5, ene_move5, ene_move5, ene_move5 ,ene_move5, ene_move5, ene_move5, ene_move5, ene_move5 ,ene_move5, ene_move5, ene_move5, ene_move5, ene_move5_scope ,enemove_P,enemove_Q,enemove_R,enemove_mid,enemove_mid2 ,enemove_g25,enemove_P,enemove_P,enemove_P,enemove_P }; void (*emc5[])(ENE_DATA*)={ /* ZbgTLʈړ[`ւ̃|C^ */ enemove_rsURA,enemove_rsURA,enemove_rsURA,enemove_rsURA,enemove_rsURA ,enemove_rsURA,enemove_rsURA,enemove_rsURA,enemove_rsURA,enemove_rsURA ,enemove_rsURA,enemove_rsURA, enemove_rsUcrystal,ene_move, ene_move ,enemove_rsUboss5open,enemove_rsUboss5close,enemove_rsUboss51,enemove_rsUboss52,ene_move ,enemove_rsUriv,enemove_rsUriv2,enemove_rsUriv3,enemove_rsUriv4,enemove_rsUriv5 ,enemove_rsUriv6,enemove_rsUriv7,enemove_rsUriv8,enemove_rsUrivChg, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move,enemove_rsUlaser, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,ene_move, ene_move, ene_move, ene_move, ene_move ,enemove_P,enemove_Q,enemove_mid,enemove_P,enemove_P ,enemove_P,enemove_P,enemove_P,enemove_P,enemove_P }; int e_sel; /* G̃VAio[i̍ł(;_;)j */ /*--------------< G[` >---------------*/ void ene() { static int i=0; /* G@o`FbN */ if(ene_cont->appear){ /* o‚Ă邩H */ while(1){ if(*ene_map->loc == -1){ /* Soso֎~ */ ene_cont->appear=0; break; } if(*ene_map->loc >= bg_data->bg_y){ /* G@ */ ene_appear( *ene_map->code /* Gov */ ,*ene_map->x ,*ene_map->y ,ene_cont->power_set[*ene_map->code] ,ene_cont->sizex_set[*ene_map->code] ,ene_cont->sizey_set[*ene_map->code] ); ene_map->loc++; /* CNg */ ene_map->x++; ene_map->y++; ene_map->code++; } else break; } } else { /* o‚ĂȂꍇ */ while(1){ if(*ene_map->loc == -1){ /* Soso֎~ */ ene_cont->appear=0; break; } if(*ene_map->loc >= bg_data->bg_y){ /* G@ */ ene_map->loc++; /* CNg */ ene_map->code++; ene_map->x++; ene_map->y++; } else break; } } /* G@ړvZ */ for(e_sel=0;e_selene_max;e_sel++){ if(ene_data[e_sel]->type==-1)continue; /* GoĂȂ΃XLbv */ ene_cont->emc[ene_data[e_sel]->type](ene_data[e_sel]); /* ړ */ } } /*---------------------------< Gov֐ >--------------------------------*/ void ene_appear(code,x,y,power,dx,dy) char code; short x; short y; int power; short dx; short dy; { static int i=0; if(code==-1){ /* xƌȂ|C^ */ i=0; return; } for(;iene_max;i++){ /* 󂫏ꏊT */ if(ene_data[i]->type==-1){ /* */ ene_data[i]->type =code; ene_data[i]->x =x; ene_data[i]->y =y; ene_data[i]->hx =ene_data[i]->x*32; ene_data[i]->hy =ene_data[i]->y*32; ene_data[i]->dx =enemove->dx[code]; ene_data[i]->dy =enemove->dy[code]; ene_data[i]->atr =enemove->atr[code]; ene_data[i]->count=0; ene_data[i]->power=power; ene_data[i]->se_hit=hit_cont->se_hit_set[code]; ene_data[i]->accel=0; ene_data[i]->size_x=dx; ene_data[i]->size_y=dy; ene_data[i]->anim1=0; ene_data[i]->anim2=0; ene_data[i]->anim3=0; ene_data[i]->ground=ene_cont->ground_set[code]; break; } } } /*--------------< GړB ꗥł̂́AB >---------------*/ void ene_move(ene_data) ENE_DATA *ene_data; { static short ef_x; /* enemy field ̍ʒu */ static short ef_y; static int i,c; if(*ene_data->dx==0x7FFF){ /* ޺ނ */ ene_data->dx--; /* O̍sJԂ */ ene_data->dy--; ene_data->atr--; ene_data->count-=1; } /* */ ene_data->x+= *ene_data->dx++; ene_data->y+= *ene_data->dy++; ene_data->atr++; ene_data->count+=1; ef_x = (ene_data->x - ene_data->size_x)/32; /* enemy field check */ ef_y = (ene_data->y - ene_data->size_y)/32; for(i=0;iearea_by[ene_data->type];i++){ for(c=0;cearea_bx[ene_data->type];c++){ if((ef_x+c)< 0)continue; /* NbsO */ if((ef_x+c)>=8)continue; if((ef_y+i)< 0)continue; if((ef_y+i)>=8)continue; *hit_cont->ene_field[ef_y+i][ef_x+c]++=e_sel; *hit_cont->ene_field[ef_y+i][ef_x+c] =-1; } } if(ene_data->count>50){ /* TOt[́ANbsOȂ */ if(ene_data->y > DOWNMAX )ene_data->type=-1; /* NbsO */ if(ene_data->y < UPMAX )ene_data->type=-1; if(ene_data->x > RIGHTMAX)ene_data->type=-1; if(ene_data->x < LEFTMAX )ene_data->type=-1; } } 0,0x4F,0,1) break; } } if(ene_data->anim3 ==0 ){ switch(ta){ case 64: /* _~[ */ break; default: off=((ene_data->anim1>>1)&3)*4; ene_data->anim1+=1; SP_DATAST(tx ,ty ,col,0x27+off,0,0) SP_DATAST(tx+1/*---------------------< vg^Cv錾 >-----------------------*/ void ene(); void ene_appear(char,short,short,int,short,short); /* Gov֐ */ im1>>1)&3)*4; ene_data->anim1+=1; SP_DATAST(tx ,ty ,col,0x27+off,0,0) SP_DATAST(tx+16,ty ,col,0x28+off,0,0) SP_DATAST(tx ,ty+16,col,0x29+off,0,0) SP_DATAST(tx+16,ty+16,col,0x2A+off,0,0) } } /*------------------ Gro\ErsTnum18 -------------*/ void enesp_rsTnum18(ene_data) ENE_DATA *ene_data; { static short rnd_x,rnd_y; static short tx,ty,ta; static short col; if(ene_data->flash)col=15; else col=8; ene_data->anim1+=disp_cont->status&1; if(ene_data->anim1 >= 8)ene_data->anim1=0; if(ene_data->anim3 == 0){ /* `‚ */ switch(ene_data->anim2){ case 0: case 15: case 30: case 36: case 42: case 47: case 51: case 53: case 55: case 57: case 59: case 60: rnd_x = rnd15(); rnd_y = rnd15(); tx = ene_data->x -8 +rnd15(); ty = ene_data->y -8 +rn#include #include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "..\\sepcm.h" #include "subs.h" #include "eneshot.h" #include "shotptn1.h" #include "shotptna.h" #include "shotptnb.h" #include "shotptnc.h" #include "shotptnd.h" #include "shotptne.h" #include "shotptnf.h" #include "ene.h" /*---------------------< ϐ錾 >----------------------------*/ /* ˌnTu[`ǂ */ void (*shot_func0[])(ENE_DATA*)={ /* ZbgOp */ eneshot_rsPnum16_2,eneshot_rsPnum10 ,eneshot_rsPnum10 ,eneshot_rsPnum11,eneshot_rsPnum11 ,eneshot_rsPnum05 ,eneshot_rsPnum05 ,eneshot_rsPnum30 ,eneshot_rsPnum30,eneshot_rsPnum06_2 ,eneshot_rsPnum06_2,eneshot_rsPnum16_3,eneshot_rsPnum16_3,eneshot_rsPnum05,eneshot_rsPnum05 ,eneshot_dummy,eneshot_rsPnum16_3,eneshot_rsPnum16_3,eneshot_rsPnum16,eneshot_rsPnum16 ,eneshot_rsPnum06,eneshot_rsPnum06,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_rsPnum01 ,eneshot_rsPnum01 ,eneshot_rsPnum01_3,eneshot_rsPnum01_3,eneshot_rsPnum01_2 ,eneshot_rsPnum01_6,eneshot_rsPnum01_6,eneshot_rsPnum01_4,eneshot_rsPnum01_5,eneshot_rsPnum01_5 ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_rsPnum06_3 ,eneshot_rsPnum06_3,eneshot_rsPnum06_4,eneshot_rsPnum06_4,eneshot_rsPnum06_4,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_rsPnum21,eneshot_rsPnum21_2,eneshot_rsPnum21_2,eneshot_rsPnum21_3,eneshot_rsPnum21_3 ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy /* p */ ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy }; void (*shot_func1[])(ENE_DATA*)={ /* ZbgPp */ eneshot_rsQnum10,eneshot_rsQnum10,eneshot_rsQnum10,eneshot_rsQnum10,eneshot_rsQnum07 ,eneshot_rsQnum07,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_rsQnum14,eneshot_rsQnum14,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_rsQnum14,eneshot_rsQnum14,eneshot_rsQnum05,eneshot_rsQnum05,eneshot_dummy ,eneshot_dummy,eneshot_rsQnum11,eneshot_rsQnum11,eneshot_rsQnum11,eneshot_rsQnum05_2 ,eneshot_rsQnum05_2,eneshot_rsQnum18,eneshot_rsQnum18,eneshot_rsQnum05_3,eneshot_rsQnum05_3 ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_rsQnum04,eneshot_rsQnum04,eneshot_rsQnum09_3,eneshot_rsQnum09_3,eneshot_rsQnum09 ,eneshot_rsQnum09_2,eneshot_rsQnum09_2,eneshot_dummy,eneshot_rsQnum04_2,eneshot_rsQnum04_2 ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_rsQnum25_2,eneshot_rsQnum25_2,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_rsQnum25,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_rsQnum21_2,eneshot_rsQnum21_2,eneshot_rsQnum21,eneshot_rsQnum21,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy /* p */ ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy }; void (*shot_func2[])(ENE_DATA*)={ /* ZbgQp */ eneshot_rsRnum06,eneshot_rsRnum06,eneshot_rsRnum20a,eneshot_rsRnum20b,eneshot_rsRnum25 ,eneshot_rsRnum25,eneshot_rsRnum30,eneshot_rsRnum30,eneshot_rsRnum02,eneshot_dummy ,eneshot_rsRnum27,eneshot_rsRnum27,eneshot_rsRnum29,eneshot_rsRnum29,eneshot_rsRnum16 ,eneshot_rsRnum16,eneshot_rsRnum05,eneshot_rsRnum05,eneshot_rsRnum07a,eneshot_rsRnum07b ,eneshot_rsRnum02_2,eneshot_rsRnum02_2,eneshot_rsRnum05_2,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_rsRnum06_2,eneshot_rsRnum06_2 ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_rsRnum24,eneshot_rsRnum24_2,eneshot_dummy,eneshot_rsRnum24_2,eneshot_rsRnum19 ,eneshot_dummy,eneshot_rsRnum24,eneshot_rsRnum19,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_rsRnum25_2,eneshot_rsRnum26,eneshot_rsRnum26,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy /* p */ ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy }; void (*shot_func3[])(ENE_DATA*)={ /* ZbgRp */ eneshot_rsSnum31,eneshot_rsSnum31,eneshot_rsSnum20,eneshot_rsSnum20,eneshot_rsSnum33 ,eneshot_rsSnum33,eneshot_rsSnum33_2,eneshot_rsSnum33_2,eneshot_rsSnum10,eneshot_rsSnum10 ,eneshot_rsSnum31_2,eneshot_rsSnum31_2,eneshot_rsSnum10_2,eneshot_rsSnum29,eneshot_rsSnum29 ,eneshot_rsSnum27,eneshot_rsSnum29_2,eneshot_rsSnum29_2,eneshot_rsSnum06,eneshot_rsSnum06 ,eneshot_rsSnum11,eneshot_dummy,eneshot_rsSnum27,eneshot_rsSnum10_3,eneshot_rsSnum10_3 ,eneshot_rsSnum29,eneshot_rsSnum29,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_rsSnum12,eneshot_rsSnum12_2,eneshot_rsSnum23,eneshot_rsSnum23,eneshot_rsSnum23_2 ,eneshot_rsSnum23_2,eneshot_rsSnum23_3,eneshot_rsSnum23_3,eneshot_rsSnum23_4,eneshot_dummy ,eneshot_rsSnum06_2,eneshot_rsSnum06_2,eneshot_rsSnum06_3,eneshot_rsSnum06_3,eneshot_rsSnum20_2 ,eneshot_dummy,eneshot_rsSnum06_4,eneshot_rsSnum06_4,eneshot_rsSnum06_5,eneshot_rsSnum06_5 ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot__Q,eneshot__,eneshot__Q,eneshot__,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy /* p */ ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy }; void (*shot_func4[])(ENE_DATA*)={ /* ZbgSp */ eneshot_rsTnum06,eneshot_rsTnum06,eneshot_dummy,eneshot_dummy,eneshot_rsTnum06_2 ,eneshot_rsTnum06_2,eneshot_rsTnum20,eneshot_rsTnum18,eneshot_rsTnum18_2,eneshot_rsTnum17 ,eneshot_rsTnum17,eneshot_rsTnum16,eneshot_rsTnum16,eneshot_rsTnum09,eneshot_rsTnum09 ,eneshot_rsTnum18_3,eneshot_rsTnum18_3,eneshot_rsTnum02,eneshot_rsTnum02,eneshot_rsTnum02_2 ,eneshot_rsTnum02_2,eneshot_dummy,eneshot_rsTnum09_2,eneshot_rsTnum09_2,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_rsTnum17_2,eneshot_rsTnum17_2 ,eneshot_rsTnum09_3,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_rsTnum28,eneshot_rsTnum28,eneshot_rsTnum04,eneshot_dummy,eneshot_dummy ,eneshot_rsTrobot,eneshot_rsTrobot2,eneshot_rsTrobot3,eneshot_rsTrobot3,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy /* p */ ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy }; void (*shot_func5[])(ENE_DATA*)={ /* ZbgTp */ eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy /* p */ ,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy,eneshot_dummy }; /*---------------------< ` >---------------------------------*/ #define LEFTMAX -32 #define RIGHTMAX 290 #define UPMAX -32 #define DOWNMAX 290 /*---------------------< vg^Cv錾 >----------------------------*/ /* ړnTu[`ǂ */ void eneshot_move_straight(ENESHOT_DATA*); /* Ge ܂ԁB */ void eneshot_move_x2(ENESHOT_DATA*); /* Ge `ė */ void eneshot_move_lance(ENESHOT_DATA*); /* Ge X */ /* GẽTCY */ static short size_x[]={ 1, 1, 1,14, 2, 1, 1, 1, 1, 1 }; /* Ƃ肠PO^Cv(^^; */ static short size_y[]={ 1,14, 1, 1, 2, 1,14,14, 1, 1 }; /*------------------------------------------- Ge -------*/ void eneshot() { void (*type_func[])(ENESHOT_DATA*)={ /* e^Cvʓ֐ւ̃|C^ */ eneshot_move_straight,eneshot_move_straight,eneshot_move_x2,eneshot_move_straight,eneshot_move_straight ,eneshot_move_straight,eneshot_move_straight,eneshot_move_lance }; int i; for(i=0;iene_max;i++){ /* ˃[`R[ */ if(ene_data[i]->type==-1)continue; (eneshot_cont->shot_func[ene_data[i]->type])(ene_data[i]); } /* ňړ[`R[ */ for(i=0;ieneshot_max;i++){ if(eneshot_data[i]->type==-1)continue; /* ݂ȂȂXLbv */ type_func[eneshot_data[i]->type](eneshot_data[i]); } } /*---------------------------< Geov֐ >--------------------------------*/ void eneshot_appear(code,x,y,dx,dy,dir,spd,ene_data) char code; short x; short y; short dx; short dy; char dir; char spd; ENE_DATA *ene_data; { static int i; if(code==-1){ /* xƌȂ|C^ */ i=0; return; } for(;ieneshot_max;i++){ /* 󂫏ꏊT */ if(eneshot_data[i]->type==-1){ /* */ eneshot_data[i]->type =code; eneshot_data[i]->x =x; eneshot_data[i]->y =y; eneshot_data[i]->hx =eneshot_data[i]->x*32; eneshot_data[i]->hy =eneshot_data[i]->y*32; eneshot_data[i]->dx =dx; eneshot_data[i]->dy =dy; eneshot_data[i]->size_x=size_x[code]; eneshot_data[i]->size_y=size_y[code]; eneshot_data[i]->dir =dir; eneshot_data[i]->spd =spd; eneshot_data[i]->count =0; eneshot_data[i]->anim1 =0; eneshot_data[i]->anim2 =0; eneshot_data[i]->anim3 =0; eneshot_data[i]->ene_data=ene_data; switch(code){ case 1: case 3: case 4: case 6: case 7: se_adpcm1(zm_data->pcm[SE_LASER],zm_data->pcmsize[SE_LASER],SEPRW_ENELASER); break; default: break; } break; } } } /*------------------------------------------- GeiiejړvZ ----*/ void eneshot_move_straight(eneshot_data) ENESHOT_DATA *eneshot_data; { eneshot_data->hx+=eneshot_data->dx; /* Wړ */ eneshot_data->hy+=eneshot_data->dy; eneshot_data->x =eneshot_data->hx/32; /* XP[ϊ */ eneshot_data->y =eneshot_data->hy/32; eneshot_data->anim1+=1; /* JE^{P */ if(eneshot_data->y > DOWNMAX )eneshot_data->type=-1; /* NbsO */ if(eneshot_data->y < UPMAX )eneshot_data->type=-1; if(eneshot_data->x > RIGHTMAX)eneshot_data->type=-1; if(eneshot_data->x < LEFTMAX )eneshot_data->type=-1; } /*------------------------------------------- GeijړvZ ----*/ void eneshot_move_x2(eneshot_data) ENESHOT_DATA *eneshot_data; { eneshot_data->hx+=eneshot_data->dx; /* Wړ */ eneshot_data->x =eneshot_data->hx/32; /* XP[ϊ */ eneshot_data->dy+=eneshot_data->spd; eneshot_data->hy+=eneshot_data->dy; eneshot_data->y =eneshot_data->hy/32; eneshot_data->anim1+=1; /* JE^{P */ if(eneshot_data->y > DOWNMAX )eneshot_data->type=-1; /* NbsO */ //if(eneshot_data->y < UPMAX )eneshot_data->type=-1; if(eneshot_data->x > RIGHTMAX)eneshot_data->type=-1; if(eneshot_data->x < LEFTMAX )eneshot_data->type=-1; } /*------------------------------------------- GeiXjړvZ ----*/ void eneshot_move_lance(eneshot_data) ENESHOT_DATA *eneshot_data; { if(eneshot_data->anim1<16){ /* ˒Ȃ猸 */ if(eneshot_data->dx> eneshot_data->spd)eneshot_data->dx-=eneshot_data->spd; if(eneshot_data->dx<-eneshot_data->spd)eneshot_data->dx+=eneshot_data->spd; if(eneshot_data->dy> eneshot_data->spd)eneshot_data->dy-=eneshot_data->spd; if(eneshot_data->dy<-eneshot_data->spd)eneshot_data->dy+=eneshot_data->spd; } if(eneshot_data->anim1==16){ /* U~܂ */ eneshot_data->dx=0; eneshot_data->dy=0; } if(eneshot_data->anim1==16+30){ /* Aˌ */ eneshot_data->dx=0; eneshot_data->dy=12*32; } eneshot_data->hx+=eneshot_data->dx; /* Wړ */ eneshot_data->hy+=eneshot_data->dy; eneshot_data->x =eneshot_data->hx/32; /* XP[ϊ */ eneshot_data->y =eneshot_data->hy/32; eneshot_data->anim1+=1; /* JE^{P */ if(eneshot_data->y > DOWNMAX )eneshot_data->type=-1; /* NbsO */ //if(eneshot_data->y < UPMAX )eneshot_data->type=-1; if(eneshot_data->x > RIGHTMAX)eneshot_data->type=-1; if(eneshot_data->x < LEFTMAX )eneshot_data->type=-1; }  SP_DATAST(ene_data->x+16,ene_data->y-24,col,TOP_WARP+0x29,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,TOP_WARP+0x2A,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,TOP_WARP+0x2B,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,TOP_WARP+0x2C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,TOP_WARP+0x2D,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,TOP_WARP+0x2E,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,TOP_WARP+0x2F,0,0) SP_DATAST(ene_data->x ,ene_data->y+40,col,TOP_WARP+0x30,0,0) SP_DATAST(ene_data->x+16,ene_data->y+40,col,TOP_WARP+0x31,0,0) break; } if(ene_data->count<4){ /* {̂`‚ */ if(ene_data->count&1){ enesp_rsTboss1(ene_data); } } } /*--------------------- vg^Cv錾 ---------------------*/ void eneshot(); void eneshot_appear(char,short,short,short,short,char,char,ENE_DATA*); sh)col=15; else col=4; switch(ene_data->anim3){ case 0: case 1: case 2: case 3: area1(ene_data); break; case 4: case 5: case 6: case 7: area2(ene_data); break; case 8: case 9: case 10: case 11: area3(ene_data); break; case 12: case 13: case 14: case 15: area4(ene_data); break; } } /*------------------ Gro\ErsTboss2 -------------*/ void enesp_rsTboss2(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=4; switch(ene_data->anim3){ case 0: case 1: case 2: case 3: area1(ene_data); break; case 4: case 5: case 6: case 7: area2(ene_data); break; case 8: case 9: case 10: case 11: area3(ene_data); break; case 12: case 13: case 14: case 15: area4(ene_data); break; } } #include #include #include "gtnlib.h" #include "..\\include\\key.h" #include "..\\structs.h" /* A‚͊{ */ #include "enesp_seta.h" #include "subs.h" /* {XL̂rogbv֘A̒` */ #define BODYTOP 0xC0 #define GUNTOP 0xCA #define BULTOP 0x4B #define ARMTOP 0x01 /*---------------------< ϐ錾 >----------------------------*/ extern volatile STICK_UNIT *STC1_IO; /* WCXeBbN */ //extern char keyin; /* ̂ */ /*------------------ Gro\ErsPriv -------------*/ void enesp_rsPriv(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=4+(disp_cont->status&1); /* ʂɁAm[}o`kPO */ //if(keyin==KCODE_U)ene_data->anim3+=1; //if(keyin==KCODE_D)ene_data->anim3-=1; if(ene_data->anim3<0)ene_data->anim3=0; /* ꉞ̕ی@\ */ if(ene_data->anim3>45)ene_data->anim3=45; /* {̕\ */ switch((disp_cont->status)&1){ case 0: dmacpy((unsigned short*)(&(sp_data->transsp.tsp_buff[21][5*5*0x40*ene_data->anim3])),(unsigned short*)SP_DEF_ADD(0x01),5*5*(0x80/4)); if(col!=15)dmacpy((unsigned short*)(&(sp_data->transpal.tpal_buff[9][16*ene_data->anim3])),(unsigned short*)SP_PAL_ADD(col),8); SP_DATAST(ene_data->x-24,ene_data->y-24,col,0x01,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0x02,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0x03,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0x04,0,0) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0x05,0,0) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,0x06,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0x07,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x08,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0x09,0,0) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,0x0A,0,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,0x0B,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0x0C,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x0D,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0x0E,0,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0x0F,0,0) SP_DATAST(ene_data->x-24,ene_data->y+24,col,0x10,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0x11,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x12,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0x13,0,0) SP_DATAST(ene_data->x+40,ene_data->y+24,col,0x14,0,0) SP_DATAST(ene_data->x-24,ene_data->y+40,col,0x15,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0x16,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0x17,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0x18,0,0) SP_DATAST(ene_data->x+40,ene_data->y+40,col,0x19,0,0) break; case 1: dmacpy((unsigned short*)(&(sp_data->transsp.tsp_buff[21][5*5*0x40*ene_data->anim3])),(unsigned short*)SP_DEF_ADD(0x1A),5*5*(0x80/4)); if(col!=15)dmacpy((unsigned short*)(&(sp_data->transpal.tpal_buff[9][16*ene_data->anim3])),(unsigned short*)SP_PAL_ADD(col),8); SP_DATAST(ene_data->x-24,ene_data->y-24,col,0x1A,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0x1B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0x1C,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0x1D,0,0) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0x1E,0,0) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,0x1F,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0x20,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x21,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0x22,0,0) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,0x23,0,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,0x24,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0x25,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x26,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0x27,0,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0x28,0,0) SP_DATAST(ene_data->x-24,ene_data->y+24,col,0x29,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0x2A,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x2B,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0x2C,0,0) SP_DATAST(ene_data->x+40,ene_data->y+24,col,0x2D,0,0) SP_DATAST(ene_data->x-24,ene_data->y+40,col,0x2E,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0x2F,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0x30,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0x31,0,0) SP_DATAST(ene_data->x+40,ene_data->y+40,col,0x32,0,0) break; } } /*------------------ Gro\ErsPnum10 -------------*/ void enesp_rsPnum10(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=7; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x+8 ,ene_data->y ,col,0x01,0,0) SP_DATAST(ene_data->x+4 ,ene_data->y+16,col,0x02,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y ,col,0x03,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x04,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x05,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x06,0,0) break; case 2: SP_DATAST(ene_data->x ,ene_data->y ,col,0x07,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x08,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x09,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x0A,0,0) break; case 3: SP_DATAST(ene_data->x ,ene_data->y ,col,0x0B,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x0B,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x0C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x0C,0,1) break; case 4: SP_DATAST(ene_data->x+8 ,ene_data->y ,col,0x01,0,1) SP_DATAST(ene_data->x+12,ene_data->y+16,col,0x02,0,1) break; case 5: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x03,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x04,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x05,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x06,0,1) break; case 6: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x07,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x08,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x09,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x0A,0,1) break; case 7: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x0B,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x0B,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x0C,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x0C,0,0) break; default: SP_DATAST(ene_data->x+8 ,ene_data->y ,col,0x01,0,0) SP_DATAST(ene_data->x+4 ,ene_data->y+16,col,0x02,0,0) break; } } /*------------------ Gro\ErsPnum11 -------------*/ void enesp_rsPnum11(ene_data) ENE_DATA *ene_data; { static int i; static short col; static short off[]={0,3,6,9}; if(ene_data->flash)col=15; else col=8; SP_DATAST(ene_data->x+8,ene_data->y- 8,col,0x0D+off[(disp_cont->status>>2)&3],0,0) SP_DATAST(ene_data->x+8,ene_data->y+ 8,col,0x0E+off[(disp_cont->status>>2)&3],0,0) SP_DATAST(ene_data->x+8,ene_data->y+24,col,0x0F+off[(disp_cont->status>>2)&3],0,0) } /*------------------ Gro\ErsPnum16 -------------*/ void enesp_rsPnum16(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=9; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x ,ene_data->y ,col,0x19,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x1A,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x1B,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x1C,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y ,col,0x1D,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x1E,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x1F,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x20,0,0) break; case 2: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x21,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x22,0,0) break; case 3: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x23,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x24,0,0) break; case 4: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x25,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x26,0,0) break; case 5: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x23,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x24,0,1) break; case 6: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x21,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x22,0,1) break; case 7: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x1D,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x1E,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x1F,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x20,0,1) break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x19,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x1A,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x1B,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x1C,0,0) break; } } /*------------------ Gro\ErsPnum17 -------------*/ void enesp_rsPnum17(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=10; SP_DATAST(ene_data->x+8,ene_data->y+8,col,0x27+((disp_cont->status>>2)&3),0,0) } /*------------------ Gro\ErsPnum2 -------------*/ void enesp_rsPnum2(ene_data) ENE_DATA *ene_data; { static int i; static short col; static short ptn[]={0x2C,0x4E}; if(ene_data->flash)col=15; else col=5; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x2B,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,ptn[(disp_cont->status>>1)&1] ,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,ptn[(disp_cont->status>>1)&1]+1,0,1) break; case 1: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x2B,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2C,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2D,0,1) break; case 2: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x2E,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2F,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x30,0,1) break; case 3: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x31,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x32,0,1) break; case 4: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x2B,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,ptn[(disp_cont->status>>1)&1] ,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,ptn[(disp_cont->status>>1)&1]+1,0,0) break; case 5: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x2B,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2D,0,0) break; case 6: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x2E,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2F,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x30,0,0) break; case 7: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x31,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x32,0,0) break; default: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x2B,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2D,0,0) break; } } /*------------------ Gro\ErsPnum30 -------------*/ void enesp_rsPnum30(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=4; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x ,ene_data->y- 8,col,0xF0,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0xF1,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0xF2,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0xF3,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,0xF4,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,0xF5,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y- 8,col,0xF6,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0xF7,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0xF8,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0xF9,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,0xFA,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,0xFB,0,0) break; case 2: SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0xFC,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xFD,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0xFE,0,0) break; case 3: SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0xF0,0,1) SP_DATAST(ene_data->x ,ene_data->y- 8,col,0xF1,0,1) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0xF2,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0xF3,0,1) SP_DATAST(ene_data->x+16,ene_data->y+24,col,0xF4,0,1) SP_DATAST(ene_data->x ,ene_data->y+24,col,0xF5,0,1) break; case 4: SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0xF6,0,1) SP_DATAST(ene_data->x ,ene_data->y- 8,col,0xF7,0,1) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0xF8,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0xF9,0,1) SP_DATAST(ene_data->x+16,ene_data->y+24,col,0xFA,0,1) SP_DATAST(ene_data->x ,ene_data->y+24,col,0xFB,0,1) break; case 5: SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0xFC,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xFD,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0xFE,0,1) break; default: SP_DATAST(ene_data->x ,ene_data->y- 8,col,0xF0,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0xF1,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0xF2,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0xF3,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,0xF4,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,0xF5,0,0) break; } } /*------------------ Gro\ErsPnum6 type1 -------------*/ void enesp_rsPnum6_1(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=6; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x ,ene_data->y ,col,0x33,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x33,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x34,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x34,0,1) ene_data->size_x=14; ene_data->size_y=15; break; case 1: SP_DATAST(ene_data->x ,ene_data->y ,col,0x35,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x36,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x37,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x38,0,0) ene_data->size_x=14; ene_data->size_y=15; break; case 2: SP_DATAST(ene_data->x ,ene_data->y ,col,0x39,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x3A,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x3B,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x3C,0,0) ene_data->size_x=14; ene_data->size_y=15; break; case 3: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x3D,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x3E,0,0) ene_data->size_x=14; ene_data->size_y=15; break; case 4: SP_DATAST(ene_data->x ,ene_data->y ,col,0x33,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x33,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x34,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x34,0,1) ene_data->size_x=14; ene_data->size_y=15; break; case 5: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x35,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x36,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x37,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x38,0,1) ene_data->size_x=14; ene_data->size_y=15; break; case 6: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x39,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x3A,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x3B,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x3C,0,1) ene_data->size_x=14; ene_data->size_y=15; break; case 7: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x3D,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x3E,0,1) ene_data->size_x=14; ene_data->size_y=15; break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x33,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x33,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x34,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x34,0,1) ene_data->size_x=14; ene_data->size_y=15; break; } } /*------------------ Gro\ErsPnum6 type3 -------------*/ void enesp_rsPnum6_3(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=6; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x+8,ene_data->y+8,col,0x49,0,0) ene_data->ground=1; /* n㕨𐧌 */ ene_data->size_x=8; /* TCY𐧌 */ ene_data->size_y=8; break; case 1: SP_DATAST(ene_data->x+8,ene_data->y+8,col,0x48,0,0) ene_data->ground=1; /* n㕨𐧌 */ ene_data->size_x=9; /* TCY𐧌 */ ene_data->size_y=9; break; case 2: SP_DATAST(ene_data->x+8,ene_data->y+8,col,0x47,0,0) ene_data->ground=1; /* n㕨𐧌 */ ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=10; break; case 3: SP_DATAST(ene_data->x ,ene_data->y ,col,0x45,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x45,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x46,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x46,0,1) ene_data->ground=1; /* n㕨𐧌 */ ene_data->size_x=11; /* TCY𐧌 */ ene_data->size_y=11; break; case 4: SP_DATAST(ene_data->x ,ene_data->y ,col,0x43,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x43,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x44,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x44,0,1) ene_data->ground=1; /* n㕨𐧌 */ ene_data->size_x=12; /* TCY𐧌 */ ene_data->size_y=12; break; case 5: SP_DATAST(ene_data->x ,ene_data->y ,col,0x41,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x41,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x42,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x42,0,1) ene_data->ground=1; /* n㕨𐧌 */ ene_data->size_x=13; /* TCY𐧌 */ ene_data->size_y=13; break; case 6: SP_DATAST(ene_data->x ,ene_data->y ,col,0x3F,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x3F,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x40,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x40,0,1) ene_data->ground=0; /* n㕨𐧌 */ ene_data->size_x=14; /* TCY𐧌 */ ene_data->size_y=14; break; case 7: SP_DATAST(ene_data->x ,ene_data->y ,col,0x33,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x33,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x34,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x34,0,1) ene_data->ground=0; /* n㕨𐧌 */ ene_data->size_x=14; /* TCY𐧌 */ ene_data->size_y=15; break; default: SP_DATAST(ene_data->x+8,ene_data->y+8,col,0x49,0,0) ene_data->size_x=8; /* TCY𐧌 */ ene_data->size_y=8; break; } } /*------------------ Gro\ErsPnum1 -------------*/ void enesp_rsPnum1(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=4; switch(*(ene_data->atr-1)){ case 0: for(i=0;i<4;i++){ SP_DATAST(ene_data->x-16,ene_data->y-16+(i*16),col,0xC3+(i*4),0,1) SP_DATAST(ene_data->x ,ene_data->y-16+(i*16),col,0xC2+(i*4),0,1) SP_DATAST(ene_data->x+16,ene_data->y-16+(i*16),col,0xC1+(i*4),0,1) SP_DATAST(ene_data->x+32,ene_data->y-16+(i*16),col,0xC0+(i*4),0,1) } break; case 1: for(i=0;i<4;i++){ SP_DATAST(ene_data->x-16,ene_data->y-16+(i*16),col,0xD3+(i*4),0,1) SP_DATAST(ene_data->x ,ene_data->y-16+(i*16),col,0xD2+(i*4),0,1) SP_DATAST(ene_data->x+16,ene_data->y-16+(i*16),col,0xD1+(i*4),0,1) SP_DATAST(ene_data->x+32,ene_data->y-16+(i*16),col,0xD0+(i*4),0,1) } break; case 2: for(i=0;i<4;i++){ SP_DATAST(ene_data->x-16,ene_data->y-16+(i*16),col,0xE3+(i*4),0,1) SP_DATAST(ene_data->x ,ene_data->y-16+(i*16),col,0xE2+(i*4),0,1) SP_DATAST(ene_data->x+16,ene_data->y-16+(i*16),col,0xE1+(i*4),0,1) SP_DATAST(ene_data->x+32,ene_data->y-16+(i*16),col,0xE0+(i*4),0,1) } break; case 3: for(i=0;i<4;i++){ SP_DATAST(ene_data->x-16,ene_data->y-16+(i*16),col,0xC0+(i*4),0,0) SP_DATAST(ene_data->x ,ene_data->y-16+(i*16),col,0xC1+(i*4),0,0) SP_DATAST(ene_data->x+16,ene_data->y-16+(i*16),col,0xC2+(i*4),0,0) SP_DATAST(ene_data->x+32,ene_data->y-16+(i*16),col,0xC3+(i*4),0,0) } break; case 4: for(i=0;i<4;i++){ SP_DATAST(ene_data->x-16,ene_data->y-16+(i*16),col,0xD0+(i*4),0,0) SP_DATAST(ene_data->x ,ene_data->y-16+(i*16),col,0xD1+(i*4),0,0) SP_DATAST(ene_data->x+16,ene_data->y-16+(i*16),col,0xD2+(i*4),0,0) SP_DATAST(ene_data->x+32,ene_data->y-16+(i*16),col,0xD3+(i*4),0,0) } break; case 5: for(i=0;i<4;i++){ SP_DATAST(ene_data->x-16,ene_data->y-16+(i*16),col,0xE0+(i*4),0,0) SP_DATAST(ene_data->x ,ene_data->y-16+(i*16),col,0xE1+(i*4),0,0) SP_DATAST(ene_data->x+16,ene_data->y-16+(i*16),col,0xE2+(i*4),0,0) SP_DATAST(ene_data->x+32,ene_data->y-16+(i*16),col,0xE3+(i*4),0,0) } break; default: for(i=0;i<4;i++){ SP_DATAST(ene_data->x-16,ene_data->y-16+(i*16),col,0xC0+(i*4),0,0) SP_DATAST(ene_data->x ,ene_data->y-16+(i*16),col,0xC1+(i*4),0,0) SP_DATAST(ene_data->x+16,ene_data->y-16+(i*16),col,0xC2+(i*4),0,0) SP_DATAST(ene_data->x+32,ene_data->y-16+(i*16),col,0xC3+(i*4),0,0) } break; } } /*------------------ Gro\ErsPnum21 -------------*/ void enesp_rsPnum21(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=10; SP_DATAST(ene_data->x ,ene_data->y ,col,0x4A+(2*((disp_cont->status>>1)&1)),0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x4A+(2*((disp_cont->status>>1)&1)),0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x4B+(2*((disp_cont->status>>1)&1)),0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x4B+(2*((disp_cont->status>>1)&1)),0,1) } /*------------------ Gro\ErsPb1body -------------*/ void enesp_rsPb1body(ene_data) ENE_DATA *ene_data; { static short col; static int y; if(ene_data->flash)col=15; else col=7; /* {X{ */ SP_DATAST(ene_data->x ,ene_data->y-32,col,BODYTOP+0x00,0,0) SP_DATAST(ene_data->x+16,ene_data->y-32,col,BODYTOP+0x00,0,1) SP_DATAST(ene_data->x-16,ene_data->y-16,col,BODYTOP+0x01,0,0) SP_DATAST(ene_data->x ,ene_data->y-16,col,BODYTOP+0x02,0,0) SP_DATAST(ene_data->x+16,ene_data->y-16,col,BODYTOP+0x02,0,1) SP_DATAST(ene_data->x+32,ene_data->y-16,col,BODYTOP+0x01,0,1) SP_DATAST(ene_data->x-16,ene_data->y ,col,BODYTOP+0x03,0,0) SP_DATAST(ene_data->x ,ene_data->y ,col,BODYTOP+0x04,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,BODYTOP+0x04,0,1) SP_DATAST(ene_data->x+32,ene_data->y ,col,BODYTOP+0x03,0,1) SP_DATAST(ene_data->x-16,ene_data->y+16,col,BODYTOP+0x05,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,BODYTOP+0x06,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,BODYTOP+0x06,0,1) SP_DATAST(ene_data->x+32,ene_data->y+16,col,BODYTOP+0x05,0,1) SP_DATAST(ene_data->x-16,ene_data->y+32,col,BODYTOP+0x07,0,0) SP_DATAST(ene_data->x ,ene_data->y+32,col,BODYTOP+0x08,0,0) SP_DATAST(ene_data->x+16,ene_data->y+32,col,BODYTOP+0x08,0,1) SP_DATAST(ene_data->x+32,ene_data->y+32,col,BODYTOP+0x07,0,1) SP_DATAST(ene_data->x ,ene_data->y+48,col,BODYTOP+0x09,0,0) SP_DATAST(ene_data->x+16,ene_data->y+48,col,BODYTOP+0x09,0,1) } /*------------------ Gro\ErsPb1arm_l -------------*/ void enesp_rsPb1arm_l(ene_data) ENE_DATA *ene_data; { static short col; static int y; if(ene_data->flash)col=15; else col=4; /* {XA[}[ */ switch(ene_data->anim3){ case 0: SP_DATAST(ene_data->x ,ene_data->y-24,col,ARMTOP+0x00,0,0) SP_DATAST(ene_data->x+16,ene_data->y-24,col,ARMTOP+0x01,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,ARMTOP+0x02,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,ARMTOP+0x03,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,ARMTOP+0x04,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,ARMTOP+0x05,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,ARMTOP+0x06,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,ARMTOP+0x07,0,0) SP_DATAST(ene_data->x ,ene_data->y+40,col,ARMTOP+0x08,0,0) SP_DATAST(ene_data->x+16,ene_data->y+40,col,ARMTOP+0x09,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y-24,col,ARMTOP+0x0A,0,0) SP_DATAST(ene_data->x+16,ene_data->y-24,col,ARMTOP+0x0B,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,ARMTOP+0x0C,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,ARMTOP+0x0D,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,ARMTOP+0x0E,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,ARMTOP+0x0F,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,ARMTOP+0x10,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,ARMTOP+0x11,0,0) SP_DATAST(ene_data->x ,ene_data->y+40,col,ARMTOP+0x12,0,0) SP_DATAST(ene_data->x+16,ene_data->y+40,col,ARMTOP+0x13,0,0) break; case 2: SP_DATAST(ene_data->x ,ene_data->y-24,col,ARMTOP+0x14,0,0) SP_DATAST(ene_data->x+16,ene_data->y-24,col,ARMTOP+0x15,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,ARMTOP+0x16,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,ARMTOP+0x17,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,ARMTOP+0x18,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,ARMTOP+0x19,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,ARMTOP+0x1A,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,ARMTOP+0x1B,0,0) SP_DATAST(ene_data->x ,ene_data->y+40,col,ARMTOP+0x1C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+40,col,ARMTOP+0x1D,0,0) break; case 3: SP_DATAST(ene_data->x ,ene_data->y-24,col,ARMTOP+0x1E,0,0) SP_DATAST(ene_data->x+16,ene_data->y-24,col,ARMTOP+0x1F,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,ARMTOP+0x20,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,ARMTOP+0x21,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,ARMTOP+0x22,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,ARMTOP+0x23,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,ARMTOP+0x24,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,ARMTOP+0x25,0,0) SP_DATAST(ene_data->x ,ene_data->y+40,col,ARMTOP+0x26,0,0) SP_DATAST(ene_data->x+16,ene_data->y+40,col,ARMTOP+0x27,0,0) break; case 4: SP_DATAST(ene_data->x ,ene_data->y-24,col,ARMTOP+0x28,0,0) SP_DATAST(ene_data->x+16,ene_data->y-24,col,ARMTOP+0x29,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,ARMTOP+0x2A,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,ARMTOP+0x2B,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,ARMTOP+0x2C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,ARMTOP+0x2D,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,ARMTOP+0x2E,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,ARMTOP+0x2F,0,0) SP_DATAST(ene_data->x+ 2,ene_data->y+40,col,ARMTOP+0x30,0,0) break; case 5: SP_DATAST(ene_data->x ,ene_data->y-24,col,ARMTOP+0x31,0,0) SP_DATAST(ene_data->x+16 ,ene_data->y-24,col,ARMTOP+0x32,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,ARMTOP+0x33,0,0) SP_DATAST(ene_data->x+16 ,ene_data->y- 8,col,ARMTOP+0x34,0,0) SP_DATAST(ene_data->x -1,ene_data->y+ 8,col,ARMTOP+0x35,0,0) SP_DATAST(ene_data->x+16-1,ene_data->y+ 8,col,ARMTOP+0x36,0,0) SP_DATAST(ene_data->x -1,ene_data->y+24,col,ARMTOP+0x37,0,0) SP_DATAST(ene_data->x+16-1,ene_data->y+24,col,ARMTOP+0x38,0,0) SP_DATAST(ene_data->x ,ene_data->y+40,col,ARMTOP+0x39,0,0) break; case 6: SP_DATAST(ene_data->x ,ene_data->y-24,col,ARMTOP+0x3A,0,0) SP_DATAST(ene_data->x+16 ,ene_data->y-24,col,ARMTOP+0x3B,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,ARMTOP+0x3C,0,0) SP_DATAST(ene_data->x+16 ,ene_data->y- 8,col,ARMTOP+0x3D,0,0) SP_DATAST(ene_data->x -1,ene_data->y+ 8,col,ARMTOP+0x3E,0,0) SP_DATAST(ene_data->x+16-1,ene_data->y+ 8,col,ARMTOP+0x3F,0,0) SP_DATAST(ene_data->x -2,ene_data->y+24,col,ARMTOP+0x40,0,0) SP_DATAST(ene_data->x -2,ene_data->y+40,col,ARMTOP+0x41,0,0) break; case 7: SP_DATAST(ene_data->x ,ene_data->y-24,col,ARMTOP+0x42,0,0) SP_DATAST(ene_data->x+16 ,ene_data->y-24,col,ARMTOP+0x43,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,ARMTOP+0x44,0,0) SP_DATAST(ene_data->x+16 ,ene_data->y- 8,col,ARMTOP+0x45,0,0) SP_DATAST(ene_data->x -2,ene_data->y+ 8,col,ARMTOP+0x46,0,0) SP_DATAST(ene_data->x+16-2,ene_data->y+ 8,col,ARMTOP+0x47,0,0) SP_DATAST(ene_data->x -4,ene_data->y+24,col,ARMTOP+0x48,0,0) SP_DATAST(ene_data->x -4,ene_data->y+40,col,ARMTOP+0x49,0,0) break; } } /*------------------ Gro\ErsPb1arm_r -------------*/ void enesp_rsPb1arm_r(ene_data) ENE_DATA *ene_data; { static short col; static int y; if(ene_data->flash)col=15; else col=4; /* {XA[}[ */ switch(ene_data->anim3){ case 0: SP_DATAST(ene_data->x+16,ene_data->y-24,col,ARMTOP+0x00,0,1) SP_DATAST(ene_data->x ,ene_data->y-24,col,ARMTOP+0x01,0,1) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,ARMTOP+0x02,0,1) SP_DATAST(ene_data->x ,ene_data->y- 8,col,ARMTOP+0x03,0,1) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,ARMTOP+0x04,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,ARMTOP+0x05,0,1) SP_DATAST(ene_data->x+16,ene_data->y+24,col,ARMTOP+0x06,0,1) SP_DATAST(ene_data->x ,ene_data->y+24,col,ARMTOP+0x07,0,1) SP_DATAST(ene_data->x+16,ene_data->y+40,col,ARMTOP+0x08,0,1) SP_DATAST(ene_data->x ,ene_data->y+40,col,ARMTOP+0x09,0,1) break; case 1: SP_DATAST(ene_data->x+16,ene_data->y-24,col,ARMTOP+0x0A,0,1) SP_DATAST(ene_data->x ,ene_data->y-24,col,ARMTOP+0x0B,0,1) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,ARMTOP+0x0C,0,1) SP_DATAST(ene_data->x ,ene_data->y- 8,col,ARMTOP+0x0D,0,1) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,ARMTOP+0x0E,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,ARMTOP+0x0F,0,1) SP_DATAST(ene_data->x+16,ene_data->y+24,col,ARMTOP+0x10,0,1) SP_DATAST(ene_data->x ,ene_data->y+24,col,ARMTOP+0x11,0,1) SP_DATAST(ene_data->x+16,ene_data->y+40,col,ARMTOP+0x12,0,1) SP_DATAST(ene_data->x ,ene_data->y+40,col,ARMTOP+0x13,0,1) break; case 2: SP_DATAST(ene_data->x+16,ene_data->y-24,col,ARMTOP+0x14,0,1) SP_DATAST(ene_data->x ,ene_data->y-24,col,ARMTOP+0x15,0,1) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,ARMTOP+0x16,0,1) SP_DATAST(ene_data->x ,ene_data->y- 8,col,ARMTOP+0x17,0,1) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,ARMTOP+0x18,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,ARMTOP+0x19,0,1) SP_DATAST(ene_data->x+16,ene_data->y+24,col,ARMTOP+0x1A,0,1) SP_DATAST(ene_data->x ,ene_data->y+24,col,ARMTOP+0x1B,0,1) SP_DATAST(ene_data->x+16,ene_data->y+40,col,ARMTOP+0x1C,0,1) SP_DATAST(ene_data->x ,ene_data->y+40,col,ARMTOP+0x1D,0,1) break; case 3: SP_DATAST(ene_data->x+16,ene_data->y-24,col,ARMTOP+0x1E,0,1) SP_DATAST(ene_data->x ,ene_data->y-24,col,ARMTOP+0x1F,0,1) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,ARMTOP+0x20,0,1) SP_DATAST(ene_data->x ,ene_data->y- 8,col,ARMTOP+0x21,0,1) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,ARMTOP+0x22,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,ARMTOP+0x23,0,1) SP_DATAST(ene_data->x+16,ene_data->y+24,col,ARMTOP+0x24,0,1) SP_DATAST(ene_data->x ,ene_data->y+24,col,ARMTOP+0x25,0,1) SP_DATAST(ene_data->x+16,ene_data->y+40,col,ARMTOP+0x26,0,1) SP_DATAST(ene_data->x ,ene_data->y+40,col,ARMTOP+0x27,0,1) break; case 4: SP_DATAST(ene_data->x+16,ene_data->y-24,col,ARMTOP+0x28,0,1) SP_DATAST(ene_data->x ,ene_data->y-24,col,ARMTOP+0x29,0,1) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,ARMTOP+0x2A,0,1) SP_DATAST(ene_data->x ,ene_data->y- 8,col,ARMTOP+0x2B,0,1) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,ARMTOP+0x2C,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,ARMTOP+0x2D,0,1) SP_DATAST(ene_data->x+16,ene_data->y+24,col,ARMTOP+0x2E,0,1) SP_DATAST(ene_data->x ,ene_data->y+24,col,ARMTOP+0x2F,0,1) SP_DATAST(ene_data->x+14,ene_data->y+40,col,ARMTOP+0x30,0,1) break; case 5: SP_DATAST(ene_data->x+16 ,ene_data->y-24,col,ARMTOP+0x31,0,1) SP_DATAST(ene_data->x ,ene_data->y-24,col,ARMTOP+0x32,0,1) SP_DATAST(ene_data->x+16 ,ene_data->y- 8,col,ARMTOP+0x33,0,1) SP_DATAST(ene_data->x ,ene_data->y- 8,col,ARMTOP+0x34,0,1) SP_DATAST(ene_data->x+16+1,ene_data->y+ 8,col,ARMTOP+0x35,0,1) SP_DATAST(ene_data->x +1,ene_data->y+ 8,col,ARMTOP+0x36,0,1) SP_DATAST(ene_data->x+16+1,ene_data->y+24,col,ARMTOP+0x37,0,1) SP_DATAST(ene_data->x +1,ene_data->y+24,col,ARMTOP+0x38,0,1) SP_DATAST(ene_data->x+16 ,ene_data->y+40,col,ARMTOP+0x39,0,1) break; case 6: SP_DATAST(ene_data->x+16 ,ene_data->y-24,col,ARMTOP+0x3A,0,1) SP_DATAST(ene_data->x ,ene_data->y-24,col,ARMTOP+0x3B,0,1) SP_DATAST(ene_data->x+16 ,ene_data->y- 8,col,ARMTOP+0x3C,0,1) SP_DATAST(ene_data->x ,ene_data->y- 8,col,ARMTOP+0x3D,0,1) SP_DATAST(ene_data->x+16+1,ene_data->y+ 8,col,ARMTOP+0x3E,0,1) SP_DATAST(ene_data->x +1,ene_data->y+ 8,col,ARMTOP+0x3F,0,1) SP_DATAST(ene_data->x +18,ene_data->y+24,col,ARMTOP+0x40,0,1) SP_DATAST(ene_data->x +18,ene_data->y+40,col,ARMTOP+0x41,0,1) break; case 7: SP_DATAST(ene_data->x+16 ,ene_data->y-24,col,ARMTOP+0x42,0,1) SP_DATAST(ene_data->x ,ene_data->y-24,col,ARMTOP+0x43,0,1) SP_DATAST(ene_data->x+16 ,ene_data->y- 8,col,ARMTOP+0x44,0,1) SP_DATAST(ene_data->x ,ene_data->y- 8,col,ARMTOP+0x45,0,1) SP_DATAST(ene_data->x+16+2,ene_data->y+ 8,col,ARMTOP+0x46,0,1) SP_DATAST(ene_data->x +2,ene_data->y+ 8,col,ARMTOP+0x47,0,1) SP_DATAST(ene_data->x+16+4,ene_data->y+24,col,ARMTOP+0x48,0,1) SP_DATAST(ene_data->x+16+4,ene_data->y+40,col,ARMTOP+0x49,0,1) break; } } /*------------------ Gro\ErsPb1bul_l -------------*/ void enesp_rsPb1bul_l(ene_data) ENE_DATA *ene_data; { static short col; static int y; if(ene_data->flash)col=15; else col=6; /* {XoJ */ SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,BULTOP+0x00,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,BULTOP+0x01,0,0) SP_DATAST(ene_data->x+ 6,ene_data->y+24,col,BULTOP+0x02,0,0) } /*------------------ Gro\ErsPb1bul_r -------------*/ void enesp_rsPb1bul_r(ene_data) ENE_DATA *ene_data; { static short col; static int y; if(ene_data->flash)col=15; else col=6; /* {XoJ */ SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,BULTOP+0x00,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,BULTOP+0x01,0,1) SP_DATAST(ene_data->x+10,ene_data->y+24,col,BULTOP+0x02,0,1) } /*------------------ Gro\ErsPb1gun_l -------------*/ void enesp_rsPb1gun_l(ene_data) ENE_DATA *ene_data; { static short col; static int y; if(ene_data->flash)col=15; else col=5; /* {XK */ switch(ene_data->anim3){ case 0: SP_DATAST(ene_data->x- 8,ene_data->y-16+1,col,GUNTOP+0x24,0,0) SP_DATAST(ene_data->x- 8,ene_data->y +1,col,GUNTOP+0x25,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y +1,col,GUNTOP+0x26,0,0) SP_DATAST(ene_data->x+24,ene_data->y +1,col,GUNTOP+0x27,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+16+1,col,GUNTOP+0x28,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16+1,col,GUNTOP+0x29,0,0) SP_DATAST(ene_data->x+24,ene_data->y+16+1,col,GUNTOP+0x2A,0,0) SP_DATAST(ene_data->x- 4,ene_data->y+32+1,col,GUNTOP+0x2B,0,0) SP_DATAST(ene_data->x- 3,ene_data->y+48,col,GUNTOP+0x2C,0,0) break; case 1: SP_DATAST(ene_data->x- 8,ene_data->y-16,col,GUNTOP+0x1B,0,0) SP_DATAST(ene_data->x- 8,ene_data->y ,col,GUNTOP+0x1C,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,col,GUNTOP+0x1D,0,0) SP_DATAST(ene_data->x+24,ene_data->y ,col,GUNTOP+0x1E,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+16,col,GUNTOP+0x1F,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,GUNTOP+0x20,0,0) SP_DATAST(ene_data->x+24,ene_data->y+16,col,GUNTOP+0x21,0,0) SP_DATAST(ene_data->x- 6,ene_data->y+32,col,GUNTOP+0x22,0,0) SP_DATAST(ene_data->x- 5,ene_data->y+48,col,GUNTOP+0x23,0,0) break; case 2: SP_DATAST(ene_data->x- 8,ene_data->y-16,col,GUNTOP+0x12,0,0) SP_DATAST(ene_data->x- 8,ene_data->y ,col,GUNTOP+0x13,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,col,GUNTOP+0x14,0,0) SP_DATAST(ene_data->x+24,ene_data->y ,col,GUNTOP+0x15,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+16,col,GUNTOP+0x16,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,GUNTOP+0x17,0,0) SP_DATAST(ene_data->x+24,ene_data->y+16,col,GUNTOP+0x18,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+32,col,GUNTOP+0x19,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+48,col,GUNTOP+0x1A,0,0) break; case 3: SP_DATAST(ene_data->x- 7,ene_data->y-16+1,col,GUNTOP+0x09,0,0) SP_DATAST(ene_data->x- 8,ene_data->y +1,col,GUNTOP+0x0A,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y +1,col,GUNTOP+0x0B,0,0) SP_DATAST(ene_data->x+24,ene_data->y +1,col,GUNTOP+0x0C,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+16+1,col,GUNTOP+0x0D,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16+1,col,GUNTOP+0x0E,0,0) SP_DATAST(ene_data->x+24,ene_data->y+16+1,col,GUNTOP+0x0F,0,0) SP_DATAST(ene_data->x- 9,ene_data->y+32+1,col,GUNTOP+0x10,0,0) SP_DATAST(ene_data->x-10,ene_data->y+48,col,GUNTOP+0x11,0,0) break; case 4: SP_DATAST(ene_data->x- 3,ene_data->y-16+2,col,GUNTOP+0x00,0,0) SP_DATAST(ene_data->x-10,ene_data->y +2,col,GUNTOP+0x01,0,0) SP_DATAST(ene_data->x+ 6,ene_data->y +2,col,GUNTOP+0x02,0,0) SP_DATAST(ene_data->x+22,ene_data->y +2,col,GUNTOP+0x03,0,0) SP_DATAST(ene_data->x-10,ene_data->y+16+2,col,GUNTOP+0x04,0,0) SP_DATAST(ene_data->x+ 6,ene_data->y+16+2,col,GUNTOP+0x05,0,0) SP_DATAST(ene_data->x+22,ene_data->y+16+2,col,GUNTOP+0x06,0,0) SP_DATAST(ene_data->x-10,ene_data->y+32+2,col,GUNTOP+0x07,0,0) SP_DATAST(ene_data->x-13,ene_data->y+48,col,GUNTOP+0x08,0,0) break; } } /*------------------ Gro\ErsPb1gun_r -------------*/ void enesp_rsPb1gun_r(ene_data) ENE_DATA *ene_data; { static short col; static int y; if(ene_data->flash)col=15; else col=5; /* {XK */ switch(ene_data->anim3){ case 0: SP_DATAST(ene_data->x+24,ene_data->y-16+1,col,GUNTOP+0x24,0,1) SP_DATAST(ene_data->x+24,ene_data->y +1,col,GUNTOP+0x25,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y +1,col,GUNTOP+0x26,0,1) SP_DATAST(ene_data->x- 8,ene_data->y +1,col,GUNTOP+0x27,0,1) SP_DATAST(ene_data->x+24,ene_data->y+16+1,col,GUNTOP+0x28,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16+1,col,GUNTOP+0x29,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+16+1,col,GUNTOP+0x2A,0,1) SP_DATAST(ene_data->x+20,ene_data->y+32+1,col,GUNTOP+0x2B,0,1) SP_DATAST(ene_data->x+19,ene_data->y+48,col,GUNTOP+0x2C,0,1) break; case 1: SP_DATAST(ene_data->x+24,ene_data->y-16,col,GUNTOP+0x1B,0,1) SP_DATAST(ene_data->x+24,ene_data->y ,col,GUNTOP+0x1C,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y ,col,GUNTOP+0x1D,0,1) SP_DATAST(ene_data->x- 8,ene_data->y ,col,GUNTOP+0x1E,0,1) SP_DATAST(ene_data->x+24,ene_data->y+16,col,GUNTOP+0x1F,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,GUNTOP+0x20,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+16,col,GUNTOP+0x21,0,1) SP_DATAST(ene_data->x+22,ene_data->y+32,col,GUNTOP+0x22,0,1) SP_DATAST(ene_data->x+21,ene_data->y+48,col,GUNTOP+0x23,0,1) break; case 2: SP_DATAST(ene_data->x+24,ene_data->y-16,col,GUNTOP+0x12,0,1) SP_DATAST(ene_data->x+24,ene_data->y ,col,GUNTOP+0x13,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y ,col,GUNTOP+0x14,0,1) SP_DATAST(ene_data->x- 8,ene_data->y ,col,GUNTOP+0x15,0,1) SP_DATAST(ene_data->x+24,ene_data->y+16,col,GUNTOP+0x16,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,GUNTOP+0x17,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+16,col,GUNTOP+0x18,0,1) SP_DATAST(ene_data->x+24,ene_data->y+32,col,GUNTOP+0x19,0,1) SP_DATAST(ene_data->x+24,ene_data->y+48,col,GUNTOP+0x1A,0,1) break; case 3: SP_DATAST(ene_data->x+23,ene_data->y-16+1,col,GUNTOP+0x09,0,1) SP_DATAST(ene_data->x+24,ene_data->y +1,col,GUNTOP+0x0A,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y +1,col,GUNTOP+0x0B,0,1) SP_DATAST(ene_data->x- 8,ene_data->y +1,col,GUNTOP+0x0C,0,1) SP_DATAST(ene_data->x+24,ene_data->y+16+1,col,GUNTOP+0x0D,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16+1,col,GUNTOP+0x0E,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+16+1,col,GUNTOP+0x0F,0,1) SP_DATAST(ene_data->x+25,ene_data->y+32+1,col,GUNTOP+0x10,0,1) SP_DATAST(ene_data->x+26,ene_data->y+48,col,GUNTOP+0x11,0,1) break; case 4: SP_DATAST(ene_data->x+19,ene_data->y-16+2,col,GUNTOP+0x00,0,1) SP_DATAST(ene_data->x+26,ene_data->y +2,col,GUNTOP+0x01,0,1) SP_DATAST(ene_data->x+10,ene_data->y +2,col,GUNTOP+0x02,0,1) SP_DATAST(ene_data->x -6,ene_data->y +2,col,GUNTOP+0x03,0,1) SP_DATAST(ene_data->x+26,ene_data->y+16+2,col,GUNTOP+0x04,0,1) SP_DATAST(ene_data->x+10,ene_data->y+16+2,col,GUNTOP+0x05,0,1) SP_DATAST(ene_data->x- 6,ene_data->y+16+2,col,GUNTOP+0x06,0,1) SP_DATAST(ene_data->x+26,ene_data->y+32+2,col,GUNTOP+0x07,0,1) SP_DATAST(ene_data->x+29,ene_data->y+48,col,GUNTOP+0x08,0,1) break; } } /*------------------ Gro\ErsPlaser -------------*/ void enesp_rsPlaser(ene_data) ENE_DATA *ene_data; { static short col; static short y; static short temp_x,temp_y; temp_x=rnd2(); temp_y=rnd2(); col=0x0C; switch(ene_data->anim3){ case 0: SP_DATAST(ene_data->x+8+temp_x,ene_data->y+8+temp_y,col,0xF8+((ene_data->count>>2)&1),0,0) break; case 1: y=ene_data->y+8; SP_DATAST(ene_data->x+8+temp_x,y+8+temp_y,col,0xFA,0,0) while(1){ y+=16; SP_DATAST(ene_data->x+8+temp_x,y+8+temp_y,col,0xFB,0,0) if(y>256+16)break; } break; case 2: y=ene_data->y+8-16; while(1){ y+=16; SP_DATAST(ene_data->x+8+temp_x,y+8+temp_y,col,0xFC,0,0) if(y>256+16)break; } break; case 3: y=ene_data->y+8-16; while(1){ y+=16; SP_DATAST(ene_data->x+8+temp_x,y+8+temp_y,col,0xFD,0,0) if(y>256+16)break; } break; } } TOP_CRY+0x02+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x- 8,ene_data->y ,col,TOP_CRY+0x10+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,col,TOP_CRY+0x11+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x+24,ene_data->y ,col,TOP_CRY+0x12+off[ene_data->anim3],0,0) S/* < vg^Cv錾 > */ /* G */ void enesp_rsPriv(ENE_DATA*); /* Pʂ̃Co@ */ void enesp_rsPlaser(ENE_DATA*); /* Pʂ̃{X̃[U[ */ void enesp_rsPnum2(ENE_DATA*); void enesp_rsPnum10(ENE_DATA*); void enesp_rsPnum11(ENE_DATA*); void enesp_rsPnum16(ENE_DATA*); void enesp_rsPnum17(ENE_DATA*); void enesp_rsPnum30(ENE_DATA*); void enesp_rsPnum6_1(ENE_DATA*); void enesp_rsPnum6_3(ENE_DATA*); void enesp_rsPnum1(ENE_DATA*); void enesp_rsPnum21(ENE_DATA*); void enesp_rsPb1body(ENE_DATA*); void enesp_rsPb1arm_l(ENE_DATA*); void enesp_rsPb1arm_r(ENE_DATA*); void enesp_rsPb1gun_l(ENE_DATA*); void enesp_rsPb1gun_r(ENE_DATA*); void enesp_rsPb1bul_l(ENE_DATA*); void enesp_rsPb1bul_r(ENE_DATA*); ST(ene_data->x+ 8,ene_data->y ,col,TOP_WARP+0x01,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,TOP_WARP+0x02,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+32,col,TOP_WARP+0x03,0,0) break; case 1: #include #include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "enesp_setb.h" #include "subs.h" /*---------------------< ϐ錾 >----------------------------*/ extern volatile STICK_UNIT *STC1_IO; /* WCXeBbN */ extern volatile STICK_UNIT *STC2_IO; /*------------------ Gro\ErsQriv -------------*/ void enesp_rsQriv(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=6+(2*(disp_cont->status&1)); //if(keyin==KCODE_U)ene_data->anim3+=1; //if(keyin==KCODE_D)ene_data->anim3-=1; if(ene_data->anim3<0)ene_data->anim3=0; /* ꉞ̕ی@\ */ if(ene_data->anim3>45)ene_data->anim3=45; /* {̕\ */ switch((disp_cont->status)&1){ case 0: dmacpy((unsigned short*)(&(sp_data->transsp.tsp_buff[6][5*5*0x40*ene_data->anim3])),(unsigned short*)SP_DEF_ADD(0x01),5*5*(0x80/4)); if(col!=15)dmacpy((unsigned short*)(&(sp_data->transpal.tpal_buff[1][16*ene_data->anim3])),(unsigned short*)SP_PAL_ADD(col),8); SP_DATAST(ene_data->x-24,ene_data->y-24,col,0x01,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0x02,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0x03,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0x04,0,0) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0x05,0,0) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,0x06,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0x07,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x08,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0x09,0,0) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,0x0A,0,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,0x0B,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0x0C,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x0D,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0x0E,0,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0x0F,0,0) SP_DATAST(ene_data->x-24,ene_data->y+24,col,0x10,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0x11,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x12,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0x13,0,0) SP_DATAST(ene_data->x+40,ene_data->y+24,col,0x14,0,0) SP_DATAST(ene_data->x-24,ene_data->y+40,col,0x15,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0x16,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0x17,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0x18,0,0) SP_DATAST(ene_data->x+40,ene_data->y+40,col,0x19,0,0) break; case 1: dmacpy((unsigned short*)(&(sp_data->transsp.tsp_buff[6][5*5*0x40*ene_data->anim3])),(unsigned short*)SP_DEF_ADD(0x1A),5*5*(0x80/4)); if(col!=15)dmacpy((unsigned short*)(&(sp_data->transpal.tpal_buff[1][16*ene_data->anim3])),(unsigned short*)SP_PAL_ADD(col),8); SP_DATAST(ene_data->x-24,ene_data->y-24,col,0x1A,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0x1B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0x1C,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0x1D,0,0) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0x1E,0,0) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,0x1F,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0x20,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x21,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0x22,0,0) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,0x23,0,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,0x24,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0x25,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x26,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0x27,0,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0x28,0,0) SP_DATAST(ene_data->x-24,ene_data->y+24,col,0x29,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0x2A,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x2B,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0x2C,0,0) SP_DATAST(ene_data->x+40,ene_data->y+24,col,0x2D,0,0) SP_DATAST(ene_data->x-24,ene_data->y+40,col,0x2E,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0x2F,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0x30,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0x31,0,0) SP_DATAST(ene_data->x+40,ene_data->y+40,col,0x32,0,0) break; } } /*------------------ Gro\ErsQriv4 -------------*/ void enesp_rsQriv4(ene_data) ENE_DATA *ene_data; /* type `FW̕p */ { /* Pt[ anim3=0 ɂȂĂ܂ */ static int i; /* ̕\̃`‚}邽߂̋̍ */ static short col; if(ene_data->flash)col=15; else col=6+(2*(disp_cont->status&1)); //if(keyin==KCODE_U)ene_data->anim3+=1; //if(keyin==KCODE_D)ene_data->anim3-=1; if(ene_data->anim3<0)ene_data->anim3=0; /* ꉞ̕ی@\ */ if(ene_data->anim3>45)ene_data->anim3=45; if(ene_data->count==0){ /* ŏ̃t[EEE */ if(ene_data->setdir[4])ene_data->anim3=7; else ene_data->anim3=2; } /* {̕\ */ switch((disp_cont->status)&1){ case 0: dmacpy((unsigned short*)(&(sp_data->transsp.tsp_buff[6][5*5*0x40*ene_data->anim3])),(unsigned short*)SP_DEF_ADD(0x01),5*5*(0x80/4)); if(col!=15)dmacpy((unsigned short*)(&(sp_data->transpal.tpal_buff[1][16*ene_data->anim3])),(unsigned short*)SP_PAL_ADD(col),8); SP_DATAST(ene_data->x-24,ene_data->y-24,col,0x01,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0x02,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0x03,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0x04,0,0) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0x05,0,0) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,0x06,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0x07,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x08,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0x09,0,0) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,0x0A,0,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,0x0B,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0x0C,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x0D,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0x0E,0,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0x0F,0,0) SP_DATAST(ene_data->x-24,ene_data->y+24,col,0x10,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0x11,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x12,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0x13,0,0) SP_DATAST(ene_data->x+40,ene_data->y+24,col,0x14,0,0) SP_DATAST(ene_data->x-24,ene_data->y+40,col,0x15,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0x16,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0x17,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0x18,0,0) SP_DATAST(ene_data->x+40,ene_data->y+40,col,0x19,0,0) break; case 1: dmacpy((unsigned short*)(&(sp_data->transsp.tsp_buff[6][5*5*0x40*ene_data->anim3])),(unsigned short*)SP_DEF_ADD(0x1A),5*5*(0x80/4)); if(col!=15)dmacpy((unsigned short*)(&(sp_data->transpal.tpal_buff[1][16*ene_data->anim3])),(unsigned short*)SP_PAL_ADD(col),8); SP_DATAST(ene_data->x-24,ene_data->y-24,col,0x1A,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0x1B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0x1C,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0x1D,0,0) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0x1E,0,0) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,0x1F,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0x20,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x21,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0x22,0,0) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,0x23,0,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,0x24,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0x25,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x26,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0x27,0,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0x28,0,0) SP_DATAST(ene_data->x-24,ene_data->y+24,col,0x29,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0x2A,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x2B,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0x2C,0,0) SP_DATAST(ene_data->x+40,ene_data->y+24,col,0x2D,0,0) SP_DATAST(ene_data->x-24,ene_data->y+40,col,0x2E,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0x2F,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0x30,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0x31,0,0) SP_DATAST(ene_data->x+40,ene_data->y+40,col,0x32,0,0) break; } } /*------------------ Gro\ErsQrivEsc -------------*/ void enesp_rsQrivEsc(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=8; /* {̕\ */ SP_DATAST(ene_data->x-24,ene_data->y-24,col,0xE0,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0xE1,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0xE2,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0xE3,0,0) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0xE4,0,0) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,0xE5,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0xE6,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0xE7,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0xE8,0,0) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,0xE9,0,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,0xEA,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0xEB,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xEC,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0xED,0,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0xEE,0,0) SP_DATAST(ene_data->x-24,ene_data->y+24,col,0xEF,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0xF0,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0xF1,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0xF2,0,0) SP_DATAST(ene_data->x+40,ene_data->y+24,col,0xF3,0,0) SP_DATAST(ene_data->x-24,ene_data->y+40,col,0xF4,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0xF5,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0xF6,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0xF7,0,0) SP_DATAST(ene_data->x+40,ene_data->y+40,col,0xF8,0,0) } /*------------------ Gro\ENUM10 -------------*/ void enesp_rsQnum10(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=4; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x+ 8 ,ene_data->y ,col,0x23,0,0) SP_DATAST(ene_data->x+ 8-3,ene_data->y+16,col,0x24,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y ,col,0x25,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x26,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x27,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x28,0,0) break; case 2: SP_DATAST(ene_data->x ,ene_data->y ,col,0x29,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x2A,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2B,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2C,0,0) break; case 3: SP_DATAST(ene_data->x ,ene_data->y ,col,0x2D,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x2D,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2E,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2E,0,1) break; case 4: SP_DATAST(ene_data->x+ 8 ,ene_data->y ,col,0x23,0,1) SP_DATAST(ene_data->x+ 8+3,ene_data->y+16,col,0x24,0,1) break; case 5: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x25,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x26,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x27,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x28,0,1) break; case 6: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x29,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x2A,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2B,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2C,0,1) break; case 7: SP_DATAST(ene_data->x ,ene_data->y ,col,0x2D,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x2D,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2E,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2E,0,1) break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x2D,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x2D,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2E,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2E,0,1) break; } } /*------------------ Gro\ENUM14 -------------*/ void enesp_rsQnum14(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=6; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x ,ene_data->y ,col,0x2F,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x30,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x31,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x32,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y ,col,0x33,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x34,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x35,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x36,0,0) break; case 2: SP_DATAST(ene_data->x ,ene_data->y ,col,0x37,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x38,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x39,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x3A,0,0) break; case 3: SP_DATAST(ene_data->x ,ene_data->y ,col,0x3B,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x3B,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x3C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x3C,0,1) break; case 4: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x2F,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x30,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x31,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x32,0,1) break; case 5: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x33,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x34,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x35,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x36,0,1) break; case 6: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x37,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x38,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x39,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x3A,0,1) break; case 7: SP_DATAST(ene_data->x ,ene_data->y ,col,0x3B,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x3B,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x3C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x3C,0,1) break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x3B,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x3B,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x3C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x3C,0,1) break; } } /*------------------ Gro\ENUM18 -------------*/ void enesp_rsQnum18(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=7; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x ,ene_data->y ,col,0x01,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x02,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x03,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x03,0,1) break; case 1: SP_DATAST(ene_data->x ,ene_data->y ,col,0x04,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x05,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x06,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x07,0,0) break; case 2: SP_DATAST(ene_data->x ,ene_data->y ,col,0x08,0,0) SP_DATAST(ene_data->x+16 ,ene_data->y ,col,0x09,0,0) SP_DATAST(ene_data->x+ 8+2,ene_data->y+16,col,0x0A,0,0) break; case 3: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x0B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x0C,0,0) break; case 4: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x0D,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x0E,0,0) break; case 5: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x0B,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x0C,0,1) break; case 6: SP_DATAST(ene_data->x+16 ,ene_data->y ,col,0x08,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x09,0,1) SP_DATAST(ene_data->x+ 8-2,ene_data->y+16,col,0x0A,0,1) break; case 7: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x04,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x05,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x06,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x07,0,1) break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x01,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x02,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x03,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x03,0,1) break; } } /*------------------ Gro\ENUM25 -------------*/ void enesp_rsQnum25(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=8; switch(*(ene_data->atr-1)){ default: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x4C,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x4D+((ene_data->count>>1)&1),0,0) break; } } /*------------------ Gro\ENUM05_T1 -------------*/ void enesp_rsQnum05_t1(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=9; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x ,ene_data->y ,col,0x0F,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x0F,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x10,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x10,0,1) ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=16; break; case 1: SP_DATAST(ene_data->x+ 8-1,ene_data->y ,col,0x11,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x12,0,0) SP_DATAST(ene_data->x+16 ,ene_data->y+16,col,0x13,0,0) ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=16; break; case 2: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x14,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x15,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x16,0,0) ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=16; break; case 3: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x17,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x18,0,0) ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=16; break; case 4: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x19,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x1A,0,0) ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=16; break; case 5: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x17,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x18,0,1) ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=16; break; case 6: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x14,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x15,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x16,0,1) ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=16; break; case 7: SP_DATAST(ene_data->x+ 8+1,ene_data->y ,col,0x11,0,1) SP_DATAST(ene_data->x+16 ,ene_data->y+16,col,0x12,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x13,0,1) ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=16; break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x0F,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x0F,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x10,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x10,0,1) ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=16; break; } } /*------------------ Gro\ENUM07 -------------*/ void enesp_rsQnum07(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=9; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x1B,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x1C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x1C,0,1) ene_data->size_x=13; /* TCY𐧌 */ ene_data->size_y=16; break; case 1: SP_DATAST(ene_data->x+ 8-1,ene_data->y ,col,0x1D,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x1E,0,0) SP_DATAST(ene_data->x+16 ,ene_data->y+16,col,0x1F,0,0) ene_data->size_x=13; /* TCY𐧌 */ ene_data->size_y=16; break; case 2: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x20,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x21,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x22,0,0) ene_data->size_x=13; /* TCY𐧌 */ ene_data->size_y=16; break; case 3: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x1B,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x1C,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x1C,0,0) ene_data->size_x=13; /* TCY𐧌 */ ene_data->size_y=16; break; case 4: SP_DATAST(ene_data->x+ 8+1,ene_data->y ,col,0x1D,0,1) SP_DATAST(ene_data->x+16 ,ene_data->y+16,col,0x1E,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x1F,0,1) ene_data->size_x=13; /* TCY𐧌 */ ene_data->size_y=16; break; case 5: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x20,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x21,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x22,0,1) ene_data->size_x=13; /* TCY𐧌 */ ene_data->size_y=16; break; /* オĂ(1) */ case 6: SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xF0,0,0) ene_data->ground=1; ene_data->size_x=8; /* TCY𐧌 */ ene_data->size_y=8; break; case 7: SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xF1,0,0) ene_data->ground=1; ene_data->size_x=9; /* TCY𐧌 */ ene_data->size_y=9; break; case 8: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF2,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0xF3,0,0) ene_data->ground=1; ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=10; break; case 9: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF4,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0xF5,0,0) ene_data->ground=1; ene_data->size_x=11; /* TCY𐧌 */ ene_data->size_y=11; break; case 10: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF6,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0xF7,0,0) ene_data->ground=1; ene_data->size_x=12; /* TCY𐧌 */ ene_data->size_y=12; break; case 11: SP_DATAST(ene_data->x+ 8-3,ene_data->y ,col,0xF8,0,0) SP_DATAST(ene_data->x+ 8-3,ene_data->y+16,col,0xF9,0,0) ene_data->ground=1; ene_data->size_x=13; /* TCY𐧌 */ ene_data->size_y=13; break; case 12: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xFA,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0xFB,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0xFC,0,0) ene_data->ground=0; ene_data->size_x=13; /* TCY𐧌 */ ene_data->size_y=14; break; case 13: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xFD,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0xFE,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0xFF,0,0) ene_data->ground=0; ene_data->size_x=13; /* TCY𐧌 */ ene_data->size_y=16; break; /* オĂ(2) */ case 14: SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xF0,0,1) ene_data->size_x=8; /* TCY𐧌 */ ene_data->size_y=8; ene_data->ground=1; break; case 15: SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xF1,0,1) ene_data->ground=1; ene_data->size_x=9; /* TCY𐧌 */ ene_data->size_y=9; break; case 16: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF2,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0xF3,0,1) ene_data->ground=1; ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=10; break; case 17: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF4,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0xF5,0,1) ene_data->ground=1; ene_data->size_x=11; /* TCY𐧌 */ ene_data->size_y=11; break; case 18: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF6,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0xF7,0,1) ene_data->ground=1; ene_data->size_x=12; /* TCY𐧌 */ ene_data->size_y=12; break; case 19: SP_DATAST(ene_data->x+ 8+3,ene_data->y ,col,0xF8,0,1) SP_DATAST(ene_data->x+ 8+3,ene_data->y+16,col,0xF9,0,1) ene_data->ground=1; ene_data->size_x=13; /* TCY𐧌 */ ene_data->size_y=13; break; case 20: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xFA,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0xFB,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0xFC,0,1) ene_data->ground=0; ene_data->size_x=13; /* TCY𐧌 */ ene_data->size_y=14; break; case 21: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xFD,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0xFE,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0xFF,0,1) ene_data->ground=0; ene_data->size_x=13; /* TCY𐧌 */ ene_data->size_y=16; break; default: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x1B,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x1C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x1C,0,1) ene_data->size_x=13; /* TCY𐧌 */ ene_data->size_y=16; break; } } /*------------------ Gro\ENUM08 -------------*/ void enesp_rsQnum08(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=4; switch(*(ene_data->atr-1)){ default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x44+(2*((ene_data->count>>1)&1)),0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x44+(2*((ene_data->count>>1)&1)),0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x45+(2*((ene_data->count>>1)&1)),0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x45+(2*((ene_data->count>>1)&1)),0,1) break; } } /*------------------ Gro\ENUM21 -------------*/ void enesp_rsQnum21(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=4; switch(*(ene_data->atr-1)){ default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x48+(2*((ene_data->count>>1)&1)),0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x48+(2*((ene_data->count>>1)&1)),0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x49+(2*((ene_data->count>>1)&1)),0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x49+(2*((ene_data->count>>1)&1)),0,1) break; } } /*------------------ Gro\ENUM04 -------------*/ void enesp_rsQnum04(ene_data) ENE_DATA *ene_data; { static short col; int i; if(ene_data->flash)col=15; else col=10; switch(*(ene_data->atr-1)){ case 0: for(i=0;i<4;i++){ SP_DATAST(ene_data->x-16,ene_data->y-16+(16*i),col,0xC0+(2*i),0,0) SP_DATAST(ene_data->x ,ene_data->y-16+(16*i),col,0xC1+(2*i),0,0) SP_DATAST(ene_data->x+16,ene_data->y-16+(16*i),col,0xC1+(2*i),0,1) SP_DATAST(ene_data->x+32,ene_data->y-16+(16*i),col,0xC0+(2*i),0,1) } break; case 1: for(i=0;i<4;i++){ SP_DATAST(ene_data->x-16,ene_data->y-16+(16*i),col,0xC8+(4*i),0,0) SP_DATAST(ene_data->x ,ene_data->y-16+(16*i),col,0xC9+(4*i),0,0) SP_DATAST(ene_data->x+16,ene_data->y-16+(16*i),col,0xCA+(4*i),0,0) SP_DATAST(ene_data->x+32,ene_data->y-16+(16*i),col,0xCB+(4*i),0,0) } break; case 2: for(i=0;i<4;i++){ SP_DATAST(ene_data->x-16,ene_data->y-16+(16*i),col,0xC0+(2*i),0,0) SP_DATAST(ene_data->x ,ene_data->y-16+(16*i),col,0xC1+(2*i),0,0) SP_DATAST(ene_data->x+16,ene_data->y-16+(16*i),col,0xC1+(2*i),0,1) SP_DATAST(ene_data->x+32,ene_data->y-16+(16*i),col,0xC0+(2*i),0,1) } break; case 3: for(i=0;i<4;i++){ SP_DATAST(ene_data->x+32,ene_data->y-16+(16*i),col,0xC8+(4*i),0,1) SP_DATAST(ene_data->x+16,ene_data->y-16+(16*i),col,0xC9+(4*i),0,1) SP_DATAST(ene_data->x ,ene_data->y-16+(16*i),col,0xCA+(4*i),0,1) SP_DATAST(ene_data->x-16,ene_data->y-16+(16*i),col,0xCB+(4*i),0,1) } break; default: for(i=0;i<4;i++){ SP_DATAST(ene_data->x-16,ene_data->y-16+(16*i),col,0xC0+(2*i),0,0) SP_DATAST(ene_data->x ,ene_data->y-16+(16*i),col,0xC1+(2*i),0,0) SP_DATAST(ene_data->x+16,ene_data->y-16+(16*i),col,0xC1+(2*i),0,1) SP_DATAST(ene_data->x+32,ene_data->y-16+(16*i),col,0xC0+(2*i),0,1) } break; } } /*------------------ Gro\ENUM09 -------------*/ void enesp_rsQnum09(ene_data) ENE_DATA *ene_data; { static short off[]={0,8}; static short col; int i; if(ene_data->flash)col=15; else col=4; switch(*(ene_data->atr-1)){ default: for(i=0;i<4;i++){ SP_DATAST(ene_data->x-16,ene_data->y-16+(16*i),col,0xD8+(2*i)+off[(disp_cont->status>>1)&1],0,0) SP_DATAST(ene_data->x ,ene_data->y-16+(16*i),col,0xD9+(2*i)+off[(disp_cont->status>>1)&1],0,0) SP_DATAST(ene_data->x+16,ene_data->y-16+(16*i),col,0xD9+(2*i)+off[(disp_cont->status>>1)&1],0,1) SP_DATAST(ene_data->x+32,ene_data->y-16+(16*i),col,0xD8+(2*i)+off[(disp_cont->status>>1)&1],0,1) } break; } } /*------------------ Gro\ENUM11 -------------*/ void enesp_rsQnum11(ene_data) ENE_DATA *ene_data; { static short col; int i; static short off[]={0,3,6,9}; if(ene_data->flash)col=15; else col=5; switch(*(ene_data->atr-1)){ default: SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x2B+off[(ene_data->count>>2)&3],0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x2C+off[(ene_data->count>>2)&3],0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x2D+off[(ene_data->count>>2)&3],0,0) break; } } /*------------------ Gro\ENUM05_t3 -------------*/ void enesp_rsQnum05_t3(ene_data) ENE_DATA *ene_data; { static short col; int i; if(ene_data->flash)col=15; else col=9; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x ,ene_data->y ,col,0x0F,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x0F,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x10,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x10,0,1) ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=16; break; case 1: SP_DATAST(ene_data->x+ 8-1,ene_data->y ,col,0x11,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x12,0,0) SP_DATAST(ene_data->x+16 ,ene_data->y+16,col,0x13,0,0) ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=16; break; case 2: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x14,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x15,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x16,0,0) ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=16; break; case 3: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x17,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x18,0,0) ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=16; break; case 4: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x19,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x1A,0,0) ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=16; break; case 5: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x17,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x18,0,1) ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=16; break; case 6: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x14,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x15,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x16,0,1) ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=16; break; case 7: SP_DATAST(ene_data->x+ 8+1,ene_data->y ,col,0x11,0,1) SP_DATAST(ene_data->x+16 ,ene_data->y+16,col,0x12,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x13,0,1) ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=16; break; /* オĂ */ case 8: SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x1B,0,0) ene_data->ground=1; ene_data->size_x=8; /* TCY𐧌 */ ene_data->size_y=8; break; case 9: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x1C,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x1D,0,0) ene_data->ground=1; ene_data->size_x=8; /* TCY𐧌 */ ene_data->size_y=9; break; case 10: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x1E,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x1F,0,0) ene_data->ground=1; ene_data->size_x=8; /* TCY𐧌 */ ene_data->size_y=10; break; case 11: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x20,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x21,0,0) ene_data->ground=1; ene_data->size_x=9; /* TCY𐧌 */ ene_data->size_y=11; break; case 12: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x22,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x23,0,0) ene_data->ground=1; ene_data->size_x=9; /* TCY𐧌 */ ene_data->size_y=12; break; case 13: SP_DATAST(ene_data->x+ 8-2,ene_data->y ,col,0x24,0,0) SP_DATAST(ene_data->x+ 8-2,ene_data->y+16,col,0x25,0,0) ene_data->ground=1; ene_data->size_x=9; /* TCY𐧌 */ ene_data->size_y=13; break; case 14: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x26,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x27,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x28,0,0) ene_data->ground=0; ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=14; break; case 15: SP_DATAST(ene_data->x ,ene_data->y ,col,0x29,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x29,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2A,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2A,0,1) ene_data->ground=0; ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=16; break; /* オĂ */ case 16: SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x1B,0,1) ene_data->ground=1; ene_data->size_x=8; /* TCY𐧌 */ ene_data->size_y=8; break; case 17: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x1C,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x1D,0,1) ene_data->ground=1; ene_data->size_x=8; /* TCY𐧌 */ ene_data->size_y=9; break; case 18: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x1E,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x1F,0,1) ene_data->ground=1; ene_data->size_x=8; /* TCY𐧌 */ ene_data->size_y=10; break; case 19: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x20,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x21,0,1) ene_data->ground=1; ene_data->size_x=9; /* TCY𐧌 */ ene_data->size_y=11; break; case 20: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x22,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x23,0,1) ene_data->ground=1; ene_data->size_x=9; /* TCY𐧌 */ ene_data->size_y=12; break; case 21: SP_DATAST(ene_data->x+ 8+2,ene_data->y ,col,0x24,0,1) SP_DATAST(ene_data->x+ 8+2,ene_data->y+16,col,0x25,0,1) ene_data->ground=1; ene_data->size_x=9; /* TCY𐧌 */ ene_data->size_y=13; break; case 22: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x26,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x27,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x28,0,1) ene_data->ground=0; ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=14; break; case 23: SP_DATAST(ene_data->x ,ene_data->y ,col,0x29,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x29,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2A,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2A,0,1) ene_data->ground=0; ene_data->size_x=10; /* TCY𐧌 */ ene_data->size_y=16; break; default: SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x1B,0,0) ene_data->size_x=8; /* TCY𐧌 */ ene_data->size_y=8; break; } } 2,0x50+(s%10),0,0) if((s=all_cont->score/1000000)==0)return; SP_DATAST(255-42,16,2,0x50+(s%10),0,0) if((s=all_cont->score/10000000)==0)return; SP_DATAST(255-49,16,2,0x50+(s%10),0,0) } } /* < vg^Cv錾 > */ /* G */ void enesp_rsQriv(ENE_DATA*); void enesp_rsQriv4(ENE_DATA*); void enesp_rsQrivEsc(ENE_DATA*); void enesp_rsQnum10(ENE_DATA*); void enesp_rsQnum14(ENE_DATA*); void enesp_rsQnum18(ENE_DATA*); void enesp_rsQnum25(ENE_DATA*); void enesp_rsQnum05_t1(ENE_DATA*); void enesp_rsQnum07(ENE_DATA*); void enesp_rsQnum08(ENE_DATA*); void enesp_rsQnum21(ENE_DATA*); void enesp_rsQnum04(ENE_DATA*); void enesp_rsQnum09(ENE_DATA*); void enesp_rsQnum11(ENE_DATA*); void enesp_rsQnum05_t3(ENE_DATA*); #include #include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "enesp_setc.h" #include "subs.h" #define TOP_BODY 0x01 #define TOP_BODY2 0xC0 #define TOP_ARM 0x34 #define TOP_MAN 0x3C /*---------------------< ϐ錾 >----------------------------*/ extern volatile STICK_UNIT *STC1_IO; /* WCXeBbN */ extern volatile STICK_UNIT *STC2_IO; static void body03(ENE_DATA*); static void body1(ENE_DATA*); static void body2(ENE_DATA*); static void body4(ENE_DATA*); static void body5(ENE_DATA*); /*------------------ Gro\Enum06 -------------*/ void enesp_rsRnum06(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=6; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x ,ene_data->y ,col,0x30,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x30,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x31,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x31,0,1) break; case 1: SP_DATAST(ene_data->x ,ene_data->y ,col,0x32,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x33,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x34,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x35,0,0) break; case 2: SP_DATAST(ene_data->x ,ene_data->y ,col,0x36,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x37,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x38,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x39,0,0) break; case 4: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x30,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x30,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x31,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x31,0,0) break; case 5: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x32,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x33,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x34,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x35,0,1) break; case 6: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x36,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x37,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x38,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x39,0,1) break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x30,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x30,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x31,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x31,0,1) break; } } /*------------------ Gro\Enum06_c -------------*/ void enesp_rsRnum06_c(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=4; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x ,ene_data->y ,col,0x01,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x01,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x02,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x02,0,1) break; case 1: SP_DATAST(ene_data->x ,ene_data->y ,col,0x03,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x04,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x05,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x06,0,0) break; case 2: SP_DATAST(ene_data->x ,ene_data->y ,col,0x07,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x08,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x09,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x0A,0,0) break; case 4: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x01,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x01,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x02,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x02,0,0) break; case 5: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x03,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x04,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x05,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x06,0,1) break; case 6: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x07,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x08,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x09,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x0A,0,1) break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x01,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x01,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x02,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x02,0,1) break; } } /*------------------ Gro\Enum20 -------------*/ void enesp_rsRnum20(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=7; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x ,ene_data->y ,col,0x3E,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x3F,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x40,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x41,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y ,col,0x42,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x43,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x44,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x45,0,0) break; case 2: SP_DATAST(ene_data->x ,ene_data->y ,col,0x46,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x47,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x48,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x49,0,0) break; case 3: SP_DATAST(ene_data->x ,ene_data->y ,col,0x4A,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x4B,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x4C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x4D,0,0) break; case 4: SP_DATAST(ene_data->x ,ene_data->y ,col,0x4E,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x4E,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x4F,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x4F,0,1) break; case 5: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x4E,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x4E,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x4F,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x4F,0,0) break; case 6: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x4A,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x4B,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x4C,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x4D,0,1) break; case 7: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x46,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x47,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x48,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x49,0,1) break; case 8: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x42,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x43,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x44,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x45,0,1) break; case 9: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x3E,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x3F,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x40,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x41,0,1) break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x3E,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x3F,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x40,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x41,0,0) break; } } /*------------------ Gro\Enum25 -------------*/ void enesp_rsRnum25(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=8; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x ,ene_data->y- 8,col,0x26,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0x26,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0x27,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0x27,0,1) SP_DATAST(ene_data->x ,ene_data->y+24,col,0x28,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,0x28,0,1) ene_data->ground=0; ene_data->size_x=8; ene_data->size_y=16; break; case 1: SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x29,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x2A,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,0x2B,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,0x2C,0,0) ene_data->size_x=8; ene_data->size_y=16; ene_data->ground=0; break; case 2: SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x2D,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x2E,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x2F,0,0) ene_data->size_x=8; ene_data->size_y=16; ene_data->ground=0; break; case 3: SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0x26,0,1) SP_DATAST(ene_data->x ,ene_data->y- 8,col,0x26,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0x27,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0x27,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,0x28,0,1) SP_DATAST(ene_data->x ,ene_data->y+24,col,0x28,0,0) ene_data->size_x=8; ene_data->size_y=16; ene_data->ground=0; break; case 4: SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x29,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x2A,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,0x2B,0,1) SP_DATAST(ene_data->x ,ene_data->y+24,col,0x2C,0,1) ene_data->size_x=8; ene_data->size_y=16; ene_data->ground=0; break; case 5: SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x2D,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x2E,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x2F,0,1) ene_data->size_x=8; ene_data->size_y=16; ene_data->ground=0; break; case 6: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x16,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x17,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=16; break; case 7: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x18,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x19,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=16; break; case 8: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x1A,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x1B,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=16; break; case 9: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x1C,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x1D,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=16; break; case 10: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x1E,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x1F,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=16; break; case 11: SP_DATAST(ene_data->x ,ene_data->y- 8,col,0x20,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0x20,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0x21,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0x21,0,1) SP_DATAST(ene_data->x ,ene_data->y+24,col,0x22,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,0x22,0,1) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=16; break; case 12: SP_DATAST(ene_data->x ,ene_data->y- 8,col,0x23,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0x23,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0x24,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0x24,0,1) SP_DATAST(ene_data->x ,ene_data->y+24,col,0x25,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,0x25,0,1) ene_data->ground=0; ene_data->size_x=8; ene_data->size_y=16; break; case 13: SP_DATAST(ene_data->x ,ene_data->y- 8,col,0x26,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0x26,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0x27,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0x27,0,1) SP_DATAST(ene_data->x ,ene_data->y+24,col,0x28,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,0x28,0,1) ene_data->ground=0; ene_data->size_x=8; ene_data->size_y=16; break; default: SP_DATAST(ene_data->x ,ene_data->y- 8,col,0x26,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0x26,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0x27,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0x27,0,1) SP_DATAST(ene_data->x ,ene_data->y+24,col,0x28,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,0x28,0,1) ene_data->ground=0; ene_data->size_x=8; ene_data->size_y=16; break; } } /*------------------ Gro\Enum29 -------------*/ void enesp_rsRnum29(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=9; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x0D,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x0E,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x0E,0,1) ene_data->ground=0; ene_data->size_x=11; ene_data->size_y=15; break; case 1: SP_DATAST(ene_data->x -1,ene_data->y ,col,0x0F,0,0) SP_DATAST(ene_data->x+16-1,ene_data->y ,col,0x10,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x11,0,0) SP_DATAST(ene_data->x+16 ,ene_data->y+16,col,0x12,0,0) ene_data->ground=0; ene_data->size_x=11; ene_data->size_y=15; break; case 2: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x13,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x14,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x15,0,0) ene_data->ground=0; ene_data->size_x=11; ene_data->size_y=15; break; case 3: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x0D,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x0E,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x0E,0,0) ene_data->ground=0; ene_data->size_x=11; ene_data->size_y=15; break; case 4: SP_DATAST(ene_data->x+16+1,ene_data->y ,col,0x0F,0,1) SP_DATAST(ene_data->x +1,ene_data->y ,col,0x10,0,1) SP_DATAST(ene_data->x+16 ,ene_data->y+16,col,0x11,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x12,0,1) ene_data->ground=0; ene_data->size_x=11; ene_data->size_y=15; break; case 5: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x13,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x14,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x15,0,1) ene_data->ground=0; ene_data->size_x=11; ene_data->size_y=15; break; case 6: SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x01,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=8; break; case 7: SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x02,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=9; break; case 8: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x03,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x04,0,0) ene_data->ground=1; ene_data->size_x=9; ene_data->size_y=10; break; case 9: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x05,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x06,0,0) ene_data->ground=1; ene_data->size_x=9; ene_data->size_y=11; break; case 10: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x07,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x08,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x08,0,1) ene_data->ground=1; ene_data->size_x=10; ene_data->size_y=12; break; case 11: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x09,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x0A,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x0A,0,1) ene_data->ground=1; ene_data->size_x=10; ene_data->size_y=13; break; case 12: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x0B,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x0C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x0C,0,1) ene_data->ground=0; ene_data->size_x=11; ene_data->size_y=14; break; case 13: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x0D,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x0E,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x0E,0,1) ene_data->ground=0; ene_data->size_x=11; ene_data->size_y=15; break; default: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x0D,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x0E,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x0E,0,1) ene_data->size_x=11; ene_data->size_y=15; break; } } /*------------------ Gro\Enum30 -------------*/ void enesp_rsRnum30(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=4; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x ,ene_data->y- 8,col,0xE0,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0xE0,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0xE1,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0xE1,0,1) SP_DATAST(ene_data->x ,ene_data->y+24,col,0xE2,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,0xE2,0,1) break; case 1: SP_DATAST(ene_data->x ,ene_data->y- 8,col,0xE3,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0xE4,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0xE5,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0xE6,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,0xE7,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,0xE8,0,0) break; case 2: SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0xE9,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xEA,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0xEB,0,0) break; case 3: SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0xE0,0,1) SP_DATAST(ene_data->x ,ene_data->y- 8,col,0xE0,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0xE1,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0xE1,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,0xE2,0,1) SP_DATAST(ene_data->x ,ene_data->y+24,col,0xE2,0,0) break; case 4: SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0xE3,0,1) SP_DATAST(ene_data->x ,ene_data->y- 8,col,0xE4,0,1) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0xE5,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0xE6,0,1) SP_DATAST(ene_data->x+16,ene_data->y+24,col,0xE7,0,1) SP_DATAST(ene_data->x ,ene_data->y+24,col,0xE8,0,1) break; case 5: SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0xE9,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xEA,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0xEB,0,1) break; default: SP_DATAST(ene_data->x ,ene_data->y- 8,col,0xE0,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0xE0,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0xE1,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0xE1,0,1) SP_DATAST(ene_data->x ,ene_data->y+24,col,0xE2,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,0xE2,0,1) break; } } /*------------------ Gro\Enum02_t3 -------------*/ void enesp_rsRnum02_t3(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=5; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xEC,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=8; break; case 1: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xED,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0xEE,0,0) ene_data->ground=1; ene_data->size_x=9; ene_data->size_y=9; break; case 2: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xEF,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0xF0,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0xF0,0,1) ene_data->ground=1; ene_data->size_x=10; ene_data->size_y=10; break; case 3: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF1,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0xF2,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0xF2,0,1) ene_data->ground=1; ene_data->size_x=11; ene_data->size_y=11; break; case 4: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF3,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0xF4,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0xF4,0,1) ene_data->ground=1; ene_data->size_x=12; ene_data->size_y=12; break; case 5: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF5,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0xF6,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0xF6,0,1) ene_data->ground=1; ene_data->size_x=13; ene_data->size_y=13; break; case 6: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF7,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0xF8,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0xF8,0,1) ene_data->ground=0; ene_data->size_x=13; ene_data->size_y=14; break; case 7: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF9,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0xFA,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0xFA,0,1) ene_data->ground=0; ene_data->size_x=13; ene_data->size_y=15; break; default: SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xEC,0,0) ene_data->size_x=8; ene_data->size_y=8; break; } } /*------------------ Gro\Enum24 -------------*/ void enesp_rsRnum24(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=10; switch(*(ene_data->atr-1)){ case 0: case 2: SP_DATAST(ene_data->x-24,ene_data->y-24,col,0xC0,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0xC1,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0xC2,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0xC1,0,1) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0xC0,0,1) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,0xC3,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0xC4,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0xC5,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0xC4,0,1) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,0xC3,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0xC6,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xC7,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0xC6,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0xC8,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0xC9,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0xC8,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0xCA,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0xCA,0,1) break; case 1: SP_DATAST(ene_data->x-16,ene_data->y-24,col,0xCB,0,0) SP_DATAST(ene_data->x ,ene_data->y-24,col,0xCC,0,0) SP_DATAST(ene_data->x+16,ene_data->y-24,col,0xCD,0,0) SP_DATAST(ene_data->x+32,ene_data->y-24,col,0xCE,0,0) SP_DATAST(ene_data->x-32,ene_data->y- 8,col,0xCF,0,0) SP_DATAST(ene_data->x-16,ene_data->y- 8,col,0xD0,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,0xD1,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0xD2,0,0) SP_DATAST(ene_data->x+32,ene_data->y- 8,col,0xD3,0,0) SP_DATAST(ene_data->x-16,ene_data->y+ 8,col,0xD4,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0xD5,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0xD6,0,0) SP_DATAST(ene_data->x+32,ene_data->y+ 8,col,0xD7,0,0) SP_DATAST(ene_data->x-16,ene_data->y+24,col,0xD8,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,0xD9,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,0xDA,0,0) SP_DATAST(ene_data->x+32,ene_data->y+24,col,0xDB,0,0) SP_DATAST(ene_data->x-16,ene_data->y+40,col,0xDC,0,0) SP_DATAST(ene_data->x ,ene_data->y+40,col,0xDD,0,0) SP_DATAST(ene_data->x+16,ene_data->y+40,col,0xDE,0,0) // SP_DATAST(ene_data->x+32,ene_data->y+40,col,0xDF,0,0) break; case 3: SP_DATAST(ene_data->x+32,ene_data->y-24,col,0xCB,0,1) SP_DATAST(ene_data->x+16,ene_data->y-24,col,0xCC,0,1) SP_DATAST(ene_data->x ,ene_data->y-24,col,0xCD,0,1) SP_DATAST(ene_data->x-16,ene_data->y-24,col,0xCE,0,1) SP_DATAST(ene_data->x+48,ene_data->y- 8,col,0xCF,0,1) SP_DATAST(ene_data->x+32,ene_data->y- 8,col,0xD0,0,1) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0xD1,0,1) SP_DATAST(ene_data->x ,ene_data->y- 8,col,0xD2,0,1) SP_DATAST(ene_data->x-16,ene_data->y- 8,col,0xD3,0,1) SP_DATAST(ene_data->x+32,ene_data->y+ 8,col,0xD4,0,1) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0xD5,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0xD6,0,1) SP_DATAST(ene_data->x-16,ene_data->y+ 8,col,0xD7,0,1) SP_DATAST(ene_data->x+32,ene_data->y+24,col,0xD8,0,1) SP_DATAST(ene_data->x+16,ene_data->y+24,col,0xD9,0,1) SP_DATAST(ene_data->x ,ene_data->y+24,col,0xDA,0,1) SP_DATAST(ene_data->x-16,ene_data->y+24,col,0xDB,0,1) SP_DATAST(ene_data->x+32,ene_data->y+40,col,0xDC,0,1) SP_DATAST(ene_data->x+16,ene_data->y+40,col,0xDD,0,1) SP_DATAST(ene_data->x ,ene_data->y+40,col,0xDE,0,1) // SP_DATAST(ene_data->x-16,ene_data->y+40,col,0xDF,0,1) break; } } /*------------------ Gro\Enum08 -------------*/ void enesp_rsRnum08(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=7; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x ,ene_data->y ,col,0x3A,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x3B,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x3C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x3D,0,0) break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x3A,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x3B,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x3C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x3D,0,0) break; } } /*------------------ Gro\Enum05_t3 -------------*/ void enesp_rsRnum05_t3(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=7; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x11,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x12,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=8; break; case 1: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x13,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x14,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=9; break; case 2: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x15,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x16,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=10; break; case 3: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x17,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x18,0,0) ene_data->ground=1; ene_data->size_x=9; ene_data->size_y=11; break; case 4: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x19,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x1A,0,0) ene_data->ground=1; ene_data->size_x=9; ene_data->size_y=12; break; case 5: SP_DATAST(ene_data->x+ 8-2,ene_data->y ,col,0x1B,0,0) SP_DATAST(ene_data->x+ 8-2,ene_data->y+16,col,0x1C,0,0) ene_data->ground=1; ene_data->size_x=9; ene_data->size_y=13; break; case 6: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x1D,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x1E,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x1F,0,0) ene_data->ground=0; ene_data->size_x=10; ene_data->size_y=14; break; case 7: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x20,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x21,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x22,0,0) ene_data->ground=0; ene_data->size_x=10; ene_data->size_y=16; break; case 8: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x11,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x12,0,1) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=8; break; case 9: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x13,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x14,0,1) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=9; break; case 10: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x15,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x16,0,1) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=10; break; case 11: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x17,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x18,0,1) ene_data->ground=1; ene_data->size_x=9; ene_data->size_y=11; break; case 12: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x19,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x1A,0,1) ene_data->ground=1; ene_data->size_x=9; ene_data->size_y=12; break; case 13: SP_DATAST(ene_data->x+ 8+2,ene_data->y ,col,0x1B,0,1) SP_DATAST(ene_data->x+ 8+2,ene_data->y+16,col,0x1C,0,1) ene_data->ground=1; ene_data->size_x=9; ene_data->size_y=13; break; case 14: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x1D,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x1E,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x1F,0,1) ene_data->ground=0; ene_data->size_x=10; ene_data->size_y=14; break; case 15: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x20,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x21,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x22,0,1) ene_data->ground=0; ene_data->size_x=10; ene_data->size_y=16; break; default: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x11,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x12,0,0) ene_data->ground=1; ene_data->size_x=10; ene_data->size_y=16; break; } } /*------------------ Gro\Enum22 -------------*/ void enesp_rsRnum22(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=8; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x ,ene_data->y ,col,0x30,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x31,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x32,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x33,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y ,col,0x34,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x35,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x36,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x37,0,0) break; case 2: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x38,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x39,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x3A,0,0) break; case 3: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x30,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x31,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x32,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x33,0,1) break; case 4: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x34,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x35,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x36,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x37,0,1) break; case 5: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x38,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x39,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x3A,0,1) break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x30,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x31,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x32,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x33,0,0) break; } } /*------------------ Gro\Enum05_t1 -------------*/ void enesp_rsRnum05_t1(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=8; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x23,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x24,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x25,0,0) break; case 1: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x26,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x27,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x28,0,0) break; case 2: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x29,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2A,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2B,0,0) break; case 3: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x2C,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x2D,0,0) break; case 4: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x2E,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x2F,0,0) break; case 5: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x2C,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x2D,0,1) break; case 6: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x29,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2A,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2B,0,1) break; case 7: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x26,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x27,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x28,0,1) break; default: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x23,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x24,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x25,0,0) break; } } /*------------------ Gro\Enum05_t1_c -------------*/ void enesp_rsRnum05_t1_c(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=7; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x34,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x35,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x36,0,0) break; case 1: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x37,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x38,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x39,0,0) break; case 2: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x3A,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x3B,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x3C,0,0) break; case 3: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x3D,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x3E,0,0) break; case 4: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x3F,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x40,0,0) break; case 5: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x3D,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x3E,0,1) break; case 6: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x3A,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x3B,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x3C,0,1) break; case 7: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x37,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x38,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x39,0,1) break; default: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x34,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x35,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x36,0,0) break; } } /*------------------ Gro\Enum14 -------------*/ void enesp_rsRnum14(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=9; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x3B,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=8; break; case 1: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x3C,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x3D,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=8; break; case 2: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x3E,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x3F,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=9; break; case 3: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x40,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x41,0,0) ene_data->ground=1; ene_data->size_x=9; ene_data->size_y=9; break; case 4: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x42,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x43,0,0) ene_data->ground=1; ene_data->size_x=9; ene_data->size_y=10; break; case 5: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x44,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x45,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x46,0,0) ene_data->ground=0; ene_data->size_x=9; ene_data->size_y=10; break; case 6: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x47,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x48,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x49,0,0) ene_data->size_x=10; ene_data->size_y=11; break; case 7: SP_DATAST(ene_data->x ,ene_data->y ,col,0x4A,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x4B,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x4C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x4D,0,0) ene_data->ground=0; ene_data->size_x=10; ene_data->size_y=12; break; default: SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x3B,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=8; break; } } /*------------------ Gro\Enum27 -------------*/ void enesp_rsRnum27(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=5; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x ,ene_data->y- 8,col,0x16,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0x17,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x18,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x19,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y- 8,col,0x1A,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0x1B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x1C,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x1D,0,0) break; case 2: SP_DATAST(ene_data->x ,ene_data->y- 8,col,0x1E,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0x1F,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x20,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x21,0,0) break; case 3: SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0x16,0,1) SP_DATAST(ene_data->x ,ene_data->y- 8,col,0x17,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x18,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x19,0,1) break; case 4: SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0x1A,0,1) SP_DATAST(ene_data->x ,ene_data->y- 8,col,0x1B,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x1C,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x1D,0,1) break; case 5: SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0x1E,0,1) SP_DATAST(ene_data->x ,ene_data->y- 8,col,0x1F,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x20,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x21,0,1) break; default: SP_DATAST(ene_data->x ,ene_data->y- 8,col,0x16,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,0x17,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x18,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x19,0,0) break; } } /*------------------ Gro\Enum07 -------------*/ void enesp_rsRnum07(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=8; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x ,ene_data->y ,col,0x0F,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x10,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x11,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x12,0,0) break; case 1: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x0F,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x10,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x11,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x12,0,1) break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x0F,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x10,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x11,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x12,0,0) break; } } /*------------------ Gro\Enum19 -------------*/ void enesp_rsRnum19(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=10; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0xC0,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0xC1,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0xC0,0,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0xC2,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0xC3,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0xC2,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0xC4,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xC5,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0xC4,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0xC6,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0xC7,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0xC6,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0xC8,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0xC9,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0xC8,0,1) break; case 1: SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0xCA,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0xCB,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0xCC,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0xCD,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0xCE,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0xCF,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0xD0,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xD1,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0xD2,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0xD3,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0xD4,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0xD5,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0xD6,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0xD7,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0xD8,0,0) break; case 2: SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0xC0,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0xC1,0,1) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0xC0,0,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0xC2,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0xC3,0,1) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0xC2,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0xC4,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xC5,0,1) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0xC4,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0xC6,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0xC7,0,1) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0xC6,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0xC8,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0xC9,0,1) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0xC8,0,1) break; case 3: SP_DATAST(ene_data->x+24,ene_data->y-24,col,0xCA,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0xCB,0,1) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0xCC,0,1) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0xCD,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0xCE,0,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0xCF,0,1) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0xD0,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xD1,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0xD2,0,1) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0xD3,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0xD4,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0xD5,0,1) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0xD6,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0xD7,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0xD8,0,1) break; default: SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0xC0,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0xC1,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0xC0,0,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0xC2,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0xC3,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0xC2,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0xC4,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xC5,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0xC4,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0xC6,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0xC7,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0xC6,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0xC8,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0xC9,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0xC8,0,1) break; } } /*------------------ Gro\Enum25_c -------------*/ void enesp_rsRnum25_c(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=8; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x13,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x14,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=16; break; default: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x13,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x14,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=16; break; } } /*------------------ Gro\Enum08_c -------------*/ void enesp_rsRnum08_c(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=6; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x ,ene_data->y ,col,0x0B,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x0C,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x0D,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x0E,0,0) break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x0B,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x0C,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x0D,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x0E,0,0) break; } } /*------------------ Gro\Enum16 -------------*/ void enesp_rsRnum16(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=5; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x ,ene_data->y ,col,0x22,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x23,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x24,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x25,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y ,col,0x26,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x27,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x28,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x29,0,0) break; case 2: SP_DATAST(ene_data->x ,ene_data->y ,col,0x2A,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x2B,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2D,0,0) break; case 3: SP_DATAST(ene_data->x ,ene_data->y ,col,0x2E,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x2F,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x30,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x31,0,0) break; case 4: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x32,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x33,0,0) break; case 5: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x2E,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x2F,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x30,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x31,0,1) break; case 6: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x2A,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x2B,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2C,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2D,0,1) break; case 7: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x26,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x27,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x28,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x29,0,1) break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x22,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x23,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x24,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x25,0,0) break; } } /*------------------ Gro\Enum26 -------------*/ void enesp_rsRnum26(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=7; switch(*(ene_data->atr-1)){ case 0: case 3: SP_DATAST(ene_data->x- 8,ene_data->y ,col,0x41,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x42,0,0) SP_DATAST(ene_data->x+24,ene_data->y ,col,0x41,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+16,col,0x43,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x44,0,0) SP_DATAST(ene_data->x+24,ene_data->y+16,col,0x43,0,1) ene_data->ground=1; ene_data->size_x=16; ene_data->size_y=8; break; case 1: SP_DATAST(ene_data->x ,ene_data->y ,col,0x45,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x46,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x47,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x48,0,0) ene_data->ground=1; ene_data->size_x=16; ene_data->size_y=8; break; case 2: SP_DATAST(ene_data->x ,ene_data->y ,col,0x49,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x4A,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x4B,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x4C,0,0) ene_data->ground=1; ene_data->size_x=16; ene_data->size_y=8; break; case 4: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x45,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x46,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x47,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x48,0,1) ene_data->ground=1; ene_data->size_x=16; ene_data->size_y=8; break; case 5: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x49,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x4A,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x4B,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x4C,0,1) ene_data->ground=1; ene_data->size_x=16; ene_data->size_y=8; break; case 6: SP_DATAST(ene_data->x- 8,ene_data->y ,col,0xD9,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xDA,0,0) SP_DATAST(ene_data->x+24,ene_data->y ,col,0xD9,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+16,col,0xDB,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0xDC,0,0) SP_DATAST(ene_data->x+24,ene_data->y+16,col,0xDB,0,1) ene_data->ground=1; ene_data->size_x=16; ene_data->size_y=8; break; case 7: SP_DATAST(ene_data->x- 8,ene_data->y ,col,0xDD,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xDE,0,0) SP_DATAST(ene_data->x+24,ene_data->y ,col,0xDD,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+16,col,0xDF,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0xE0,0,0) SP_DATAST(ene_data->x+24,ene_data->y+16,col,0xDF,0,1) ene_data->ground=1; ene_data->size_x=17; ene_data->size_y=9; break; case 8: SP_DATAST(ene_data->x- 8,ene_data->y ,col,0xE1,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xE2,0,0) SP_DATAST(ene_data->x+24,ene_data->y ,col,0xE1,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+16,col,0xE3,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0xE4,0,0) SP_DATAST(ene_data->x+24,ene_data->y+16,col,0xE3,0,1) ene_data->ground=1; ene_data->size_x=18; ene_data->size_y=10; break; case 9: SP_DATAST(ene_data->x- 8,ene_data->y ,col,0xE5,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xE6,0,0) SP_DATAST(ene_data->x+24,ene_data->y ,col,0xE5,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+16,col,0xE7,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0xE8,0,0) SP_DATAST(ene_data->x+24,ene_data->y+16,col,0xE7,0,1) ene_data->ground=1; ene_data->size_x=19; ene_data->size_y=11; break; case 10: SP_DATAST(ene_data->x- 8,ene_data->y ,col,0xE9,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xEA,0,0) SP_DATAST(ene_data->x+24,ene_data->y ,col,0xE9,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+16,col,0xEB,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0xEC,0,0) SP_DATAST(ene_data->x+24,ene_data->y+16,col,0xEB,0,1) ene_data->ground=1; ene_data->size_x=20; ene_data->size_y=12; break; case 11: SP_DATAST(ene_data->x- 8,ene_data->y ,col,0xED,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xEE,0,0) SP_DATAST(ene_data->x+24,ene_data->y ,col,0xED,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+16,col,0xEF,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0xF0,0,0) SP_DATAST(ene_data->x+24,ene_data->y+16,col,0xEF,0,1) ene_data->ground=1; ene_data->size_x=21; ene_data->size_y=13; break; case 12: SP_DATAST(ene_data->x- 8,ene_data->y ,col,0xF1,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF2,0,0) SP_DATAST(ene_data->x+24,ene_data->y ,col,0xF1,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+16,col,0xF3,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0xF4,0,0) SP_DATAST(ene_data->x+24,ene_data->y+16,col,0xF3,0,1) ene_data->ground=0; ene_data->size_x=23; ene_data->size_y=14; break; case 13: case 15: SP_DATAST(ene_data->x- 8,ene_data->y ,col,0xF5,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF6,0,0) SP_DATAST(ene_data->x+24,ene_data->y ,col,0xF5,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+16,col,0xF7,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0xF8,0,0) SP_DATAST(ene_data->x+24,ene_data->y+16,col,0xF7,0,1) ene_data->ground=0; ene_data->size_x=24; ene_data->size_y=14; break; case 14: SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0xF9,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0xFA,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0xFB,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xFC,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0xFD,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0xFE,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0xFF,0,0) ene_data->ground=0; ene_data->size_x=24; ene_data->size_y=14; break; case 16: SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0xF9,0,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0xFA,0,1) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0xFB,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xFC,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0xFD,0,1) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0xFE,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0xFF,0,1) ene_data->ground=0; ene_data->size_x=24; ene_data->size_y=14; break; default: SP_DATAST(ene_data->x- 8,ene_data->y ,col,0x41,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x42,0,0) SP_DATAST(ene_data->x+24,ene_data->y ,col,0x41,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+16,col,0x43,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x44,0,0) SP_DATAST(ene_data->x+24,ene_data->y+16,col,0x43,0,1) ene_data->ground=1; ene_data->size_x=16; ene_data->size_y=8; break; } } /*------------------ Gro\ErsRbossbody -------------*/ void enesp_rsRbossbody(ene_data) ENE_DATA *ene_data; { static short col; static int i; static int codes[]={2,1,0,0,4,5}; if(ene_data->flash)col=15; else col=4; switch(codes[ene_data->anim3]){ case 0: case 3: body03(ene_data); break; case 1: body1(ene_data); break; case 2: body2(ene_data); break; case 4: body4(ene_data); break; case 5: body5(ene_data); break; } } /*------------------ Gro\ErsRbossbody attribute 0,3 -------------*/ void body03(ene_data) ENE_DATA *ene_data; { static short col; static int i; if(ene_data->flash)col=15; else col=4; SP_DATAST(ene_data->x-32,ene_data->y-40,col,TOP_BODY+0x00,0,0) SP_DATAST(ene_data->x-16,ene_data->y-40,col,TOP_BODY+0x01,0,0) SP_DATAST(ene_data->x ,ene_data->y-40,col,TOP_BODY+0x02,0,0) SP_DATAST(ene_data->x+16,ene_data->y-40,col,TOP_BODY+0x02,0,1) SP_DATAST(ene_data->x+32,ene_data->y-40,col,TOP_BODY+0x01,0,1) SP_DATAST(ene_data->x+48,ene_data->y-40,col,TOP_BODY+0x00,0,1) SP_DATAST(ene_data->x-32,ene_data->y-24,col,TOP_BODY+0x03,0,0) SP_DATAST(ene_data->x-16,ene_data->y-24,col,TOP_BODY+0x04,0,0) SP_DATAST(ene_data->x ,ene_data->y-24,col,TOP_BODY+0x05,0,0) SP_DATAST(ene_data->x+16,ene_data->y-24,col,TOP_BODY+0x05,0,1) SP_DATAST(ene_data->x+32,ene_data->y-24,col,TOP_BODY+0x04,0,1) SP_DATAST(ene_data->x+48,ene_data->y-24,col,TOP_BODY+0x03,0,1) SP_DATAST(ene_data->x-32,ene_data->y-8,col,TOP_BODY+0x06,0,0) SP_DATAST(ene_data->x-16,ene_data->y-8,col,TOP_BODY+0x07,0,0) SP_DATAST(ene_data->x ,ene_data->y-8,col,TOP_BODY+0x08,0,0) SP_DATAST(ene_data->x+16,ene_data->y-8,col,TOP_BODY+0x08,0,1) SP_DATAST(ene_data->x+32,ene_data->y-8,col,TOP_BODY+0x07,0,1) SP_DATAST(ene_data->x+48,ene_data->y-8,col,TOP_BODY+0x06,0,1) SP_DATAST(ene_data->x-32,ene_data->y+8,col,TOP_BODY+0x09,0,0) SP_DATAST(ene_data->x-16,ene_data->y+8,col,TOP_BODY+0x0A,0,0) SP_DATAST(ene_data->x ,ene_data->y+8,col,TOP_BODY+0x0B,0,0) SP_DATAST(ene_data->x+16,ene_data->y+8,col,TOP_BODY+0x0B,0,1) SP_DATAST(ene_data->x+32,ene_data->y+8,col,TOP_BODY+0x0A,0,1) SP_DATAST(ene_data->x+48,ene_data->y+8,col,TOP_BODY+0x09,0,1) SP_DATAST(ene_data->x-16,ene_data->y+24,col,TOP_BODY+0x0C,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,TOP_BODY+0x0D,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,TOP_BODY+0x0D,0,1) SP_DATAST(ene_data->x+32,ene_data->y+24,col,TOP_BODY+0x0C,0,1) SP_DATAST(ene_data->x-16,ene_data->y+40,col,TOP_BODY+0x0E,0,0) SP_DATAST(ene_data->x ,ene_data->y+40,col,TOP_BODY+0x0F,0,0) SP_DATAST(ene_data->x+16,ene_data->y+40,col,TOP_BODY+0x0F,0,1) SP_DATAST(ene_data->x+32,ene_data->y+40,col,TOP_BODY+0x0E,0,1) SP_DATAST(ene_data->x-16,ene_data->y+56,col,TOP_BODY+0x10,0,0) SP_DATAST(ene_data->x ,ene_data->y+56,col,TOP_BODY+0x11,0,0) SP_DATAST(ene_data->x+16,ene_data->y+56,col,TOP_BODY+0x11,0,1) SP_DATAST(ene_data->x+32,ene_data->y+56,col,TOP_BODY+0x10,0,1) } /*------------------ Gro\ErsRbossbody attribute 1 -------------*/ void body1(ene_data) ENE_DATA *ene_data; { static short col; static int i; if(ene_data->flash)col=15; else col=4; SP_DATAST(ene_data->x-32,ene_data->y-32,col,TOP_BODY+0x12,0,0) SP_DATAST(ene_data->x-16,ene_data->y-32,col,TOP_BODY+0x13,0,0) SP_DATAST(ene_data->x-32,ene_data->y-16,col,TOP_BODY+0x14,0,0) SP_DATAST(ene_data->x-16,ene_data->y-16,col,TOP_BODY+0x15,0,0) SP_DATAST(ene_data->x-32,ene_data->y ,col,TOP_BODY+0x16,0,0) SP_DATAST(ene_data->x-16,ene_data->y ,col,TOP_BODY+0x17,0,0) SP_DATAST(ene_data->x-16,ene_data->y+16,col,TOP_BODY+0x18,0,0) SP_DATAST(ene_data->x-16,ene_data->y+32,col,TOP_BODY+0x19,0,0) SP_DATAST(ene_data->x-16,ene_data->y+48,col,TOP_BODY+0x1A,0,0) SP_DATAST(ene_data->x ,ene_data->y-40,col,TOP_BODY+0x1B,0,0) SP_DATAST(ene_data->x+16,ene_data->y-40,col,TOP_BODY+0x1C,0,0) SP_DATAST(ene_data->x ,ene_data->y-24,col,TOP_BODY+0x1D,0,0) SP_DATAST(ene_data->x+16,ene_data->y-24,col,TOP_BODY+0x1E,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,TOP_BODY+0x1F,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,TOP_BODY+0x20,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,TOP_BODY+0x21,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,TOP_BODY+0x22,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,TOP_BODY+0x23,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,TOP_BODY+0x24,0,0) SP_DATAST(ene_data->x ,ene_data->y+40,col,TOP_BODY+0x25,0,0) SP_DATAST(ene_data->x+16,ene_data->y+40,col,TOP_BODY+0x26,0,0) SP_DATAST(ene_data->x ,ene_data->y+56,col,TOP_BODY+0x27,0,0) SP_DATAST(ene_data->x+16,ene_data->y+56,col,TOP_BODY+0x28,0,0) SP_DATAST(ene_data->x+32,ene_data->y-40,col,TOP_BODY+0x29,0,0) SP_DATAST(ene_data->x+48,ene_data->y-40,col,TOP_BODY+0x2A,0,0) SP_DATAST(ene_data->x+32,ene_data->y-24,col,TOP_BODY+0x2B,0,0) SP_DATAST(ene_data->x+48,ene_data->y-24,col,TOP_BODY+0x2C,0,0) SP_DATAST(ene_data->x+32,ene_data->y- 8,col,TOP_BODY+0x2D,0,0) SP_DATAST(ene_data->x+48,ene_data->y- 8,col,TOP_BODY+0x2E,0,0) SP_DATAST(ene_data->x+32,ene_data->y+ 8,col,TOP_BODY+0x2F,0,0) SP_DATAST(ene_data->x+32,ene_data->y+24,col,TOP_BODY+0x30,0,0) SP_DATAST(ene_data->x+32,ene_data->y+40,col,TOP_BODY+0x31,0,0) SP_DATAST(ene_data->x+32,ene_data->y+56,col,TOP_BODY+0x32,0,0) } /*------------------ Gro\ErsRbossbody attribute 2 -------------*/ void body2(ene_data) ENE_DATA *ene_data; { static short col; static int i; if(ene_data->flash)col=15; else col=4; SP_DATAST(ene_data->x-32,ene_data->y-24,col,TOP_BODY2+0x00,0,0) SP_DATAST(ene_data->x-16,ene_data->y-24,col,TOP_BODY2+0x01,0,0) SP_DATAST(ene_data->x-32,ene_data->y- 8,col,TOP_BODY2+0x02,0,0) SP_DATAST(ene_data->x-16,ene_data->y- 8,col,TOP_BODY2+0x03,0,0) SP_DATAST(ene_data->x-32,ene_data->y+ 8,col,TOP_BODY2+0x04,0,0) SP_DATAST(ene_data->x-16,ene_data->y+ 8,col,TOP_BODY2+0x05,0,0) SP_DATAST(ene_data->x-16,ene_data->y+24,col,TOP_BODY2+0x06,0,0) SP_DATAST(ene_data->x-16,ene_data->y+40,col,TOP_BODY2+0x07,0,0) SP_DATAST(ene_data->x-16,ene_data->y+56,col,TOP_BODY2+0x08,0,0) SP_DATAST(ene_data->x ,ene_data->y-40,col,TOP_BODY2+0x09,0,0) SP_DATAST(ene_data->x+16,ene_data->y-40,col,TOP_BODY2+0x0A,0,0) SP_DATAST(ene_data->x ,ene_data->y-24,col,TOP_BODY2+0x0B,0,0) SP_DATAST(ene_data->x+16,ene_data->y-24,col,TOP_BODY2+0x0C,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,TOP_BODY2+0x0D,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,TOP_BODY2+0x0E,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,TOP_BODY2+0x0F,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,TOP_BODY2+0x10,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,TOP_BODY2+0x11,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,TOP_BODY2+0x12,0,0) SP_DATAST(ene_data->x ,ene_data->y+40,col,TOP_BODY2+0x13,0,0) SP_DATAST(ene_data->x+16,ene_data->y+40,col,TOP_BODY2+0x14,0,0) SP_DATAST(ene_data->x ,ene_data->y+56,col,TOP_BODY2+0x15,0,0) SP_DATAST(ene_data->x+17,ene_data->y+56,col,TOP_BODY2+0x16,0,0) SP_DATAST(ene_data->x+32,ene_data->y-48,col,TOP_BODY2+0x17,0,0) SP_DATAST(ene_data->x+48,ene_data->y-48,col,TOP_BODY2+0x18,0,0) SP_DATAST(ene_data->x+32,ene_data->y-32,col,TOP_BODY2+0x19,0,0) SP_DATAST(ene_data->x+48,ene_data->y-32,col,TOP_BODY2+0x1A,0,0) SP_DATAST(ene_data->x+32,ene_data->y-16,col,TOP_BODY2+0x1B,0,0) SP_DATAST(ene_data->x+48,ene_data->y-16,col,TOP_BODY2+0x1C,0,0) SP_DATAST(ene_data->x+32,ene_data->y ,col,TOP_BODY2+0x1D,0,0) SP_DATAST(ene_data->x+48,ene_data->y ,col,TOP_BODY2+0x1E,0,0) SP_DATAST(ene_data->x+32,ene_data->y+16,col,TOP_BODY2+0x1F,0,0) SP_DATAST(ene_data->x+32,ene_data->y+32,col,TOP_BODY2+0x20,0,0) SP_DATAST(ene_data->x+32,ene_data->y+48,col,TOP_BODY2+0x21,0,0) } /*------------------ Gro\ErsRbossbody attribute 4 -------------*/ void body4(ene_data) ENE_DATA *ene_data; { static short col; static int i; if(ene_data->flash)col=15; else col=4; SP_DATAST(ene_data->x+48,ene_data->y-32,col,TOP_BODY+0x12,0,1) SP_DATAST(ene_data->x+32,ene_data->y-32,col,TOP_BODY+0x13,0,1) SP_DATAST(ene_data->x+48,ene_data->y-16,col,TOP_BODY+0x14,0,1) SP_DATAST(ene_data->x+32,ene_data->y-16,col,TOP_BODY+0x15,0,1) SP_DATAST(ene_data->x+48,ene_data->y ,col,TOP_BODY+0x16,0,1) SP_DATAST(ene_data->x+32,ene_data->y ,col,TOP_BODY+0x17,0,1) SP_DATAST(ene_data->x+32,ene_data->y+16,col,TOP_BODY+0x18,0,1) SP_DATAST(ene_data->x+32,ene_data->y+32,col,TOP_BODY+0x19,0,1) SP_DATAST(ene_data->x+32,ene_data->y+48,col,TOP_BODY+0x1A,0,1) SP_DATAST(ene_data->x+16,ene_data->y-40,col,TOP_BODY+0x1B,0,1) SP_DATAST(ene_data->x ,ene_data->y-40,col,TOP_BODY+0x1C,0,1) SP_DATAST(ene_data->x+16,ene_data->y-24,col,TOP_BODY+0x1D,0,1) SP_DATAST(ene_data->x ,ene_data->y-24,col,TOP_BODY+0x1E,0,1) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,TOP_BODY+0x1F,0,1) SP_DATAST(ene_data->x ,ene_data->y- 8,col,TOP_BODY+0x20,0,1) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,TOP_BODY+0x21,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,TOP_BODY+0x22,0,1) SP_DATAST(ene_data->x+16,ene_data->y+24,col,TOP_BODY+0x23,0,1) SP_DATAST(ene_data->x ,ene_data->y+24,col,TOP_BODY+0x24,0,1) SP_DATAST(ene_data->x+16,ene_data->y+40,col,TOP_BODY+0x25,0,1) SP_DATAST(ene_data->x ,ene_data->y+40,col,TOP_BODY+0x26,0,1) SP_DATAST(ene_data->x+16,ene_data->y+56,col,TOP_BODY+0x27,0,1) SP_DATAST(ene_data->x ,ene_data->y+56,col,TOP_BODY+0x28,0,1) SP_DATAST(ene_data->x-16,ene_data->y-40,col,TOP_BODY+0x29,0,1) SP_DATAST(ene_data->x-32,ene_data->y-40,col,TOP_BODY+0x2A,0,1) SP_DATAST(ene_data->x-16,ene_data->y-24,col,TOP_BODY+0x2B,0,1) SP_DATAST(ene_data->x-32,ene_data->y-24,col,TOP_BODY+0x2C,0,1) SP_DATAST(ene_data->x-16,ene_data->y- 8,col,TOP_BODY+0x2D,0,1) SP_DATAST(ene_data->x-32,ene_data->y- 8,col,TOP_BODY+0x2E,0,1) SP_DATAST(ene_data->x-16,ene_data->y+ 8,col,TOP_BODY+0x2F,0,1) SP_DATAST(ene_data->x-16,ene_data->y+24,col,TOP_BODY+0x30,0,1) SP_DATAST(ene_data->x-16,ene_data->y+40,col,TOP_BODY+0x31,0,1) SP_DATAST(ene_data->x-16,ene_data->y+56,col,TOP_BODY+0x32,0,1) } /*------------------ Gro\ErsRbossbody attribute 5 -------------*/ void body5(ene_data) ENE_DATA *ene_data; { static short col; static int i; if(ene_data->flash)col=15; else col=4; SP_DATAST(ene_data->x+48,ene_data->y-24,col,TOP_BODY2+0x00,0,1) SP_DATAST(ene_data->x+32,ene_data->y-24,col,TOP_BODY2+0x01,0,1) SP_DATAST(ene_data->x+48,ene_data->y- 8,col,TOP_BODY2+0x02,0,1) SP_DATAST(ene_data->x+32,ene_data->y- 8,col,TOP_BODY2+0x03,0,1) SP_DATAST(ene_data->x+48,ene_data->y+ 8,col,TOP_BODY2+0x04,0,1) SP_DATAST(ene_data->x+32,ene_data->y+ 8,col,TOP_BODY2+0x05,0,1) SP_DATAST(ene_data->x+32,ene_data->y+24,col,TOP_BODY2+0x06,0,1) SP_DATAST(ene_data->x+32,ene_data->y+40,col,TOP_BODY2+0x07,0,1) SP_DATAST(ene_data->x+32,ene_data->y+56,col,TOP_BODY2+0x08,0,1) SP_DATAST(ene_data->x+16,ene_data->y-40,col,TOP_BODY2+0x09,0,1) SP_DATAST(ene_data->x ,ene_data->y-40,col,TOP_BODY2+0x0A,0,1) SP_DATAST(ene_data->x+16,ene_data->y-24,col,TOP_BODY2+0x0B,0,1) SP_DATAST(ene_data->x ,ene_data->y-24,col,TOP_BODY2+0x0C,0,1) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,TOP_BODY2+0x0D,0,1) SP_DATAST(ene_data->x ,ene_data->y- 8,col,TOP_BODY2+0x0E,0,1) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,TOP_BODY2+0x0F,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,TOP_BODY2+0x10,0,1) SP_DATAST(ene_data->x+16,ene_data->y+24,col,TOP_BODY2+0x11,0,1) SP_DATAST(ene_data->x ,ene_data->y+24,col,TOP_BODY2+0x12,0,1) SP_DATAST(ene_data->x+16,ene_data->y+40,col,TOP_BODY2+0x13,0,1) SP_DATAST(ene_data->x ,ene_data->y+40,col,TOP_BODY2+0x14,0,1) SP_DATAST(ene_data->x+16,ene_data->y+56,col,TOP_BODY2+0x15,0,1) SP_DATAST(ene_data->x- 1,ene_data->y+56,col,TOP_BODY2+0x16,0,1) SP_DATAST(ene_data->x-16,ene_data->y-48,col,TOP_BODY2+0x17,0,1) SP_DATAST(ene_data->x-32,ene_data->y-48,col,TOP_BODY2+0x18,0,1) SP_DATAST(ene_data->x-16,ene_data->y-32,col,TOP_BODY2+0x19,0,1) SP_DATAST(ene_data->x-32,ene_data->y-32,col,TOP_BODY2+0x1A,0,1) SP_DATAST(ene_data->x-16,ene_data->y-16,col,TOP_BODY2+0x1B,0,1) SP_DATAST(ene_data->x-32,ene_data->y-16,col,TOP_BODY2+0x1C,0,1) SP_DATAST(ene_data->x-16,ene_data->y ,col,TOP_BODY2+0x1D,0,1) SP_DATAST(ene_data->x-32,ene_data->y ,col,TOP_BODY2+0x1E,0,1) SP_DATAST(ene_data->x-16,ene_data->y+16,col,TOP_BODY2+0x1F,0,1) SP_DATAST(ene_data->x-16,ene_data->y+32,col,TOP_BODY2+0x20,0,1) SP_DATAST(ene_data->x-16,ene_data->y+48,col,TOP_BODY2+0x21,0,1) } /*------------------ Gro\ErsRbossarm_l -------------*/ void enesp_rsRbossarm_l(ene_data) ENE_DATA *ene_data; { static short col; static int i; if(ene_data->flash)col=15; else col=5; SP_DATAST(ene_data->x ,ene_data->y-32,col,TOP_ARM+0,0,0) SP_DATAST(ene_data->x+16,ene_data->y-32,col,TOP_ARM+1,0,0) SP_DATAST(ene_data->x ,ene_data->y-16,col,TOP_ARM+2,0,0) SP_DATAST(ene_data->x+16,ene_data->y-16,col,TOP_ARM+3,0,0) SP_DATAST(ene_data->x+ 6,ene_data->y ,col,TOP_ARM+4,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,TOP_ARM+5,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+32,col,TOP_ARM+6,0,0) SP_DATAST(ene_data->x+16,ene_data->y+48,col,TOP_ARM+7,0,0) } /*------------------ Gro\ErsRbossarm_r -------------*/ void enesp_rsRbossarm_r(ene_data) ENE_DATA *ene_data; { static short col; static int i; if(ene_data->flash)col=15; else col=5; SP_DATAST(ene_data->x+16,ene_data->y-32,col,TOP_ARM+0,0,1) SP_DATAST(ene_data->x ,ene_data->y-32,col,TOP_ARM+1,0,1) SP_DATAST(ene_data->x+16,ene_data->y-16,col,TOP_ARM+2,0,1) SP_DATAST(ene_data->x ,ene_data->y-16,col,TOP_ARM+3,0,1) SP_DATAST(ene_data->x+10,ene_data->y ,col,TOP_ARM+4,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,TOP_ARM+5,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+32,col,TOP_ARM+6,0,1) SP_DATAST(ene_data->x ,ene_data->y+48,col,TOP_ARM+7,0,1) } /*------------------ Gro\ErsRbossman_l -------------*/ void enesp_rsRbossman_l(ene_data) ENE_DATA *ene_data; { static short col; static int i; if(ene_data->flash)col=15; else col=6; SP_DATAST(ene_data->x+ 8,ene_data->y ,col,TOP_MAN+0,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,TOP_MAN+1,0,0) } /*------------------ Gro\ErsRbossman_r -------------*/ void enesp_rsRbossman_r(ene_data) ENE_DATA *ene_data; { static short col; static int i; if(ene_data->flash)col=15; else col=6; SP_DATAST(ene_data->x+ 8,ene_data->y ,col,TOP_MAN+0,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,TOP_MAN+1,0,1) } /*------------------ Gro\ErsRlaser -------------*/ void enesp_rsRlaser(ene_data) ENE_DATA *ene_data; { static short col; static short y; static short temp_x,temp_y; temp_x=rnd2(); temp_y=rnd2(); col=0x0C; switch(ene_data->anim3){ case 0: SP_DATAST(ene_data->x+8+temp_x,ene_data->y+8+temp_y,col,0xF8+((ene_data->count>>2)&1),0,0) break; case 1: y=ene_data->y+8; SP_DATAST(ene_data->x+8+temp_x,y+8+temp_y,col,0xFA,0,0) while(1){ y+=16; SP_DATAST(ene_data->x+8+temp_x,y+8+temp_y,col,0xFB,0,0) if(y>256+16)break; } break; case 2: y=ene_data->y+8-16; while(1){ y+=16; SP_DATAST(ene_data->x+8+temp_x,y+8+temp_y,col,0xFC,0,0) if(y>256+16)break; } break; case 3: y=ene_data->y+8-16; while(1){ y+=16; SP_DATAST(ene_data->x+8+temp_x,y+8+temp_y,col,0xFD,0,0) if(y>256+16)break; } break; } } /*------------------ Gro\ErsRblade -------------*/ void enesp_rsRblade(ene_data) ENE_DATA *ene_data; { int i; static short col; static short y; col=0x0C; SP_DATAST(ene_data->x+8,ene_data->y+8,col,0xF0+((disp_cont->status>>1)&1),0,0) for(i=0;ihdy-1;i++){ SP_DATAST(ene_data->x+8,ene_data->y+8+8+(16*i),col,0xF2+(2*((disp_cont->status>>1)&1)),0,0) } if(ene_data->hdy!=0){ i=ene_data->hdy-1; SP_DATAST(ene_data->x+8,ene_data->y+8+8+(16*i),col,0xF3+(2*((disp_cont->status>>1)&1)),0,0) } } v#DDXEMOVEDC #EumXEMOVEDH #a/* < vg^Cv錾 > */ /* G */ void enesp_rsRnum06(ENE_DATA*); void enesp_rsRnum06_c(ENE_DATA*); void enesp_rsRnum20(ENE_DATA*); void enesp_rsRnum25(ENE_DATA*); void enesp_rsRnum25_c(ENE_DATA*); void enesp_rsRnum29(ENE_DATA*); void enesp_rsRnum30(ENE_DATA*); void enesp_rsRnum02_t3(ENE_DATA*); void enesp_rsRnum08(ENE_DATA*); void enesp_rsRnum08_c(ENE_DATA*); void enesp_rsRnum05_t1(ENE_DATA*); void enesp_rsRnum05_t1_c(ENE_DATA*); void enesp_rsRnum05_t3(ENE_DATA*); void enesp_rsRnum22(ENE_DATA*); void enesp_rsRnum14(ENE_DATA*); void enesp_rsRnum27(ENE_DATA*); void enesp_rsRnum07(ENE_DATA*); void enesp_rsRnum16(ENE_DATA*); void enesp_rsRnum26(ENE_DATA*); void enesp_rsRnum24(ENE_DATA*); void enesp_rsRnum19(ENE_DATA*); void enesp_rsRbossbody(ENE_DATA*); void enesp_rsRbossarm_l(ENE_DATA*); void enesp_rsRbossarm_r(ENE_DATA*); void enesp_rsRbossman_l(ENE_DATA*); void enesp_rsRbossman_r(ENE_DATA*); void enesp_rsRlaser(ENE_DATA*); void enesp_rsRblade(ENE_DATA*); (256*9)+0xC5-0xC0+0x40); espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; } /*---------------------------------------------------------<< rsSJńurs`fdSv >>*/ void espunit_rsSJnQ(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>287){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ esp_move(espunit_data->x-40 ,espunit_data->y+8+2 ,(256*9)+0xC6-0xC0+0x40); esp_move(espunit_data->x-40+16,espunit_data->y+8+2 ,(256*9)+0xC7-0xC0+0x40); esp_move(espunit_data->x-40+32,espunit_data->y+8+2 ,(256*9)+0xC8-0xC0+0x40); esp_move(espunit_data->x-40+48,espunit_data->y+8+2 ,(256*9)+0xC9-0xC0+0x40); esp_move(espunit_data->x-40+64,espunit_data->y+8+2 ,(256*9)+0xCA-0xC0+0x4#include #include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "enesp_setd.h" #include "subs.h" /*---------------------< ϐ錾 >----------------------------*/ extern volatile STICK_UNIT *STC1_IO; /* WCXeBbN */ /*------------------ Gro\ErsSriv -------------*/ void enesp_rsSriv(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=6+(2*(disp_cont->status&1)); //if(keyin==KCODE_U)ene_data->anim3+=1; //if(keyin==KCODE_D)ene_data->anim3-=1; if(ene_data->anim3<0)ene_data->anim3=0; /* ꉞ̕ی@\ */ if(ene_data->anim3>45)ene_data->anim3=45; /* {̕\ */ switch((disp_cont->status)&1){ case 0: dmacpy((unsigned short*)(&(sp_data->transsp.tsp_buff[7][5*5*0x40*ene_data->anim3])),(unsigned short*)SP_DEF_ADD(0x11),5*5*(0x80/4)); if(col!=15)dmacpy((unsigned short*)(&(sp_data->transpal.tpal_buff[2][16*ene_data->anim3])),(unsigned short*)SP_PAL_ADD(col),8); SP_DATAST(ene_data->x-24,ene_data->y-24,col,0x11,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0x12,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0x13,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0x14,0,0) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0x15,0,0) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,0x16,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0x17,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x18,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0x19,0,0) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,0x1A,0,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,0x1B,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0x1C,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x1D,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0x1E,0,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0x1F,0,0) SP_DATAST(ene_data->x-24,ene_data->y+24,col,0x20,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0x21,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x22,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0x23,0,0) SP_DATAST(ene_data->x+40,ene_data->y+24,col,0x24,0,0) SP_DATAST(ene_data->x-24,ene_data->y+40,col,0x25,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0x26,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0x27,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0x28,0,0) SP_DATAST(ene_data->x+40,ene_data->y+40,col,0x29,0,0) break; case 1: dmacpy((unsigned short*)(&(sp_data->transsp.tsp_buff[7][5*5*0x40*ene_data->anim3])),(unsigned short*)SP_DEF_ADD(0x2A),5*5*(0x80/4)); if(col!=15)dmacpy((unsigned short*)(&(sp_data->transpal.tpal_buff[2][16*ene_data->anim3])),(unsigned short*)SP_PAL_ADD(col),8); SP_DATAST(ene_data->x-24,ene_data->y-24,col,0x2A,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0x2B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0x2C,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0x2D,0,0) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0x2E,0,0) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,0x2F,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0x30,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x31,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0x32,0,0) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,0x33,0,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,0x34,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0x35,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x36,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0x37,0,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0x38,0,0) SP_DATAST(ene_data->x-24,ene_data->y+24,col,0x39,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0x3A,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x3B,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0x3C,0,0) SP_DATAST(ene_data->x+40,ene_data->y+24,col,0x3D,0,0) SP_DATAST(ene_data->x-24,ene_data->y+40,col,0x3E,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0x3F,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0x40,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0x41,0,0) SP_DATAST(ene_data->x+40,ene_data->y+40,col,0x42,0,0) break; } } /*------------------ Gro\ErsSrivEsc -------------*/ void enesp_rsSrivEsc(ene_data) ENE_DATA *ene_data; /* type `FW̕p */ { /* Pt[ anim3=0 ɂȂĂ܂ */ static int i; /* ̕\̃`‚}邽߂̋̍ */ static short col; if(ene_data->flash)col=15; else col=6+(2*(disp_cont->status&1)); //if(keyin==KCODE_U)ene_data->anim3+=1; //if(keyin==KCODE_D)ene_data->anim3-=1; if(ene_data->anim3<0)ene_data->anim3=0; /* ꉞ̕ی@\ */ if(ene_data->anim3>45)ene_data->anim3=45; if(ene_data->count==0){ /* ŏ̃t[EEE */ if(ene_data->setdir[4])ene_data->anim3=7; else ene_data->anim3=2; } /* {̕\ */ switch((disp_cont->status)&1){ case 0: dmacpy((unsigned short*)(&(sp_data->transsp.tsp_buff[7][5*5*0x40*ene_data->anim3])),(unsigned short*)SP_DEF_ADD(0x11),5*5*(0x80/4)); if(col!=15)dmacpy((unsigned short*)(&(sp_data->transpal.tpal_buff[2][16*ene_data->anim3])),(unsigned short*)SP_PAL_ADD(col),8); SP_DATAST(ene_data->x-24,ene_data->y-24,col,0x11,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0x12,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0x13,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0x14,0,0) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0x15,0,0) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,0x16,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0x17,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x18,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0x19,0,0) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,0x1A,0,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,0x1B,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0x1C,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x1D,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0x1E,0,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0x1F,0,0) SP_DATAST(ene_data->x-24,ene_data->y+24,col,0x20,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0x21,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x22,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0x23,0,0) SP_DATAST(ene_data->x+40,ene_data->y+24,col,0x24,0,0) SP_DATAST(ene_data->x-24,ene_data->y+40,col,0x25,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0x26,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0x27,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0x28,0,0) SP_DATAST(ene_data->x+40,ene_data->y+40,col,0x29,0,0) break; case 1: dmacpy((unsigned short*)(&(sp_data->transsp.tsp_buff[7][5*5*0x40*ene_data->anim3])),(unsigned short*)SP_DEF_ADD(0x2A),5*5*(0x80/4)); if(col!=15)dmacpy((unsigned short*)(&(sp_data->transpal.tpal_buff[2][16*ene_data->anim3])),(unsigned short*)SP_PAL_ADD(col),8); SP_DATAST(ene_data->x-24,ene_data->y-24,col,0x2A,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0x2B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0x2C,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0x2D,0,0) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0x2E,0,0) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,0x2F,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0x30,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x31,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0x32,0,0) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,0x33,0,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,0x34,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0x35,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x36,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0x37,0,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0x38,0,0) SP_DATAST(ene_data->x-24,ene_data->y+24,col,0x39,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0x3A,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x3B,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0x3C,0,0) SP_DATAST(ene_data->x+40,ene_data->y+24,col,0x3D,0,0) SP_DATAST(ene_data->x-24,ene_data->y+40,col,0x3E,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0x3F,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0x40,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0x41,0,0) SP_DATAST(ene_data->x+40,ene_data->y+40,col,0x42,0,0) break; } } /*------------------ Gro\ErsSnum10_a -------------*/ void enesp_rsSnum10_a(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=8; switch(*(ene_data->atr-1)){ default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x4D,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x4D,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x4E,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x4F,0,0) break; } } /*------------------ Gro\ErsSnum31_a -------------*/ void enesp_rsSnum31_a(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=4; switch(*(ene_data->atr-1)){ case 0: case 3: SP_DATAST(ene_data->x ,ene_data->y ,col,0x24,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x25,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x26,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y ,col,0x27,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x28,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x29,0,0) break; case 2: SP_DATAST(ene_data->x ,ene_data->y ,col,0x2A,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x2B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x2C,0,0) break; case 4: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x27,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x28,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x29,0,1) break; case 5: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x2A,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x2B,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x2C,0,1) break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x24,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x25,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x26,0,0) break; } } /*------------------ Gro\ErsSnum33_a -------------*/ void enesp_rsSnum33_a(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=5; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x ,ene_data->y ,col,0x2D,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x2E,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2F,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x30,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y ,col,0x31,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x32,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x33,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x34,0,0) break; case 2: SP_DATAST(ene_data->x ,ene_data->y ,col,0x35,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x36,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x37,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x38,0,0) break; case 3: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x39,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x3A,0,0) break; case 4: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x3B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x3C,0,0) break; case 5: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x39,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x3A,0,1) break; case 6: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x35,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x36,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x37,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x38,0,1) break; case 7: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x31,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x32,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x33,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x34,0,1) break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x2D,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x2E,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2F,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x30,0,0) break; } } /*------------------ Gro\ErsSnum20_a -------------*/ void enesp_rsSnum20_a(ene_data) ENE_DATA *ene_data; { static int i; static short col; static short off; if(ene_data->flash)col=15; else col=6; off=2*((disp_cont->status>>1)&1); switch(*(ene_data->atr-1)){ default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x3D+off,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x3D+off,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x3E+off,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x3E+off,0,1) break; } } /*------------------ Gro\ErsSnum12_a -------------*/ void enesp_rsSnum12_a(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=7; switch(*(ene_data->atr-1)){ default: SP_DATAST(ene_data->x-24,ene_data->y-24,col,0x41,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0x42,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0x43,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0x42,0,1) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0x41,0,1) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,0x44,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0x45,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x46,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0x45,0,1) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,0x44,0,1) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,0x47,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0x48,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x49,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0x48,0,1) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0x47,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0x4A,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x4B,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0x4A,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0x4C,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0x4C,0,1) break; } } /*------------------ Gro\ErsSnum06_b -------------*/ void enesp_rsSnum06_b(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=5; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x1D,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=8; break; case 1: SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x1C,0,0) ene_data->ground=1; ene_data->size_x=9; ene_data->size_y=9; break; case 2: SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x1B,0,0) ene_data->ground=1; ene_data->size_x=10; ene_data->size_y=10; break; case 3: SP_DATAST(ene_data->x ,ene_data->y ,col,0x19,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x19,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x1A,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x1A,0,1) ene_data->ground=1; ene_data->size_x=11; ene_data->size_y=11; break; case 4: SP_DATAST(ene_data->x ,ene_data->y ,col,0x17,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x17,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x18,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x18,0,1) ene_data->ground=1; ene_data->size_x=12; ene_data->size_y=12; break; case 5: SP_DATAST(ene_data->x ,ene_data->y ,col,0x15,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x15,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x16,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x16,0,1) ene_data->ground=1; ene_data->size_x=13; ene_data->size_y=13; break; case 6: SP_DATAST(ene_data->x ,ene_data->y ,col,0x13,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x13,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x14,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x14,0,1) ene_data->ground=0; ene_data->size_x=14; ene_data->size_y=14; break; case 7: case 10: SP_DATAST(ene_data->x ,ene_data->y ,col,0x01,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x01,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x02,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x02,0,1) ene_data->ground=0; ene_data->size_x=14; ene_data->size_y=15; break; case 8: SP_DATAST(ene_data->x ,ene_data->y ,col,0x03,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x04,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x05,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x06,0,0) ene_data->ground=0; ene_data->size_x=14; ene_data->size_y=15; break; case 9: SP_DATAST(ene_data->x ,ene_data->y ,col,0x07,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x08,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x09,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x0A,0,0) ene_data->ground=0; ene_data->size_x=14; ene_data->size_y=15; break; case 11: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x03,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x04,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x05,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x06,0,1) ene_data->ground=0; ene_data->size_x=14; ene_data->size_y=15; break; case 12: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x07,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x08,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x09,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x0A,0,1) ene_data->ground=0; ene_data->size_x=14; ene_data->size_y=15; break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x01,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x01,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x02,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x02,0,1) ene_data->ground=0; ene_data->size_x=14; ene_data->size_y=15; break; } } /*------------------ Gro\ErsSnum32_b -------------*/ void enesp_rsSnum32_b(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(bg_data->bg_y < 26498){ enesp_rsSnum32_c(ene_data); /* ʓ|Ȃ̂ŁA */ return; /* ‚‚܍킹... */ } if(ene_data->flash)col=15; else col=10; switch(*(ene_data->atr-1)){ /* e */ case 0: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x0B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x0C,0,0) break; case 1: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x0D,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x0E,0,0) break; case 2: SP_DATAST(ene_data->x+ 8+1,ene_data->y ,col,0x0F,0,0) SP_DATAST(ene_data->x+ 8+1,ene_data->y+16,col,0x10,0,0) break; case 3: SP_DATAST(ene_data->x+ 8+3,ene_data->y+ 8-3,col,0x11,0,0) break; case 4: SP_DATAST(ene_data->x+ 8+3,ene_data->y+ 8-3,col,0x12,0,0) break; case 5: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x0D,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x0E,0,1) break; case 6: SP_DATAST(ene_data->x+ 8-1,ene_data->y ,col,0x0F,0,1) SP_DATAST(ene_data->x+ 8-1,ene_data->y+16,col,0x10,0,1) break; case 7: SP_DATAST(ene_data->x+ 8-3,ene_data->y+ 8-3,col,0x11,0,1) break; case 8: SP_DATAST(ene_data->x+ 8-3,ene_data->y+ 8-3,col,0x12,0,1) break; default: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x0B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x0C,0,0) break; } SP_DATAST(ene_data->x ,ene_data->y ,col,0x1E,0,0) /* { */ SP_DATAST(ene_data->x+16,ene_data->y ,col,0x1E,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x1F,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x1F,0,1) } /*------------------ Gro\ErsSnum10_b -------------*/ void enesp_rsSnum10_b(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=9; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x ,ene_data->y ,col,0x20,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x21,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x22,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x23,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y ,col,0x24,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x25,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x26,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x27,0,0) break; case 2: SP_DATAST(ene_data->x ,ene_data->y ,col,0x28,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x29,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2A,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2B,0,0) break; case 3: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x20,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x21,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x22,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x23,0,1) break; case 4: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x24,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x25,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x26,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x27,0,1) break; case 5: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x28,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x29,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2A,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2B,0,1) break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x20,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x21,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x22,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x23,0,0) break; } } /*------------------ Gro\ErsSnum27_b -------------*/ void enesp_rsSnum27_b(ene_data) ENE_DATA *ene_data; { static int i; static short col; static short temp; temp=*(ene_data->atr-1); /* ʓ|Ȃ̂ŁA`‚܍킹 */ if(ene_data->x > 128)temp+=6; if(ene_data->flash)col=15; else col=7; switch(temp){ case 0: /* Eނ */ case 3: SP_DATAST(ene_data->x ,ene_data->y ,col,0x2C,1,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x2D,1,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2D,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y ,col,0x2E,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2F,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0x30,0,0) break; case 2: SP_DATAST(ene_data->x ,ene_data->y ,col,0x31,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x32,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0x33,0,0) break; case 4: SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2E,1,0) SP_DATAST(ene_data->x ,ene_data->y ,col,0x2F,1,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0x30,1,0) break; case 5: SP_DATAST(ene_data->x ,ene_data->y+16,col,0x31,1,0) SP_DATAST(ene_data->x ,ene_data->y ,col,0x32,1,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0x33,1,0) break; case 6: /* ނ */ case 9: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x2C,1,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x2D,1,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2C,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2D,0,1) break; case 7: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x2E,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2F,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0x30,0,1) break; case 8: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x31,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x32,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0x33,0,1) break; case 10: SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2E,1,1) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x2F,1,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0x30,1,1) break; case 11: SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x31,1,1) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x32,1,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0x33,1,1) break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x2C,1,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x2D,1,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2D,0,0) break; } } /*------------------ Gro\ErsSnum20_b -------------*/ void enesp_rsSnum20_b(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=8; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x40,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=8; break; case 1: SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x3F,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=9; break; case 2: SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x3E,0,0) ene_data->ground=1; ene_data->size_x=9; ene_data->size_y=10; break; case 3: SP_DATAST(ene_data->x ,ene_data->y ,col,0x3C,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x3C,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x3D,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x3D,0,1) ene_data->ground=1; ene_data->size_x=9; ene_data->size_y=11; break; case 4: SP_DATAST(ene_data->x ,ene_data->y ,col,0x3A,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x3A,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x3B,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x3B,0,1) ene_data->ground=1; ene_data->size_x=10; ene_data->size_y=12; break; case 5: SP_DATAST(ene_data->x ,ene_data->y ,col,0x38,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x38,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x39,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x39,0,1) ene_data->ground=1; ene_data->size_x=10; ene_data->size_y=13; break; case 6: SP_DATAST(ene_data->x ,ene_data->y ,col,0x36,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x36,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x37,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x37,0,1) ene_data->ground=0; ene_data->size_x=11; ene_data->size_y=14; break; case 7: SP_DATAST(ene_data->x ,ene_data->y ,col,0x34,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x34,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x35,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x35,0,1) ene_data->ground=0; ene_data->size_x=12; ene_data->size_y=16; break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x34,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x34,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x35,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x35,0,1) ene_data->ground=0; ene_data->size_x=12; ene_data->size_y=16; break; } } /*------------------ Gro\ErsSnum29_b -------------*/ void enesp_rsSnum29_b(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=6; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x41,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x42,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x42,0,1) ene_data->ground=0; ene_data->size_x=11; ene_data->size_y=15; break; case 1: SP_DATAST(ene_data->x+ 8-1,ene_data->y ,col,0x43,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x44,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x45,0,0) ene_data->ground=0; ene_data->size_x=11; ene_data->size_y=15; break; case 2: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x46,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x47,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x48,0,0) ene_data->ground=0; ene_data->size_x=11; ene_data->size_y=15; break; case 3: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x41,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x42,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x42,0,1) ene_data->ground=0; ene_data->size_x=11; ene_data->size_y=15; break; case 4: SP_DATAST(ene_data->x+ 8+1,ene_data->y ,col,0x43,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x44,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x45,0,1) ene_data->ground=0; ene_data->size_x=11; ene_data->size_y=15; break; case 5: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x46,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x47,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x48,0,1) ene_data->ground=0; ene_data->size_x=11; ene_data->size_y=15; break; case 6: SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xF0,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=8; break; case 7: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF1,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0xF2,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=9; break; case 8: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF3,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0xF4,0,0) ene_data->ground=1; ene_data->size_x=9; ene_data->size_y=10; break; case 9: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF5,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0xF6,0,0) ene_data->ground=1; ene_data->size_x=9; ene_data->size_y=11; break; case 10: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF7,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0xF8,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0xF8,0,1) ene_data->ground=1; ene_data->size_x=10; ene_data->size_y=12; break; case 11: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF9,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0xFA,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0xFA,0,1) ene_data->ground=1; ene_data->size_x=10; ene_data->size_y=13; break; case 12: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xFB,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0xFC,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0xFC,0,1) ene_data->ground=0; ene_data->size_x=11; ene_data->size_y=14; break; case 13: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xFD,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0xFE,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0xFE,0,1) ene_data->ground=0; ene_data->size_x=11; ene_data->size_y=15; break; default: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x41,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x42,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x43,0,0) ene_data->ground=0; ene_data->size_x=11; ene_data->size_y=15; break; } } /*------------------ Gro\ErsSnum23_b -------------*/ void enesp_rsSnum23_b(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(bg_data->bg_y < 26498){ enesp_rsSnum23_c(ene_data); /* ʓ|Ȃ̂ŁA */ return; /* ‚‚܍킹... */ } if(ene_data->flash)col=15; else col=4; switch(*(ene_data->atr-1)){ case 0: case 2: default: SP_DATAST(ene_data->x-24,ene_data->y-24,col,0xD4,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0xD5,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0xD6,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0xD5,0,1) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0xD4,0,1) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,0xD7,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0xD8,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0xD9,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0xD8,0,1) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,0xD7,0,1) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,0xDA,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0xDB,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xDC,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0xDB,0,1) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0xDA,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0xDD,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0xDE,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0xDD,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0xDF,0,0) break; case 1: SP_DATAST(ene_data->x-24,ene_data->y-24,col,0xE0,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0xE1,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0xE2,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0xE3,0,0) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0xE4,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0xE5,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0xE6,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0xE7,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0xE8,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xE9,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0xEA,0,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0xEB,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0xEC,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0xED,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0xEE,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0xEF,0,0) break; case 3: SP_DATAST(ene_data->x+40,ene_data->y-24,col,0xE0,0,1) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0xE1,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0xE2,0,1) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0xE3,0,1) SP_DATAST(ene_data->x-24,ene_data->y-24,col,0xE4,0,1) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0xE5,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0xE6,0,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0xE7,0,1) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0xE8,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xE9,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0xEA,0,1) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,0xEB,0,1) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0xEC,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0xED,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0xEE,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0xEF,0,1) break; } } /*------------------ Gro\ErsSnum06_c -------------*/ void enesp_rsSnum06_c(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=10; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x27,0,0) ene_data->size_x=8; ene_data->size_y=8; ene_data->ground=1; break; case 1: SP_DATAST(ene_data->x ,ene_data->y ,col,0x25,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x25,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x26,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x26,0,1) ene_data->ground=1; ene_data->size_x=10; ene_data->size_y=10; break; case 2: SP_DATAST(ene_data->x ,ene_data->y ,col,0x23,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x23,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x24,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x24,0,1) ene_data->ground=1; ene_data->size_x=12; ene_data->size_y=12; break; case 3: case 6: SP_DATAST(ene_data->x ,ene_data->y ,col,0x21,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x21,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x22,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x22,0,1) ene_data->ground=0; ene_data->size_x=14; ene_data->size_y=15; break; case 4: SP_DATAST(ene_data->x ,ene_data->y ,col,0x01,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x02,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x03,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x04,0,0) ene_data->ground=0; ene_data->size_x=14; ene_data->size_y=15; break; case 5: SP_DATAST(ene_data->x ,ene_data->y ,col,0x05,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x06,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x07,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x08,0,0) ene_data->ground=0; ene_data->size_x=14; ene_data->size_y=15; break; case 7: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x01,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x02,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x03,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x04,0,1) ene_data->ground=0; ene_data->size_x=14; ene_data->size_y=15; break; case 8: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x05,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x06,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x07,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x08,0,1) ene_data->ground=0; ene_data->size_x=14; ene_data->size_y=15; break; default: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x05,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x06,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x07,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x08,0,1) ene_data->ground=0; ene_data->size_x=14; ene_data->size_y=15; break; } } /*------------------ Gro\ErsSnum10_c -------------*/ void enesp_rsSnum10_c(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=4; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x ,ene_data->y ,col,0x09,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x0A,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x0B,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x0C,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y ,col,0x0D,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x0E,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x0F,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x10,0,0) break; case 2: SP_DATAST(ene_data->x ,ene_data->y ,col,0x11,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x12,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x13,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x14,0,0) break; case 3: SP_DATAST(ene_data->x ,ene_data->y ,col,0x15,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x16,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x17,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x18,0,0) break; case 4: SP_DATAST(ene_data->x ,ene_data->y ,col,0x19,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x1A,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x1B,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x1C,0,0) break; case 5: SP_DATAST(ene_data->x ,ene_data->y ,col,0x1D,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x1E,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x1F,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x20,0,0) break; case 6: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x09,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x0A,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x0B,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x0C,0,1) break; case 7: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x0D,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x0E,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x0F,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x10,0,1) break; case 8: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x11,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x12,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x13,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x14,0,1) break; case 9: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x15,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x16,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x17,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x18,0,1) break; case 10: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x19,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x1A,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x1B,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x1C,0,1) break; case 11: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x1D,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x1E,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x1F,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x20,0,1) break; default: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x1D,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x1E,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x1F,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x20,0,1) break; } } /*------------------ Gro\ErsSnum11_c -------------*/ void enesp_rsSnum11_c(ene_data) ENE_DATA *ene_data; { static int i; static short col; static short off; static short code[]={0,3,6,9}; if(ene_data->flash)col=15; else col=5; off=(ene_data->count>>2)&3; switch(*(ene_data->atr-1)){ default: SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x28+code[off],0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x29+code[off],0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x2A+code[off],0,0) break; } } /*------------------ Gro\ErsSnum17_c -------------*/ void enesp_rsSnum17_c(ene_data) ENE_DATA *ene_data; { static int i; static short col; static short off; if(ene_data->flash)col=15; else col=6; off=(ene_data->count>>2)&3; switch(off){ case 0: SP_DATAST(ene_data->x+ 4,ene_data->y+ 4,col,0x34,0,0) SP_DATAST(ene_data->x+20,ene_data->y+ 4,col,0x35,0,0) SP_DATAST(ene_data->x+ 4,ene_data->y+20,col,0x36,0,0) break; case 1: SP_DATAST(ene_data->x+ 4+1,ene_data->y+ 4,col,0x37,0,0) SP_DATAST(ene_data->x+20+1,ene_data->y+ 4,col,0x38,0,0) SP_DATAST(ene_data->x+ 4+1,ene_data->y+20,col,0x39,0,0) break; case 2: SP_DATAST(ene_data->x+ 8,ene_data->y +4,col,0x3A,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16+4,col,0x3B,0,0) break; case 3: SP_DATAST(ene_data->x+ 4+2,ene_data->y+ 4,col,0x3C,0,0) SP_DATAST(ene_data->x+20+2,ene_data->y+ 4,col,0x3D,0,0) SP_DATAST(ene_data->x+ 4+2,ene_data->y+20,col,0x3E,0,0) break; default: SP_DATAST(ene_data->x+ 4,ene_data->y+ 4,col,0x34,0,0) SP_DATAST(ene_data->x+20,ene_data->y+ 4,col,0x35,0,0) SP_DATAST(ene_data->x+ 4,ene_data->y+20,col,0x36,0,0) break; } } /*------------------ Gro\ErsSnum25_c -------------*/ void enesp_rsSnum25_c(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=7; switch(*(ene_data->atr-1)){ default: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x3F,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x40,0,0) break; } } /*------------------ Gro\ErsSnum32_c -------------*/ void enesp_rsSnum32_c(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(bg_data->bg_y > 26498){ enesp_rsSnum32_b(ene_data); /* ʓ|Ȃ̂ŁA */ return; /* ‚‚܍킹... */ } if(ene_data->flash)col=15; else col=7; switch(*(ene_data->atr-1)){ /* e */ case 0: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x43,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x44,0,0) break; case 1: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x45,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x46,0,0) break; case 2: SP_DATAST(ene_data->x+ 8+1,ene_data->y ,col,0x47,0,0) SP_DATAST(ene_data->x+ 8+1,ene_data->y+16,col,0x48,0,0) break; case 3: SP_DATAST(ene_data->x+ 8+3,ene_data->y+ 8-3,col,0x49,0,0) break; case 4: SP_DATAST(ene_data->x+ 8+3,ene_data->y+ 8-3,col,0x4A,0,0) break; case 5: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x45,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x46,0,1) break; case 6: SP_DATAST(ene_data->x+ 8-1,ene_data->y ,col,0x47,0,1) SP_DATAST(ene_data->x+ 8-1,ene_data->y+16,col,0x48,0,1) break; case 7: SP_DATAST(ene_data->x+ 8-3,ene_data->y+ 8-3,col,0x49,0,1) break; case 8: SP_DATAST(ene_data->x+ 8-3,ene_data->y+ 8-3,col,0x4A,0,1) break; default: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0x0B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0x0C,0,0) break; } SP_DATAST(ene_data->x ,ene_data->y ,col,0x41,0,0) /* { */ SP_DATAST(ene_data->x+16,ene_data->y ,col,0x41,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x42,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x42,0,1) } /*------------------ Gro\ErsSnum27_c -------------*/ void enesp_rsSnum27_c(ene_data) ENE_DATA *ene_data; { static int i; static short col; static short temp; temp=*(ene_data->atr-1); /* ʓ|Ȃ̂ŁA`‚܍킹 */ if(ene_data->x > 128)temp+=4; if(ene_data->flash)col=15; else col=8; switch(temp){ case 0: case 2: SP_DATAST(ene_data->x ,ene_data->y ,col,0x4B,1,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x4C,1,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x4B,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x4C,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y ,col,0x4D,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x4E,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0x4F,0,0) break; case 3: SP_DATAST(ene_data->x ,ene_data->y+16,col,0x4D,1,0) SP_DATAST(ene_data->x ,ene_data->y ,col,0x4E,1,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,0x4F,1,0) break; case 4: case 6: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x4B,1,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x4C,1,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x4B,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x4C,0,1) break; case 5: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x4D,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x4E,0,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0x4F,0,1) break; case 7: SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x4D,1,1) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x4E,1,1) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,0x4F,1,1) break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x4B,1,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x4C,1,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x4B,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x4C,0,0) break; } } /*------------------ Gro\ErsSnum23_c -------------*/ void enesp_rsSnum23_c(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(bg_data->bg_y > 26498){ enesp_rsSnum23_b(ene_data); /* ʓ|Ȃ̂ŁA */ return; /* ‚‚܍킹... */ } if(ene_data->flash)col=15; else col=8; switch(*(ene_data->atr-1)){ case 0: case 2: default: SP_DATAST(ene_data->x-24,ene_data->y-24,col,0xD4,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0xD5,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0xD6,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0xD5,0,1) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0xD4,0,1) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,0xD7,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0xD8,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0xD9,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0xD8,0,1) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,0xD7,0,1) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,0xDA,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0xDB,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xDC,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0xDB,0,1) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0xDA,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0xDD,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0xDE,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0xDD,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0xDF,0,0) break; case 1: SP_DATAST(ene_data->x-24,ene_data->y-24,col,0xE0,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0xE1,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0xE2,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0xE3,0,0) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0xE4,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0xE5,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0xE6,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0xE7,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0xE8,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xE9,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0xEA,0,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0xEB,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0xEC,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0xED,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0xEE,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0xEF,0,0) break; case 3: SP_DATAST(ene_data->x+40,ene_data->y-24,col,0xE0,0,1) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0xE1,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0xE2,0,1) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0xE3,0,1) SP_DATAST(ene_data->x-24,ene_data->y-24,col,0xE4,0,1) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0xE5,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0xE6,0,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0xE7,0,1) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0xE8,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xE9,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0xEA,0,1) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,0xEB,0,1) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0xEC,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0xED,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0xEE,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0xEF,0,1) break; } } /*------------------ Gro\ErsSnum29_c -------------*/ void enesp_rsSnum29_c(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=9; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0xF0,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=8; break; case 1: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF1,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0xF2,0,0) ene_data->ground=1; ene_data->size_x=8; ene_data->size_y=9; break; case 2: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF3,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0xF4,0,0) ene_data->ground=1; ene_data->size_x=9; ene_data->size_y=10; break; case 3: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF5,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,0xF6,0,0) ene_data->ground=1; ene_data->size_x=9; ene_data->size_y=11; break; case 4: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF7,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0xF8,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0xF8,0,1) ene_data->ground=1; ene_data->size_x=10; ene_data->size_y=12; break; case 5: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xF9,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0xFA,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0xFA,0,1) ene_data->ground=1; ene_data->size_x=10; ene_data->size_y=13; break; case 6: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xFB,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0xFC,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0xFC,0,1) ene_data->ground=0; ene_data->size_x=11; ene_data->size_y=14; break; case 7: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xFD,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0xFE,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0xFE,0,1) ene_data->ground=0; ene_data->size_x=11; ene_data->size_y=15; break; default: SP_DATAST(ene_data->x+ 8,ene_data->y ,col,0xFD,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0xFE,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0xFE,0,1) ene_data->ground=0; ene_data->size_x=11; ene_data->size_y=15; break; } } /*------------------ Gro\ErsSline_cr -------------*/ void enesp_rsSline_cr(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=11; switch(*(ene_data->atr-1)){ default: SP_DATAST(ene_data->x ,ene_data->y ,col,0xC0,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0xC1,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0xC2,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0xC3,0,0) break; } } /*------------------ Gro\ErsSline -------------*/ void enesp_rsSline(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=11; switch(*(ene_data->atr-1)){ default: SP_DATAST(ene_data->x ,ene_data->y ,col,0xC4,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0xC5,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0xC6,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0xC7,0,0) break; } } /*------------------ Gro\ErsSlaser -------------*/ void enesp_rsSlaser(ene_data) ENE_DATA *ene_data; { static short col; static short y; static short temp_x,temp_y; temp_x=rnd2(); temp_y=rnd2(); col=0x0C; switch(ene_data->anim3){ case 0: SP_DATAST(ene_data->x+8+temp_x,ene_data->y+8+temp_y,col,0x48+((ene_data->count>>2)&1),0,0) break; case 1: y=ene_data->y+8; SP_DATAST(ene_data->x+8+temp_x,y+8+temp_y,col,0x4A,0,0) while(1){ y+=16; SP_DATAST(ene_data->x+8+temp_x,y+8+temp_y,col,0x4B,0,0) if(y>256+16)break; } break; case 2: y=ene_data->y+8-16; while(1){ y+=16; SP_DATAST(ene_data->x+8+temp_x,y+8+temp_y,col,0x4C,0,0) if(y>256+16)break; } break; case 3: y=ene_data->y+8-16; while(1){ y+=16; SP_DATAST(ene_data->x+8+temp_x,y+8+temp_y,col,0x4D,0,0) if(y>256+16)break; } break; } } 256,512,768}; short cy[]={ 0, 0, 0, 0,256,256,256,256,512,512,512,512,768,768,768,768}; int gpalet[]={14,13,12,11,10,9,8,7,6,5,4,3,2,1,0,0}; int cnt,ptn; short *work; cnt=espunit_data->count/3; if(espunit_data->count==0){ /* */ se_adpcm1(zm_data->pcm[SE_ST5WARPOUT],zm_data->pcmsize[SE_ST5WARPOUT],SEPRW_ESP); ptn=8; txt_data->x=cx[ptn]; txt_data->y=cy[ptn]; work=sp_data->transpal.tpal_buff[4]+(16*ptn); /* swspbg */ for(i=0;i<16;i++){ sp_data->next_palet[0][i]=*work++; } sp_data->send_palet[0]=1; } if(espunit_data->count==1){ /* */ for(i=0;i<16;i++)sp_data->next_palet[0][i]=0;/* < vg^Cv錾 > */ /* G */ void enesp_rsSriv(ENE_DATA*); void enesp_rsSrivEsc(ENE_DATA*); void enesp_rsSnum10_a(ENE_DATA*); void enesp_rsSnum31_a(ENE_DATA*); void enesp_rsSnum33_a(ENE_DATA*); void enesp_rsSnum20_a(ENE_DATA*); void enesp_rsSnum12_a(ENE_DATA*); void enesp_rsSnum06_b(ENE_DATA*); void enesp_rsSnum32_b(ENE_DATA*); void enesp_rsSnum10_b(ENE_DATA*); void enesp_rsSnum27_b(ENE_DATA*); void enesp_rsSnum20_b(ENE_DATA*); void enesp_rsSnum29_b(ENE_DATA*); void enesp_rsSnum23_b(ENE_DATA*); void enesp_rsSnum06_c(ENE_DATA*); void enesp_rsSnum10_c(ENE_DATA*); void enesp_rsSnum11_c(ENE_DATA*); void enesp_rsSnum17_c(ENE_DATA*); void enesp_rsSnum25_c(ENE_DATA*); void enesp_rsSnum27_c(ENE_DATA*); void enesp_rsSnum23_c(ENE_DATA*); void enesp_rsSnum29_c(ENE_DATA*); void enesp_rsSnum32_c(ENE_DATA*); void enesp_rsSline_cr(ENE_DATA*); void enesp_rsSline(ENE_DATA*); void enesp_rsSlaser(ENE_DATA*); for(i=0;i<16;i++){ sp_data->next_palet[0][i]=*work++; } sp_data->send_palet[0]=1; } if(espunit_data->count==52){ /* */ for(i=0;i<16;i++)sp_data->next_palet[0][i]=0; sp_data->send_palet[0]=1; } if(espunit_data->count==55){ /* */ ptn=5; txt_data->x=cx[ptn]; txt_data->y=cy[ptn]; work=sp_data->transpal.tpal_buff[4]+(16*ptn); /* swspbg */ for(i=0;i<16;i++){ sp_data->next_palet[0][i]=*work++; } sp_data->send_palet[0]=1; } if(espunit_data->count==56){ /* */ for(i=0;i<16;i++)sp_data->next_palet[0][i]=0; sp_data->send_palet[0]=1; } if(espunit_data->count==57){ /* */ ptn=3; txt_data->x=cx[ptn]; txt_data->y=cy[ptn]; work=sp_data->transpal.tpal_buff[4]+(16*ptn); /* swspbg */ for(i=0;i<16;i++){ sp_data->next_palet[0][i]=*work++; } sp_data->send_palet[0]=1; } if(espunit_data->count==58){ /* */ for(i=0;i<16;i++)sp_data->next_palet[0][i]#include #include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "enesp_sete.h" #include "subs.h" #define TOP_BODY 0x01 #define TOP_WARP 0xC0 /*---------------------< ϐ錾 >----------------------------*/ extern volatile STICK_UNIT *STC1_IO; /* WCXeBbN */ extern volatile STICK_UNIT *STC2_IO; static void area1(ENE_DATA*); static void area2(ENE_DATA*); static void area3(ENE_DATA*); static void area4(ENE_DATA*); /*------------------ Gro\ErsTnum10 -------------*/ void enesp_rsTnum10(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=6; switch(*(ene_data->atr-1)){ case 0: case 3: SP_DATAST(ene_data->x ,ene_data->y ,col,0x0D,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x0E,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x0F,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x10,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y ,col,0x11,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x12,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x13,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x14,0,0) break; case 2: SP_DATAST(ene_data->x ,ene_data->y ,col,0x15,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x16,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x17,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x18,0,0) break; case 4: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x11,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x12,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x13,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x14,0,1) break; case 5: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x15,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x16,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x17,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x18,0,1) break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x0D,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x0E,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x0F,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x10,0,0) break; } } /*------------------ Gro\ErsTnum20 -------------*/ void enesp_rsTnum20(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=7; switch(*(ene_data->atr-1)){ case 0: SP_DATAST(ene_data->x ,ene_data->y ,col,0x29,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x2A,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2B,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2C,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y ,col,0x25,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x26,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x27,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x28,0,0) break; case 2: SP_DATAST(ene_data->x ,ene_data->y ,col,0x21,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x22,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x23,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x24,0,0) break; case 3: SP_DATAST(ene_data->x ,ene_data->y ,col,0x1D,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x1E,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x1F,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x20,0,0) break; case 4: SP_DATAST(ene_data->x ,ene_data->y ,col,0x19,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x1A,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x1B,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x1C,0,0) break; case 5: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x1D,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x1E,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x1F,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x20,0,1) break; case 6: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x21,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x22,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x23,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x24,0,1) break; case 7: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x25,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x26,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x27,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x28,0,1) break; case 8: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x29,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x2A,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2B,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2C,0,1) break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x29,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x2A,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x2B,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x2C,0,0) break; } } /*------------------ Gro\ErsTnum28 -------------*/ void enesp_rsTnum28(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=8; switch(*(ene_data->atr-1)){ default: SP_DATAST(ene_data->x ,ene_data->y-48,col,0xF0,0,0) SP_DATAST(ene_data->x ,ene_data->y-32,col,0xF1,0,0) SP_DATAST(ene_data->x ,ene_data->y-16,col,0xF2,0,0) SP_DATAST(ene_data->x-16,ene_data->y ,col,0xF3,0,0) SP_DATAST(ene_data->x ,ene_data->y ,col,0xF4,0,0) SP_DATAST(ene_data->x-16,ene_data->y+16,col,0xF5,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0xF6,0,0) SP_DATAST(ene_data->x ,ene_data->y+32,col,0xF7,0,0) SP_DATAST(ene_data->x ,ene_data->y+48,col,0xF8,0,0) SP_DATAST(ene_data->x ,ene_data->y+64,col,0xF9,0,0) SP_DATAST(ene_data->x ,ene_data->y+80,col,0xFA,0,0) SP_DATAST(ene_data->x+16,ene_data->y-48,col,0xF0,0,1) SP_DATAST(ene_data->x+16,ene_data->y-32,col,0xF1,0,1) SP_DATAST(ene_data->x+16,ene_data->y-16,col,0xF2,0,1) SP_DATAST(ene_data->x+32,ene_data->y ,col,0xF3,0,1) SP_DATAST(ene_data->x+16,ene_data->y ,col,0xF4,0,1) SP_DATAST(ene_data->x+32,ene_data->y+16,col,0xF5,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0xF6,0,1) SP_DATAST(ene_data->x+16,ene_data->y+32,col,0xF7,0,1) SP_DATAST(ene_data->x+16,ene_data->y+48,col,0xF8,0,1) SP_DATAST(ene_data->x+16,ene_data->y+64,col,0xF9,0,1) SP_DATAST(ene_data->x+16,ene_data->y+80,col,0xFA,0,1) break; } } /*------------------ Gro\ErsTnum06 -------------*/ void enesp_rsTnum06(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=5; switch(*(ene_data->atr-1)){ case 0: case 3: SP_DATAST(ene_data->x ,ene_data->y ,col,0x01,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x02,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x03,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x04,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y ,col,0x05,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x06,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x07,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x08,0,0) break; case 2: SP_DATAST(ene_data->x ,ene_data->y ,col,0x09,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x0A,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x0B,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x0C,0,0) break; case 4: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x05,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x06,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x07,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x08,0,1) break; case 5: SP_DATAST(ene_data->x+16,ene_data->y ,col,0x09,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x0A,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x0B,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x0C,0,1) break; default: SP_DATAST(ene_data->x ,ene_data->y ,col,0x01,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x02,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x03,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x04,0,0) break; } } /*------------------ Gro\ErsTnum04 -------------*/ void enesp_rsTnum04(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=4; switch(*(ene_data->atr-1)){ case 0: case 2: SP_DATAST(ene_data->x-16,ene_data->y-16,col,0x2D,0,0) SP_DATAST(ene_data->x ,ene_data->y-16,col,0x2E,0,0) SP_DATAST(ene_data->x+16,ene_data->y-16,col,0x2E,0,1) SP_DATAST(ene_data->x+32,ene_data->y-16,col,0x2D,0,1) SP_DATAST(ene_data->x-16,ene_data->y ,col,0x2F,0,0) SP_DATAST(ene_data->x ,ene_data->y ,col,0x30,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x30,0,1) SP_DATAST(ene_data->x+32,ene_data->y ,col,0x2F,0,1) SP_DATAST(ene_data->x-16,ene_data->y+16,col,0x31,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x32,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x32,0,1) SP_DATAST(ene_data->x+32,ene_data->y+16,col,0x31,0,1) SP_DATAST(ene_data->x-16,ene_data->y+32,col,0x33,0,0) SP_DATAST(ene_data->x ,ene_data->y+32,col,0x34,0,0) SP_DATAST(ene_data->x+16,ene_data->y+32,col,0x34,0,1) SP_DATAST(ene_data->x+32,ene_data->y+32,col,0x33,0,1) break; case 1: SP_DATAST(ene_data->x-16,ene_data->y-16,col,0x35,0,0) SP_DATAST(ene_data->x ,ene_data->y-16,col,0x36,0,0) SP_DATAST(ene_data->x+16,ene_data->y-16,col,0x37,0,0) SP_DATAST(ene_data->x+32,ene_data->y-16,col,0x38,0,0) SP_DATAST(ene_data->x-16,ene_data->y ,col,0x39,0,0) SP_DATAST(ene_data->x ,ene_data->y ,col,0x3A,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x3B,0,0) SP_DATAST(ene_data->x+32,ene_data->y ,col,0x3C,0,0) SP_DATAST(ene_data->x-16,ene_data->y+16,col,0x3D,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x3E,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x3F,0,0) SP_DATAST(ene_data->x+32,ene_data->y+16,col,0x40,0,0) SP_DATAST(ene_data->x-16,ene_data->y+32,col,0x41,0,0) SP_DATAST(ene_data->x ,ene_data->y+32,col,0x42,0,0) SP_DATAST(ene_data->x+16,ene_data->y+32,col,0x43,0,0) SP_DATAST(ene_data->x+32,ene_data->y+32,col,0x44,0,0) break; case 3: SP_DATAST(ene_data->x+32,ene_data->y-16,col,0x35,0,1) SP_DATAST(ene_data->x+16,ene_data->y-16,col,0x36,0,1) SP_DATAST(ene_data->x ,ene_data->y-16,col,0x37,0,1) SP_DATAST(ene_data->x-16,ene_data->y-16,col,0x38,0,1) SP_DATAST(ene_data->x+32,ene_data->y ,col,0x39,0,1) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x3A,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,0x3B,0,1) SP_DATAST(ene_data->x-16,ene_data->y ,col,0x3C,0,1) SP_DATAST(ene_data->x+32,ene_data->y+16,col,0x3D,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x3E,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x3F,0,1) SP_DATAST(ene_data->x-16,ene_data->y+16,col,0x40,0,1) SP_DATAST(ene_data->x+32,ene_data->y+32,col,0x41,0,1) SP_DATAST(ene_data->x+16,ene_data->y+32,col,0x42,0,1) SP_DATAST(ene_data->x ,ene_data->y+32,col,0x43,0,1) SP_DATAST(ene_data->x-16,ene_data->y+32,col,0x44,0,1) break; default: SP_DATAST(ene_data->x-16,ene_data->y-16,col,0x2D,0,0) SP_DATAST(ene_data->x ,ene_data->y-16,col,0x2E,0,0) SP_DATAST(ene_data->x+16,ene_data->y-16,col,0x2E,0,1) SP_DATAST(ene_data->x+32,ene_data->y-16,col,0x2D,0,1) SP_DATAST(ene_data->x-16,ene_data->y ,col,0x2F,0,0) SP_DATAST(ene_data->x ,ene_data->y ,col,0x30,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,0x30,0,1) SP_DATAST(ene_data->x+32,ene_data->y ,col,0x2F,0,1) SP_DATAST(ene_data->x-16,ene_data->y+16,col,0x31,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,0x32,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,0x32,0,1) SP_DATAST(ene_data->x+32,ene_data->y+16,col,0x31,0,1) SP_DATAST(ene_data->x-16,ene_data->y+32,col,0x33,0,0) SP_DATAST(ene_data->x ,ene_data->y+32,col,0x34,0,0) SP_DATAST(ene_data->x+16,ene_data->y+32,col,0x34,0,1) SP_DATAST(ene_data->x+32,ene_data->y+32,col,0x33,0,1) break; } } /*-------------------------------------------- fqnto a --- */ /*------------------ Gro\ErsTnum02 -------------*/ void enesp_rsTnum02(ene_data) ENE_DATA *ene_data; { static short rnd_x,rnd_y; static short tx,ty,ta; static short col; if(ene_data->flash)col=15; else col=4; ene_data->anim1+=disp_cont->status&1; if(ene_data->anim1 >= 8)ene_data->anim1=0; if(ene_data->anim3 == 0){ /* `‚ */ switch(ene_data->anim2){ case 0: case 15: case 30: case 36: case 42: case 47: case 51: case 53: case 55: case 57: case 59: case 60: rnd_x = rnd15(); rnd_y = rnd15(); tx = ene_data->x -8 +rnd15(); ty = ene_data->y -8 +rnd15(); ta = rnd7(); break; default: ta = 64; break; } } else { tx = ene_data->x; ty = ene_data->y; ta = ene_data->anim1; } if(ene_data->anim3 == 0){ /* L */ switch(ene_data->anim2){ case 42: case 44: SP_DATAST(ene_data->x ,ene_data->y+8,10,0x47,0,0) SP_DATAST(ene_data->x+16,ene_data->y+8,10,0x47,0,1) break; case 45: case 47: SP_DATAST(ene_data->x-16,ene_data->y+8,10,0x48,0,0) SP_DATAST(ene_data->x ,ene_data->y+8,10,0x49,0,0) SP_DATAST(ene_data->x+16,ene_data->y+8,10,0x49,0,1) SP_DATAST(ene_data->x+32,ene_data->y+8,10,0x48,0,1) break; case 48: case 50: SP_DATAST(ene_data->x+ 8,ene_data->y-16,10,0x4A,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,10,0x4B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,10,0x4B,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+32,10,0x4A,1,0) break; case 51: case 53: SP_DATAST(ene_data->x+ 8,ene_data->y-16,10,0x4C,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,10,0x4D,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,10,0x4D,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+32,10,0x4C,1,0) break; case 54: case 56: SP_DATAST(ene_data->x ,ene_data->y ,10,0x4E,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,10,0x4E,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,10,0x4E,1,0) SP_DATAST(ene_data->x+16,ene_data->y+16,10,0x4E,1,1) break; case 57: case 59: SP_DATAST(ene_data->x ,ene_data->y+ 8,10,0x4F,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,10,0x4F,0,1) break; } } switch(ta){ case 0: SP_DATAST(tx ,ty ,col,0x01,0,0) SP_DATAST(tx+16,ty ,col,0x02,0,0) SP_DATAST(tx ,ty+16,col,0x03,0,0) SP_DATAST(tx+16,ty+16,col,0x04,0,0) break; case 1: SP_DATAST(tx ,ty ,col,0x05,0,0) SP_DATAST(tx+16,ty ,col,0x06,0,0) SP_DATAST(tx ,ty+16,col,0x07,0,0) SP_DATAST(tx+16,ty+16,col,0x08,0,0) break; case 2: SP_DATAST(tx+ 8-2,ty ,col,0x09,0,0) SP_DATAST(tx+ 8-2,ty+16,col,0x0A,0,0) break; case 3: SP_DATAST(tx+ 8,ty ,col,0x0B,0,0) SP_DATAST(tx+ 8,ty+16,col,0x0C,0,0) break; case 4: SP_DATAST(tx+ 8,ty ,col,0x0D,0,0) SP_DATAST(tx+ 8,ty+16,col,0x0E,0,0) break; case 5: SP_DATAST(tx+ 8,ene_data->y ,col,0x0B,0,1) SP_DATAST(tx+ 8,ene_data->y+16,col,0x0C,0,1) break; case 6: SP_DATAST(tx+ 8+2,ty ,col,0x09,0,1) SP_DATAST(tx+ 8+2,ty+16,col,0x0A,0,1) break; case 7: SP_DATAST(tx+16,ty ,col,0x05,0,1) SP_DATAST(tx ,ty ,col,0x06,0,1) SP_DATAST(tx+16,ty+16,col,0x07,0,1) SP_DATAST(tx ,ty+16,col,0x08,0,1) break; case 64: /* _~[ */ break; default: SP_DATAST(tx ,ty ,col,0x01,0,0) SP_DATAST(tx+16,ty ,col,0x02,0,0) SP_DATAST(tx ,ty+16,col,0x03,0,0) SP_DATAST(tx+16,ty+16,col,0x04,0,0) break; } } /*------------------ Gro\ErsTnum09 -------------*/ void enesp_rsTnum09(ene_data) ENE_DATA *ene_data; { static short rnd_x,rnd_y; static short tx,ty,ta; static short col; static short off; if(ene_data->flash)col=15; else col=5; if(ene_data->anim3 == 0){ /* `‚ */ switch(ene_data->anim2){ case 0: case 15: case 30: case 36: case 42: case 47: case 51: case 53: case 55: case 57: case 59: case 60: rnd_x = rnd15(); rnd_y = rnd15(); tx = ene_data->x -8 +rnd15(); ty = ene_data->y -8 +rnd15(); ta = ene_data->anim1; break; default: ta = 64; break; } } else { tx = ene_data->x; ty = ene_data->y; ta = ene_data->anim1; } if(ene_data->anim3 == 0){ /* L */ switch(ene_data->anim2){ case 42: case 44: SP_DATAST(ene_data->x ,ene_data->y+8,10,0x47,0,0) SP_DATAST(ene_data->x+16,ene_data->y+8,10,0x47,0,1) break; case 45: case 47: SP_DATAST(ene_data->x-16,ene_data->y+8,10,0x48,0,0) SP_DATAST(ene_data->x ,ene_data->y+8,10,0x49,0,0) SP_DATAST(ene_data->x+16,ene_data->y+8,10,0x49,0,1) SP_DATAST(ene_data->x+32,ene_data->y+8,10,0x48,0,1) break; case 48: case 50: SP_DATAST(ene_data->x+ 8,ene_data->y-16,10,0x4A,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,10,0x4B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,10,0x4B,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+32,10,0x4A,1,0) break; case 51: case 53: SP_DATAST(ene_data->x+ 8,ene_data->y-16,10,0x4C,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,10,0x4D,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,10,0x4D,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+32,10,0x4C,1,0) break; case 54: case 56: SP_DATAST(ene_data->x ,ene_data->y ,10,0x4E,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,10,0x4E,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,10,0x4E,1,0) SP_DATAST(ene_data->x+16,ene_data->y+16,10,0x4E,1,1) break; case 57: case 59: SP_DATAST(ene_data->x ,ene_data->y+ 8,10,0x4F,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,10,0x4F,0,1) break; } } if(ene_data->anim3==0){ switch(ta){ case 64: /* _~[ */ break; default: off=((ene_data->anim1>>1)&1)*4; ene_data->anim1+=1; SP_DATAST(tx ,ty ,col,0x0F+off,0,0) SP_DATAST(tx+16,ty ,col,0x10+off,0,0) SP_DATAST(tx ,ty+16,col,0x11+off,0,0) SP_DATAST(tx+16,ty+16,col,0x12+off,0,0) break; } } else { off=((ene_data->anim1>>1)&1)*4; ene_data->anim1+=1; SP_DATAST(tx ,ty ,col,0x0F+off,0,0) SP_DATAST(tx+16,ty ,col,0x10+off,0,0) SP_DATAST(tx ,ty+16,col,0x11+off,0,0) SP_DATAST(tx+16,ty+16,col,0x12+off,0,0) } } /*------------------ Gro\ErsTnum16 -------------*/ void enesp_rsTnum16(ene_data) ENE_DATA *ene_data; { static short rnd_x,rnd_y; static short tx,ty,ta; static short col; if(ene_data->flash)col=15; else col=6; ene_data->anim1+=disp_cont->status&1; if(ene_data->anim1 >= 8)ene_data->anim1=0; if(ene_data->anim3 == 0){ /* `‚ */ switch(ene_data->anim2){ case 0: case 15: case 30: case 36: case 42: case 47: case 51: case 53: case 55: case 57: case 59: case 60: rnd_x = rnd15(); rnd_y = rnd15(); tx = ene_data->x -8 +rnd15(); ty = ene_data->y -8 +rnd15(); ta = rnd7(); break; default: ta = 64; break; } } else { tx = ene_data->x; ty = ene_data->y; ta = ene_data->anim1; } if(ene_data->anim3 == 0){ /* L */ switch(ene_data->anim2){ case 42: case 44: SP_DATAST(ene_data->x ,ene_data->y+8,10,0x47,0,0) SP_DATAST(ene_data->x+16,ene_data->y+8,10,0x47,0,1) break; case 45: case 47: SP_DATAST(ene_data->x-16,ene_data->y+8,10,0x48,0,0) SP_DATAST(ene_data->x ,ene_data->y+8,10,0x49,0,0) SP_DATAST(ene_data->x+16,ene_data->y+8,10,0x49,0,1) SP_DATAST(ene_data->x+32,ene_data->y+8,10,0x48,0,1) break; case 48: case 50: SP_DATAST(ene_data->x+ 8,ene_data->y-16,10,0x4A,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,10,0x4B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,10,0x4B,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+32,10,0x4A,1,0) break; case 51: case 53: SP_DATAST(ene_data->x+ 8,ene_data->y-16,10,0x4C,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,10,0x4D,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,10,0x4D,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+32,10,0x4C,1,0) break; case 54: case 56: SP_DATAST(ene_data->x ,ene_data->y ,10,0x4E,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,10,0x4E,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,10,0x4E,1,0) SP_DATAST(ene_data->x+16,ene_data->y+16,10,0x4E,1,1) break; case 57: case 59: SP_DATAST(ene_data->x ,ene_data->y+ 8,10,0x4F,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,10,0x4F,0,1) break; } } switch(ta){ case 0: SP_DATAST(tx ,ty ,col,0x17,0,0) SP_DATAST(tx+16,ty ,col,0x18,0,0) SP_DATAST(tx ,ty+16,col,0x19,0,0) SP_DATAST(tx+16,ty+16,col,0x1A,0,0) break; case 1: SP_DATAST(tx ,ty ,col,0x1B,0,0) SP_DATAST(tx+16,ty ,col,0x1C,0,0) SP_DATAST(tx ,ty+16,col,0x1D,0,0) SP_DATAST(tx+16,ty+16,col,0x1E,0,0) break; case 2: SP_DATAST(tx ,ty ,col,0x1F,0,0) SP_DATAST(tx+16,ty ,col,0x20,0,0) SP_DATAST(tx ,ty+16,col,0x21,0,0) SP_DATAST(tx+16,ty+16,col,0x22,0,0) break; case 3: SP_DATAST(tx+ 8,ty ,col,0x23,0,0) SP_DATAST(tx+ 8,ty+16,col,0x24,0,0) break; case 4: SP_DATAST(tx+ 8,ty ,col,0x25,0,0) SP_DATAST(tx+ 8,ty+16,col,0x26,0,0) break; case 5: SP_DATAST(tx+ 8,ty ,col,0x23,0,1) SP_DATAST(tx+ 8,ty+16,col,0x24,0,1) break; case 6: SP_DATAST(tx+16,ty ,col,0x1F,0,1) SP_DATAST(tx ,ty ,col,0x20,0,1) SP_DATAST(tx+16,ty+16,col,0x21,0,1) SP_DATAST(tx ,ty+16,col,0x22,0,1) break; case 7: SP_DATAST(tx+16,ty ,col,0x1B,0,1) SP_DATAST(tx ,ty ,col,0x1C,0,1) SP_DATAST(tx+16,ty+16,col,0x1D,0,1) SP_DATAST(tx ,ty+16,col,0x1E,0,1) break; case 64: /* _~[ */ break; default: SP_DATAST(tx ,ty ,col,0x17,0,0) SP_DATAST(tx+16,ty ,col,0x18,0,0) SP_DATAST(tx ,ty+16,col,0x19,0,0) SP_DATAST(tx+16,ty+16,col,0x1A,0,0) break; } } /*------------------ Gro\ErsTnum17 -------------*/ void enesp_rsTnum17(ene_data) ENE_DATA *ene_data; { static short rnd_x,rnd_y; static short tx,ty,ta; static short col; static short off; if(ene_data->flash)col=15; else col=7; if(ene_data->anim3 == 0){ /* `‚ */ switch(ene_data->anim2){ case 0: case 15: case 30: case 36: case 42: case 47: case 51: case 53: case 55: case 57: case 59: case 60: rnd_x = rnd15(); rnd_y = rnd15(); tx = ene_data->x -8 +rnd15(); ty = ene_data->y -8 +rnd15(); ta = ene_data->anim1; break; default: ta = 64; break; } } else { tx = ene_data->x; ty = ene_data->y; ta = ene_data->anim1; } if(ene_data->anim3 == 0){ /* L */ switch(ene_data->anim2){ case 42: case 44: SP_DATAST(ene_data->x ,ene_data->y+8,10,0x47,0,0) SP_DATAST(ene_data->x+16,ene_data->y+8,10,0x47,0,1) break; case 45: case 47: SP_DATAST(ene_data->x-16,ene_data->y+8,10,0x48,0,0) SP_DATAST(ene_data->x ,ene_data->y+8,10,0x49,0,0) SP_DATAST(ene_data->x+16,ene_data->y+8,10,0x49,0,1) SP_DATAST(ene_data->x+32,ene_data->y+8,10,0x48,0,1) break; case 48: case 50: SP_DATAST(ene_data->x+ 8,ene_data->y-16,10,0x4A,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,10,0x4B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,10,0x4B,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+32,10,0x4A,1,0) break; case 51: case 53: SP_DATAST(ene_data->x+ 8,ene_data->y-16,10,0x4C,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,10,0x4D,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,10,0x4D,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+32,10,0x4C,1,0) break; case 54: case 56: SP_DATAST(ene_data->x ,ene_data->y ,10,0x4E,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,10,0x4E,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,10,0x4E,1,0) SP_DATAST(ene_data->x+16,ene_data->y+16,10,0x4E,1,1) break; case 57: case 59: SP_DATAST(ene_data->x ,ene_data->y+ 8,10,0x4F,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,10,0x4F,0,1) break; } } if(ene_data->anim3 ==0 ){ switch(ta){ case 64: /* _~[ */ break; default: off=((ene_data->anim1>>1)&3)*4; ene_data->anim1+=1; SP_DATAST(tx ,ty ,col,0x27+off,0,0) SP_DATAST(tx+16,ty ,col,0x28+off,0,0) SP_DATAST(tx ,ty+16,col,0x29+off,0,0) SP_DATAST(tx+16,ty+16,col,0x2A+off,0,0) break; } } else { off=((ene_data->anim1>>1)&3)*4; ene_data->anim1+=1; SP_DATAST(tx ,ty ,col,0x27+off,0,0) SP_DATAST(tx+16,ty ,col,0x28+off,0,0) SP_DATAST(tx ,ty+16,col,0x29+off,0,0) SP_DATAST(tx+16,ty+16,col,0x2A+off,0,0) } } /*------------------ Gro\ErsTnum18 -------------*/ void enesp_rsTnum18(ene_data) ENE_DATA *ene_data; { static short rnd_x,rnd_y; static short tx,ty,ta; static short col; if(ene_data->flash)col=15; else col=8; ene_data->anim1+=disp_cont->status&1; if(ene_data->anim1 >= 8)ene_data->anim1=0; if(ene_data->anim3 == 0){ /* `‚ */ switch(ene_data->anim2){ case 0: case 15: case 30: case 36: case 42: case 47: case 51: case 53: case 55: case 57: case 59: case 60: rnd_x = rnd15(); rnd_y = rnd15(); tx = ene_data->x -8 +rnd15(); ty = ene_data->y -8 +rnd15(); ta = rnd7(); break; default: ta = 64; break; } } else { tx = ene_data->x; ty = ene_data->y; ta = ene_data->anim1; } if(ene_data->anim3 == 0){ /* L */ switch(ene_data->anim2){ case 42: case 44: SP_DATAST(ene_data->x ,ene_data->y+8,10,0x47,0,0) SP_DATAST(ene_data->x+16,ene_data->y+8,10,0x47,0,1) break; case 45: case 47: SP_DATAST(ene_data->x-16,ene_data->y+8,10,0x48,0,0) SP_DATAST(ene_data->x ,ene_data->y+8,10,0x49,0,0) SP_DATAST(ene_data->x+16,ene_data->y+8,10,0x49,0,1) SP_DATAST(ene_data->x+32,ene_data->y+8,10,0x48,0,1) break; case 48: case 50: SP_DATAST(ene_data->x+ 8,ene_data->y-16,10,0x4A,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,10,0x4B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,10,0x4B,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+32,10,0x4A,1,0) break; case 51: case 53: SP_DATAST(ene_data->x+ 8,ene_data->y-16,10,0x4C,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,10,0x4D,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,10,0x4D,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+32,10,0x4C,1,0) break; case 54: case 56: SP_DATAST(ene_data->x ,ene_data->y ,10,0x4E,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,10,0x4E,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,10,0x4E,1,0) SP_DATAST(ene_data->x+16,ene_data->y+16,10,0x4E,1,1) break; case 57: case 59: SP_DATAST(ene_data->x ,ene_data->y+ 8,10,0x4F,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,10,0x4F,0,1) break; } } switch(ta){ case 0: SP_DATAST(tx ,ty ,col,0x37,0,0) SP_DATAST(tx+16,ty ,col,0x38,0,0) SP_DATAST(tx ,ty+16,col,0x39,0,0) SP_DATAST(tx+16,ty+16,col,0x3A,0,0) break; case 1: SP_DATAST(tx ,ty ,col,0x3B,0,0) SP_DATAST(tx+16,ty ,col,0x3C,0,0) SP_DATAST(tx ,ty+16,col,0x3D,0,0) SP_DATAST(tx+16,ty+16,col,0x3E,0,0) break; case 2: SP_DATAST(tx ,ty ,col,0x3F,0,0) SP_DATAST(tx+16,ty ,col,0x40,0,0) SP_DATAST(tx ,ty+16,col,0x41,0,0) SP_DATAST(tx+16,ty+16,col,0x42,0,0) break; case 3: SP_DATAST(tx+ 8,ty ,col,0x43,0,0) SP_DATAST(tx+ 8,ty+16,col,0x44,0,0) break; case 4: SP_DATAST(tx+ 8,ty ,col,0x45,0,0) SP_DATAST(tx+ 8,ty+16,col,0x46,0,0) break; case 5: SP_DATAST(tx+ 8,ty ,col,0x43,0,1) SP_DATAST(tx+ 8,ty+16,col,0x44,0,1) break; case 6: SP_DATAST(tx+16,ty ,col,0x3F,0,1) SP_DATAST(tx ,ty ,col,0x40,0,1) SP_DATAST(tx+16,ty+16,col,0x41,0,1) SP_DATAST(tx ,ty+16,col,0x42,0,1) break; case 7: SP_DATAST(tx+16,ty ,col,0x3B,0,1) SP_DATAST(tx ,ty ,col,0x3C,0,1) SP_DATAST(tx+16,ty+16,col,0x3D,0,1) SP_DATAST(tx ,ty+16,col,0x3E,0,1) break; case 64: /* _~[ */ break; default: SP_DATAST(tx ,ty ,col,0x37,0,0) SP_DATAST(tx+16,ty ,col,0x38,0,0) SP_DATAST(tx ,ty+16,col,0x39,0,0) SP_DATAST(tx+16,ty+16,col,0x3A,0,0) break; } } /*------------------ Gro\ErsTrobot -------------*/ void enesp_rsTrobot(ene_data) ENE_DATA *ene_data; { static short rnd_x,rnd_y; static short tx,ty,ta; static short col; static short off; static array[]={0,6}; if(ene_data->flash)col=15; else col=11; if(ene_data->anim3 == 0){ /* `‚ */ switch(ene_data->anim2){ case 0: case 15: case 30: case 36: case 42: case 47: case 51: case 53: case 55: case 57: case 59: case 60: rnd_x = rnd15(); rnd_y = rnd15(); tx = ene_data->x -8 +rnd15(); ty = ene_data->y -8 +rnd15(); ta = ene_data->anim1; break; default: ta = 64; break; } } else { tx = ene_data->x; ty = ene_data->y; ta = ene_data->anim1; } if(ene_data->anim3 == 0){ /* L */ switch(ene_data->anim2){ case 42: case 44: SP_DATAST(ene_data->x ,ene_data->y+8,10,0x47,0,0) SP_DATAST(ene_data->x+16,ene_data->y+8,10,0x47,0,1) break; case 45: case 47: SP_DATAST(ene_data->x-16,ene_data->y+8,10,0x48,0,0) SP_DATAST(ene_data->x ,ene_data->y+8,10,0x49,0,0) SP_DATAST(ene_data->x+16,ene_data->y+8,10,0x49,0,1) SP_DATAST(ene_data->x+32,ene_data->y+8,10,0x48,0,1) break; case 48: case 50: SP_DATAST(ene_data->x+ 8,ene_data->y-16,10,0x4A,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,10,0x4B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,10,0x4B,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+32,10,0x4A,1,0) break; case 51: case 53: SP_DATAST(ene_data->x+ 8,ene_data->y-16,10,0x4C,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,10,0x4D,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,10,0x4D,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+32,10,0x4C,1,0) break; case 54: case 56: SP_DATAST(ene_data->x ,ene_data->y ,10,0x4E,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,10,0x4E,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,10,0x4E,1,0) SP_DATAST(ene_data->x+16,ene_data->y+16,10,0x4E,1,1) break; case 57: case 59: SP_DATAST(ene_data->x ,ene_data->y+ 8,10,0x4F,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,10,0x4F,0,1) break; } } if(ene_data->anim3==0){ switch(ta){ case 64: /* _~[ */ break; default: off=array[(ene_data->anim1>>1)&1]; ene_data->anim1+=1; SP_DATAST(tx ,ty- 8,col,0xC0+off,0,0) SP_DATAST(tx+16,ty- 8,col,0xC1+off,0,0) SP_DATAST(tx ,ty+ 8,col,0xC2+off,0,0) SP_DATAST(tx+16,ty+ 8,col,0xC3+off,0,0) SP_DATAST(tx ,ty+24,col,0xC4+off,0,0) SP_DATAST(tx+16,ty+24,col,0xC5+off,0,0) break; } } else { off=array[(ene_data->anim1>>1)&1]; ene_data->anim1+=1; SP_DATAST(tx ,ty- 8,col,0xC0+off,0,0) SP_DATAST(tx+16,ty- 8,col,0xC1+off,0,0) SP_DATAST(tx ,ty+ 8,col,0xC2+off,0,0) SP_DATAST(tx+16,ty+ 8,col,0xC3+off,0,0) SP_DATAST(tx ,ty+24,col,0xC4+off,0,0) SP_DATAST(tx+16,ty+24,col,0xC5+off,0,0) } } /*------------------ Gro\ErsTscope1 -------------*/ void enesp_rsTscope1(ene_data) ENE_DATA *ene_data; { static short col; static short temp; if(ene_data->flash)col=15; else col=9; ene_data->anim1+=1; if(disp_cont->status&1)return; /* `‚ */ temp = ene_data->anim1 >> 1; if(temp > 12){ /* */ SP_DATAST(ene_data->x ,ene_data->y ,9,0xF4,0,0) } if(temp > 15){ /* A */ SP_DATAST(ene_data->x+48,ene_data->y+16,9,0xF7,0,0) SP_DATAST(ene_data->x+32,ene_data->y+16,9,0xF8,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,9,0xF9,0,0) } if(temp < 8){ SP_DATAST(ene_data->x-(8*(8-temp)) ,ene_data->y -(8*(8-temp)),9,0xF0,0,0) /* { */ SP_DATAST(ene_data->x-(8*(8-temp)) ,ene_data->y+16-(8*(8-temp)),9,0xF1,0,0) SP_DATAST(ene_data->x+16+(8*(8-temp)),ene_data->y -(8*(8-temp)),9,0xF2,0,0) SP_DATAST(ene_data->x+16+(8*(8-temp)),ene_data->y+16-(8*(8-temp)),9,0xF3,0,0) SP_DATAST(ene_data->x-(8*(8-temp)) ,ene_data->y +(8*(8-temp)),9,0xF0,0,0) SP_DATAST(ene_data->x-(8*(8-temp)) ,ene_data->y+16+(8*(8-temp)),9,0xF1,0,0) SP_DATAST(ene_data->x+16+(8*(8-temp)),ene_data->y +(8*(8-temp)),9,0xF2,0,0) SP_DATAST(ene_data->x+16+(8*(8-temp)),ene_data->y+16+(8*(8-temp)),9,0xF3,0,0) } else { SP_DATAST(ene_data->x ,ene_data->y ,9,0xF0,0,0) /* { */ SP_DATAST(ene_data->x ,ene_data->y+16,9,0xF1,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,9,0xF2,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,9,0xF3,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,9,0xF5,0,0) /* -vv- */ SP_DATAST(ene_data->x ,ene_data->y ,9,0xF6,0,0) /* ~ */ SP_DATAST(ene_data->x+16,ene_data->y ,9,0xF6,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,9,0xF6,1,0) SP_DATAST(ene_data->x+16,ene_data->y+16,9,0xF6,1,1) } } /*------------------ Gro\ErsTbossopen -------------*/ void enesp_rsTbossopen(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=5; switch(ene_data->anim2){ case 0: SP_DATAST(ene_data->x+ 8,ene_data->y-16,col,TOP_WARP+0x00,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,col,TOP_WARP+0x01,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,TOP_WARP+0x02,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+32,col,TOP_WARP+0x03,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y-16,col,TOP_WARP+0x04,0,0) SP_DATAST(ene_data->x+16,ene_data->y-16,col,TOP_WARP+0x05,0,0) SP_DATAST(ene_data->x ,ene_data->y ,col,TOP_WARP+0x06,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,TOP_WARP+0x07,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,TOP_WARP+0x08,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,TOP_WARP+0x09,0,0) SP_DATAST(ene_data->x ,ene_data->y+32,col,TOP_WARP+0x0A,0,0) SP_DATAST(ene_data->x+16,ene_data->y+32,col,TOP_WARP+0x0B,0,0) break; case 2: SP_DATAST(ene_data->x ,ene_data->y-16,col,TOP_WARP+0x0C,0,0) SP_DATAST(ene_data->x+16,ene_data->y-16,col,TOP_WARP+0x0D,0,0) SP_DATAST(ene_data->x ,ene_data->y ,col,TOP_WARP+0x0E,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,TOP_WARP+0x0F,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,TOP_WARP+0x10,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,TOP_WARP+0x11,0,0) SP_DATAST(ene_data->x ,ene_data->y+32,col,TOP_WARP+0x12,0,0) SP_DATAST(ene_data->x+16,ene_data->y+32,col,TOP_WARP+0x13,0,0) break; case 3: SP_DATAST(ene_data->x ,ene_data->y-24,col,TOP_WARP+0x14,0,0) SP_DATAST(ene_data->x+16,ene_data->y-24,col,TOP_WARP+0x15,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,TOP_WARP+0x16,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,TOP_WARP+0x17,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,TOP_WARP+0x18,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,TOP_WARP+0x19,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,TOP_WARP+0x1A,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,TOP_WARP+0x1B,0,0) SP_DATAST(ene_data->x ,ene_data->y+40,col,TOP_WARP+0x1C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+40,col,TOP_WARP+0x1D,0,0) break; case 4: SP_DATAST(ene_data->x ,ene_data->y-24,col,TOP_WARP+0x1E,0,0) SP_DATAST(ene_data->x+16,ene_data->y-24,col,TOP_WARP+0x1F,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,TOP_WARP+0x20,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,TOP_WARP+0x21,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,TOP_WARP+0x22,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,TOP_WARP+0x23,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,TOP_WARP+0x24,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,TOP_WARP+0x25,0,0) SP_DATAST(ene_data->x ,ene_data->y+40,col,TOP_WARP+0x26,0,0) SP_DATAST(ene_data->x+16,ene_data->y+40,col,TOP_WARP+0x27,0,0) break; case 5: SP_DATAST(ene_data->x ,ene_data->y-24,col,TOP_WARP+0x28,0,0) SP_DATAST(ene_data->x+16,ene_data->y-24,col,TOP_WARP+0x29,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,TOP_WARP+0x2A,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,TOP_WARP+0x2B,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,TOP_WARP+0x2C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,TOP_WARP+0x2D,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,TOP_WARP+0x2E,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,TOP_WARP+0x2F,0,0) SP_DATAST(ene_data->x ,ene_data->y+40,col,TOP_WARP+0x30,0,0) SP_DATAST(ene_data->x+16,ene_data->y+40,col,TOP_WARP+0x31,0,0) break; } if(ene_data->count>=8){ /* {̂`‚ */ if(ene_data->count&1){ enesp_rsTboss1(ene_data); } } } /*------------------ Gro\ErsTbossclose -------------*/ void enesp_rsTbossclose(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=5; switch(ene_data->anim2){ case 0: SP_DATAST(ene_data->x+ 8,ene_data->y-16,col,TOP_WARP+0x00,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,col,TOP_WARP+0x01,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,TOP_WARP+0x02,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+32,col,TOP_WARP+0x03,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y-16,col,TOP_WARP+0x04,0,0) SP_DATAST(ene_data->x+16,ene_data->y-16,col,TOP_WARP+0x05,0,0) SP_DATAST(ene_data->x ,ene_data->y ,col,TOP_WARP+0x06,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,TOP_WARP+0x07,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,TOP_WARP+0x08,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,TOP_WARP+0x09,0,0) SP_DATAST(ene_data->x ,ene_data->y+32,col,TOP_WARP+0x0A,0,0) SP_DATAST(ene_data->x+16,ene_data->y+32,col,TOP_WARP+0x0B,0,0) break; case 2: SP_DATAST(ene_data->x ,ene_data->y-16,col,TOP_WARP+0x0C,0,0) SP_DATAST(ene_data->x+16,ene_data->y-16,col,TOP_WARP+0x0D,0,0) SP_DATAST(ene_data->x ,ene_data->y ,col,TOP_WARP+0x0E,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,TOP_WARP+0x0F,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,TOP_WARP+0x10,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,TOP_WARP+0x11,0,0) SP_DATAST(ene_data->x ,ene_data->y+32,col,TOP_WARP+0x12,0,0) SP_DATAST(ene_data->x+16,ene_data->y+32,col,TOP_WARP+0x13,0,0) break; case 3: SP_DATAST(ene_data->x ,ene_data->y-24,col,TOP_WARP+0x14,0,0) SP_DATAST(ene_data->x+16,ene_data->y-24,col,TOP_WARP+0x15,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,TOP_WARP+0x16,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,TOP_WARP+0x17,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,TOP_WARP+0x18,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,TOP_WARP+0x19,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,TOP_WARP+0x1A,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,TOP_WARP+0x1B,0,0) SP_DATAST(ene_data->x ,ene_data->y+40,col,TOP_WARP+0x1C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+40,col,TOP_WARP+0x1D,0,0) break; case 4: SP_DATAST(ene_data->x ,ene_data->y-24,col,TOP_WARP+0x1E,0,0) SP_DATAST(ene_data->x+16,ene_data->y-24,col,TOP_WARP+0x1F,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,TOP_WARP+0x20,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,TOP_WARP+0x21,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,TOP_WARP+0x22,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,TOP_WARP+0x23,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,TOP_WARP+0x24,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,TOP_WARP+0x25,0,0) SP_DATAST(ene_data->x ,ene_data->y+40,col,TOP_WARP+0x26,0,0) SP_DATAST(ene_data->x+16,ene_data->y+40,col,TOP_WARP+0x27,0,0) break; case 5: SP_DATAST(ene_data->x ,ene_data->y-24,col,TOP_WARP+0x28,0,0) SP_DATAST(ene_data->x+16,ene_data->y-24,col,TOP_WARP+0x29,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,TOP_WARP+0x2A,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,TOP_WARP+0x2B,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,TOP_WARP+0x2C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,TOP_WARP+0x2D,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,TOP_WARP+0x2E,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,TOP_WARP+0x2F,0,0) SP_DATAST(ene_data->x ,ene_data->y+40,col,TOP_WARP+0x30,0,0) SP_DATAST(ene_data->x+16,ene_data->y+40,col,TOP_WARP+0x31,0,0) break; } if(ene_data->count<4){ /* {̂`‚ */ if(ene_data->count&1){ enesp_rsTboss1(ene_data); } } } /*------------------ Gro\ErsTboss1 -------------*/ void enesp_rsTboss1(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=4; switch(ene_data->anim3){ case 0: case 1: case 2: case 3: area1(ene_data); break; case 4: case 5: case 6: case 7: area2(ene_data); break; case 8: case 9: case 10: case 11: area3(ene_data); break; case 12: case 13: case 14: case 15: area4(ene_data); break; } } /*------------------ Gro\ErsTboss2 -------------*/ void enesp_rsTboss2(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=4; switch(ene_data->anim3){ case 0: case 1: case 2: case 3: area1(ene_data); break; case 4: case 5: case 6: case 7: area2(ene_data); break; case 8: case 9: case 10: case 11: area3(ene_data); break; case 12: case 13: case 14: case 15: area4(ene_data); break; } } /*------------------ Gro\Eboss area1 -------------*/ static void area1(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=4; switch(ene_data->anim3){ case 0: SP_DATAST(ene_data->x-24,ene_data->y- 8,col,TOP_BODY+0x00,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x01,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x02,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x03,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x04,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x05,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x06,0,0) SP_DATAST(ene_data->x-24,ene_data->y+24,col,TOP_BODY+0x07,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x08,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x09,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x0A,0,0) break; case 1: SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x0B,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,TOP_BODY+0x0C,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x0D,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x0E,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x0F,0,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,TOP_BODY+0x10,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x11,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x12,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x13,0,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,TOP_BODY+0x14,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x15,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x16,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x17,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,TOP_BODY+0x18,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x19,0,0) break; case 2: SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x1A,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x1B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x1C,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x1D,0,0) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,TOP_BODY+0x1E,0,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,TOP_BODY+0x1F,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x20,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x21,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x22,0,0) SP_DATAST(ene_data->x-24,ene_data->y+24,col,TOP_BODY+0x23,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x24,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x25,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x26,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,TOP_BODY+0x27,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x28,0,0) break; case 3: SP_DATAST(ene_data->x- 8,ene_data->y-24,col,TOP_BODY+0x29,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x2A,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x2B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x2C,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x2D,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x2E,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x2F,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x30,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x31,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x32,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x33,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x34,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,TOP_BODY+0x35,0,0) break; } } /*------------------ Gro\Eboss area2 -------------*/ static void area2(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=4; switch(ene_data->anim3){ case 4: SP_DATAST(ene_data->x- 8,ene_data->y-24,col,TOP_BODY+0x36,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,TOP_BODY+0x37,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x38,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x39,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x3A,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x3B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x3C,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x3D,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x3E,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x3F,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x40,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,TOP_BODY+0x41,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,TOP_BODY+0x42,0,0) break; case 5: SP_DATAST(ene_data->x+24,ene_data->y-24,col,TOP_BODY+0x29,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x2A,0,1) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x2B,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x2C,0,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x2D,0,1) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x2E,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x2F,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x30,0,1) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x31,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x32,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x33,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x34,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,TOP_BODY+0x35,0,1) break; case 6: SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x1A,0,1) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x1B,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x1C,0,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x1D,0,1) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,TOP_BODY+0x1E,0,1) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,TOP_BODY+0x1F,0,1) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x20,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x21,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x22,0,1) SP_DATAST(ene_data->x+40,ene_data->y+24,col,TOP_BODY+0x23,0,1) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x24,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x25,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x26,0,1) SP_DATAST(ene_data->x+24,ene_data->y+40,col,TOP_BODY+0x27,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x28,0,1) break; case 7: SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x0B,0,1) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,TOP_BODY+0x0C,0,1) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x0D,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x0E,0,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x0F,0,1) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,TOP_BODY+0x10,0,1) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x11,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x12,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x13,0,1) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,TOP_BODY+0x14,0,1) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x15,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x16,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x17,0,1) SP_DATAST(ene_data->x+24,ene_data->y+40,col,TOP_BODY+0x18,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x19,0,1) break; } } /*------------------ Gro\Eboss area3 -------------*/ static void area3(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=4; switch(ene_data->anim3){ case 8: SP_DATAST(ene_data->x+40,ene_data->y- 8,col,TOP_BODY+0x00,0,1) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x01,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x02,0,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x03,0,1) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x04,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x05,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x06,0,1) SP_DATAST(ene_data->x+40,ene_data->y+24,col,TOP_BODY+0x07,0,1) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x08,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x09,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x0A,0,1) break; case 9: SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x0B,1,1) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,TOP_BODY+0x0C,1,1) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x0D,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x0E,1,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x0F,1,1) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,TOP_BODY+0x10,1,1) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x11,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x12,1,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x13,1,1) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,TOP_BODY+0x14,1,1) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x15,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x16,1,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x17,1,1) SP_DATAST(ene_data->x+24,ene_data->y-24,col,TOP_BODY+0x18,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x19,1,1) break; case 10: SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x1A,1,1) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x1B,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x1C,1,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x1D,1,1) SP_DATAST(ene_data->x-24,ene_data->y+24,col,TOP_BODY+0x1E,1,1) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,TOP_BODY+0x1F,1,1) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x20,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x21,1,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x22,1,1) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,TOP_BODY+0x23,1,1) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x24,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x25,1,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x26,1,1) SP_DATAST(ene_data->x+24,ene_data->y-24,col,TOP_BODY+0x27,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x28,1,1) break; case 11: SP_DATAST(ene_data->x+24,ene_data->y+40,col,TOP_BODY+0x29,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x2A,1,1) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x2B,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x2C,1,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x2D,1,1) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x2E,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x2F,1,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x30,1,1) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x31,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x32,1,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x33,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x34,1,1) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,TOP_BODY+0x35,1,1) break; } } /*------------------ Gro\Eboss area4 -------------*/ static void area4(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=4; switch(ene_data->anim3){ case 12: SP_DATAST(ene_data->x- 8,ene_data->y+40,col,TOP_BODY+0x36,1,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,TOP_BODY+0x37,1,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x38,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x39,1,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x3A,1,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x3B,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x3C,1,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x3D,1,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x3E,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x3F,1,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x40,1,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,TOP_BODY+0x41,1,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,TOP_BODY+0x42,1,0) break; case 13: SP_DATAST(ene_data->x- 8,ene_data->y+40,col,TOP_BODY+0x29,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x2A,1,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x2B,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x2C,1,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x2D,1,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x2E,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x2F,1,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x30,1,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x31,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x32,1,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x33,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x34,1,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,TOP_BODY+0x35,1,0) break; case 14: SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x1A,1,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x1B,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x1C,1,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x1D,1,0) SP_DATAST(ene_data->x+40,ene_data->y+24,col,TOP_BODY+0x1E,1,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,TOP_BODY+0x1F,1,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x20,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x21,1,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x22,1,0) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,TOP_BODY+0x23,1,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x24,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x25,1,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x26,1,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,TOP_BODY+0x27,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x28,1,0) break; case 15: SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x0B,1,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,TOP_BODY+0x0C,1,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x0D,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x0E,1,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x0F,1,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,TOP_BODY+0x10,1,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x11,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x12,1,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x13,1,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,TOP_BODY+0x14,1,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x15,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x16,1,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x17,1,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,TOP_BODY+0x18,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x19,1,0) break; } } rt_dot=256-ras_data->y1; ras_data->end_dot =256-ras_data->y1+127; /* af́Â܂܃XN[ */ RAS_ON(rint_st4,rtable_st4,40+(2*ras_data->start_dot),40+(2*(ras_data->end_dot+1))); } if(bg_data->bg_y==29050-100){ /* G̊G]iaj */ TRANSSP(10,0x01,72); TRANSPAL(6,4,7); } if(bg_data->bg_y==29049-100){ /* G̊G]ia-j */ TRANSSP(11,0xD4,28); } if(bg_data->bg_y==29048-100){ /* G̊G]ia-2ndj */ TRANSSP(12,0xF0,15); } if(bg_data->bg_y==29047-100){ /* < vg^Cv錾 > */ /* G */ void enesp_rsTnum10(ENE_DATA*); void enesp_rsTnum20(ENE_DATA*); void enesp_rsTnum28(ENE_DATA*); void enesp_rsTnum06(ENE_DATA*); void enesp_rsTnum04(ENE_DATA*); void enesp_rsTnum02(ENE_DATA*); void enesp_rsTnum09(ENE_DATA*); void enesp_rsTnum16(ENE_DATA*); void enesp_rsTnum17(ENE_DATA*); void enesp_rsTnum18(ENE_DATA*); void enesp_rsTrobot(ENE_DATA*); void enesp_rsTscope1(ENE_DATA*); void enesp_rsTbossopen(ENE_DATA*); void enesp_rsTbossclose(ENE_DATA*); void enesp_rsTboss1(ENE_DATA*); void enesp_rsTboss2(ENE_DATA*); { BOSS_APPEAR_C(i,60,16+(i*32),-16,0) } ene_data[3]->type+=2; /* ^񒆂̂Q‚̓RA */ ene_data[4]->type+=2; ene_data[3]->power+=200; /* RA͂ */ ene_data[4]->power+=200; STOP_BGY /* afXN[Xgbv */ } if(bg_data->bg_y==28009){ /* hqCR˔j */ ALL_EXPLODE /* GSĔj */ GRP_REDUSPD0(-16); /* XN[#include #include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "enesp_setf.h" #include "subs.h" #define TOP_CORE 0x01 #define TOP_CRY 0xC0 #define TOP_BODY 0x01 #define TOP_WARP 0xC0 /*---------------------< ϐ錾 >----------------------------*/ extern volatile STICK_UNIT *STC1_IO; /* WCXeBbN */ extern volatile STICK_UNIT *STC2_IO; static void area1(ENE_DATA*); static void area2(ENE_DATA*); static void area3(ENE_DATA*); static void area4(ENE_DATA*); static void illusion(ENE_DATA*); /*------------------ Gro\ErsUriv -------------*/ void enesp_rsUriv(ene_data) ENE_DATA *ene_data; { static int i; static short col; if(ene_data->flash)col=15; else col=6+(2*(disp_cont->status&1)); //if(keyin==KCODE_U)ene_data->anim3+=1; //if(keyin==KCODE_D)ene_data->anim3-=1; if(ene_data->anim3<0)ene_data->anim3=0; /* ꉞ̕ی@\ */ if(ene_data->anim3>45)ene_data->anim3=45; /* {̕\ */ switch((disp_cont->status)&1){ case 0: dmacpy((unsigned short*)(&(sp_data->transsp.tsp_buff[6][5*5*0x40*ene_data->anim3])),(unsigned short*)SP_DEF_ADD(0x11),5*5*(0x80/4)); if(col!=15)dmacpy((unsigned short*)(&(sp_data->transpal.tpal_buff[6][16*ene_data->anim3])),(unsigned short*)SP_PAL_ADD(col),8); SP_DATAST(ene_data->x-24,ene_data->y-24,col,0x11,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0x12,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0x13,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0x14,0,0) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0x15,0,0) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,0x16,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0x17,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x18,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0x19,0,0) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,0x1A,0,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,0x1B,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0x1C,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x1D,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0x1E,0,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0x1F,0,0) SP_DATAST(ene_data->x-24,ene_data->y+24,col,0x20,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0x21,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x22,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0x23,0,0) SP_DATAST(ene_data->x+40,ene_data->y+24,col,0x24,0,0) SP_DATAST(ene_data->x-24,ene_data->y+40,col,0x25,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0x26,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0x27,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0x28,0,0) SP_DATAST(ene_data->x+40,ene_data->y+40,col,0x29,0,0) break; case 1: dmacpy((unsigned short*)(&(sp_data->transsp.tsp_buff[6][5*5*0x40*ene_data->anim3])),(unsigned short*)SP_DEF_ADD(0x2A),5*5*(0x80/4)); if(col!=15)dmacpy((unsigned short*)(&(sp_data->transpal.tpal_buff[6][16*ene_data->anim3])),(unsigned short*)SP_PAL_ADD(col),8); SP_DATAST(ene_data->x-24,ene_data->y-24,col,0x2A,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0x2B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0x2C,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0x2D,0,0) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0x2E,0,0) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,0x2F,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0x30,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x31,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0x32,0,0) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,0x33,0,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,0x34,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0x35,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x36,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0x37,0,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0x38,0,0) SP_DATAST(ene_data->x-24,ene_data->y+24,col,0x39,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0x3A,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x3B,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0x3C,0,0) SP_DATAST(ene_data->x+40,ene_data->y+24,col,0x3D,0,0) SP_DATAST(ene_data->x-24,ene_data->y+40,col,0x3E,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0x3F,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0x40,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0x41,0,0) SP_DATAST(ene_data->x+40,ene_data->y+40,col,0x42,0,0) break; } } /*------------------ Gro\ErsUrivIll -------------*/ void enesp_rsUrivIll(ene_data) ENE_DATA *ene_data; { static int i,temp; static short col; if(ene_data->flash)col=15; else col=6+(2*(disp_cont->status&1)); //if(keyin==KCODE_U)ene_data->anim3+=1; //if(keyin==KCODE_D)ene_data->anim3-=1; if(ene_data->anim3<0)ene_data->anim3=0; /* ꉞ̕ی@\ */ if(ene_data->anim3>45)ene_data->anim3=45; /* {̕\ */ switch((disp_cont->status)&1){ case 0: dmacpy((unsigned short*)(&(sp_data->transsp.tsp_buff[6][5*5*0x40*ene_data->anim3])),(unsigned short*)SP_DEF_ADD(0x11),5*5*(0x80/4)); if(col!=15)dmacpy((unsigned short*)(&(sp_data->transpal.tpal_buff[6][16*ene_data->anim3])),(unsigned short*)SP_PAL_ADD(col),8); SP_DATAST(ene_data->x-24,ene_data->y-24,col,0x11,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0x12,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0x13,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0x14,0,0) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0x15,0,0) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,0x16,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0x17,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x18,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0x19,0,0) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,0x1A,0,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,0x1B,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0x1C,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x1D,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0x1E,0,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0x1F,0,0) SP_DATAST(ene_data->x-24,ene_data->y+24,col,0x20,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0x21,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x22,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0x23,0,0) SP_DATAST(ene_data->x+40,ene_data->y+24,col,0x24,0,0) SP_DATAST(ene_data->x-24,ene_data->y+40,col,0x25,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0x26,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0x27,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0x28,0,0) SP_DATAST(ene_data->x+40,ene_data->y+40,col,0x29,0,0) break; case 1: dmacpy((unsigned short*)(&(sp_data->transsp.tsp_buff[6][5*5*0x40*ene_data->anim3])),(unsigned short*)SP_DEF_ADD(0x2A),5*5*(0x80/4)); if(col!=15)dmacpy((unsigned short*)(&(sp_data->transpal.tpal_buff[6][16*ene_data->anim3])),(unsigned short*)SP_PAL_ADD(col),8); SP_DATAST(ene_data->x-24,ene_data->y-24,col,0x2A,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0x2B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0x2C,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0x2D,0,0) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0x2E,0,0) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,0x2F,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0x30,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x31,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0x32,0,0) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,0x33,0,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,0x34,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0x35,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x36,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0x37,0,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0x38,0,0) SP_DATAST(ene_data->x-24,ene_data->y+24,col,0x39,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0x3A,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x3B,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0x3C,0,0) SP_DATAST(ene_data->x+40,ene_data->y+24,col,0x3D,0,0) SP_DATAST(ene_data->x-24,ene_data->y+40,col,0x3E,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0x3F,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0x40,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0x41,0,0) SP_DATAST(ene_data->x+40,ene_data->y+40,col,0x42,0,0) break; } /* c\ */ if(disp_cont->status&1)illusion(ene_data); } /*------------------ Gro\ErsU illusion -------------*/ static void illusion(ene_data) ENE_DATA *ene_data; { static int i,temp; static short col; col=6+(2*((disp_cont->status-1)&1)); /* P‚܂̃t[̃pbgubN */ for(i=1;i<6;i+=2){ /* č */ temp=(disp_cont->status-i)&15; /* e[̓Y𓾂 */ switch((disp_cont->status-1)&1){ case 0: SP_DATAST(ene_data->tail_x[temp]-24,ene_data->tail_y[temp]-24,col,0x11,0,0) SP_DATAST(ene_data->tail_x[temp]- 8,ene_data->tail_y[temp]-24,col,0x12,0,0) SP_DATAST(ene_data->tail_x[temp]+ 8,ene_data->tail_y[temp]-24,col,0x13,0,0) SP_DATAST(ene_data->tail_x[temp]+24,ene_data->tail_y[temp]-24,col,0x14,0,0) SP_DATAST(ene_data->tail_x[temp]+40,ene_data->tail_y[temp]-24,col,0x15,0,0) SP_DATAST(ene_data->tail_x[temp]-24,ene_data->tail_y[temp]- 8,col,0x16,0,0) SP_DATAST(ene_data->tail_x[temp]- 8,ene_data->tail_y[temp]- 8,col,0x17,0,0) SP_DATAST(ene_data->tail_x[temp]+ 8,ene_data->tail_y[temp]- 8,col,0x18,0,0) SP_DATAST(ene_data->tail_x[temp]+24,ene_data->tail_y[temp]- 8,col,0x19,0,0) SP_DATAST(ene_data->tail_x[temp]+40,ene_data->tail_y[temp]- 8,col,0x1A,0,0) SP_DATAST(ene_data->tail_x[temp]-24,ene_data->tail_y[temp]+ 8,col,0x1B,0,0) SP_DATAST(ene_data->tail_x[temp]- 8,ene_data->tail_y[temp]+ 8,col,0x1C,0,0) SP_DATAST(ene_data->tail_x[temp]+ 8,ene_data->tail_y[temp]+ 8,col,0x1D,0,0) SP_DATAST(ene_data->tail_x[temp]+24,ene_data->tail_y[temp]+ 8,col,0x1E,0,0) SP_DATAST(ene_data->tail_x[temp]+40,ene_data->tail_y[temp]+ 8,col,0x1F,0,0) SP_DATAST(ene_data->tail_x[temp]-24,ene_data->tail_y[temp]+24,col,0x20,0,0) SP_DATAST(ene_data->tail_x[temp]- 8,ene_data->tail_y[temp]+24,col,0x21,0,0) SP_DATAST(ene_data->tail_x[temp]+ 8,ene_data->tail_y[temp]+24,col,0x22,0,0) SP_DATAST(ene_data->tail_x[temp]+24,ene_data->tail_y[temp]+24,col,0x23,0,0) SP_DATAST(ene_data->tail_x[temp]+40,ene_data->tail_y[temp]+24,col,0x24,0,0) SP_DATAST(ene_data->tail_x[temp]-24,ene_data->tail_y[temp]+40,col,0x25,0,0) SP_DATAST(ene_data->tail_x[temp]- 8,ene_data->tail_y[temp]+40,col,0x26,0,0) SP_DATAST(ene_data->tail_x[temp]+ 8,ene_data->tail_y[temp]+40,col,0x27,0,0) SP_DATAST(ene_data->tail_x[temp]+24,ene_data->tail_y[temp]+40,col,0x28,0,0) SP_DATAST(ene_data->tail_x[temp]+40,ene_data->tail_y[temp]+40,col,0x29,0,0) break; case 1: SP_DATAST(ene_data->tail_x[temp]-24,ene_data->tail_y[temp]-24,col,0x2A,0,0) SP_DATAST(ene_data->tail_x[temp]- 8,ene_data->tail_y[temp]-24,col,0x2B,0,0) SP_DATAST(ene_data->tail_x[temp]+ 8,ene_data->tail_y[temp]-24,col,0x2C,0,0) SP_DATAST(ene_data->tail_x[temp]+24,ene_data->tail_y[temp]-24,col,0x2D,0,0) SP_DATAST(ene_data->tail_x[temp]+40,ene_data->tail_y[temp]-24,col,0x2E,0,0) SP_DATAST(ene_data->tail_x[temp]-24,ene_data->tail_y[temp]- 8,col,0x2F,0,0) SP_DATAST(ene_data->tail_x[temp]- 8,ene_data->tail_y[temp]- 8,col,0x30,0,0) SP_DATAST(ene_data->tail_x[temp]+ 8,ene_data->tail_y[temp]- 8,col,0x31,0,0) SP_DATAST(ene_data->tail_x[temp]+24,ene_data->tail_y[temp]- 8,col,0x32,0,0) SP_DATAST(ene_data->tail_x[temp]+40,ene_data->tail_y[temp]- 8,col,0x33,0,0) SP_DATAST(ene_data->tail_x[temp]-24,ene_data->tail_y[temp]+ 8,col,0x34,0,0) SP_DATAST(ene_data->tail_x[temp]- 8,ene_data->tail_y[temp]+ 8,col,0x35,0,0) SP_DATAST(ene_data->tail_x[temp]+ 8,ene_data->tail_y[temp]+ 8,col,0x36,0,0) SP_DATAST(ene_data->tail_x[temp]+24,ene_data->tail_y[temp]+ 8,col,0x37,0,0) SP_DATAST(ene_data->tail_x[temp]+40,ene_data->tail_y[temp]+ 8,col,0x38,0,0) SP_DATAST(ene_data->tail_x[temp]-24,ene_data->tail_y[temp]+24,col,0x39,0,0) SP_DATAST(ene_data->tail_x[temp]- 8,ene_data->tail_y[temp]+24,col,0x3A,0,0) SP_DATAST(ene_data->tail_x[temp]+ 8,ene_data->tail_y[temp]+24,col,0x3B,0,0) SP_DATAST(ene_data->tail_x[temp]+24,ene_data->tail_y[temp]+24,col,0x3C,0,0) SP_DATAST(ene_data->tail_x[temp]+40,ene_data->tail_y[temp]+24,col,0x3D,0,0) SP_DATAST(ene_data->tail_x[temp]-24,ene_data->tail_y[temp]+40,col,0x3E,0,0) SP_DATAST(ene_data->tail_x[temp]- 8,ene_data->tail_y[temp]+40,col,0x3F,0,0) SP_DATAST(ene_data->tail_x[temp]+ 8,ene_data->tail_y[temp]+40,col,0x40,0,0) SP_DATAST(ene_data->tail_x[temp]+24,ene_data->tail_y[temp]+40,col,0x41,0,0) SP_DATAST(ene_data->tail_x[temp]+40,ene_data->tail_y[temp]+40,col,0x42,0,0) break; } } } /*------------------ Gro\ErsUrivChg -------------*/ void enesp_rsUrivChg(ene_data) ENE_DATA *ene_data; /* type `FW̕p */ { /* Pt[ anim3=0 ɂȂĂ܂ */ static int i; /* ̕\̃`‚}邽߂̋̍ */ static short col; if(ene_data->flash)col=15; else col=6+(2*(disp_cont->status&1)); //if(keyin==KCODE_U)ene_data->anim3+=1; //if(keyin==KCODE_D)ene_data->anim3-=1; if(ene_data->anim3<0)ene_data->anim3=0; /* ꉞ̕ی@\ */ if(ene_data->anim3>45)ene_data->anim3=45; if(ene_data->count==0){ /* ŏ̃t[EEE */ if(ene_data->setdir[4])ene_data->anim3=7; else ene_data->anim3=2; } /* {̕\ */ switch((disp_cont->status)&1){ case 0: dmacpy((unsigned short*)(&(sp_data->transsp.tsp_buff[6][5*5*0x40*ene_data->anim3])),(unsigned short*)SP_DEF_ADD(0x11),5*5*(0x80/4)); if(col!=15)dmacpy((unsigned short*)(&(sp_data->transpal.tpal_buff[6][16*ene_data->anim3])),(unsigned short*)SP_PAL_ADD(col),8); SP_DATAST(ene_data->x-24,ene_data->y-24,col,0x11,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0x12,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0x13,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0x14,0,0) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0x15,0,0) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,0x16,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0x17,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x18,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0x19,0,0) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,0x1A,0,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,0x1B,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0x1C,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x1D,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0x1E,0,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0x1F,0,0) SP_DATAST(ene_data->x-24,ene_data->y+24,col,0x20,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0x21,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x22,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0x23,0,0) SP_DATAST(ene_data->x+40,ene_data->y+24,col,0x24,0,0) SP_DATAST(ene_data->x-24,ene_data->y+40,col,0x25,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0x26,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0x27,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0x28,0,0) SP_DATAST(ene_data->x+40,ene_data->y+40,col,0x29,0,0) break; case 1: dmacpy((unsigned short*)(&(sp_data->transsp.tsp_buff[6][5*5*0x40*ene_data->anim3])),(unsigned short*)SP_DEF_ADD(0x2A),5*5*(0x80/4)); if(col!=15)dmacpy((unsigned short*)(&(sp_data->transpal.tpal_buff[6][16*ene_data->anim3])),(unsigned short*)SP_PAL_ADD(col),8); SP_DATAST(ene_data->x-24,ene_data->y-24,col,0x2A,0,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,0x2B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,0x2C,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,0x2D,0,0) SP_DATAST(ene_data->x+40,ene_data->y-24,col,0x2E,0,0) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,0x2F,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,0x30,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,0x31,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,0x32,0,0) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,0x33,0,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,0x34,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,0x35,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,0x36,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,0x37,0,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,0x38,0,0) SP_DATAST(ene_data->x-24,ene_data->y+24,col,0x39,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,0x3A,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,0x3B,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,0x3C,0,0) SP_DATAST(ene_data->x+40,ene_data->y+24,col,0x3D,0,0) SP_DATAST(ene_data->x-24,ene_data->y+40,col,0x3E,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,0x3F,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,0x40,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,0x41,0,0) SP_DATAST(ene_data->x+40,ene_data->y+40,col,0x42,0,0) break; } } /*------------------ Gro\ERAE -------------*/ void enesp_rsURAE(ene_data) ENE_DATA *ene_data; { static short col; static short off[]={0,4,8}; if(ene_data->flash)col=15; else col=4+ene_data->anim3; SP_DATAST(ene_data->x ,ene_data->y ,col,TOP_CORE+0x00+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,TOP_CORE+0x01+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,TOP_CORE+0x02+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,TOP_CORE+0x03+off[ene_data->anim3],0,0) } /*------------------ Gro\ERAE -------------*/ void enesp_rsURAE(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=7; SP_DATAST(ene_data->x ,ene_data->y ,col,TOP_CORE+0x0C,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,TOP_CORE+0x0D,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,TOP_CORE+0x0E,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,TOP_CORE+0x0F,0,0) } /*------------------ Gro\ERA -------------*/ void enesp_rsURA(ene_data) ENE_DATA *ene_data; { static short col; static short off[]={0,4,8}; if(ene_data->flash)col=15; else col=4+ene_data->anim3; SP_DATAST(ene_data->x+16,ene_data->y ,col,TOP_CORE+0x00+off[ene_data->anim3],0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,TOP_CORE+0x01+off[ene_data->anim3],0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,TOP_CORE+0x02+off[ene_data->anim3],0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,TOP_CORE+0x03+off[ene_data->anim3],0,1) } /*------------------ Gro\ERA -------------*/ void enesp_rsURA(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=7; SP_DATAST(ene_data->x+16,ene_data->y ,col,TOP_CORE+0x0C,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,TOP_CORE+0x0D,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,TOP_CORE+0x0E,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,TOP_CORE+0x0F,0,1) } /*------------------ Gro\ERAE -------------*/ void enesp_rsURAE(ene_data) ENE_DATA *ene_data; { static short col; static short off[]={0,4,8}; if(ene_data->flash)col=15; else col=4+ene_data->anim3; SP_DATAST(ene_data->x ,ene_data->y ,col,TOP_CORE+0x10+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,TOP_CORE+0x11+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,TOP_CORE+0x12+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,TOP_CORE+0x13+off[ene_data->anim3],0,0) } /*------------------ Gro\ERAE -------------*/ void enesp_rsURAE(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=7; SP_DATAST(ene_data->x ,ene_data->y ,col,TOP_CORE+0x1C,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,TOP_CORE+0x1D,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,TOP_CORE+0x1E,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,TOP_CORE+0x1F,0,0) } /*------------------ Gro\ERA -------------*/ void enesp_rsURA(ene_data) ENE_DATA *ene_data; { static short col; static short off[]={0,4,8}; if(ene_data->flash)col=15; else col=4+ene_data->anim3; SP_DATAST(ene_data->x+16,ene_data->y ,col,TOP_CORE+0x10+off[ene_data->anim3],0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,TOP_CORE+0x11+off[ene_data->anim3],0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,TOP_CORE+0x12+off[ene_data->anim3],0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,TOP_CORE+0x13+off[ene_data->anim3],0,1) } /*------------------ Gro\ERA -------------*/ void enesp_rsURA(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=7; SP_DATAST(ene_data->x+16,ene_data->y ,col,TOP_CORE+0x1C,0,1) SP_DATAST(ene_data->x ,ene_data->y ,col,TOP_CORE+0x1D,0,1) SP_DATAST(ene_data->x+16,ene_data->y+16,col,TOP_CORE+0x1E,0,1) SP_DATAST(ene_data->x ,ene_data->y+16,col,TOP_CORE+0x1F,0,1) } /*------------------ Gro\ERAOE -------------*/ void enesp_rsURAOE(ene_data) ENE_DATA *ene_data; { static short col; static short off[]={0,9,18}; if(ene_data->flash)col=15; else col=4+ene_data->anim3; SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_CORE+0x20+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_CORE+0x21+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_CORE+0x22+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_CORE+0x23+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_CORE+0x24+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_CORE+0x25+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_CORE+0x26+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_CORE+0x27+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_CORE+0x28+off[ene_data->anim3],0,0) } /*------------------ Gro\ERAOE -------------*/ void enesp_rsURAOE(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=7; SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_CORE+0x3B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_CORE+0x3C,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_CORE+0x3D,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_CORE+0x3E,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_CORE+0x3F,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_CORE+0x40,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_CORE+0x41,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_CORE+0x42,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_CORE+0x43,0,0) } /*------------------ Gro\ERAO -------------*/ void enesp_rsURAO(ene_data) ENE_DATA *ene_data; { static short col; static short off[]={0,9,18}; if(ene_data->flash)col=15; else col=4+ene_data->anim3; SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_CORE+0x20+off[ene_data->anim3],0,1) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_CORE+0x21+off[ene_data->anim3],0,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_CORE+0x22+off[ene_data->anim3],0,1) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_CORE+0x23+off[ene_data->anim3],0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_CORE+0x24+off[ene_data->anim3],0,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_CORE+0x25+off[ene_data->anim3],0,1) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_CORE+0x26+off[ene_data->anim3],0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_CORE+0x27+off[ene_data->anim3],0,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_CORE+0x28+off[ene_data->anim3],0,1) } /*------------------ Gro\ERAO -------------*/ void enesp_rsURAO(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=7; SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_CORE+0x3B,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_CORE+0x3C,0,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_CORE+0x3D,0,1) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_CORE+0x3E,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_CORE+0x3F,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_CORE+0x40,0,1) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_CORE+0x41,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_CORE+0x42,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_CORE+0x43,0,1) } /*------------------ Gro\Ecrystal -------------*/ void enesp_rsUcrystal(ene_data) ENE_DATA *ene_data; { static short col; static short off[]={0,3,6,9,12}; if(ene_data->flash)col=15; else col=8; SP_DATAST(ene_data->x- 8,ene_data->y-16,col,TOP_CRY+0x00+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-16,col,TOP_CRY+0x01+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x+24,ene_data->y-16,col,TOP_CRY+0x02+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x- 8,ene_data->y ,col,TOP_CRY+0x10+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,col,TOP_CRY+0x11+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x+24,ene_data->y ,col,TOP_CRY+0x12+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x- 8,ene_data->y+16,col,TOP_CRY+0x20+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,TOP_CRY+0x21+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x+24,ene_data->y+16,col,TOP_CRY+0x22+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x- 8,ene_data->y+32,col,TOP_CRY+0x30+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+32,col,TOP_CRY+0x31+off[ene_data->anim3],0,0) SP_DATAST(ene_data->x+24,ene_data->y+32,col,TOP_CRY+0x32+off[ene_data->anim3],0,0) } /*------------------ Gro\ErsUboss5open -------------*/ void enesp_rsUboss5open(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=6; switch(ene_data->anim2){ case 0: SP_DATAST(ene_data->x+ 8,ene_data->y-16,col,TOP_WARP+0x00,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,col,TOP_WARP+0x01,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,TOP_WARP+0x02,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+32,col,TOP_WARP+0x03,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y-16,col,TOP_WARP+0x04,0,0) SP_DATAST(ene_data->x+16,ene_data->y-16,col,TOP_WARP+0x05,0,0) SP_DATAST(ene_data->x ,ene_data->y ,col,TOP_WARP+0x06,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,TOP_WARP+0x07,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,TOP_WARP+0x08,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,TOP_WARP+0x09,0,0) SP_DATAST(ene_data->x ,ene_data->y+32,col,TOP_WARP+0x0A,0,0) SP_DATAST(ene_data->x+16,ene_data->y+32,col,TOP_WARP+0x0B,0,0) break; case 2: SP_DATAST(ene_data->x ,ene_data->y-16,col,TOP_WARP+0x0C,0,0) SP_DATAST(ene_data->x+16,ene_data->y-16,col,TOP_WARP+0x0D,0,0) SP_DATAST(ene_data->x ,ene_data->y ,col,TOP_WARP+0x0E,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,TOP_WARP+0x0F,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,TOP_WARP+0x10,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,TOP_WARP+0x11,0,0) SP_DATAST(ene_data->x ,ene_data->y+32,col,TOP_WARP+0x12,0,0) SP_DATAST(ene_data->x+16,ene_data->y+32,col,TOP_WARP+0x13,0,0) break; case 3: SP_DATAST(ene_data->x ,ene_data->y-24,col,TOP_WARP+0x14,0,0) SP_DATAST(ene_data->x+16,ene_data->y-24,col,TOP_WARP+0x15,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,TOP_WARP+0x16,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,TOP_WARP+0x17,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,TOP_WARP+0x18,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,TOP_WARP+0x19,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,TOP_WARP+0x1A,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,TOP_WARP+0x1B,0,0) SP_DATAST(ene_data->x ,ene_data->y+40,col,TOP_WARP+0x1C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+40,col,TOP_WARP+0x1D,0,0) break; case 4: SP_DATAST(ene_data->x ,ene_data->y-24,col,TOP_WARP+0x1E,0,0) SP_DATAST(ene_data->x+16,ene_data->y-24,col,TOP_WARP+0x1F,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,TOP_WARP+0x20,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,TOP_WARP+0x21,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,TOP_WARP+0x22,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,TOP_WARP+0x23,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,TOP_WARP+0x24,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,TOP_WARP+0x25,0,0) SP_DATAST(ene_data->x ,ene_data->y+40,col,TOP_WARP+0x26,0,0) SP_DATAST(ene_data->x+16,ene_data->y+40,col,TOP_WARP+0x27,0,0) break; case 5: SP_DATAST(ene_data->x ,ene_data->y-24,col,TOP_WARP+0x28,0,0) SP_DATAST(ene_data->x+16,ene_data->y-24,col,TOP_WARP+0x29,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,TOP_WARP+0x2A,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,TOP_WARP+0x2B,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,TOP_WARP+0x2C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,TOP_WARP+0x2D,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,TOP_WARP+0x2E,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,TOP_WARP+0x2F,0,0) SP_DATAST(ene_data->x ,ene_data->y+40,col,TOP_WARP+0x30,0,0) SP_DATAST(ene_data->x+16,ene_data->y+40,col,TOP_WARP+0x31,0,0) break; } if(ene_data->count>=8){ /* {̂`‚ */ if(ene_data->count&1){ enesp_rsUboss51(ene_data); } } } /*------------------ Gro\ErsUboss5close -------------*/ void enesp_rsUboss5close(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=6; switch(ene_data->anim2){ case 0: SP_DATAST(ene_data->x+ 8,ene_data->y-16,col,TOP_WARP+0x00,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y ,col,TOP_WARP+0x01,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+16,col,TOP_WARP+0x02,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+32,col,TOP_WARP+0x03,0,0) break; case 1: SP_DATAST(ene_data->x ,ene_data->y-16,col,TOP_WARP+0x04,0,0) SP_DATAST(ene_data->x+16,ene_data->y-16,col,TOP_WARP+0x05,0,0) SP_DATAST(ene_data->x ,ene_data->y ,col,TOP_WARP+0x06,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,TOP_WARP+0x07,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,TOP_WARP+0x08,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,TOP_WARP+0x09,0,0) SP_DATAST(ene_data->x ,ene_data->y+32,col,TOP_WARP+0x0A,0,0) SP_DATAST(ene_data->x+16,ene_data->y+32,col,TOP_WARP+0x0B,0,0) break; case 2: SP_DATAST(ene_data->x ,ene_data->y-16,col,TOP_WARP+0x0C,0,0) SP_DATAST(ene_data->x+16,ene_data->y-16,col,TOP_WARP+0x0D,0,0) SP_DATAST(ene_data->x ,ene_data->y ,col,TOP_WARP+0x0E,0,0) SP_DATAST(ene_data->x+16,ene_data->y ,col,TOP_WARP+0x0F,0,0) SP_DATAST(ene_data->x ,ene_data->y+16,col,TOP_WARP+0x10,0,0) SP_DATAST(ene_data->x+16,ene_data->y+16,col,TOP_WARP+0x11,0,0) SP_DATAST(ene_data->x ,ene_data->y+32,col,TOP_WARP+0x12,0,0) SP_DATAST(ene_data->x+16,ene_data->y+32,col,TOP_WARP+0x13,0,0) break; case 3: SP_DATAST(ene_data->x ,ene_data->y-24,col,TOP_WARP+0x14,0,0) SP_DATAST(ene_data->x+16,ene_data->y-24,col,TOP_WARP+0x15,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,TOP_WARP+0x16,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,TOP_WARP+0x17,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,TOP_WARP+0x18,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,TOP_WARP+0x19,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,TOP_WARP+0x1A,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,TOP_WARP+0x1B,0,0) SP_DATAST(ene_data->x ,ene_data->y+40,col,TOP_WARP+0x1C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+40,col,TOP_WARP+0x1D,0,0) break; case 4: SP_DATAST(ene_data->x ,ene_data->y-24,col,TOP_WARP+0x1E,0,0) SP_DATAST(ene_data->x+16,ene_data->y-24,col,TOP_WARP+0x1F,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,TOP_WARP+0x20,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,TOP_WARP+0x21,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,TOP_WARP+0x22,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,TOP_WARP+0x23,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,TOP_WARP+0x24,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,TOP_WARP+0x25,0,0) SP_DATAST(ene_data->x ,ene_data->y+40,col,TOP_WARP+0x26,0,0) SP_DATAST(ene_data->x+16,ene_data->y+40,col,TOP_WARP+0x27,0,0) break; case 5: SP_DATAST(ene_data->x ,ene_data->y-24,col,TOP_WARP+0x28,0,0) SP_DATAST(ene_data->x+16,ene_data->y-24,col,TOP_WARP+0x29,0,0) SP_DATAST(ene_data->x ,ene_data->y- 8,col,TOP_WARP+0x2A,0,0) SP_DATAST(ene_data->x+16,ene_data->y- 8,col,TOP_WARP+0x2B,0,0) SP_DATAST(ene_data->x ,ene_data->y+ 8,col,TOP_WARP+0x2C,0,0) SP_DATAST(ene_data->x+16,ene_data->y+ 8,col,TOP_WARP+0x2D,0,0) SP_DATAST(ene_data->x ,ene_data->y+24,col,TOP_WARP+0x2E,0,0) SP_DATAST(ene_data->x+16,ene_data->y+24,col,TOP_WARP+0x2F,0,0) SP_DATAST(ene_data->x ,ene_data->y+40,col,TOP_WARP+0x30,0,0) SP_DATAST(ene_data->x+16,ene_data->y+40,col,TOP_WARP+0x31,0,0) break; } if(ene_data->count<4){ /* {̂`‚ */ if(ene_data->count&1){ enesp_rsUboss51(ene_data); } } } /*------------------ Gro\ErsUboss51 -------------*/ void enesp_rsUboss51(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=5; switch(ene_data->anim3){ case 0: case 1: case 2: case 3: area1(ene_data); break; case 4: case 5: case 6: case 7: area2(ene_data); break; case 8: case 9: case 10: case 11: area3(ene_data); break; case 12: case 13: case 14: case 15: area4(ene_data); break; } } /*------------------ Gro\ErsUboss52 -------------*/ void enesp_rsUboss52(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=5; switch(ene_data->anim3){ case 0: case 1: case 2: case 3: area1(ene_data); break; case 4: case 5: case 6: case 7: area2(ene_data); break; case 8: case 9: case 10: case 11: area3(ene_data); break; case 12: case 13: case 14: case 15: area4(ene_data); break; } } /*------------------ Gro\Eboss area1 -------------*/ static void area1(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=5; switch(ene_data->anim3){ case 0: SP_DATAST(ene_data->x-24,ene_data->y- 8,col,TOP_BODY+0x00,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x01,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x02,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x03,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x04,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x05,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x06,0,0) SP_DATAST(ene_data->x-24,ene_data->y+24,col,TOP_BODY+0x07,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x08,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x09,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x0A,0,0) break; case 1: SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x0B,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,TOP_BODY+0x0C,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x0D,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x0E,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x0F,0,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,TOP_BODY+0x10,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x11,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x12,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x13,0,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,TOP_BODY+0x14,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x15,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x16,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x17,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,TOP_BODY+0x18,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x19,0,0) break; case 2: SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x1A,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x1B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x1C,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x1D,0,0) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,TOP_BODY+0x1E,0,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,TOP_BODY+0x1F,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x20,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x21,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x22,0,0) SP_DATAST(ene_data->x-24,ene_data->y+24,col,TOP_BODY+0x23,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x24,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x25,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x26,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,TOP_BODY+0x27,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x28,0,0) break; case 3: SP_DATAST(ene_data->x- 8,ene_data->y-24,col,TOP_BODY+0x29,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x2A,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x2B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x2C,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x2D,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x2E,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x2F,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x30,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x31,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x32,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x33,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x34,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,TOP_BODY+0x35,0,0) break; } } /*------------------ Gro\Eboss area2 -------------*/ static void area2(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=5; switch(ene_data->anim3){ case 4: SP_DATAST(ene_data->x- 8,ene_data->y-24,col,TOP_BODY+0x36,0,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,TOP_BODY+0x37,0,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x38,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x39,0,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x3A,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x3B,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x3C,0,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x3D,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x3E,0,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x3F,0,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x40,0,0) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,TOP_BODY+0x41,0,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,TOP_BODY+0x42,0,0) break; case 5: SP_DATAST(ene_data->x+24,ene_data->y-24,col,TOP_BODY+0x29,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x2A,0,1) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x2B,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x2C,0,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x2D,0,1) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x2E,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x2F,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x30,0,1) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x31,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x32,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x33,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x34,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,TOP_BODY+0x35,0,1) break; case 6: SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x1A,0,1) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x1B,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x1C,0,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x1D,0,1) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,TOP_BODY+0x1E,0,1) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,TOP_BODY+0x1F,0,1) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x20,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x21,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x22,0,1) SP_DATAST(ene_data->x+40,ene_data->y+24,col,TOP_BODY+0x23,0,1) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x24,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x25,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x26,0,1) SP_DATAST(ene_data->x+24,ene_data->y+40,col,TOP_BODY+0x27,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x28,0,1) break; case 7: SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x0B,0,1) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,TOP_BODY+0x0C,0,1) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x0D,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x0E,0,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x0F,0,1) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,TOP_BODY+0x10,0,1) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x11,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x12,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x13,0,1) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,TOP_BODY+0x14,0,1) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x15,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x16,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x17,0,1) SP_DATAST(ene_data->x+24,ene_data->y+40,col,TOP_BODY+0x18,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x19,0,1) break; } } /*------------------ Gro\Eboss area3 -------------*/ static void area3(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=5; switch(ene_data->anim3){ case 8: SP_DATAST(ene_data->x+40,ene_data->y- 8,col,TOP_BODY+0x00,0,1) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x01,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x02,0,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x03,0,1) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x04,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x05,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x06,0,1) SP_DATAST(ene_data->x+40,ene_data->y+24,col,TOP_BODY+0x07,0,1) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x08,0,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x09,0,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x0A,0,1) break; case 9: SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x0B,1,1) SP_DATAST(ene_data->x- 8,ene_data->y+40,col,TOP_BODY+0x0C,1,1) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x0D,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x0E,1,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x0F,1,1) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,TOP_BODY+0x10,1,1) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x11,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x12,1,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x13,1,1) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,TOP_BODY+0x14,1,1) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x15,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x16,1,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x17,1,1) SP_DATAST(ene_data->x+24,ene_data->y-24,col,TOP_BODY+0x18,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x19,1,1) break; case 10: SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x1A,1,1) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x1B,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x1C,1,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x1D,1,1) SP_DATAST(ene_data->x-24,ene_data->y+24,col,TOP_BODY+0x1E,1,1) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,TOP_BODY+0x1F,1,1) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x20,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x21,1,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x22,1,1) SP_DATAST(ene_data->x+40,ene_data->y- 8,col,TOP_BODY+0x23,1,1) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x24,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x25,1,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x26,1,1) SP_DATAST(ene_data->x+24,ene_data->y-24,col,TOP_BODY+0x27,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x28,1,1) break; case 11: SP_DATAST(ene_data->x+24,ene_data->y+40,col,TOP_BODY+0x29,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x2A,1,1) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x2B,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x2C,1,1) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x2D,1,1) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x2E,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x2F,1,1) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x30,1,1) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x31,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x32,1,1) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x33,1,1) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x34,1,1) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,TOP_BODY+0x35,1,1) break; } } /*------------------ Gro\Eboss area4 -------------*/ static void area4(ene_data) ENE_DATA *ene_data; { static short col; if(ene_data->flash)col=15; else col=5; switch(ene_data->anim3){ case 12: SP_DATAST(ene_data->x- 8,ene_data->y+40,col,TOP_BODY+0x36,1,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,TOP_BODY+0x37,1,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x38,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x39,1,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x3A,1,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x3B,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x3C,1,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x3D,1,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x3E,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x3F,1,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x40,1,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,TOP_BODY+0x41,1,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,TOP_BODY+0x42,1,0) break; case 13: SP_DATAST(ene_data->x- 8,ene_data->y+40,col,TOP_BODY+0x29,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x2A,1,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x2B,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x2C,1,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x2D,1,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x2E,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x2F,1,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x30,1,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x31,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x32,1,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x33,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x34,1,0) SP_DATAST(ene_data->x+24,ene_data->y-24,col,TOP_BODY+0x35,1,0) break; case 14: SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x1A,1,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x1B,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x1C,1,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x1D,1,0) SP_DATAST(ene_data->x+40,ene_data->y+24,col,TOP_BODY+0x1E,1,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,TOP_BODY+0x1F,1,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x20,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x21,1,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x22,1,0) SP_DATAST(ene_data->x-24,ene_data->y- 8,col,TOP_BODY+0x23,1,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x24,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x25,1,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x26,1,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,TOP_BODY+0x27,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x28,1,0) break; case 15: SP_DATAST(ene_data->x+ 8,ene_data->y+40,col,TOP_BODY+0x0B,1,0) SP_DATAST(ene_data->x+24,ene_data->y+40,col,TOP_BODY+0x0C,1,0) SP_DATAST(ene_data->x- 8,ene_data->y+24,col,TOP_BODY+0x0D,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+24,col,TOP_BODY+0x0E,1,0) SP_DATAST(ene_data->x+24,ene_data->y+24,col,TOP_BODY+0x0F,1,0) SP_DATAST(ene_data->x-24,ene_data->y+ 8,col,TOP_BODY+0x10,1,0) SP_DATAST(ene_data->x- 8,ene_data->y+ 8,col,TOP_BODY+0x11,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y+ 8,col,TOP_BODY+0x12,1,0) SP_DATAST(ene_data->x+24,ene_data->y+ 8,col,TOP_BODY+0x13,1,0) SP_DATAST(ene_data->x+40,ene_data->y+ 8,col,TOP_BODY+0x14,1,0) SP_DATAST(ene_data->x- 8,ene_data->y- 8,col,TOP_BODY+0x15,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y- 8,col,TOP_BODY+0x16,1,0) SP_DATAST(ene_data->x+24,ene_data->y- 8,col,TOP_BODY+0x17,1,0) SP_DATAST(ene_data->x- 8,ene_data->y-24,col,TOP_BODY+0x18,1,0) SP_DATAST(ene_data->x+ 8,ene_data->y-24,col,TOP_BODY+0x19,1,0) break; } } /*------------------ Gro\ErsUlaser -------------*/ void enesp_rsUlaser(ene_data) ENE_DATA *ene_data; { static short col; static short y; static short temp_x,temp_y; temp_x=rnd2(); temp_y=rnd2(); col=0x0C; switch(ene_data->anim3){ case 0: SP_DATAST(ene_data->x+8+temp_x,ene_data->y+8+temp_y,col,0x48+((ene_data->count>>2)&1),0,0) break; case 1: y=ene_data->y+8; SP_DATAST(ene_data->x+8+temp_x,y+8+temp_y,col,0x4A,0,0) while(1){ y+=16; SP_DATAST(ene_data->x+8+temp_x,y+8+temp_y,col,0x4B,0,0) if(y>256+16)break; } break; case 2: y=ene_data->y+8-16; while(1){ y+=16; SP_DATAST(ene_data->x+8+temp_x,y+8+temp_y,col,0x4C,0,0) if(y>256+16)break; } break; case 3: y=ene_data->y+8-16; while(1){ y+=16; SP_DATAST(ene_data->x+8+temp_x,y+8+temp_y,col,0x4D,0,0) if(y>256+16)break; } break; } }  eneshot_appear(4,ene_data->x-12,ene_data->y+15,8*cost[(48+3)&63],8*sint[(48+3)&63],0,0,ene_data); eneshot_appear(4,ene_data->x-12,ene_data->y+15,8*cost[(48-6)&63],8*sint[(48-6)&63],0,0,ene_data); eneshot_appear(4,ene_data->x-12,ene_data->y+15,8*cost[(48+6)&63],8*sint[(48+6)&63],0,0,ene_data); } if(ene_data->count==256)ene_data->anim3=10; if(ene_data->count==260){ /* E */ ene_data->hdx=+7*32; ene_data->hdy=0; ene_data->anim3=1; } if(ene_data->count==275)se_adpcm1(zm_data->pcm[SE_RIVMOTION],zm_data->pcmsize[SE_RIVMOTION],SEPRW_RIVATK); if(ene_data->count==275){ /* Xgbv */ ene_data->hdx=0; ene_data->hdy=0; ene_data->anim3=2; } if(ene_data->count==279)ene_data->anim3=10; if(ene_data->count==283)ene_data->anim3=11; if( (ene_d/* < vg^Cv錾 > */ /* G */ void enesp_rsUriv(ENE_DATA*); void enesp_rsUrivIll(ENE_DATA*); void enesp_rsUrivChg(ENE_DATA*); void enesp_rsURAE(ENE_DATA*); void enesp_rsURAE(ENE_DATA*); void enesp_rsURA(ENE_DATA*); void enesp_rsURA(ENE_DATA*); void enesp_rsURAE(ENE_DATA*); void enesp_rsURAE(ENE_DATA*); void enesp_rsURA(ENE_DATA*); void enesp_rsURA(ENE_DATA*); void enesp_rsURAOE(ENE_DATA*); void enesp_rsURAOE(ENE_DATA*); void enesp_rsURAO(ENE_DATA*); void enesp_rsURAO(ENE_DATA*); void enesp_rsUcrystal(ENE_DATA*); void enesp_rsUboss5open(ENE_DATA*); void enesp_rsUboss5close(ENE_DATA*); void enesp_rsUboss51(ENE_DATA*); void enesp_rsUboss52(ENE_DATA*); void enesp_rsUlaser(ENE_DATA*); ->anim3=2; } if(ene_data->count==358)se_adpcm1(zm_data->pcm[SE_RIVCHG],zm_data->pcmsize[SE_RIVCHG],SEPRW_RIVCHG); if(ene_data->count#include #include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "esp.h" #include "subs.h" #include "espunit1.h" #include "espunit2.h" #include "espunit3.h" #include "espunit4.h" #include "espunit5.h" #include "espunit6.h" void (*espunit_func[])(ESPUNIT_DATA*)={ /* drojbgA•ʊ֐ւ̃|C^ */ espunit_type0 , espunit_rsPJnP , espunit_rsPJnQ , espunit_rsPJnR , espunit_rsPڕWP ,espunit_type0 ,espunit_type0 , espunit_rsPA[X}bv ,espunit_type0 , espunit_rsP{X[_[ ,espunit_rsP{Xj󃌁[U[,espunit_rsPً},espunit_type0,espunit_rsPJ^pg,espunit_rsP ,espunit_rsPJ^X,espunit_rsQJnP ,espunit_rsQJnQ,espunit_rsQJnR,espunit_rsQR[Xw ,espunit_rsQAv[`,espunit_rsQ̋,espunit_rsQT[OtB,espunit_rsQT[,espunit_rsQ ,espunit_rsQI[o[q[g,espunit_rsQI[o[q[gQ,espunit_rsRJnP,espunit_rsRJnQ,espunit_rsRJnR ,espunit_rsRR[Xw,espunit_rsRtB[h,espunit_type0,espunit_rsRǂd,espunit_rsR{X[_[ ,espunit_rsSJnP,espunit_rsSJnQ,espunit_rsSJnR,espunit_rsSX^[g,espunit_rsS[U[ ,espunit_rsSCo,espunit_rsShq,espunit_type0,espunit_rsSڐG\z,espunit_rsSR ,espunit_rsSQ,espunit_rsSP,espunit_rsS[ǂ,espunit_rsTJnP,espunit_rsTJnQ ,espunit_rsTJnR,espunit_rsTGP,espunit_rsTG,espunit_rsTG,espunit_rsTGG ,espunit_rsTG,espunit_rsTnarxr,espunit_rsT{XTC,espunit_rsT[vAEg,espunit_rsTGI ,espunit_rsTGG,espunit_rsUJnP,espunit_rsUJnQ,espunit_rsUJnR,espunit_rsUbqtrg ,espunit_rsUbdmsq`k,espunit_type0,espunit_rsQfqoO,espunit_rsTEINStbN,espunit_rsTEINSAj ,espunit_rsTEAPPAj,espunit_rsTJUPIWJ,espunit_rsTJUPIAj,espunit_rsTJUPIAj,espunit_rsTEBASEWJ ,espunit_rsTEBASEAj,espunit_rsTJUPI,espunit_rsUwi,espunit_rsUwixύX,espunit_rsUEotbN ,espunit_rsUEo,espunit_rsUwarning }; extern volatile STICK_UNIT *STC1_IO; /*-------------------------------------------------- dffectro -------*/ void esp() { static int i; esp_cont->regular_func(); /* M[֐R[ */ for(i=0;iespunit_max;i++){ /* drojbg */ if(espunit_data[i]->type==-1)continue; /* ݃iVŃXLbv */ espunit_func[espunit_data[i]->type](espunit_data[i]); /* ֐R[ */ } } /*--------------------- drojbgov -------------------*/ void espunit_appear(n,type,x,y,dx,dy) int n; int type; short x; short y; short dx; short dy; { espunit_data[n]->type =type; espunit_data[n]->x =x; espunit_data[n]->y =y; espunit_data[n]->hx =espunit_data[n]->x*32; espunit_data[n]->hy =espunit_data[n]->y*32; espunit_data[n]->dx =dx; espunit_data[n]->dy =dy; espunit_data[n]->count=0; } /*--------------------- drojbgov oʒu␳ -------------------*/ void espunit_appear2(n,type,x,y) int n; int type; short x; short y; { if(x > 128){ espunit_data[n]->type =type; espunit_data[n]->x =x+136; /* ߂́uOvɔzu */ espunit_data[n]->y =y; espunit_data[n]->hx =espunit_data[n]->x*32; espunit_data[n]->hy =espunit_data[n]->y*32; espunit_data[n]->dx =-16; /* PUt[ԂŁA136hbg */ espunit_data[n]->dy =0; espunit_data[n]->count=0; } else { espunit_data[n]->type =type; espunit_data[n]->x =x-136; /* ߂́uOvɔzu */ espunit_data[n]->y =y; espunit_data[n]->hx =espunit_data[n]->x*32; espunit_data[n]->hy =espunit_data[n]->y*32; espunit_data[n]->dx =+16; /* n=136 */ espunit_data[n]->dy =0; espunit_data[n]->count=0; } } /*--------------------- droM[[` -------------------*/ void esp_set1() { static int i; static short ofs[]={0,2,4,2}; static int jmax; static int s; static short ss; if(disp_cont->status&1)return; /* `‚ */ esp_move(239+2,263,(256*2)+0x89); /* shield̕ */ esp_move(255+2,263,(256*2)+0x8A); ss=(256*2)+ofs[(disp_cont->status>>2)&3]; if(jiki_data->shield){ /* shield̂ */ esp_move(239,224-6,ss+0xA7); esp_move(255,224-6,ss+0xA7+(1<<14)); esp_move(239,240-6,ss+0xA8); esp_move(255,240-6,ss+0xA8+(1<<14)); esp_move(239,255-6,ss+0xA7 +(1<<15)); esp_move(255,255-6,ss+0xA7+(1<<14)+(1<<15)); } /* @VGbg */ esp_move(247,224 +2,(256*2)+0xAD); esp_move(247,224+16+2,(256*2)+0xAE); jmax=jiki_cont->left; if(jmax>9)jmax=9; for(i=0;iscdisp){ SP_DATAST(255-65,17,2,0x5B,0,0) /* score ĕ */ SP_DATAST(255-81,17,2,0x5A,0,0) SP_DATAST(255 ,16,2,0x50+((all_cont->score/1)%10),0,0) /* XR */ if((s=all_cont->score/10)==0)return; SP_DATAST(255- 7,16,2,0x50+(s%10),0,0) if((s=all_cont->score/100)==0)return; SP_DATAST(255-14,16,2,0x50+(s%10),0,0) if((s=all_cont->score/1000)==0)return; SP_DATAST(255-21,16,2,0x50+(s%10),0,0) if((s=all_cont->score/10000)==0)return; SP_DATAST(255-28,16,2,0x50+(s%10),0,0) if((s=all_cont->score/100000)==0)return; SP_DATAST(255-35,16,2,0x50+(s%10),0,0) if((s=all_cont->score/1000000)==0)return; SP_DATAST(255-42,16,2,0x50+(s%10),0,0) if((s=all_cont->score/10000000)==0)return; SP_DATAST(255-49,16,2,0x50+(s%10),0,0) } } /*--------------------- RʗpdroM[[` -------------------*/ void esp_set2() { static int i; /* Ή */ static int spx[16]={ /* wW */ 300,300,300,300,300,300,300,300,300,300,300,300,300,300,300,300 }; static int spy[16]={ /* xW */ 300,300,300,300,300,300,300,300,300,300,300,300,300,300,300,300 }; static int sphx[16]={ /* wRQ{ */ 300,300,300,300,300,300,300,300,300,300,300,300,300,300,300,300 }; static int sphy[16]={ /* xRQ{ */ 300,300,300,300,300,300,300,300,300,300,300,300,300,300,300,300 }; static int spdx[16]={ /* wړ */ 300,300,300,300,300,300,300,300,300,300,300,300,300,300,300,300 }; static int spdy[16]={ /* xړ */ 300,300,300,300,300,300,300,300,300,300,300,300,300,300,300,300 }; static short addspd[]={ /* `ԕʂ̈ړʕ␳ */ 48,48,32,64 /* STC1_IO->data.trg ̒lΉ */ }; static short ofs[]={0,2,4,2}; static int jmax; static int s; static short ss; /*- - - - - - - - - - ΉԊ֌Ŵ - - - - - - - - - - -*/ /* Ήԏo */ i=disp_cont->status&15; spx[i]=jiki_data->x-2+rnd7(); spy[i]=jiki_data->y-20; sphx[i]=spx[i]*32; sphy[i]=spy[i]*32; spdx[i]=rnd63()-32; if(!STC1_IO->bit.right)spdx[i]+=addspd[STC1_IO->data.trg]; if(!STC1_IO->bit.left )spdx[i]-=addspd[STC1_IO->data.trg]; spdy[i]=rnd63()+48; if(!STC1_IO->bit.down)spdy[i]+=addspd[STC1_IO->data.trg]; if(!STC1_IO->bit.up )spdy[i]-=addspd[STC1_IO->data.trg]; /* ΉԈړVOi] */ for(i=0;i<16;i++){ sphx[i]+=spdx[i]; sphy[i]+=spdy[i]; spx[i] =sphx[i]/32; spy[i] =sphy[i]/32; spdy[i]+=2; /* ɉ */ esp_move(spx[i]+8,spy[i]+8,(256*0x0C)+0x76+rnd2()); /* dro\VOiM */ } /* @ƉΉԂVNēꍇ... */ // /* Ήԏo */ //i=disp_cont->status&15; // spx[i]=-2+rnd7(); // spy[i]=-20; //sphx[i]=spx[i]*32; //sphy[i]=spy[i]*32; //spdx[i]=rnd63()-32; //spdy[i]=rnd63()+48; // // /* ΉԈړVOi] */ //for(i=0;i<16;i++){ // sphx[i]+=spdx[i]; // sphy[i]+=spdy[i]; // spx[i] =sphx[i]/32; // spy[i] =sphy[i]/32; // // spdy[i]+=2; /* ɉ */ // // esp_move(jiki_data->x+spx[i]+8,jiki_data->y+spy[i]+8,(256*0x0C)+0x76+rnd2()); /* dro\VOiM */ // } /*- - - - - - - - - - bb牺̓M[Ɠ - - - - - - - - - - -*/ if((disp_cont->status&1)==0){ /* `‚ */ esp_move(239+2,263,(256*2)+0x89); /* shield̕ */ esp_move(255+2,263,(256*2)+0x8A); ss=(256*2)+ofs[(disp_cont->status>>2)&3]; if(jiki_data->shield){ /* shield̂ */ esp_move(239,224-6,ss+0xA7); esp_move(255,224-6,ss+0xA7+(1<<14)); esp_move(239,240-6,ss+0xA8); esp_move(255,240-6,ss+0xA8+(1<<14)); esp_move(239,255-6,ss+0xA7 +(1<<15)); esp_move(255,255-6,ss+0xA7+(1<<14)+(1<<15)); } /* @VGbg */ esp_move(247,224 +2,(256*2)+0xAD); esp_move(247,224+16+2,(256*2)+0xAE); jmax=jiki_cont->left; if(jmax>9)jmax=9; for(i=0;iscdisp){ SP_DATAST(255-65,17,2,0x5B,0,0) /* score ĕ */ SP_DATAST(255-81,17,2,0x5A,0,0) SP_DATAST(255 ,16,2,0x50+((all_cont->score/1)%10),0,0) /* XR */ if((s=all_cont->score/10)==0)return; SP_DATAST(255- 7,16,2,0x50+(s%10),0,0) if((s=all_cont->score/100)==0)return; SP_DATAST(255-14,16,2,0x50+(s%10),0,0) if((s=all_cont->score/1000)==0)return; SP_DATAST(255-21,16,2,0x50+(s%10),0,0) if((s=all_cont->score/10000)==0)return; SP_DATAST(255-28,16,2,0x50+(s%10),0,0) if((s=all_cont->score/100000)==0)return; SP_DATAST(255-35,16,2,0x50+(s%10),0,0) if((s=all_cont->score/1000000)==0)return; SP_DATAST(255-42,16,2,0x50+(s%10),0,0) if((s=all_cont->score/10000000)==0)return; SP_DATAST(255-49,16,2,0x50+(s%10),0,0) } } 0]->anim3=0; if(ene_cont->ene_data[12]->type!=-1)ene_cont->ene_data[1]->type=60; else ene_cont->ene_data[1]->type=-1; ene_cont->ene_data[1]->x=ene_cont->ene_data[12]->x+16; ene_cont->ene_data[1]->y=ene_cont->ene_data[12]->y+48; ene_cont->ene_data[1]->anim3=0; } if(ene_data->count==920)se_adpcm1(zm_data->pcm[SE_BIGLASER2],zm_data->pcmsize[SE_BIGLASER2],SEPRW_ENEBIGLASER+0x10000); if((ene_data->count>=920)&&(ene_data->count<1100)){ /* [U[ */ if(ene_cont->ene_data[11]->type!=-1)ene_cont->ene_data[/* vg^Cv錾 */ void esp(); /* */ void esp_set1(); /* M[droZbgP */ void esp_set2(); /* droRʗp */ void espunit_appear(int,int,short,short,short,short); /* drojbgov */ void espunit_appear2(int,int,short,short); /* drojbgov ʒu␳ */ /* drojbg•ʊ֐ */ void espunit_type0(ESPUNIT_DATA*); /* ꉞA_~[(^^; */ /* z */ void (*espunit_func[])(ESPUNIT_DATA*); /* drojbgA•ʊ֐ւ̃|C^ */ P */ if(ene_cont->ene_data[11]->type!=-1)ene_cont->ene_data[0]->type=60; else ene_cont->ene_data[0]->type=-1; ene_cont->ene_data[0]->x=ene_cont->ene_data[11]->x-16; ene_cont->ene_data[0]->y=ene_cont->ene_data[11]->y+48; ene_cont->ene_data[0]->anim3=2; if(ene_cont->ene_data[12]->type!=-1)ene_cont->ene_data[1]->type=60; else ene_cont->ene_data[1]->type=-1; ene_cont->ene_data[1]->x=ene_cont->ene_data[12]->x+16; ene_cont->ene_data[1]->y=ene_cont->ene_data[12]->y+48; e#include #include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "..\\sepcm.h" #include "esp.h" #include "exp.h" #include "espunit1.h" /*--------------------- •ʂdro[` -------------------*/ /*------------------------------------------------------------<< _~[[` >>*/ void espunit_type0(espunit_data) /* ꉞA_~[(^^; */ ESPUNIT_DATA *espunit_data; { espunit_data->type=-1; /* ܂(^^; */ } /*---------------------------------------------------------<< rsPJńuceQv >>*/ void espunit_rsPJnP(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>300){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ esp_move(espunit_data->x-24 ,espunit_data->y ,(256*8)+0xF0); esp_move(espunit_data->x-24+16,espunit_data->y ,(256*8)+0xF1); esp_move(espunit_data->x-24+32,espunit_data->y ,(256*8)+0xF2); esp_move(espunit_data->x-24 ,espunit_data->y+16,(256*8)+0xF3); esp_move(espunit_data->x-24+16,espunit_data->y+16,(256*8)+0xF4); esp_move(espunit_data->x-24+32,espunit_data->y+16,(256*8)+0xF5); espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; } /*---------------------------------------------------------<< rsPJńurs`fdPv >>*/ void espunit_rsPJnQ(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>300){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ esp_move(espunit_data->x-40 ,espunit_data->y+8+2 ,(256*8)+0xF6); esp_move(espunit_data->x-40+16,espunit_data->y+8+2 ,(256*8)+0xF7); esp_move(espunit_data->x-40+32,espunit_data->y+8+2 ,(256*8)+0xF8); esp_move(espunit_data->x-40+48,espunit_data->y+8+2 ,(256*8)+0xF9); esp_move(espunit_data->x-40+64,espunit_data->y+8+2 ,(256*8)+0xFA); espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsPJn̉p >>*/ void espunit_rsPJnR(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>200){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ esp_move(espunit_data->x-56 ,espunit_data->y+8+2 ,(256*8)+0xFB); esp_move(espunit_data->x-56+16,espunit_data->y+8+2 ,(256*8)+0xFC); esp_move(espunit_data->x-56+32,espunit_data->y+8+2 ,(256*8)+0xFD); esp_move(espunit_data->x-56+48,espunit_data->y+8+2 ,(256*8)+0xFE); esp_move(espunit_data->x-56+64,espunit_data->y+8+2 ,(256*8)+0xFF); } } /*---------------------------------------------------------<< rsPڕWP >>*/ void espunit_rsPڕWP(espunit_data) ESPUNIT_DATA *espunit_data; { switch(espunit_data->count){ case 10: se_adpcm1(zm_data->pcm[SE_CLICK04],zm_data->pcmsize[SE_CLICK04],SEPRW_ESP); break; case 70: case 90: case 110: se_adpcm1(zm_data->pcm[SE_CLICK06],zm_data->pcmsize[SE_CLICK06],SEPRW_ESP); break; case 130: se_adpcm1(zm_data->pcm[SE_CLICK05],zm_data->pcmsize[SE_CLICK05],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>240){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ /* `‚‚łɏS(^^; */ if(espunit_data->count>0){ /* sq`hmhmf */ esp_move(espunit_data->x ,espunit_data->y+8 ,(256*11)+0xC0); esp_move(espunit_data->x+16 ,espunit_data->y+8 ,(256*11)+0xC1); esp_move(espunit_data->x+32 ,espunit_data->y+8 ,(256*11)+0xC2); } if(espunit_data->count>20){ /* ehqrs s`qfds */ esp_move(espunit_data->x ,espunit_data->y+8 ,(256*11)+0xC3); esp_move(espunit_data->x+16 ,espunit_data->y+8 ,(256*11)+0xC4); esp_move(espunit_data->x+32 ,espunit_data->y+8 ,(256*11)+0xC5); esp_move(espunit_data->x+48 ,espunit_data->y+8 ,(256*11)+0xC6); esp_move(espunit_data->x+64 ,espunit_data->y+8 ,(256*11)+0xC7); } if(espunit_data->count>50){ /* */ esp_move(espunit_data->x+32 ,espunit_data->y+16 ,(256*11)+0xC8); /* _ */ esp_move(espunit_data->x+48 ,espunit_data->y+16 ,(256*11)+0xC9); esp_move(espunit_data->x+64 ,espunit_data->y+16 ,(256*11)+0xC9); esp_move(espunit_data->x+80 ,espunit_data->y+16 ,(256*11)+0xC8+(1<<14)); esp_move(espunit_data->x+32 ,espunit_data->y+32 ,(256*11)+0xCA); /* _ */ esp_move(espunit_data->x+32 ,espunit_data->y+48 ,(256*11)+0xCA); esp_move(espunit_data->x+80 ,espunit_data->y+32 ,(256*11)+0xCA+(1<<14)); esp_move(espunit_data->x+80 ,espunit_data->y+48 ,(256*11)+0xCA+(1<<14)); esp_move(espunit_data->x+32 ,espunit_data->y+64 ,(256*11)+0xC8+(1<<15)); /* _ */ esp_move(espunit_data->x+48 ,espunit_data->y+64 ,(256*11)+0xC9+(1<<15)); esp_move(espunit_data->x+64 ,espunit_data->y+64 ,(256*11)+0xC9+(1<<15)); esp_move(espunit_data->x+80 ,espunit_data->y+64 ,(256*11)+0xC8+(1<<14)+(1<<15)); } } else { if(espunit_data->count>70){ /* */ esp_move(espunit_data->x+65 ,espunit_data->y+40 ,(256*11)+0xD2); esp_move(espunit_data->x+81 ,espunit_data->y+24 ,(256*11)+0xD3); esp_move(espunit_data->x+97 ,espunit_data->y+8 ,(256*11)+0xD4); esp_move(espunit_data->x+113,espunit_data->y+8 ,(256*11)+0xD5); } if(espunit_data->count>50){ /* Rei */ esp_move(espunit_data->x+48 ,espunit_data->y+32 ,(256*11)+0xCB); esp_move(espunit_data->x+64 ,espunit_data->y+32 ,(256*11)+0xCC); esp_move(espunit_data->x+48 ,espunit_data->y+48 ,(256*11)+0xCD); esp_move(espunit_data->x+64 ,espunit_data->y+48 ,(256*11)+0xCE); } if(espunit_data->count>90){ /* target */ esp_move(espunit_data->x+40 ,espunit_data->y+66 ,(256*11)+0xCF); esp_move(espunit_data->x+56 ,espunit_data->y+66 ,(256*11)+0xD0); esp_move(espunit_data->x+72 ,espunit_data->y+66 ,(256*11)+0xD1); } if(espunit_data->count>110){ /* f[^ */ esp_move(espunit_data->x+96 ,espunit_data->y+32 ,(256*11)+0xD6); esp_move(espunit_data->x+112,espunit_data->y+32 ,(256*11)+0xD7); esp_move(espunit_data->x+128,espunit_data->y+32 ,(256*11)+0xD8); } if(espunit_data->count>130){ /* Rg */ esp_move(espunit_data->x+96 ,espunit_data->y+48 ,(256*11)+0xD9); esp_move(espunit_data->x+112,espunit_data->y+48 ,(256*11)+0xDA); esp_move(espunit_data->x+128,espunit_data->y+48 ,(256*11)+0xDB); } } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsPA[X}bv >>*/ void espunit_rsPA[X}bv(espunit_data) ESPUNIT_DATA *espunit_data; { short x,y; switch(espunit_data->count){ case 0: se_adpcm1(zm_data->pcm[SE_LOCK],zm_data->pcmsize[SE_LOCK],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>150){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ for(y=0;y<6;y++){ for(x=0;x<6;x++){ esp_move(espunit_data->x+(x*16),espunit_data->y+(y*16),(256*11)+0xC0+(6*y)+x); } } if(!((espunit_data->count>>4)&1)){ for(x=0;x<5;x++){ esp_move(espunit_data->x+(x*16),espunit_data->y+(y*16),(256*11)+0xC0+36+x); } } } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsP{X[_[ >>*/ void espunit_rsP{X[_[(espunit_data) ESPUNIT_DATA *espunit_data; { switch(espunit_data->count){ case 0: case 60: case 120: case 180: case 240: case 300: case 360: se_adpcm1(zm_data->pcm[SE_CAUTION],zm_data->pcmsize[SE_CAUTION],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>400){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ /* `‚‚łɏS(^^; */ if(espunit_data->count>0){ /* b`tshnm */ esp_move(espunit_data->x ,espunit_data->y-4 ,(256*11)+0x01+0x00); esp_move(espunit_data->x+16 ,espunit_data->y-4 ,(256*11)+0x01+0x01); esp_move(espunit_data->x+32 ,espunit_data->y-4 ,(256*11)+0x01+0x02); } if(espunit_data->count>50){ /* k`rs s`qfds */ esp_move(espunit_data->x ,espunit_data->y+8 ,(256*11)+0x01+0x03); esp_move(espunit_data->x+16 ,espunit_data->y+8 ,(256*11)+0x01+0x04); esp_move(espunit_data->x+32 ,espunit_data->y+8 ,(256*11)+0x01+0x05); esp_move(espunit_data->x+48 ,espunit_data->y+8 ,(256*11)+0x01+0x06); esp_move(espunit_data->x+64 ,espunit_data->y+8 ,(256*11)+0x01+0x07); } if(espunit_data->count>150){ /* */ esp_move(espunit_data->x+32 ,espunit_data->y+16 ,(256*11)+0x01+0x08); esp_move(espunit_data->x+48 ,espunit_data->y+16 ,(256*11)+0x01+0x09); esp_move(espunit_data->x+64 ,espunit_data->y+16 ,(256*11)+0x01+0x0A); esp_move(espunit_data->x+80 ,espunit_data->y+16 ,(256*11)+0x01+0x0B); esp_move(espunit_data->x+96 ,espunit_data->y+16 ,(256*11)+0x01+0x0C); esp_move(espunit_data->x+112,espunit_data->y+16 ,(256*11)+0x01+0x0D); esp_move(espunit_data->x+128,espunit_data->y+16 ,(256*11)+0x01+0x0E); esp_move(espunit_data->x+32 ,espunit_data->y+32 ,(256*11)+0x01+0x0F); esp_move(espunit_data->x+48 ,espunit_data->y+32 ,(256*11)+0x01+0x10); esp_move(espunit_data->x+64 ,espunit_data->y+32 ,(256*11)+0x01+0x11); esp_move(espunit_data->x+80 ,espunit_data->y+32 ,(256*11)+0x01+0x12); esp_move(espunit_data->x+96 ,espunit_data->y+32 ,(256*11)+0x01+0x13); esp_move(espunit_data->x+112,espunit_data->y+32 ,(256*11)+0x01+0x14); esp_move(espunit_data->x+128,espunit_data->y+32 ,(256*11)+0x01+0x15); esp_move(espunit_data->x+32 ,espunit_data->y+48 ,(256*11)+0x01+0x16); esp_move(espunit_data->x+48 ,espunit_data->y+48 ,(256*11)+0x01+0x17); esp_move(espunit_data->x+64 ,espunit_data->y+48 ,(256*11)+0x01+0x18); esp_move(espunit_data->x+80 ,espunit_data->y+48 ,(256*11)+0x01+0x19); esp_move(espunit_data->x+96 ,espunit_data->y+48 ,(256*11)+0x01+0x1A); esp_move(espunit_data->x+112,espunit_data->y+48 ,(256*11)+0x01+0x1B); esp_move(espunit_data->x+128,espunit_data->y+48 ,(256*11)+0x01+0x1C); esp_move(espunit_data->x+32 ,espunit_data->y+64 ,(256*11)+0x01+0x1D); esp_move(espunit_data->x+48 ,espunit_data->y+64 ,(256*11)+0x01+0x1E); esp_move(espunit_data->x+64 ,espunit_data->y+64 ,(256*11)+0x01+0x1F); esp_move(espunit_data->x+80 ,espunit_data->y+64 ,(256*11)+0x01+0x20); esp_move(espunit_data->x+96 ,espunit_data->y+64 ,(256*11)+0x01+0x21); esp_move(espunit_data->x+112,espunit_data->y+64 ,(256*11)+0x01+0x22); esp_move(espunit_data->x+128,espunit_data->y+64 ,(256*11)+0x01+0x23); esp_move(espunit_data->x+32 ,espunit_data->y+80 ,(256*11)+0x01+0x24); esp_move(espunit_data->x+48 ,espunit_data->y+80 ,(256*11)+0x01+0x25); esp_move(espunit_data->x+64 ,espunit_data->y+80 ,(256*11)+0x01+0x26); esp_move(espunit_data->x+80 ,espunit_data->y+80 ,(256*11)+0x01+0x27); esp_move(espunit_data->x+96 ,espunit_data->y+80 ,(256*11)+0x01+0x28); esp_move(espunit_data->x+112,espunit_data->y+80 ,(256*11)+0x01+0x29); esp_move(espunit_data->x+128,espunit_data->y+80 ,(256*11)+0x01+0x2A); esp_move(espunit_data->x+144,espunit_data->y+80 ,(256*11)+0x01+0x2B); esp_move(espunit_data->x+160,espunit_data->y+80 ,(256*11)+0x01+0x2C); esp_move(espunit_data->x+32 ,espunit_data->y+96 ,(256*11)+0x01+0x2D); esp_move(espunit_data->x+48 ,espunit_data->y+96 ,(256*11)+0x01+0x2E); esp_move(espunit_data->x+64 ,espunit_data->y+96 ,(256*11)+0x01+0x2F); esp_move(espunit_data->x+80 ,espunit_data->y+96 ,(256*11)+0x01+0x30); esp_move(espunit_data->x+96 ,espunit_data->y+96 ,(256*11)+0x01+0x31); esp_move(espunit_data->x+112,espunit_data->y+96 ,(256*11)+0x01+0x32); esp_move(espunit_data->x+128,espunit_data->y+96 ,(256*11)+0x01+0x33); } } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsP{Xj󃌁[U[ >>*/ void espunit_rsP{Xj󃌁[U[(espunit_data) ESPUNIT_DATA *espunit_data; { switch(espunit_data->count){ case 0: se_adpcm1(zm_data->pcm[SE_ADD],zm_data->pcmsize[SE_ADD],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ espunit_data->x+=espunit_data->dx; /* WύX */ espunit_data->y+=espunit_data->dy; if(espunit_data->y<-48){ /* NbsO */ espunit_data->type=-1; /* */ return; } /* NbsO͈͓ł΁Aȉ̏ */ esp_move(espunit_data->x+48,espunit_data->y- 8,(256*12)+0xBE); esp_move(espunit_data->x+40,espunit_data->y- 4,(256*12)+0xBE); esp_move(espunit_data->x+32,espunit_data->y ,(256*12)+0xBE); esp_move(espunit_data->x+24,espunit_data->y+ 4,(256*12)+0xBF); esp_move(espunit_data->x+16,espunit_data->y+ 8,(256*12)+0xBF); esp_move(espunit_data->x+ 8,espunit_data->y+12,(256*12)+0xBF); if(disp_cont->status&1){ esp_move(espunit_data->x ,espunit_data->y+14,(256*12)+0xBF); esp_move(espunit_data->x- 8,espunit_data->y+18,(256*12)+0xBF); esp_move(espunit_data->x-16,espunit_data->y+22,(256*12)+0xBF); esp_move(espunit_data->x-24,espunit_data->y+26,(256*12)+0xBF); } } /*---------------------------------------------------------<< rsPG}[WFV[ >>*/ void espunit_rsPً}(espunit_data) ESPUNIT_DATA *espunit_data; { static int i; switch(espunit_data->count){ case 0: case 60: case 120: se_adpcm1(zm_data->pcm[SE_WARNING],zm_data->pcmsize[SE_WARNING],SEPRW_ESP); break; case 140: se_adpcm1(zm_data->pcm[SE_NOISE],zm_data->pcmsize[SE_NOISE],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>180){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(espunit_data->count<140){ /* \ */ if(disp_cont->status&1){ /* ‚ */ for(i=0;i<7;i++)esp_move(espunit_data->x+16+(i*16),espunit_data->y+16,(256*11)+0xC0 +i); for(i=0;i<7;i++)esp_move(espunit_data->x+16+(i*16),espunit_data->y+32,(256*11)+0xC0+ 7+i); for(i=0;i<6;i++)esp_move(espunit_data->x+16+(i*16),espunit_data->y+48,(256*11)+0xC0+14+i); } else { if(espunit_data->count>40){ for(i=0;i<6;i++)esp_move(espunit_data->x+124+(i*16),espunit_data->y+ 32,(256*11)+0xC0+0x14+ i); for(i=0;i<6;i++)esp_move(espunit_data->x+124+(i*16),espunit_data->y+ 48,(256*11)+0xC0+0x14+ 6+i); for(i=0;i<6;i++)esp_move(espunit_data->x+124+(i*16),espunit_data->y+ 64,(256*11)+0xC0+0x14+12+i); for(i=0;i<6;i++)esp_move(espunit_data->x+124+(i*16),espunit_data->y+ 80,(256*11)+0xC0+0x14+18+i); for(i=0;i<6;i++)esp_move(espunit_data->x+124+(i*16),espunit_data->y+ 96,(256*11)+0xC0+0x14+24+i); for(i=0;i<6;i++)esp_move(espunit_data->x+124+(i*16),espunit_data->y+112,(256*11)+0xC0+0x14+30+i); } } } if(espunit_data->count>=140){ /* mCY */ for(i=0;i<7;i++)esp_move(espunit_data->x+16+(i*16),espunit_data->y+16,(256*11)+0xC0+0x38+rnd3()); for(i=0;i<7;i++)esp_move(espunit_data->x+16+(i*16),espunit_data->y+32,(256*11)+0xC0+0x38+rnd3()); for(i=0;i<7;i++)esp_move(espunit_data->x+16+(i*16),espunit_data->y+48,(256*11)+0xC0+0x38+rnd3()); if(espunit_data->count>40){ for(i=0;i<6;i++)esp_move(espunit_data->x+124+(i*16),espunit_data->y+ 32,(256*11)+0xC0+0x38+rnd3()); for(i=0;i<6;i++)esp_move(espunit_data->x+124+(i*16),espunit_data->y+ 48,(256*11)+0xC0+0x38+rnd3()); for(i=0;i<6;i++)esp_move(espunit_data->x+124+(i*16),espunit_data->y+ 64,(256*11)+0xC0+0x38+rnd3()); for(i=0;i<6;i++)esp_move(espunit_data->x+124+(i*16),espunit_data->y+ 80,(256*11)+0xC0+0x38+rnd3()); for(i=0;i<6;i++)esp_move(espunit_data->x+124+(i*16),espunit_data->y+ 96,(256*11)+0xC0+0x38+rnd3()); for(i=0;i<6;i++)esp_move(espunit_data->x+124+(i*16),espunit_data->y+112,(256*11)+0xC0+0x38+rnd3()); } } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsPJ^pg >>*/ void espunit_rsPJ^pg(espunit_data) ESPUNIT_DATA *espunit_data; { static short x,y; static int i; static short arg; static short offs2[]={6,6,6,4,4,2,2,0,0,0,2,2,4,4,6,6,6}; static short h_rev[]={0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1}; static short base[] ={5,5,5,5,5,5,5,5,5,5,-5,-5,-5,-5,-5,-5,-5}; espunit_data->count+=1; /* JE^ */ if(espunit_data->count>400){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ /* J^pgړ */ /* oĂ */ if(espunit_data->count<205){ espunit_data->y += espunit_data->dy; if(((espunit_data->count+17)&31)==0)espunit_data->dy+=(espunit_data->dy<0); } /* ΂炭AɏĂ */ if(espunit_data->count>=205){ if(espunit_data->y<256)espunit_data->y+=24; /* J^pg̓ */ } /* @ړ */ if(espunit_data->count==185){ jiki_cont->booster=1; /* u[X^[_ */ se_adpcm1(zm_data->pcm[SE_JIKIBURN],zm_data->pcmsize[SE_JIKIBURN],SEPRW_ESP); } if(espunit_data->count<205){ /* @̈ʒuA␳ */ jiki_data->x=espunit_data->x+49; jiki_data->y=espunit_data->y+120-16; } /* J^pgނ */ if(espunit_data->count==205){ /* Ɏ@i */ espunit_data->dy=-5; grp_data->dy0=-768; /* OtBbNI */ grp_data->dy3=-512; } if(espunit_data->count>205){ if((espunit_data->count&15)==0)espunit_data->dy+=1; jiki_data->y+=espunit_data->dy; /* @̓ */ if(jiki_data->y>220)jiki_data->y=220; } if(espunit_data->count==400){ /* @̋ړ */ jiki_cont->security=0; jiki_cont->freeze=0; jiki_cont->booster=0; } /* @\ */ /* u[h */ /* { */ i=0; arg=(disp_cont->status-i)&7; SP_DATAST(jiki_data->keepx[arg]+14+base[jiki_data->keeprot[arg]],jiki_data->keepy[arg]+12, 3 ,0x98+offs2[jiki_data->keeprot[arg]],0,h_rev[jiki_data->keeprot[arg]]) SP_DATAST(jiki_data->keepx[arg]+14+base[jiki_data->keeprot[arg]],jiki_data->keepy[arg]+28, 3 ,0x99+offs2[jiki_data->keeprot[arg]],0,h_rev[jiki_data->keeprot[arg]]) if(!(disp_cont->status&1)){ for(i=1;i<3;i++){ /* c */ arg=(disp_cont->status-i)&7; SP_DATAST(jiki_data->keepx[arg]+14+base[jiki_data->keeprot[arg]],jiki_data->keepy[arg]+12, 3 ,0x98+offs2[jiki_data->keeprot[arg]],0,h_rev[jiki_data->keeprot[arg]]) SP_DATAST(jiki_data->keepx[arg]+14+base[jiki_data->keeprot[arg]],jiki_data->keepy[arg]+28, 3 ,0x99+offs2[jiki_data->keeprot[arg]],0,h_rev[jiki_data->keeprot[arg]]) } for(i=3;i<6;i++){ /* c */ arg=(disp_cont->status-i)&7; SP_DATAST(jiki_data->keepx[arg]+14+base[jiki_data->keeprot[arg]],jiki_data->keepy[arg]+12, 2 ,0x98+offs2[jiki_data->keeprot[arg]],0,h_rev[jiki_data->keeprot[arg]]) SP_DATAST(jiki_data->keepx[arg]+14+base[jiki_data->keeprot[arg]],jiki_data->keepy[arg]+28, 2 ,0x99+offs2[jiki_data->keeprot[arg]],0,h_rev[jiki_data->keeprot[arg]]) } } if(jiki_cont->booster){ /* u[X^[ */ sp_data->sp_table->x=jiki_data->x+9-5; sp_data->sp_table->y=jiki_data->y+9-8+26; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.color=2; sp_data->sp_table->code.bit.code=0x5C+((disp_cont->status>>1)&3); sp_data->sp_table++; sp_data->sp_table->x=jiki_data->x+9+5; sp_data->sp_table->y=jiki_data->y+9-8+26; sp_data->sp_table->code.bit.h_rev=0; sp_data->sp_table->code.bit.v_rev=0; sp_data->sp_table->code.bit.color=2; sp_data->sp_table->code.bit.code=0x5C+((disp_cont->status>>1)&3); sp_data->sp_table++; } esp_move(jiki_data->x+1 ,jiki_data->y+1 ,(256*1)+0x7E); /* @ */ esp_move(jiki_data->x+1 ,jiki_data->y+17,(256*1)+0x7F); esp_move(jiki_data->x+17,jiki_data->y+1 ,(256*1)+0x7E+(1<<14)); esp_move(jiki_data->x+17,jiki_data->y+17,(256*1)+0x7F+(1<<14)); /* J^pg */ for(y=0;y<9;y++)esp_move(espunit_data->x+16,espunit_data->y+16+(y*16),(256*10)+0xC0+ y); for(y=0;y<4;y++)esp_move(espunit_data->x+32,espunit_data->y+80+(y*16),(256*10)+0xC0+9+y); for(y=0;y<7;y++){ esp_move(espunit_data->x+48,espunit_data->y+48+(y*16)-16 ,(256*10)+0xC0+0x0D+(y*2) ); esp_move(espunit_data->x+64,espunit_data->y+48+(y*16)-16 ,(256*10)+0xC0+0x0D+(y*2)+1); } } /*---------------------------------------------------------<< rsP >>*/ void espunit_rsP(espunit_data) ESPUNIT_DATA *espunit_data; { static short x,y; int i; static short ofs[]={1,1,2,2,3,3,4,4,4,5,5,5,5,6,6,6,7,7,8,9,10,11,12}; espunit_data->count+=1; /* JE^ */ if(espunit_data->count>240){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(espunit_data->dy<0)espunit_data->dy+=5; else espunit_data->dy=0; /* XN[ */ espunit_data->hy+=espunit_data->dy; espunit_data->y=espunit_data->hy/32; if(espunit_data->count<120){ /* */ if((disp_cont->status&7)==0){ int temp; temp=rnd3(); se_adpcm1(zm_data->pcm[SE_MIDBOMB1+temp],zm_data->pcmsize[SE_MIDBOMB1+temp],SEPRW_ESP); exp_appear(espunit_data->x-32+rnd63(),espunit_data->y-40+rnd63(),0,0,1); } for(i=0;iexp_max;i++){ /* */ if(exp_data[i]->type==-1)continue; if((exp_data[i]->count>>1)==0){ esp_move(exp_data[i]->x+9,y=exp_data[i]->y+9,(256*13)+0x65+(0<<15)+(0<<14)); } else { if(((exp_data[i]->count-1)>>1)<4){ esp_move(exp_data[i]->x,y=exp_data[i]->y,(256*13)+0x65+((exp_data[i]->count)>>1)+(0<<15)+(0<<14)); esp_move(exp_data[i]->x+16,y=exp_data[i]->y,(256*13)+0x65+((exp_data[i]->count)>>1)+(0<<15)+(1<<14)); esp_move(exp_data[i]->x,y=exp_data[i]->y+16,(256*13)+0x65+((exp_data[i]->count)>>1)+(1<<15)+(0<<14)); esp_move(exp_data[i]->x+16,y=exp_data[i]->y+16,(256*13)+0x65+((exp_data[i]->count)>>1)+(1<<15)+(1<<14)); } else { esp_move(exp_data[i]->x,y=exp_data[i]->y,(256*13)+0x69+((((exp_data[i]->count-1)>>1)-4)*4)+(0<<15)+(0<<14)); esp_move(exp_data[i]->x+16,y=exp_data[i]->y,(256*13)+0x6A+((((exp_data[i]->count-1)>>1)-4)*4)+(0<<15)+(0<<14)); esp_move(exp_data[i]->x,y=exp_data[i]->y+16,(256*13)+0x6B+((((exp_data[i]->count-1)>>1)-4)*4)+(0<<15)+(0<<14)); esp_move(exp_data[i]->x+16,y=exp_data[i]->y+16,(256*13)+0x6C+((((exp_data[i]->count-1)>>1)-4)*4)+(0<<15)+(0<<14)); } } } } if(espunit_data->count<120){ for(y=0;y<5;y++){ /* { */ for(x=0;x<6;x++){ esp_move(espunit_data->x-32+(x*16),espunit_data->y-24+(y*16),(256*9)+0xC0+(y*6)+x); } } } else { int s; short *trans; s=(espunit_data->count-120)/4; /* s 120JEgԂ̃ItZbgJbgďd݂‚JE^(^^; */ s+=1; /* s=0 ́AƂ̊GƓȂ̂ŃJbg */ // if(s<12){ /* PQp^[Ԃ̃Aj */ if(s<22){ /* QRp^[Ԃ̃Aj */ trans=SP_DEF_ADD(1)+(0x40*36*(s&1)); /* trans ͓]̒`GAւ̃|C^ */ datacpy(sp_data->transsp.tsp_buff[17]+(0x40*36*ofs[s]),SP_DEF_ADD(1)+(0x40*36*(s&1)),(0x80*36)/32); for(y=0;y<6;y++){ /* {̕\ */ for(x=0;x<6;x++){ esp_move(espunit_data->x-32+(x*16),espunit_data->y-40+(y*16),(256*9)+0x01+((s&1)*36)+(y*6)+x); } } } } if(espunit_data->count==120){ short *work; se_adpcm1(zm_data->pcm[SE_MIDBOMB4],zm_data->pcmsize[SE_MIDBOMB4],SEPRW_ESP); grp_data->fade=3; /* ʃtbVtF[h */ grp_data->fade_count=0; grp_data->send_palet=1; work=GRP_PAL_ADD; for(i=0;i<16;i++)grp_data->keep_palet[i]=*work++; for(i=0;i<16;i++)grp_data->next_palet[i]=65535; } if(espunit_data->count==239){ short *work; grp_data->fade=6; /* ʃtF[hAEg */ grp_data->fade_count=0; grp_data->send_palet=1; work=GRP_PAL_ADD; for(i=0;i<16;i++)grp_data->keep_palet[i]=0; sp_data->fade[1]=3; /* rotF[h̕ */ sp_data->fade[2]=3; sp_data->fade[3]=3; sp_data->fade_count[1]=0; sp_data->fade_count[2]=0; sp_data->fade_count[3]=0; sp_data->send_palet[1]=1; sp_data->send_palet[2]=1; sp_data->send_palet[3]=1; for(i=0;i<16;i++)sp_data->keep_palet[1][i]=0; for(i=0;i<16;i++)sp_data->keep_palet[2][i]=0; for(i=0;i<16;i++)sp_data->keep_palet[3][i]=0; } } /*-----------------------------------<< rsPJ^XiJ^pgpbZ[Wj >>*/ void espunit_rsPJ^X(espunit_data) ESPUNIT_DATA *espunit_data; { static short x,y; switch(espunit_data->count){ case 0: se_adpcm1(zm_data->pcm[SE_CLICK05],zm_data->pcmsize[SE_CLICK05],SEPRW_ESP); break; case 80: case 110: case 140: se_adpcm1(zm_data->pcm[SE_CLICK06],zm_data->pcmsize[SE_CLICK06],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>255){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ /* The last test flight... */ for(x=0;x<8;x++)esp_move(espunit_data->x+16+(x*16),espunit_data->y+16,(256*5)+0xDB+x); /* GET READY! */ if(espunit_data->count>30){ for(x=0;x<4;x++)esp_move(espunit_data->x+40+(x*16),espunit_data->y+30,(256*5)+0xE3+x); } if((espunit_data->count>80)&&(espunit_data->count<80+30)){ esp_move(espunit_data->x+120,espunit_data->y+66,(256*5)+0xEC); } if((espunit_data->count>110)&&(espunit_data->count<110+30)){ esp_move(espunit_data->x+120,espunit_data->y+66,(256*5)+0xED); } if((espunit_data->count>140)&&(espunit_data->count<140+30)){ esp_move(espunit_data->x+120,espunit_data->y+66,(256*5)+0xEE); } if((espunit_data->count>170)&&(espunit_data->count<170+30+55)){ esp_move(espunit_data->x+120,espunit_data->y+66,(256*5)+0xEF); } if(espunit_data->count>60){ /* Starting count */ for(x=0;x<4;x++)esp_move(espunit_data->x+76+(x*16),espunit_data->y+44,(256*5)+0xE7+x); /* */ esp_move(espunit_data->x+112,espunit_data->y+58,(256*5)+0xEB); esp_move(espunit_data->x+128,espunit_data->y+58,(256*5)+0xEB+(1<<14)); esp_move(espunit_data->x+112,espunit_data->y+74,(256*5)+0xEB+(1<<15)); esp_move(espunit_data->x+128,espunit_data->y+74,(256*5)+0xEB+(1<<14)+(1<<15)); } } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } 񌂂U@ύX̉”\ */ ene_data->type=63-(rnd2()==0); /* 2/3 ̊mŃ[U[ɃN */ ene_data->setdir[3]=0; /* oJ̃JE^Ɏg */ } } /* --- ʒu --- i{́j */ ene_data->hx+=ene_data->hdx; ene_data->hy+=ene_data->hdy; ene_data->x =ene_data->hx/32; ene_data->y =ene_data->hy/32; ene_data->count+=1; /* JE^{P */ ef_x = (ene_data->x - ene_data->size_x)/32; /* enemy field check */ ef_y = (ene_data->y - ene_data->size_y)/32; for(i=0;iearea_by[ene_data->type];i++){ for(c=0;cearea_bx[ene_data->type];c++){ if((ef_x+c)< 0)continue; /* NbsO */ if((ef_x+c)>=8)continue; if((ef_y+i)< 0)continue; if((ef_y+i)>=8)continue; *hit_cont->ene_field[ef_y+i][ef_x+c]++=e_sel; *hit_cont->ene_field[ef_y+i][ef_x+c] =-1; } } //C_LOCATE(0,0); //pri/*--------------------<< vg^Cv錾 >>---------------*/ void espunit_type0(ESPUNIT_DATA*); /* _~[֐ */ void espunit_rsPJnP(ESPUNIT_DATA*); /* rsPJńuceQv */ void espunit_rsPJnQ(ESPUNIT_DATA*); /* rsPJńurs`fdPv */ void espunit_rsPJnR(ESPUNIT_DATA*); /* rsPJn̉p */ void espunit_rsPڕWP(ESPUNIT_DATA*); /* rsPڕWP */ void espunit_rsPA[X}bv(ESPUNIT_DATA*); /* A[X}bv */ void espunit_rsP{X[_[(ESPUNIT_DATA*); /* {X[_[ */ void espunit_rsP{Xj󃌁[U[(ESPUNIT_DATA*); /* {Xj󃌁[U[ */ void espunit_rsPً}(ESPUNIT_DATA*); /* G}[WFV[ */ void espunit_rsPJ^pg(ESPUNIT_DATA*); /* J^pg */ void espunit_rsP(ESPUNIT_DATA*); /* */ void espunit_rsPJ^X(ESPUNIT_DATA*); /* J^pgpbZ[W */ m_data->pcmsize[SE_RIVCHG],SEPRW_RIVCHG); if((ene_data->count>=32)&&(ene_data->count<96)){ /* ό` */ ene_data->se_h#include #include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "..\\sepcm.h" #include "esp.h" #include "exp.h" #include "espunit2.h" /*--------------------- •ʂdro[` -------------------*/ /*---------------------------------------------------------<< rsQJńuceQv >>*/ void espunit_rsQJnP(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>287){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ esp_move(espunit_data->x-24 ,espunit_data->y ,(256*11)+0xC0-0xC0+1); esp_move(espunit_data->x-24+16,espunit_data->y ,(256*11)+0xC1-0xC0+1); esp_move(espunit_data->x-24+32,espunit_data->y ,(256*11)+0xC2-0xC0+1); esp_move(espunit_data->x-24 ,espunit_data->y+16,(256*11)+0xC3-0xC0+1); esp_move(espunit_data->x-24+16,espunit_data->y+16,(256*11)+0xC4-0xC0+1); esp_move(espunit_data->x-24+32,espunit_data->y+16,(256*11)+0xC5-0xC0+1); espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; } /*---------------------------------------------------------<< rsQJńurs`fdQv >>*/ void espunit_rsQJnQ(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>287){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ esp_move(espunit_data->x-40 ,espunit_data->y+8+2 ,(256*11)+0xC6-0xC0+1); esp_move(espunit_data->x-40+16,espunit_data->y+8+2 ,(256*11)+0xC7-0xC0+1); esp_move(espunit_data->x-40+32,espunit_data->y+8+2 ,(256*11)+0xC8-0xC0+1); esp_move(espunit_data->x-40+48,espunit_data->y+8+2 ,(256*11)+0xC9-0xC0+1); esp_move(espunit_data->x-40+64,espunit_data->y+8+2 ,(256*11)+0xCA-0xC0+1); espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsQJn̉p >>*/ void espunit_rsQJnR(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>250){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ esp_move(espunit_data->x-56 ,espunit_data->y+8+2 ,(256*11)+0xCB-0xC0+1); esp_move(espunit_data->x-56+16,espunit_data->y+8+2 ,(256*11)+0xCC-0xC0+1); esp_move(espunit_data->x-56+32,espunit_data->y+8+2 ,(256*11)+0xCD-0xC0+1); esp_move(espunit_data->x-56+48,espunit_data->y+8+2 ,(256*11)+0xCE-0xC0+1); esp_move(espunit_data->x-56+64,espunit_data->y+8+2 ,(256*11)+0xCF-0xC0+1); } } /*---------------------------------------------------------<< rsQR[Xw >>*/ void espunit_rsQR[Xw(espunit_data) ESPUNIT_DATA *espunit_data; { static int i; switch(espunit_data->count){ case 0: se_adpcm1(zm_data->pcm[SE_CLICK04],zm_data->pcmsize[SE_CLICK04],SEPRW_ESP); break; case 40: se_adpcm1(zm_data->pcm[SE_CLICK10],zm_data->pcmsize[SE_CLICK10],SEPRW_ESP); break; case 60: se_adpcm1(zm_data->pcm[SE_DISP1],zm_data->pcmsize[SE_DISP1],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>300){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ /* ‚ */ /* ̃bZ[W */ esp_move(espunit_data->x+16 ,espunit_data->y+16,(256*10)+0xC0-0xC0+0x11); esp_move(espunit_data->x+16+16,espunit_data->y+16,(256*10)+0xC1-0xC0+0x11); esp_move(espunit_data->x+16+32,espunit_data->y+16,(256*10)+0xC2-0xC0+0x11); esp_move(espunit_data->x+16+48,espunit_data->y+16,(256*10)+0xC3-0xC0+0x11); esp_move(espunit_data->x+16+64,espunit_data->y+16,(256*10)+0xC4-0xC0+0x11); esp_move(espunit_data->x+16+80,espunit_data->y+16,(256*10)+0xC5-0xC0+0x11); /* */ if(espunit_data->count>40)esp_move(espunit_data->x+16+48,espunit_data->y+32,(256*10)+0xC6-0xC0+0x11); } else { if(espunit_data->count>60){ /* }bv */ for(i=0;i<4;i++)esp_move(espunit_data->x+16+(16*i),espunit_data->y+48,(256*10)+0xC7+i-0xC0+0x11); for(i=0;i<4;i++)esp_move(espunit_data->x+16+(16*i),espunit_data->y+64,(256*10)+0xCB+i-0xC0+0x11); for(i=0;i<4;i++)esp_move(espunit_data->x+16+(16*i),espunit_data->y+80,(256*10)+0xCF+i-0xC0+0x11); for(i=0;i<4;i++)esp_move(espunit_data->x+16+(16*i),espunit_data->y+96,(256*10)+0xD3+i-0xC0+0x11); } if(espunit_data->count>80){ /* ̃bZ[W */ for(i=0;i<5;i++)esp_move(espunit_data->x+16+(16*i),espunit_data->y+112,(256*10)+0xD7+i-0xC0+0x11); for(i=0;i<5;i++)esp_move(espunit_data->x+16+(16*i),espunit_data->y+128,(256*10)+0xDC+i-0xC0+0x11); } } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsQAv[` >>*/ void espunit_rsQAv[`(espunit_data) ESPUNIT_DATA *espunit_data; { static int i; switch(espunit_data->count){ case 70: case 100: case 130: se_adpcm1(zm_data->pcm[SE_CLICK07],zm_data->pcmsize[SE_CLICK07],SEPRW_ESP); break; case 160: se_adpcm1(zm_data->pcm[SE_LOCK],zm_data->pcmsize[SE_LOCK],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>220){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ /* ‚ */ /* CAUTION */ if(!((disp_cont->status>>4)&1)){ esp_move(espunit_data->x+16 ,espunit_data->y+16,(256*10)+0xC0); esp_move(espunit_data->x+16+16,espunit_data->y+16,(256*10)+0xC1); esp_move(espunit_data->x+16+32,espunit_data->y+16,(256*10)+0xC2); esp_move(espunit_data->x+16+48,espunit_data->y+16,(256*10)+0xC3); } if(espunit_data->count>40){ /* bZ[W */ for(i=0;i<5;i++)esp_move(espunit_data->x+16+(16*i),espunit_data->y+32,(256*10)+0xC4+i); for(i=0;i<5;i++)esp_move(espunit_data->x+16+(16*i),espunit_data->y+48,(256*10)+0xC9+i); } if(espunit_data->count>70){ /* ƁAcount... */ esp_move(espunit_data->x+16+(16*5),espunit_data->y+16+16,(256*10)+0xCE); esp_move(espunit_data->x+16+(16*5),espunit_data->y+16+32,(256*10)+0xCF); esp_move(espunit_data->x+16+(16*6),espunit_data->y+16+32,(256*10)+0xD0); } /* */ if((espunit_data->count>=70)&&(espunit_data->count<100)){ /* R */ esp_move(espunit_data->x+16+(16*6),espunit_data->y+16+13,(256*10)+0xD1); } if((espunit_data->count>=100)&&(espunit_data->count<130)){ /* Q */ esp_move(espunit_data->x+16+(16*6),espunit_data->y+16+13,(256*10)+0xD2); } if((espunit_data->count>=130)&&(espunit_data->count<160)){ /* P */ esp_move(espunit_data->x+16+(16*6),espunit_data->y+16+13,(256*10)+0xD3); } } else { if(espunit_data->count>=160){ /* CONTACT. */ esp_move(espunit_data->x+16+(16*6),espunit_data->y+16+13,(256*10)+0xD4); esp_move(espunit_data->x+16+(16*7),espunit_data->y+16+13,(256*10)+0xD5); esp_move(espunit_data->x+16+(16*8),espunit_data->y+16+13,(256*10)+0xD6); esp_move(espunit_data->x+16+(16*9),espunit_data->y+16+13,(256*10)+0xD7); } } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsQ̋ >>*/ void espunit_rsQ̋(espunit_data) ESPUNIT_DATA *espunit_data; { static int i; espunit_data->count+=1; /* JE^ */ if(espunit_data->count>20){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ /* - - - - - */ for(i=0;i<16;i++)esp_move(16+(16*i),espunit_data->y+16 ,(256*10)+0xD8); /* inner */ for(i=0;i<5 ;i++)esp_move(80+(16*i),espunit_data->y+16-3 ,(256*10)+0xD9+i); /* our */ for(i=0;i<4 ;i++)esp_move(80+(16*i),espunit_data->y+16+10,(256*10)+0xDE+i); espunit_data->y+=espunit_data->dy; /* ֗ */ } /*---------------------------------------------------------<< rsQT[OtB >>*/ void espunit_rsQT[OtB(espunit_data) ESPUNIT_DATA *espunit_data; { static int i; switch(espunit_data->count){ case 0: case 60: case 120: case 180: case 240: case 300: se_adpcm1(zm_data->pcm[SE_WARNING],zm_data->pcmsize[SE_WARNING],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>300){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ /* ‚ */ if(!((disp_cont->status>>4)&1)){ /* v`qmhmf */ esp_move(espunit_data->x+16,espunit_data->y+16,(256*11)+0xC0); esp_move(espunit_data->x+32,espunit_data->y+16,(256*11)+0xC1); esp_move(espunit_data->x+48,espunit_data->y+16,(256*11)+0xC2); esp_move(espunit_data->x+64,espunit_data->y+16,(256*11)+0xC3); esp_move(espunit_data->x+80,espunit_data->y+16,(256*11)+0xC4); esp_move(espunit_data->x+96,espunit_data->y+16,(256*11)+0xC5); } if(espunit_data->count>100){ /* */ esp_move(espunit_data->x+16,espunit_data->y+32,(256*11)+0xC6); esp_move(espunit_data->x+32,espunit_data->y+32,(256*11)+0xC7); esp_move(espunit_data->x+48,espunit_data->y+32,(256*11)+0xC8); esp_move(espunit_data->x+64,espunit_data->y+32,(256*11)+0xC9); esp_move(espunit_data->x+80,espunit_data->y+32,(256*11)+0xCA); } if(espunit_data->count>120){ /* */ esp_move(espunit_data->x+64,espunit_data->y+48,(256*11)+0xCB); esp_move(espunit_data->x+64,espunit_data->y+64,(256*11)+0xCC); esp_move(espunit_data->x+80,espunit_data->y+64,(256*11)+0xCD); } } else { if(espunit_data->count>140){ for(i=0;i<4;i++){ /* T[OtB */ esp_move(espunit_data->x+ 96,espunit_data->y+64+(i*16),(256*11)+0xCE+(2*i)); esp_move(espunit_data->x+112,espunit_data->y+64+(i*16),(256*11)+0xCF+(2*i)); esp_move(espunit_data->x+128,espunit_data->y+64+(i*16),(256*11)+0xCF+(2*i)+(1<<14)); esp_move(espunit_data->x+144,espunit_data->y+64+(i*16),(256*11)+0xCE+(2*i)+(1<<14)); } /* THERMOGRAPHY̕ */ for(i=0;i<5;i++)esp_move(espunit_data->x+96+(i*16),espunit_data->y+128,(256*11)+0xD6+i); } } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsQT[ >>*/ void espunit_rsQT[(espunit_data) ESPUNIT_DATA *espunit_data; { static int i; espunit_data->count+=1; /* JE^ */ if(espunit_data->count>250){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ /* ‚ */ /* ŏ_ */ if(espunit_data->count<3*16){ if((espunit_data->count>>3)&1){ espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; return; } } /* */ esp_move(espunit_data->x+16+16,espunit_data->y+16,(256*11)+0xDB); esp_move(espunit_data->x+16+16,espunit_data->y+32,(256*11)+0xDC); esp_move(espunit_data->x+16+16,espunit_data->y+48,(256*11)+0xDD); esp_move(espunit_data->x+17 ,espunit_data->y+61,(256*11)+0xDE); esp_move(espunit_data->x+17 ,espunit_data->y+77,(256*11)+0xDC); esp_move(espunit_data->x+17 ,espunit_data->y+93,(256*11)+0xDD); } else { if(espunit_data->count>60){ for(i=0;i<5;i++){ /* ւ̖ */ esp_move(espunit_data->x+32+(i*16),espunit_data->y+64,(256*11)+0xDF+i); } } } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsQ >>*/ void espunit_rsQ(espunit_data) ESPUNIT_DATA *espunit_data; { static int i; switch(espunit_data->count){ case 0: se_adpcm1(zm_data->pcm[SE_CLICK05],zm_data->pcmsize[SE_CLICK05],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>240){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ /* ‚ */ /* */ if(!((espunit_data->count>>4)&1)){ if(((espunit_data->count+0)>>4)&1)esp_move(espunit_data->x+8,espunit_data->y+48,(256*11)+0xC0); if(((espunit_data->count-4)>>4)&1)esp_move(espunit_data->x+8,espunit_data->y+32,(256*11)+0xC0); if(((espunit_data->count-8)>>4)&1)esp_move(espunit_data->x+8,espunit_data->y+16,(256*11)+0xC0); } for(i=0;i<5;i++)esp_move(espunit_data->x-24+(i*16),espunit_data->y+64,(256*11)+0xC1+i); for(i=0;i<9;i++)esp_move(espunit_data->x-56+(i*16),espunit_data->y+80,(256*11)+0xC6+i); } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsQI[o[q[g >>*/ void espunit_rsQI[o[q[g(espunit_data) ESPUNIT_DATA *espunit_data; { static int i; switch(espunit_data->count){ case 0: se_adpcm1(zm_data->pcm[SE_LOCK],zm_data->pcmsize[SE_LOCK],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>340){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ /* ‚ */ /* */ esp_move(espunit_data->x+16,espunit_data->y+16,(256*11)+0xE4-36); esp_move(espunit_data->x+32,espunit_data->y+16,(256*11)+0xE5-36); esp_move(espunit_data->x+48,espunit_data->y+16,(256*11)+0xE5-36); esp_move(espunit_data->x+64,espunit_data->y+16,(256*11)+(1<<14)+0xE4-36); esp_move(espunit_data->x+16,espunit_data->y+32,(256*11)+0xE6-36); esp_move(espunit_data->x+16,espunit_data->y+48,(256*11)+0xE6-36); esp_move(espunit_data->x+64,espunit_data->y+32,(256*11)+(1<<14)+0xE6-36); esp_move(espunit_data->x+64,espunit_data->y+48,(256*11)+(1<<14)+0xE6-36); esp_move(espunit_data->x+16,espunit_data->y+64,(256*11)+(1<<15)+0xE4-36); esp_move(espunit_data->x+32,espunit_data->y+64,(256*11)+(1<<15)+0xE5-36); esp_move(espunit_data->x+48,espunit_data->y+64,(256*11)+(1<<15)+0xE5-36); esp_move(espunit_data->x+64,espunit_data->y+64,(256*11)+(1<<15)+(1<<14)+0xE4-36); /* @̊G */ esp_move(espunit_data->x+32,espunit_data->y+32,(256*11) +0xE7-36); esp_move(espunit_data->x+48,espunit_data->y+32,(256*11)+(1<<14)+0xE7-36); if((espunit_data->count>>2)&1){ esp_move(espunit_data->x+32,espunit_data->y+48,(256*11) +0xE8-36); esp_move(espunit_data->x+48,espunit_data->y+48,(256*11)+(1<<14)+0xE8-36); } else { esp_move(espunit_data->x+32,espunit_data->y+48,(256*11) +0xE9-36); esp_move(espunit_data->x+48,espunit_data->y+48,(256*11)+(1<<14)+0xE9-36); } /* */ for(i=0;i<5;i++)esp_move(espunit_data->x+56+(i*16),espunit_data->y+64,(256*11)+0xEA-36+i); } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsQI[o[q[gQ >>*/ void espunit_rsQI[o[q[gQ(espunit_data) ESPUNIT_DATA *espunit_data; { static int i; switch(espunit_data->count){ case 0: case 60: case 120: case 180: case 240: se_adpcm1(zm_data->pcm[SE_CAUTION],zm_data->pcmsize[SE_CAUTION],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>240){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; return; /* ‚ */ } /* CAUTION */ for(i=0;i<5;i++)esp_move(espunit_data->x+16+(i*16),espunit_data->y+16,(256*11)+0xEF-36+i); /* REDUCE SPEED */ if(((espunit_data->count>>4)&1)==0){ for(i=0;i<6;i++)esp_move(espunit_data->x+16+(i*16),espunit_data->y+32,(256*11)+0xF4-36+i); } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsQ OtBbNʂ̊ >>*/ void espunit_rsQfqoO(espunit_data) ESPUNIT_DATA *espunit_data; { if(espunit_data->count==0){ /* R[ɏݒ */ grp_data->onoff.bit.grp0_onoff=1; /* \I */ grp_data->send_onoff=1; /* ]vM */ grp_data->x0=256; /* W킹 */ grp_data->y0=256; grp_data->hx0=grp_data->x0*32; /* RQ{Wݒ */ grp_data->hy0=grp_data->y0*32; grp_data->dx0=0; /* XN[Xs[hݒ */ grp_data->dy0=-32*16; /* iPUhbg^t[j */ } if(espunit_data->count==16){ /* PUt[ŁAXN[wWX */ grp_data->x0=0; grp_data->hx0=0; } if(espunit_data->count==16+(32*4)){ /* 񂩃[vA鏀 */ grp_data->x0=256; grp_data->hx0=256*32; } if(espunit_data->count==16+(32*4)+16){ /* őSI */ grp_data->onoff.bit.grp0_onoff=0; /* \It */ grp_data->send_onoff=1; /* ]vM */ grp_data->dx0=0; /* XN[~߂ */ grp_data->dy0=0; espunit_data->type=-1; /* Mł */ return; } espunit_data->count+=1; /* JE^i߂ */ } ->ene_data[12]->count>=290)&&(ene_cont->ene_data[12]->count<330)){ if(ene_data->count&1){ int temp; temp=rnd3(); eneshot_appear(1,ene_data->x+2-rnd15(),ene_data->y,8*cost[(48-temp)&63],8*sint[(48-temp)&63],0,0,ene_data); } } break; case 3: ene_cont->ene_data[1]->x=ene_data->x+ 2; /* WǗ */ ene_cont->ene_data[1]->y=ene_data->y+ 8; if(ene_data->count==20){ ene_cont->ene_data[1]->type =31; ene_cont->ene_data[1]->hdy =0; ene_cont->ene_data[1]->anim1=0; ene_cont->ene_data[1]->anim2=0; } if(ene_data->count==40){ se_adpcm1(zm_data->pcm[/*--------------------<< vg^Cv錾 >>---------------*/ void espunit_rsQJnP(ESPUNIT_DATA*); void espunit_rsQJnQ(ESPUNIT_DATA*); void espunit_rsQJnR(ESPUNIT_DATA*); void espunit_rsQR[Xw(ESPUNIT_DATA*); void espunit_rsQAv[`(ESPUNIT_DATA*); void espunit_rsQ̋(ESPUNIT_DATA*); void espunit_rsQT[OtB(ESPUNIT_DATA*); void espunit_rsQT[(ESPUNIT_DATA*); void espunit_rsQ(ESPUNIT_DATA*); void espunit_rsQI[o[q[g(ESPUNIT_DATA*); void espunit_rsQI[o[q[gQ(ESPUNIT_DATA*); void espunit_rsQfqoO(ESPUNIT_DATA*); 3;i++){ for(c=0;c<3;c++){ if((ef_x+c)< 0)continue; /* NbsO */ if((ef_x+c)>=8)continue; if((ef_y+i)< 0)continue; if((ef_y+i)>=8)continue; *hit_cont->ene_field[ef_y+i][ef_x+c]++=e_sel; *hit_cont->ene_field[ef_y+i][ef_x+c] =-1; } } } /*--------------< GړB rsRbossarm_l >---------------*/ void enemove_rsRbossarm_l(ene_data) ENE_DATA *ene_#include #include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "..\\sepcm.h" #include "esp.h" #include "exp.h" #include "espunit3.h" /*--------------------- •ʂdro[` -------------------*/ /*---------------------------------------------------------<< rsRJńuceQv >>*/ void espunit_rsRJnP(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>287){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ esp_move(espunit_data->x-24 ,espunit_data->y ,(256*10)+0xC0-0xC0+1); esp_move(espunit_data->x-24+16,espunit_data->y ,(256*10)+0xC1-0xC0+1); esp_move(espunit_data->x-24+32,espunit_data->y ,(256*10)+0xC2-0xC0+1); esp_move(espunit_data->x-24 ,espunit_data->y+16,(256*10)+0xC3-0xC0+1); esp_move(espunit_data->x-24+16,espunit_data->y+16,(256*10)+0xC4-0xC0+1); esp_move(espunit_data->x-24+32,espunit_data->y+16,(256*10)+0xC5-0xC0+1); espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; } /*---------------------------------------------------------<< rsRJńurs`fdRv >>*/ void espunit_rsRJnQ(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>287){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ esp_move(espunit_data->x-40 ,espunit_data->y+8+2 ,(256*10)+0xC6-0xC0+1); esp_move(espunit_data->x-40+16,espunit_data->y+8+2 ,(256*10)+0xC7-0xC0+1); esp_move(espunit_data->x-40+32,espunit_data->y+8+2 ,(256*10)+0xC8-0xC0+1); esp_move(espunit_data->x-40+48,espunit_data->y+8+2 ,(256*10)+0xC9-0xC0+1); esp_move(espunit_data->x-40+64,espunit_data->y+8+2 ,(256*10)+0xCA-0xC0+1); espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsRJn̉p >>*/ void espunit_rsRJnR(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>250){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ esp_move(espunit_data->x-56 ,espunit_data->y+8+2 ,(256*10)+0xCB-0xC0+1); esp_move(espunit_data->x-56+16,espunit_data->y+8+2 ,(256*10)+0xCC-0xC0+1); esp_move(espunit_data->x-56+32,espunit_data->y+8+2 ,(256*10)+0xCD-0xC0+1); esp_move(espunit_data->x-56+48,espunit_data->y+8+2 ,(256*10)+0xCE-0xC0+1); esp_move(espunit_data->x-56+64,espunit_data->y+8+2 ,(256*10)+0xCF-0xC0+1); esp_move(espunit_data->x-56+80,espunit_data->y+8+2 ,(256*10)+0xD0-0xC0+1); } } /*---------------------------------------------------------<< rsRR[Xw >>*/ void espunit_rsRR[Xw(espunit_data) ESPUNIT_DATA *espunit_data; { static int i,c; switch(espunit_data->count){ case 0: se_adpcm1(zm_data->pcm[SE_DISP1],zm_data->pcmsize[SE_DISP1],SEPRW_ESP); break; case 40: case 80: case 100: se_adpcm1(zm_data->pcm[SE_CLICK01],zm_data->pcmsize[SE_CLICK01],SEPRW_ESP); break; case 60: se_adpcm1(zm_data->pcm[SE_CLICK04],zm_data->pcmsize[SE_CLICK04],SEPRW_ESP); break; case 120: se_adpcm1(zm_data->pcm[SE_CLICK05],zm_data->pcmsize[SE_CLICK05],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>250){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; return; /* ‚ */ } /* bntqbd l`o */ esp_move(espunit_data->x-32,espunit_data->y-32,(256*11)+0xEF); esp_move(espunit_data->x-16,espunit_data->y-32,(256*11)+0xF0); esp_move(espunit_data->x+ 0,espunit_data->y-32,(256*11)+0xF1); esp_move(espunit_data->x+16,espunit_data->y-32,(256*11)+0xF2); esp_move(espunit_data->x+32,espunit_data->y-32,(256*11)+0xF3); esp_move(espunit_data->x+48,espunit_data->y-32,(256*11)+0xF4); esp_move(espunit_data->x+64,espunit_data->y-32,(256*11)+0xF5); esp_move(espunit_data->x+80,espunit_data->y-32,(256*11)+0xF6); if(espunit_data->count> 40){ /* ڕW|Cg... */ esp_move(espunit_data->x+ 0,espunit_data->y ,(256*11)+0xD0); esp_move(espunit_data->x+16,espunit_data->y ,(256*11)+0xD1); esp_move(espunit_data->x+16,espunit_data->y-16 ,(256*11)+0xD2); esp_move(espunit_data->x+32,espunit_data->y-16 ,(256*11)+0xD3); esp_move(espunit_data->x+48,espunit_data->y-16 ,(256*11)+0xD4); } if(espunit_data->count> 60){ /* EF[uR[X̐Ԗ */ if((espunit_data->count>>4)&1){ esp_move(espunit_data->x+ 0,espunit_data->y ,(256*11)+0xDD); esp_move(espunit_data->x+16,espunit_data->y ,(256*11)+0xDE); esp_move(espunit_data->x+16,espunit_data->y+16 ,(256*11)+0xDF); esp_move(espunit_data->x+32,espunit_data->y+16 ,(256*11)+0xE0); esp_move(espunit_data->x+32,espunit_data->y+32 ,(256*11)+0xE1); } } if(espunit_data->count>80){ /* EF[uR[X */ esp_move(espunit_data->x+48,espunit_data->y+16 ,(256*11)+0xD5); esp_move(espunit_data->x+64,espunit_data->y+ 0 ,(256*11)+0xD6); esp_move(espunit_data->x+80,espunit_data->y+ 0 ,(256*11)+0xD7); } if(espunit_data->count>100){ /* ݈ʒu */ esp_move(espunit_data->x-16,espunit_data->y+64 ,(256*11)+0xD8); esp_move(espunit_data->x+ 0,espunit_data->y+64 ,(256*11)+0xD9); esp_move(espunit_data->x+16,espunit_data->y+64 ,(256*11)+0xDA); esp_move(espunit_data->x+32,espunit_data->y+64 ,(256*11)+0xDB); esp_move(espunit_data->x+32,espunit_data->y+48 ,(256*11)+0xDC); } if(espunit_data->count>120){ /* p */ esp_move(espunit_data->x+ 66,espunit_data->y+24 ,(256*11)+0xE2); esp_move(espunit_data->x+ 82,espunit_data->y+24 ,(256*11)+0xE3); esp_move(espunit_data->x+ 98,espunit_data->y+24 ,(256*11)+0xE4); esp_move(espunit_data->x+114,espunit_data->y+24 ,(256*11)+0xE5); esp_move(espunit_data->x+ 66,espunit_data->y+40 ,(256*11)+0xE6); esp_move(espunit_data->x+ 82,espunit_data->y+40 ,(256*11)+0xE7); esp_move(espunit_data->x+ 98,espunit_data->y+40 ,(256*11)+0xE8); esp_move(espunit_data->x+114,espunit_data->y+40 ,(256*11)+0xE9); esp_move(espunit_data->x+ 66,espunit_data->y+56 ,(256*11)+0xEA); esp_move(espunit_data->x+ 82,espunit_data->y+56 ,(256*11)+0xEB); esp_move(espunit_data->x+ 98,espunit_data->y+56 ,(256*11)+0xEC); esp_move(espunit_data->x+114,espunit_data->y+56 ,(256*11)+0xED); esp_move(espunit_data->x+130,espunit_data->y+56 ,(256*11)+0xEE); } for(i=0;i<4;i++){ /* }bv */ esp_move(espunit_data->x+ 0,espunit_data->y+(i*16) ,(256*11)+0xC0+(i*4)); esp_move(espunit_data->x+16,espunit_data->y+(i*16) ,(256*11)+0xC1+(i*4)); esp_move(espunit_data->x+32,espunit_data->y+(i*16) ,(256*11)+0xC2+(i*4)); esp_move(espunit_data->x+48,espunit_data->y+(i*16) ,(256*11)+0xC3+(i*4)); } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsRtB[h >>*/ void espunit_rsRtB[h(espunit_data) ESPUNIT_DATA *espunit_data; { static int i,c; static offs[]={0,6,12,18,24,18,12,6}; static h_rev[]={0,0,0,0,0,1,1,1}; switch(espunit_data->count){ case 0: se_adpcm1(zm_data->pcm[SE_LOCK],zm_data->pcmsize[SE_LOCK],SEPRW_ESP); break; case 70: se_adpcm1(zm_data->pcm[SE_DISP2],zm_data->pcmsize[SE_DISP2],SEPRW_ESP); break; case 130: se_adpcm1(zm_data->pcm[SE_CLICK05],zm_data->pcmsize[SE_CLICK05],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>450){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ //if(disp_cont->status&1)return; /* ‚ */ if(!((espunit_data->count>>4)&1)){ /* b`tshnm */ esp_move(espunit_data->x+ 0,espunit_data->y ,(256*11)+0xC0-0xC0+1); esp_move(espunit_data->x+16,espunit_data->y ,(256*11)+0xC1-0xC0+1); esp_move(espunit_data->x+32,espunit_data->y ,(256*11)+0xC2-0xC0+1); esp_move(espunit_data->x+48,espunit_data->y ,(256*11)+0xC3-0xC0+1); esp_move(espunit_data->x+64,espunit_data->y ,(256*11)+0xC4-0xC0+1); } if(espunit_data->count>40){ /* OPEN PROTECTION FIELD. */ esp_move(espunit_data->x+16,espunit_data->y+16,(256*11)+0xC5-0xC0+1); esp_move(espunit_data->x+32,espunit_data->y+16,(256*11)+0xC6-0xC0+1); esp_move(espunit_data->x+48,espunit_data->y+16,(256*11)+0xC7-0xC0+1); esp_move(espunit_data->x+64,espunit_data->y+16,(256*11)+0xC8-0xC0+1); esp_move(espunit_data->x+ 16,espunit_data->y+32,(256*11)+0xC9-0xC0+1); esp_move(espunit_data->x+ 32,espunit_data->y+32,(256*11)+0xCA-0xC0+1); esp_move(espunit_data->x+ 48,espunit_data->y+32,(256*11)+0xCB-0xC0+1); esp_move(espunit_data->x+ 64,espunit_data->y+32,(256*11)+0xCC-0xC0+1); esp_move(espunit_data->x+ 80,espunit_data->y+32,(256*11)+0xCD-0xC0+1); esp_move(espunit_data->x+ 96,espunit_data->y+32,(256*11)+0xCE-0xC0+1); esp_move(espunit_data->x+112,espunit_data->y+32,(256*11)+0xCF-0xC0+1); esp_move(espunit_data->x+128,espunit_data->y+32,(256*11)+0xD0-0xC0+1); } if(espunit_data->count>70){ /* @̊G */ if(h_rev[(espunit_data->count>>2)&7]==0){ esp_move(espunit_data->x+ 48,espunit_data->y+48,(256*11)+0xD1-0xC0+1 +offs[(espunit_data->count>>2)&7]); esp_move(espunit_data->x+ 64,espunit_data->y+48,(256*11)+0xD2-0xC0+1 +offs[(espunit_data->count>>2)&7]); esp_move(espunit_data->x+ 48,espunit_data->y+64,(256*11)+0xD3-0xC0+1 +offs[(espunit_data->count>>2)&7]); esp_move(espunit_data->x+ 64,espunit_data->y+64,(256*11)+0xD4-0xC0+1 +offs[(espunit_data->count>>2)&7]); esp_move(espunit_data->x+ 48,espunit_data->y+80,(256*11)+0xD5-0xC0+1 +offs[(espunit_data->count>>2)&7]); esp_move(espunit_data->x+ 64,espunit_data->y+80,(256*11)+0xD6-0xC0+1 +offs[(espunit_data->count>>2)&7]); esp_move(espunit_data->x+ 48,espunit_data->y+96,(256*11)+0xD1-0xC0+1+(1<<15)+offs[(espunit_data->count>>2)&7]); esp_move(espunit_data->x+ 64,espunit_data->y+96,(256*11)+0xD2-0xC0+1+(1<<15)+offs[(espunit_data->count>>2)&7]); } else { esp_move(espunit_data->x+ 64,espunit_data->y+48,(256*11)+0xD1-0xC0+1 +(1<<14)+offs[(espunit_data->count>>2)&7]); esp_move(espunit_data->x+ 48,espunit_data->y+48,(256*11)+0xD2-0xC0+1 +(1<<14)+offs[(espunit_data->count>>2)&7]); esp_move(espunit_data->x+ 64,espunit_data->y+64,(256*11)+0xD3-0xC0+1 +(1<<14)+offs[(espunit_data->count>>2)&7]); esp_move(espunit_data->x+ 48,espunit_data->y+64,(256*11)+0xD4-0xC0+1 +(1<<14)+offs[(espunit_data->count>>2)&7]); esp_move(espunit_data->x+ 64,espunit_data->y+80,(256*11)+0xD5-0xC0+1 +(1<<14)+offs[(espunit_data->count>>2)&7]); esp_move(espunit_data->x+ 48,espunit_data->y+80,(256*11)+0xD6-0xC0+1 +(1<<14)+offs[(espunit_data->count>>2)&7]); esp_move(espunit_data->x+ 64,espunit_data->y+96,(256*11)+0xD1-0xC0+1+(1<<15)+(1<<14)+offs[(espunit_data->count>>2)&7]); esp_move(espunit_data->x+ 48,espunit_data->y+96,(256*11)+0xD2-0xC0+1+(1<<15)+(1<<14)+offs[(espunit_data->count>>2)&7]); } } if(espunit_data->count>100){ /* ̖ */ esp_move(espunit_data->x+ 64,espunit_data->y+96,(256*11)+0xEF-0xC0+1); esp_move(espunit_data->x+ 80,espunit_data->y+96,(256*11)+0xF0-0xC0+1); esp_move(espunit_data->x+ 96,espunit_data->y+96,(256*11)+0xF1-0xC0+1); esp_move(espunit_data->x+112,espunit_data->y+96,(256*11)+0xF2-0xC0+1); esp_move(espunit_data->x+128,espunit_data->y+96,(256*11)+0xF3-0xC0+1); } if(espunit_data->count>130){ /* ̉p */ esp_move(espunit_data->x+ 96,espunit_data->y+48,(256*11)+0xF4-0xC0+1); esp_move(espunit_data->x+112,espunit_data->y+48,(256*11)+0xF5-0xC0+1); esp_move(espunit_data->x+128,espunit_data->y+48,(256*11)+0xF6-0xC0+1); esp_move(espunit_data->x+144,espunit_data->y+48,(256*11)+0xF7-0xC0+1); esp_move(espunit_data->x+160,espunit_data->y+48,(256*11)+0xF8-0xC0+1); esp_move(espunit_data->x+176,espunit_data->y+48,(256*11)+0xF9-0xC0+1); esp_move(espunit_data->x+ 96,espunit_data->y+64,(256*11)+0xFA-0xC0+1); esp_move(espunit_data->x+112,espunit_data->y+64,(256*11)+0xFB-0xC0+1); esp_move(espunit_data->x+128,espunit_data->y+64,(256*11)+0xFC-0xC0+1); esp_move(espunit_data->x+144,espunit_data->y+64,(256*11)+0xFD-0xC0+1); esp_move(espunit_data->x+160,espunit_data->y+64,(256*11)+0xFE-0xC0+1); } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsRǂd >>*/ void espunit_rsRǂd(espunit_data) ESPUNIT_DATA *espunit_data; { static int i,c; switch(espunit_data->count){ case 0: se_adpcm1(zm_data->pcm[SE_CLICK04],zm_data->pcmsize[SE_CLICK04],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>160){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ /* mhbd vnqj */ if((!((espunit_data->count>>4)&1))||(espunit_data->count>=128)){ esp_move(espunit_data->x+ 0,espunit_data->y ,(256*11)+0xC0); esp_move(espunit_data->x+ 16,espunit_data->y ,(256*11)+0xC1); esp_move(espunit_data->x+ 32,espunit_data->y ,(256*11)+0xC2); esp_move(espunit_data->x+ 48,espunit_data->y ,(256*11)+0xC3); esp_move(espunit_data->x+ 64,espunit_data->y ,(256*11)+0xC4); esp_move(espunit_data->x+ 80,espunit_data->y ,(256*11)+0xC5); esp_move(espunit_data->x+ 96,espunit_data->y ,(256*11)+0xC6); esp_move(espunit_data->x+112,espunit_data->y ,(256*11)+0xC7); esp_move(espunit_data->x+128,espunit_data->y ,(256*11)+0xC8); } /* SUCCESS]X */ esp_move(espunit_data->x+ 0,espunit_data->y+22,(256*11)+0xC9); esp_move(espunit_data->x+ 16,espunit_data->y+22,(256*11)+0xCA); esp_move(espunit_data->x+ 32,espunit_data->y+22,(256*11)+0xCB); esp_move(espunit_data->x+ 48,espunit_data->y+22,(256*11)+0xCC); esp_move(espunit_data->x+ 64,espunit_data->y+22,(256*11)+0xCD); esp_move(espunit_data->x+ 80,espunit_data->y+22,(256*11)+0xCE); esp_move(espunit_data->x+ 96,espunit_data->y+22,(256*11)+0xCF); esp_move(espunit_data->x+112,espunit_data->y+22,(256*11)+0xD0); espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsR{X[_[ >>*/ void espunit_rsR{X[_[(espunit_data) ESPUNIT_DATA *espunit_data; { static int i,c; switch(espunit_data->count){ case 0: case 60: case 120: case 180: case 240: case 300: case 360: case 420: se_adpcm1(zm_data->pcm[SE_WARNING],zm_data->pcmsize[SE_WARNING],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>450){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; return; /* ‚ */ } /* v`qmhmf */ esp_move(espunit_data->x+ 0,espunit_data->y,(256*11)+0xC0); esp_move(espunit_data->x+16,espunit_data->y,(256*11)+0xC1); esp_move(espunit_data->x+32,espunit_data->y,(256*11)+0xC2); esp_move(espunit_data->x+48,espunit_data->y,(256*11)+0xC3); esp_move(espunit_data->x+64,espunit_data->y,(256*11)+0xC4); esp_move(espunit_data->x+80,espunit_data->y,(256*11)+0xC5); if(espunit_data->count>50){ /* p */ esp_move(espunit_data->x+16,espunit_data->y+16 ,(256*11)+0xC6); esp_move(espunit_data->x+32,espunit_data->y+16 ,(256*11)+0xC7); esp_move(espunit_data->x+48,espunit_data->y+16 ,(256*11)+0xC8); esp_move(espunit_data->x+64,espunit_data->y+16 ,(256*11)+0xC9); esp_move(espunit_data->x+80,espunit_data->y+16 ,(256*11)+0xCA); esp_move(espunit_data->x+16,espunit_data->y+32 ,(256*11)+0xCB); esp_move(espunit_data->x+32,espunit_data->y+32 ,(256*11)+0xCC); esp_move(espunit_data->x+48,espunit_data->y+32 ,(256*11)+0xCD); esp_move(espunit_data->x+64,espunit_data->y+32 ,(256*11)+0xCE); } if(espunit_data->count>80){ /* */ esp_move(espunit_data->x+48,espunit_data->y+38 ,(256*11)+0xCF); esp_move(espunit_data->x+64,espunit_data->y+54 ,(256*11)+0xD0); } if(espunit_data->count>110){ /* {{ */ /* { */ for(i=0;i<5;i++){ esp_move(espunit_data->x+ 48+32,espunit_data->y+70+(i*16)-30,(256*11)+0xD4+i); esp_move(espunit_data->x+ 64+32,espunit_data->y+70+(i*16)-30,(256*11)+0xD9+i); esp_move(espunit_data->x+ 80+32,espunit_data->y+70+(i*16)-30,(256*11)+0xDE+i); esp_move(espunit_data->x+ 96+32,espunit_data->y+70+(i*16)-30,(256*11)+0xD9+i+(1<<14)); esp_move(espunit_data->x+112+32,espunit_data->y+70+(i*16)-30,(256*11)+0xD4+i+(1<<14)); } /* nR */ for(i=0;i<5;i++){ esp_move(espunit_data->x+ 32+32,espunit_data->y+70+(i*16)-30,(256*11)+0xD3); /* b */ esp_move(espunit_data->x+128+32,espunit_data->y+70+(i*16)-30,(256*11)+0xD3+(1<<14)); /* bE */ esp_move(espunit_data->x+ 48+32+(i*16),espunit_data->y+54 -30,(256*11)+0xD2); /* | */ esp_move(espunit_data->x+ 48+32+(i*16),espunit_data->y+150-30,(256*11)+0xD2+(1<<15)); /* | */ } esp_move(espunit_data->x+ 32+32,espunit_data->y+54-30,(256*11)+0xD1); esp_move(espunit_data->x+128+32,espunit_data->y+54-30,(256*11)+0xD1+(1<<14)); esp_move(espunit_data->x+ 32+32,espunit_data->y+150-30,(256*11)+0xD1+(1<<15)); esp_move(espunit_data->x+128+32,espunit_data->y+150-30,(256*11)+0xD1+(1<<15)+(1<<14)); /* u[_[C[Wvĕ */ esp_move(espunit_data->x+ 48+32,espunit_data->y+150-30,(256*11)+0xE3); esp_move(espunit_data->x+ 64+32,espunit_data->y+150-30,(256*11)+0xE4); esp_move(espunit_data->x+ 80+32,espunit_data->y+150-30,(256*11)+0xE5); esp_move(espunit_data->x+ 96+32,espunit_data->y+150-30,(256*11)+0xE6); esp_move(espunit_data->x+112+32,espunit_data->y+150-30,(256*11)+0xE7); } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; }  if(ene_data->anim2 < BS_CENTER)ene_data->anim2+=1; } if(ene_data->anim2<0)ene_data->anim2=0; if(ene_data->anim2>BS_MAX)ene_data->anim2=BS_MAX; ene_data->anim3=ene_data->anim2/BS_CWIDTH; /* --- ʒu/*--------------------<< vg^Cv錾 >>---------------*/ void espunit_rsRJnP(ESPUNIT_DATA*); void espunit_rsRJnQ(ESPUNIT_DATA*); void espunit_rsRJnR(ESPUNIT_DATA*); void espunit_rsRR[Xw(ESPUNIT_DATA*); void espunit_rsRtB[h(ESPUNIT_DATA*); void espunit_rsRǂd(ESPUNIT_DATA*); void espunit_rsR{X[_[(ESPUNIT_DATA*); ield check */ ef_y = (ene_data->y - ene_data->size_y)/32; for(i=0;i<3;i++){ for(c=0;c<3;c++){ if((ef_x+c)< 0)continue; /* NbsO */ if((ef_x+c)>=8)continue; if((ef_y+i)< 0)continue; if((ef_y+i)>=8)continue; *hit_cont->ene_field[ef_y+i][ef_x+c]++=e_sel; *hit_cont->ene_field[ef_y+i][ef_x+c] =-1; } } } /*--------------< GړB rsRbossatt2 >---------------*/ void enemove_rsRbossatt2(ene_data) ENE_DATA *ene_data; { static short ef_x; /* enemy field ̍ʒu */ static short ef_y; static int i,c; switch(ene_data->anim1){ case 0: /* UJn */ if(enSPUNIT4C #8OSPUNIT4H v~#LTSPUNIT5C #M'SPUNIT5H ZX"s6SPUNIT6C #u/SPUNIT6H ~#VENT1 C 2Wb/VENT1 H [MK!xVENT2 C 2WVENT2 H [MK!xVENT3 C 2WI)VENT3 H [MK!xVENT4 C 2W0VENT4 H [MK!xVENT5 C 2WkVENT5 H !xVENT6 C 2WM!VENT6 H ƙ!xVENTMACH ROT"VENTO C #VENTO H 꾌!~XARRAY H z#/XEMOVE1C k#XEMOVE1H E#lXEMOVEAC #XEMOVEAH r# XEMOVEBC o#AXEMOVEBH -#4XEMOVECC #XEMOVECH v#=DXEMOVEDC #>umXEMOVEDH #Z#include #include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "..\\sepcm.h" #include "esp.h" #include "exp.h" #include "espunit4.h" /*--------------------- •ʂdro[` -------------------*/ /*---------------------------------------------------------<< rsSJńuceQv >>*/ void espunit_rsSJnP(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>287){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ esp_move(espunit_data->x-24 ,espunit_data->y ,(256*9)+0xC0-0xC0+0x40); esp_move(espunit_data->x-24+16,espunit_data->y ,(256*9)+0xC1-0xC0+0x40); esp_move(espunit_data->x-24+32,espunit_data->y ,(256*9)+0xC2-0xC0+0x40); esp_move(espunit_data->x-24 ,espunit_data->y+16,(256*9)+0xC3-0xC0+0x40); esp_move(espunit_data->x-24+16,espunit_data->y+16,(256*9)+0xC4-0xC0+0x40); esp_move(espunit_data->x-24+32,espunit_data->y+16,(256*9)+0xC5-0xC0+0x40); espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; } /*---------------------------------------------------------<< rsSJńurs`fdSv >>*/ void espunit_rsSJnQ(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>287){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ esp_move(espunit_data->x-40 ,espunit_data->y+8+2 ,(256*9)+0xC6-0xC0+0x40); esp_move(espunit_data->x-40+16,espunit_data->y+8+2 ,(256*9)+0xC7-0xC0+0x40); esp_move(espunit_data->x-40+32,espunit_data->y+8+2 ,(256*9)+0xC8-0xC0+0x40); esp_move(espunit_data->x-40+48,espunit_data->y+8+2 ,(256*9)+0xC9-0xC0+0x40); esp_move(espunit_data->x-40+64,espunit_data->y+8+2 ,(256*9)+0xCA-0xC0+0x40); espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsSJn̉p >>*/ void espunit_rsSJnR(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>250){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ esp_move(espunit_data->x-56 ,espunit_data->y+8+2 ,(256*9)+0xCB-0xC0+0x40); esp_move(espunit_data->x-56+16,espunit_data->y+8+2 ,(256*9)+0xCC-0xC0+0x40); esp_move(espunit_data->x-56+32,espunit_data->y+8+2 ,(256*9)+0xCD-0xC0+0x40); esp_move(espunit_data->x-56+48,espunit_data->y+8+2 ,(256*9)+0xCE-0xC0+0x40); esp_move(espunit_data->x-56+64,espunit_data->y+8+2 ,(256*9)+0xCF-0xC0+0x40); } } /*---------------------------------------------------------<< rsSX^[g >>*/ void espunit_rsSX^[g(espunit_data) ESPUNIT_DATA *espunit_data; { switch(espunit_data->count){ case 0: se_adpcm1(zm_data->pcm[SE_CLICK05],zm_data->pcmsize[SE_CLICK05],SEPRW_ESP); break; case 80: se_adpcm1(zm_data->pcm[SE_DISP1],zm_data->pcmsize[SE_DISP1],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>250){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; return; } if(!((espunit_data->count>>4)&1)){ /* ATTACK THE */ esp_move(espunit_data->x ,espunit_data->y ,(256*10)+0xC0-0xC0+10); esp_move(espunit_data->x+16,espunit_data->y ,(256*10)+0xC1-0xC0+10); esp_move(espunit_data->x+32,espunit_data->y ,(256*10)+0xC2-0xC0+10); esp_move(espunit_data->x+48,espunit_data->y ,(256*10)+0xC3-0xC0+10); esp_move(espunit_data->x+64,espunit_data->y ,(256*10)+0xC4-0xC0+10); esp_move(espunit_data->x+80,espunit_data->y ,(256*10)+0xC5-0xC0+10); esp_move(espunit_data->x+96,espunit_data->y ,(256*10)+0xC6-0xC0+10); /* ENEMY BASE */ esp_move(espunit_data->x+ 16,espunit_data->y+16 ,(256*10)+0xC7-0xC0+10); esp_move(espunit_data->x+ 32,espunit_data->y+16 ,(256*10)+0xC8-0xC0+10); esp_move(espunit_data->x+ 48,espunit_data->y+16 ,(256*10)+0xC9-0xC0+10); esp_move(espunit_data->x+ 64,espunit_data->y+16 ,(256*10)+0xCA-0xC0+10); esp_move(espunit_data->x+ 80,espunit_data->y+16 ,(256*10)+0xCB-0xC0+10); esp_move(espunit_data->x+ 96,espunit_data->y+16 ,(256*10)+0xCC-0xC0+10); esp_move(espunit_data->x+112,espunit_data->y+16 ,(256*10)+0xCD-0xC0+10); esp_move(espunit_data->x+128,espunit_data->y+16 ,(256*10)+0xCE-0xC0+10); } if(espunit_data->count>40){ /* p */ esp_move(espunit_data->x +16,espunit_data->y+32 ,(256*10)+0xCF-0xC0+10); esp_move(espunit_data->x+16+16,espunit_data->y+32 ,(256*10)+0xD0-0xC0+10); esp_move(espunit_data->x+32+16,espunit_data->y+32 ,(256*10)+0xD1-0xC0+10); esp_move(espunit_data->x+48+16,espunit_data->y+32 ,(256*10)+0xD2-0xC0+10); esp_move(espunit_data->x+64+16,espunit_data->y+32 ,(256*10)+0xD3-0xC0+10); esp_move(espunit_data->x+80+16,espunit_data->y+32 ,(256*10)+0xD4-0xC0+10); esp_move(espunit_data->x+96+16,espunit_data->y+32 ,(256*10)+0xD5-0xC0+10); } if(espunit_data->count>60){ /* */ esp_move(espunit_data->x+104+16,espunit_data->y+40 ,(256*10)+0xD6-0xC0+10); } if(espunit_data->count>80){ /* */ esp_move(espunit_data->x+48+72+16,espunit_data->y+64-24 ,(256*10)+0xD7-0xC0+10); esp_move(espunit_data->x+64+72+16,espunit_data->y+64-24 ,(256*10)+0xD8-0xC0+10); esp_move(espunit_data->x+80+72+16,espunit_data->y+64-24 ,(256*10)+0xD9-0xC0+10); esp_move(espunit_data->x+96+72+16,espunit_data->y+64-24 ,(256*10)+0xDA-0xC0+10); if((espunit_data->count>>3)&1){ esp_move(espunit_data->x+48+72+16,espunit_data->y+80-24 ,(256*10)+0xDB-0xC0+10); esp_move(espunit_data->x+64+72+16,espunit_data->y+80-24 ,(256*10)+0xDC-0xC0+10); esp_move(espunit_data->x+80+72+16,espunit_data->y+80-24 ,(256*10)+0xDD-0xC0+10); esp_move(espunit_data->x+96+72+16,espunit_data->y+80-24 ,(256*10)+0xDE-0xC0+10); } else { esp_move(espunit_data->x+48+72+16,espunit_data->y+80-24 ,(256*10)+0xDB-0xC0+10); esp_move(espunit_data->x+64+72+16,espunit_data->y+80-24 ,(256*10)+0xDF-0xC0+10); esp_move(espunit_data->x+80+72+16,espunit_data->y+80-24 ,(256*10)+0xE0-0xC0+10); esp_move(espunit_data->x+96+72+16,espunit_data->y+80-24 ,(256*10)+0xDE-0xC0+10); } esp_move(espunit_data->x+48+72+16,espunit_data->y+96-24 ,(256*10)+0xE1-0xC0+10); esp_move(espunit_data->x+64+72+16,espunit_data->y+96-24 ,(256*10)+0xE2-0xC0+10); esp_move(espunit_data->x+80+72+16,espunit_data->y+96-24 ,(256*10)+0xE3-0xC0+10); esp_move(espunit_data->x+96+72+16,espunit_data->y+96-24 ,(256*10)+0xE4-0xC0+10); esp_move(espunit_data->x+48+72+16,espunit_data->y+112-24 ,(256*10)+0xE5-0xC0+10); esp_move(espunit_data->x+64+72+16,espunit_data->y+112-24 ,(256*10)+0xE6-0xC0+10); esp_move(espunit_data->x+80+72+16,espunit_data->y+112-24 ,(256*10)+0xE7-0xC0+10); esp_move(espunit_data->x+96+72+16,espunit_data->y+112-24 ,(256*10)+0xE8-0xC0+10); } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsS[U[ >>*/ void espunit_rsS[U[(espunit_data) ESPUNIT_DATA *espunit_data; { switch(espunit_data->count){ case 0: case 60: case 120: se_adpcm1(zm_data->pcm[SE_WARNING],zm_data->pcmsize[SE_WARNING],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>330){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; return; } /* v`qmhmf */ if(!((espunit_data->count>>4)&1)){ esp_move(espunit_data->x ,espunit_data->y ,(256*10)+0xC0-0xC0+10); esp_move(espunit_data->x+16,espunit_data->y ,(256*10)+0xC1-0xC0+10); esp_move(espunit_data->x+32,espunit_data->y ,(256*10)+0xC2-0xC0+10); esp_move(espunit_data->x+48,espunit_data->y ,(256*10)+0xC3-0xC0+10); esp_move(espunit_data->x+64,espunit_data->y ,(256*10)+0xC4-0xC0+10); esp_move(espunit_data->x+80,espunit_data->y ,(256*10)+0xC5-0xC0+10); } /* p */ if(espunit_data->count>70){ esp_move(espunit_data->x ,espunit_data->y+16 ,(256*10)+0xC6-0xC0+10); esp_move(espunit_data->x+16,espunit_data->y+16 ,(256*10)+0xC7-0xC0+10); esp_move(espunit_data->x+32,espunit_data->y+16 ,(256*10)+0xC8-0xC0+10); esp_move(espunit_data->x+48,espunit_data->y+16 ,(256*10)+0xC9-0xC0+10); esp_move(espunit_data->x+64,espunit_data->y+16 ,(256*10)+0xCA-0xC0+10); esp_move(espunit_data->x+80,espunit_data->y+16 ,(256*10)+0xCB-0xC0+10); esp_move(espunit_data->x ,espunit_data->y+32 ,(256*10)+0xCC-0xC0+10); esp_move(espunit_data->x+16,espunit_data->y+32 ,(256*10)+0xCD-0xC0+10); esp_move(espunit_data->x+32,espunit_data->y+32 ,(256*10)+0xCE-0xC0+10); esp_move(espunit_data->x+48,espunit_data->y+32 ,(256*10)+0xCF-0xC0+10); esp_move(espunit_data->x+64,espunit_data->y+32 ,(256*10)+0xD0-0xC0+10); esp_move(espunit_data->x+80,espunit_data->y+32 ,(256*10)+0xD1-0xC0+10); } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsSڐG\z >>*/ void espunit_rsSڐG\z(espunit_data) ESPUNIT_DATA *espunit_data; { switch(espunit_data->count){ case 220: se_adpcm1(zm_data->pcm[SE_TARGET],zm_data->pcmsize[SE_TARGET],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>310){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1)return; /* ڐG\z */ if(espunit_data->count>100){ if((espunit_data->count>>3)&1){ esp_move(espunit_data->x ,espunit_data->y ,(256*10)+0xD2-0xC0+10); esp_move(espunit_data->x+16,espunit_data->y ,(256*10)+0xD3-0xC0+10); esp_move(espunit_data->x+32,espunit_data->y ,(256*10)+0xD4-0xC0+10); esp_move(espunit_data->x+48,espunit_data->y ,(256*10)+0xD5-0xC0+10); } } } /*---------------------------------------------------------<< rsSCo >>*/ void espunit_rsSCo(espunit_data) ESPUNIT_DATA *espunit_data; { int i; switch(espunit_data->count){ case 0: case 60: case 120: se_adpcm1(zm_data->pcm[SE_WARNING],zm_data->pcmsize[SE_WARNING],SEPRW_ESP); break; case 100: se_adpcm1(zm_data->pcm[SE_CLICK10],zm_data->pcmsize[SE_CLICK10],SEPRW_ESP); break; case 130: se_adpcm1(zm_data->pcm[SE_DISP1],zm_data->pcmsize[SE_DISP1],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>350){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; return; } if(!((espunit_data->count>>4)&1)){ /* v`qmhmf */ esp_move(espunit_data->x ,espunit_data->y ,(256*10)+0xC0-0xC0+10); esp_move(espunit_data->x+16,espunit_data->y ,(256*10)+0xC1-0xC0+10); esp_move(espunit_data->x+32,espunit_data->y ,(256*10)+0xC2-0xC0+10); esp_move(espunit_data->x+48,espunit_data->y ,(256*10)+0xC3-0xC0+10); esp_move(espunit_data->x+64,espunit_data->y ,(256*10)+0xC4-0xC0+10); esp_move(espunit_data->x+80,espunit_data->y ,(256*10)+0xC5-0xC0+10); } if(espunit_data->count>70){ /* p */ esp_move(espunit_data->x ,espunit_data->y+16 ,(256*10)+0xC6-0xC0+10); esp_move(espunit_data->x+16,espunit_data->y+16 ,(256*10)+0xC7-0xC0+10); esp_move(espunit_data->x+32,espunit_data->y+16 ,(256*10)+0xC8-0xC0+10); esp_move(espunit_data->x+48,espunit_data->y+16 ,(256*10)+0xC9-0xC0+10); esp_move(espunit_data->x+64,espunit_data->y+16 ,(256*10)+0xCA-0xC0+10); } if(espunit_data->count>100){ /* */ if(((espunit_data->count>>3)&1)||(espunit_data->count>132)){ esp_move(espunit_data->x+48,espunit_data->y+32 ,(256*10)+0xCB-0xC0+10); esp_move(espunit_data->x+48,espunit_data->y+48 ,(256*10)+0xCC-0xC0+10); esp_move(espunit_data->x+64,espunit_data->y+48 ,(256*10)+0xCD-0xC0+10); } } if(espunit_data->count>130){ /* [_[C[W */ for(i=0;i<4;i++){ esp_move(espunit_data->x+ 80,espunit_data->y+48+(16*i),(256*10)+0xCE-0xC0+10+(2*i)); esp_move(espunit_data->x+ 96,espunit_data->y+48+(16*i),(256*10)+0xCF-0xC0+10+(2*i)); esp_move(espunit_data->x+112,espunit_data->y+48+(16*i),(256*10)+0xCF-0xC0+10+(2*i)+(1<<14)); esp_move(espunit_data->x+128,espunit_data->y+48+(16*i),(256*10)+0xCE-0xC0+10+(2*i)+(1<<14)); } esp_move(espunit_data->x+ 80,espunit_data->y+112 ,(256*10)+0xD6-0xC0+10); esp_move(espunit_data->x+ 96,espunit_data->y+112 ,(256*10)+0xD7-0xC0+10); esp_move(espunit_data->x+112,espunit_data->y+112 ,(256*10)+0xD8-0xC0+10); esp_move(espunit_data->x+128,espunit_data->y+112 ,(256*10)+0xD9-0xC0+10); } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsShq >>*/ void espunit_rsShq(espunit_data) ESPUNIT_DATA *espunit_data; { switch(espunit_data->count){ case 0: case 60: case 120: case 180: case 240: case 300: case 360: se_adpcm1(zm_data->pcm[SE_WARNING],zm_data->pcmsize[SE_WARNING],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>400){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; return; } if(!((espunit_data->count>>4)&1)){ /* v`qmhmf */ esp_move(espunit_data->x ,espunit_data->y ,(256*11)+0xC0); esp_move(espunit_data->x+16,espunit_data->y ,(256*11)+0xC1); esp_move(espunit_data->x+32,espunit_data->y ,(256*11)+0xC2); esp_move(espunit_data->x+48,espunit_data->y ,(256*11)+0xC3); esp_move(espunit_data->x+64,espunit_data->y ,(256*11)+0xC4); esp_move(espunit_data->x+80,espunit_data->y ,(256*11)+0xC5); } if(espunit_data->count>70){ /* p */ esp_move(espunit_data->x ,espunit_data->y+16 ,(256*11)+0xC6); esp_move(espunit_data->x+16,espunit_data->y+16 ,(256*11)+0xC7); esp_move(espunit_data->x+32,espunit_data->y+16 ,(256*11)+0xC8); esp_move(espunit_data->x+48,espunit_data->y+16 ,(256*11)+0xC9); esp_move(espunit_data->x+64,espunit_data->y+16 ,(256*11)+0xCA); esp_move(espunit_data->x+80,espunit_data->y+16 ,(256*11)+0xCB); } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsSR >>*/ void espunit_rsSR(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>330){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; return; } esp_move(espunit_data->x ,espunit_data->y ,(256*11)+0xCC); esp_move(espunit_data->x+16,espunit_data->y ,(256*11)+0xCD); esp_move(espunit_data->x+32,espunit_data->y ,(256*11)+0xD2); esp_move(espunit_data->x+48,espunit_data->y ,(256*11)+0xD3); espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsSQ >>*/ void espunit_rsSQ(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>330){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; return; } esp_move(espunit_data->x ,espunit_data->y ,(256*11)+0xCE); esp_move(espunit_data->x+16,espunit_data->y ,(256*11)+0xCF); esp_move(espunit_data->x+32,espunit_data->y ,(256*11)+0xD2); esp_move(espunit_data->x+48,espunit_data->y ,(256*11)+0xD3); espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsSP >>*/ void espunit_rsSP(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>330){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; return; } esp_move(espunit_data->x ,espunit_data->y ,(256*11)+0xD0); esp_move(espunit_data->x+16,espunit_data->y ,(256*11)+0xD1); esp_move(espunit_data->x+32,espunit_data->y ,(256*11)+0xD2); esp_move(espunit_data->x+48,espunit_data->y ,(256*11)+0xD3); espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsS[ǂ >>*/ void espunit_rsS[ǂ(espunit_data) ESPUNIT_DATA *espunit_data; { static int i; switch(espunit_data->count){ case 0: se_adpcm1(zm_data->pcm[SE_CLICK05],zm_data->pcmsize[SE_CLICK05],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>240){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ /* ‚ */ /* */ if(!( (espunit_data->count>>4)&1) ){ if(((espunit_data->count+0)>>4)&1)esp_move(espunit_data->x+8,espunit_data->y+48,(256*10)+0xC0-0xC0+10); if(((espunit_data->count-4)>>4)&1)esp_move(espunit_data->x+8,espunit_data->y+32,(256*10)+0xC0-0xC0+10); if(((espunit_data->count-8)>>4)&1)esp_move(espunit_data->x+8,espunit_data->y+16,(256*10)+0xC0-0xC0+10); } for(i=0;i<5;i++)esp_move(espunit_data->x-24+(i*16),espunit_data->y+64,(256*10)+0xC1+i-0xC0+10); for(i=0;i<11;i++)esp_move(espunit_data->x-72+(i*16),espunit_data->y+80,(256*10)+0xC6+i-0xC0+10); } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } ta->count>=96)&&(ene_data->/*--------------------<< vg^Cv錾 >>---------------*/ void espunit_rsSJnP(ESPUNIT_DATA*); void espunit_rsSJnQ(ESPUNIT_DATA*); void espunit_rsSJnR(ESPUNIT_DATA*); void espunit_rsSX^[g(ESPUNIT_DATA*); void espunit_rsS[U[(ESPUNIT_DATA*); void espunit_rsSڐG\z(ESPUNIT_DATA*); void espunit_rsSCo(ESPUNIT_DATA*); void espunit_rsShq(ESPUNIT_DATA*); void espunit_rsSR(ESPUNIT_DATA*); void espunit_rsSQ(ESPUNIT_DATA*); void espunit_rsSP(ESPUNIT_DATA*); void espunit_rsS[ǂ(ESPUNIT_DATA*); else { ene_data->hdx-=2; ene_data->hdy+=1; if(ene_data->count==218)ene_data->anim3=8; if(ene_data->count==226)ene_data->anim3=7; } } if((ene_data->count>=234)&&(ene_data->count<296)){ /* ˂ƂƖ߂ */ if(ene_data->anim1){ ene_data->hdx+=1; ene_data->hdy=0; if(ene_data->count==242)ene_data->anim3=8; if(ene_data->count==250)ene_data->anim3=9; } else { ene_data->hdx-=1; ene#include #include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "..\\sepcm.h" #include "esp.h" #include "exp.h" #include "espunit5.h" #include "eventmacro.h" static unsigned char *work1; /* eLXgWJ܂ static ϐ */ static unsigned char *work2; static unsigned int f_size,w_size,d_size; /*--------------------- •ʂdro[` -------------------*/ /*---------------------------------------------------------<< rsTJńuceQv >>*/ void espunit_rsTJnP(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>357){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ esp_move(espunit_data->x-24 ,espunit_data->y ,(256*10)+0xC0-0xC0+1); esp_move(espunit_data->x-24+16,espunit_data->y ,(256*10)+0xC1-0xC0+1); esp_move(espunit_data->x-24+32,espunit_data->y ,(256*10)+0xC2-0xC0+1); esp_move(espunit_data->x-24 ,espunit_data->y+16,(256*10)+0xC3-0xC0+1); esp_move(espunit_data->x-24+16,espunit_data->y+16,(256*10)+0xC4-0xC0+1); esp_move(espunit_data->x-24+32,espunit_data->y+16,(256*10)+0xC5-0xC0+1); espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; } /*---------------------------------------------------------<< rsTJńurs`fdTv >>*/ void espunit_rsTJnQ(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>357){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ esp_move(espunit_data->x-40 ,espunit_data->y+8+2 ,(256*10)+0xC6-0xC0+1); esp_move(espunit_data->x-40+16,espunit_data->y+8+2 ,(256*10)+0xC7-0xC0+1); esp_move(espunit_data->x-40+32,espunit_data->y+8+2 ,(256*10)+0xC8-0xC0+1); esp_move(espunit_data->x-40+48,espunit_data->y+8+2 ,(256*10)+0xC9-0xC0+1); esp_move(espunit_data->x-40+64,espunit_data->y+8+2 ,(256*10)+0xCA-0xC0+1); espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsTJn̉p >>*/ void espunit_rsTJnR(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>320){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ esp_move(espunit_data->x-56 ,espunit_data->y+8+2 ,(256*10)+0xCB-0xC0+1); esp_move(espunit_data->x-56+16,espunit_data->y+8+2 ,(256*10)+0xCC-0xC0+1); esp_move(espunit_data->x-56+32,espunit_data->y+8+2 ,(256*10)+0xCD-0xC0+1); esp_move(espunit_data->x-56+48,espunit_data->y+8+2 ,(256*10)+0xCE-0xC0+1); esp_move(espunit_data->x-56+64,espunit_data->y+8+2 ,(256*10)+0xCF-0xC0+1); } } /*---------------------------------------------------------<< Gv̕ >>*/ void espunit_rsTGP(espunit_data) ESPUNIT_DATA *espunit_data; { switch(espunit_data->count){ case 0: se_adpcm1(zm_data->pcm[SE_CLICK05],zm_data->pcmsize[SE_CLICK05],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>280){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; return; } if( (((espunit_data->count>>4)&1)==0)||(espunit_data->count>80) ){ /* */ esp_move(espunit_data->x ,espunit_data->y ,(256*11)+0xC0); esp_move(espunit_data->x+16 ,espunit_data->y ,(256*11)+0xC1); esp_move(espunit_data->x+32 ,espunit_data->y ,(256*11)+0xC2); esp_move(espunit_data->x+48 ,espunit_data->y ,(256*11)+0xC3); esp_move(espunit_data->x+64 ,espunit_data->y ,(256*11)+0xC4); esp_move(espunit_data->x ,espunit_data->y+16 ,(256*11)+0xC5); esp_move(espunit_data->x+16 ,espunit_data->y+16 ,(256*11)+0xC6); esp_move(espunit_data->x+32 ,espunit_data->y+16 ,(256*11)+0xC7); esp_move(espunit_data->x+48 ,espunit_data->y+16 ,(256*11)+0xC8); esp_move(espunit_data->x+64 ,espunit_data->y+16 ,(256*11)+0xC9); } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< Gv̊G >>*/ void espunit_rsTG(espunit_data) ESPUNIT_DATA *espunit_data; { int i; switch(espunit_data->count){ case 0: se_adpcm1(zm_data->pcm[SE_DISP2],zm_data->pcmsize[SE_DISP2],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>100){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; return; } for(i=0;i<4;i++){ esp_move(espunit_data->x ,espunit_data->y+(16*i),(256*11)+0xD0+(4*i)); esp_move(espunit_data->x+16,espunit_data->y+(16*i),(256*11)+0xD1+(4*i)); esp_move(espunit_data->x+32,espunit_data->y+(16*i),(256*11)+0xD2+(4*i)); esp_move(espunit_data->x+48,espunit_data->y+(16*i),(256*11)+0xD3+(4*i)); } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< Gv̕ >>*/ void espunit_rsTG(espunit_data) ESPUNIT_DATA *espunit_data; { switch(espunit_data->count){ case 0: case 20: case 40: case 60: se_adpcm1(zm_data->pcm[SE_CLICK06],zm_data->pcmsize[SE_CLICK06],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>98){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; return; } esp_move(espunit_data->x ,espunit_data->y,(256*11)+0xE0); esp_move(espunit_data->x+16,espunit_data->y,(256*11)+0xE1); esp_move(espunit_data->x+32,espunit_data->y,(256*11)+0xE2); esp_move(espunit_data->x+48,espunit_data->y,(256*11)+0xE3); if(espunit_data->count>20){ esp_move(espunit_data->x ,espunit_data->y+16,(256*11)+0xE4); esp_move(espunit_data->x+16,espunit_data->y+16,(256*11)+0xE5); esp_move(espunit_data->x+32,espunit_data->y+16,(256*11)+0xE6); esp_move(espunit_data->x+48,espunit_data->y+16,(256*11)+0xE7); } if(espunit_data->count>40){ esp_move(espunit_data->x ,espunit_data->y+32,(256*11)+0xE8); esp_move(espunit_data->x+16,espunit_data->y+32,(256*11)+0xE9); esp_move(espunit_data->x+32,espunit_data->y+32,(256*11)+0xEA); esp_move(espunit_data->x+48,espunit_data->y+32,(256*11)+0xEB); } if(espunit_data->count>60){ esp_move(espunit_data->x ,espunit_data->y+48,(256*11)+0xEC); esp_move(espunit_data->x+16,espunit_data->y+48,(256*11)+0xED); esp_move(espunit_data->x+32,espunit_data->y+48,(256*11)+0xEE); esp_move(espunit_data->x+48,espunit_data->y+48,(256*11)+0xEF); } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< Gv̊G >>*/ void espunit_rsTGG(espunit_data) ESPUNIT_DATA *espunit_data; { int i; switch(espunit_data->count){ case 0: se_adpcm1(zm_data->pcm[SE_CLICK04],zm_data->pcmsize[SE_CLICK04],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>30){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1)return; for(i=0;i<4;i++){ esp_move(espunit_data->x ,espunit_data->y+(16*i),(256*11)+0xD0+(4*i)); esp_move(espunit_data->x+16,espunit_data->y+(16*i),(256*11)+0xD1+(4*i)); esp_move(espunit_data->x+32,espunit_data->y+(16*i),(256*11)+0xD2+(4*i)); esp_move(espunit_data->x+48,espunit_data->y+(16*i),(256*11)+0xD3+(4*i)); } } /*---------------------------------------------------------<< Gv̊G >>*/ void espunit_rsTGG(espunit_data) ESPUNIT_DATA *espunit_data; { int i; switch(espunit_data->count){ case 0: se_adpcm1(zm_data->pcm[SE_CLICK04],zm_data->pcmsize[SE_CLICK04],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>90){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1)return; for(i=0;i<4;i++){ esp_move(espunit_data->x ,espunit_data->y+(16*i),(256*11)+0xD0+(4*i)); esp_move(espunit_data->x+16,espunit_data->y+(16*i),(256*11)+0xD1+(4*i)); esp_move(espunit_data->x+32,espunit_data->y+(16*i),(256*11)+0xD2+(4*i)); esp_move(espunit_data->x+48,espunit_data->y+(16*i),(256*11)+0xD3+(4*i)); } } /*---------------------------------------------------------<< Gv̖ >>*/ void espunit_rsTG(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>80){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; return; } if( (((espunit_data->count>>3)&1)==0)||(espunit_data->count>40) ){ /* _ */ esp_move(espunit_data->x ,espunit_data->y+16,(256*11)+0xCA); esp_move(espunit_data->x+16,espunit_data->y-16,(256*11)+0xCB); esp_move(espunit_data->x+32,espunit_data->y-16,(256*11)+0xCC); esp_move(espunit_data->x+16,espunit_data->y ,(256*11)+0xCD); esp_move(espunit_data->x+32,espunit_data->y ,(256*11)+0xCE); } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< GvDETECTED >>*/ void espunit_rsTGI(espunit_data) ESPUNIT_DATA *espunit_data; { switch(espunit_data->count){ case 20: se_adpcm1(zm_data->pcm[SE_LOCK],zm_data->pcmsize[SE_LOCK],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>80){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; return; } if( (((espunit_data->count>>3)&1)==0)||(espunit_data->count>40) ){ /* _ */ esp_move(espunit_data->x ,espunit_data->y,(256*11)+0xE0); esp_move(espunit_data->x+16,espunit_data->y,(256*11)+0xE1); esp_move(espunit_data->x+32,espunit_data->y,(256*11)+0xE2); esp_move(espunit_data->x+48,espunit_data->y,(256*11)+0xE3); } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< narxr >>*/ void espunit_rsTnarxr(espunit_data) ESPUNIT_DATA *espunit_data; { switch(espunit_data->count){ case 0: case 60: case 120: se_adpcm1(zm_data->pcm[SE_CAUTION],zm_data->pcmsize[SE_CAUTION],SEPRW_ESP); break; case 150: case 180: se_adpcm1(zm_data->pcm[SE_CLICK01],zm_data->pcmsize[SE_CLICK01],SEPRW_ESP); break; case 230: se_adpcm1(zm_data->pcm[SE_LOCK],zm_data->pcmsize[SE_LOCK],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>500){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; return; } if( !((espunit_data->count>>4)&1) ){ /* b`tshnm */ esp_move(espunit_data->x ,espunit_data->y ,(256*11)+0xC0); esp_move(espunit_data->x+16,espunit_data->y ,(256*11)+0xC1); esp_move(espunit_data->x+32,espunit_data->y ,(256*11)+0xC2); esp_move(espunit_data->x+48,espunit_data->y ,(256*11)+0xC3); esp_move(espunit_data->x+64,espunit_data->y ,(256*11)+0xC4); } if(espunit_data->count>70){ /* p */ esp_move(espunit_data->x+ 32,espunit_data->y+16,(256*11)+0xC5); esp_move(espunit_data->x+ 48,espunit_data->y+16,(256*11)+0xC6); esp_move(espunit_data->x+ 64,espunit_data->y+16,(256*11)+0xC7); esp_move(espunit_data->x+ 80,espunit_data->y+16,(256*11)+0xC8); esp_move(espunit_data->x+ 96,espunit_data->y+16,(256*11)+0xC9); esp_move(espunit_data->x+112,espunit_data->y+16,(256*11)+0xCA); esp_move(espunit_data->x+128,espunit_data->y+16,(256*11)+0xCB); esp_move(espunit_data->x+144,espunit_data->y+16,(256*11)+0xCC); } if(espunit_data->count>100){ /* @̊G̃N */ esp_move(espunit_data->x ,espunit_data->y+32-10,(256*11)+0xCD); esp_move(espunit_data->x+ 16,espunit_data->y+32-10,(256*11)+0xCE); esp_move(espunit_data->x+ 32,espunit_data->y+32-10,(256*11)+0xCE); esp_move(espunit_data->x+ 48,espunit_data->y+32-10,(256*11)+0xCD+(1<<14)); esp_move(espunit_data->x ,espunit_data->y+48-10,(256*11)+0xCF); esp_move(espunit_data->x+ 48,espunit_data->y+48-10,(256*11)+0xCF+(1<<14)); esp_move(espunit_data->x ,espunit_data->y+64-10,(256*11)+0xCF); esp_move(espunit_data->x+ 48,espunit_data->y+64-10,(256*11)+0xCF+(1<<14)); esp_move(espunit_data->x ,espunit_data->y+80-10,(256*11)+0xCD+(1<<15)); esp_move(espunit_data->x+ 16,espunit_data->y+80-10,(256*11)+0xCE+(1<<15)); esp_move(espunit_data->x+ 32,espunit_data->y+80-10,(256*11)+0xCE+(1<<15)); esp_move(espunit_data->x+ 48,espunit_data->y+80-10,(256*11)+0xCD+(1<<14)+(1<<15)); /* { */ esp_move(espunit_data->x+ 16,espunit_data->y+48-10,(256*11)+0xD0); esp_move(espunit_data->x+ 32,espunit_data->y+48-10,(256*11)+0xD0+(1<<14)); esp_move(espunit_data->x+ 16,espunit_data->y+64-10,(256*11)+0xD1+((espunit_data->count>>3)&1)); esp_move(espunit_data->x+ 32,espunit_data->y+64-10,(256*11)+0xD1+((espunit_data->count>>3)&1)+(1<<14)); } if(espunit_data->count>150){ /* */ esp_move(espunit_data->x+64 -14,espunit_data->y+48-10,(256*11)+0xD3); esp_move(espunit_data->x+64+16-14,espunit_data->y+48-10,(256*11)+0xD4); esp_move(espunit_data->x+64+32-14,espunit_data->y+48-10,(256*11)+0xD5); esp_move(espunit_data->x+64+48-14,espunit_data->y+48-10,(256*11)+0xD6); esp_move(espunit_data->x+64+64-14,espunit_data->y+48-10,(256*11)+0xD7); } if(espunit_data->count>180){ /* Q */ esp_move(espunit_data->x+64 -14,espunit_data->y+64-10,(256*11)+0xD8); esp_move(espunit_data->x+64+16-14,espunit_data->y+64-10,(256*11)+0xD9); esp_move(espunit_data->x+64+32-14,espunit_data->y+64-10,(256*11)+0xDA); esp_move(espunit_data->x+64+48-14,espunit_data->y+64-10,(256*11)+0xDB); esp_move(espunit_data->x+64+64-14,espunit_data->y+64-10,(256*11)+0xDC); } if(espunit_data->count>230){ /* R */ if(!((espunit_data->count>>4)&1)){ esp_move(espunit_data->x +24,espunit_data->y+96-18,(256*11)+0xDD); esp_move(espunit_data->x+16+24,espunit_data->y+96-18,(256*11)+0xDE); esp_move(espunit_data->x+32+24,espunit_data->y+96-18,(256*11)+0xDF); esp_move(espunit_data->x+48+24,espunit_data->y+96-18,(256*11)+0xE0); esp_move(espunit_data->x+64+24,espunit_data->y+96-18,(256*11)+0xE1); esp_move(espunit_data->x+80+24,espunit_data->y+96-18,(256*11)+0xE2); esp_move(espunit_data->x+96+24,espunit_data->y+96-18,(256*11)+0xE3); } } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< {XTC >>*/ void espunit_rsT{XTC(espunit_data) ESPUNIT_DATA *espunit_data; { int i; switch(espunit_data->count){ case 0: case 60: case 120: case 180: case 240: case 300: se_adpcm1(zm_data->pcm[SE_WARNING],zm_data->pcmsize[SE_WARNING],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>300){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; return; } if( !((espunit_data->count>>4)&1) ){ /* v`qmhmf */ esp_move(espunit_data->x ,espunit_data->y ,(256*11)+0xC0); esp_move(espunit_data->x+16,espunit_data->y ,(256*11)+0xC1); esp_move(espunit_data->x+32,espunit_data->y ,(256*11)+0xC2); esp_move(espunit_data->x+48,espunit_data->y ,(256*11)+0xC3); esp_move(espunit_data->x+64,espunit_data->y ,(256*11)+0xC4); esp_move(espunit_data->x+80,espunit_data->y ,(256*11)+0xC5); } if(espunit_data->count>70){ /* {X郁bZ[W */ esp_move(espunit_data->x ,espunit_data->y+16,(256*11)+0xC6); esp_move(espunit_data->x+ 16,espunit_data->y+16,(256*11)+0xC7); esp_move(espunit_data->x+ 32,espunit_data->y+16,(256*11)+0xC8); esp_move(espunit_data->x+ 48,espunit_data->y+16,(256*11)+0xC9); esp_move(espunit_data->x+ 64,espunit_data->y+16,(256*11)+0xCA); esp_move(espunit_data->x+ 80,espunit_data->y+16,(256*11)+0xCB); esp_move(espunit_data->x+ 16,espunit_data->y+32,(256*11)+0xCC); esp_move(espunit_data->x+ 32,espunit_data->y+32,(256*11)+0xCD); esp_move(espunit_data->x+ 48,espunit_data->y+32,(256*11)+0xCE); esp_move(espunit_data->x+ 64,espunit_data->y+32,(256*11)+0xCF); } if(espunit_data->count>100){ /* */ esp_move(espunit_data->x+80 ,espunit_data->y+32,(256*11)+0xD0); } if(espunit_data->count>130){ /* [_[C[W */ for(i=0;i<4;i++){ esp_move(espunit_data->x+ 96,espunit_data->y+16+(16*i),(256*11)+0xD1+(5*i)); esp_move(espunit_data->x+112,espunit_data->y+16+(16*i),(256*11)+0xD2+(5*i)); esp_move(espunit_data->x+128,espunit_data->y+16+(16*i),(256*11)+0xD3+(5*i)); esp_move(espunit_data->x+144,espunit_data->y+16+(16*i),(256*11)+0xD4+(5*i)); esp_move(espunit_data->x+160,espunit_data->y+16+(16*i),(256*11)+0xD5+(5*i)); } esp_move(espunit_data->x+ 96,espunit_data->y+80,(256*11)+0xE5); esp_move(espunit_data->x+112,espunit_data->y+80,(256*11)+0xE6); esp_move(espunit_data->x+128,espunit_data->y+80,(256*11)+0xE7); esp_move(espunit_data->x+144,espunit_data->y+80,(256*11)+0xE8); } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< [vAEg >>*/ void espunit_rsT[vAEg(espunit_data) ESPUNIT_DATA *espunit_data; { int i; switch(espunit_data->count){ case 0: se_adpcm1(zm_data->pcm[SE_LOCK],zm_data->pcmsize[SE_LOCK],SEPRW_ESP); break; case 130: se_adpcm1(zm_data->pcm[SE_DISP2],zm_data->pcmsize[SE_DISP2],SEPRW_ESP); break; case 160: se_adpcm1(zm_data->pcm[SE_CLICK05],zm_data->pcmsize[SE_CLICK05],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>400){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; return; } if( !((espunit_data->count>>4)&1) ){ /* b`tshnm */ esp_move(espunit_data->x ,espunit_data->y ,(256*11)+0xC0); esp_move(espunit_data->x+16,espunit_data->y ,(256*11)+0xC1); esp_move(espunit_data->x+32,espunit_data->y ,(256*11)+0xC2); esp_move(espunit_data->x+48,espunit_data->y ,(256*11)+0xC3); esp_move(espunit_data->x+64,espunit_data->y ,(256*11)+0xC4); } if(espunit_data->count>70){ /* 惁bZ[W */ esp_move(espunit_data->x- 32,espunit_data->y+16,(256*11)+0xC5); esp_move(espunit_data->x- 16,espunit_data->y+16,(256*11)+0xC6); esp_move(espunit_data->x ,espunit_data->y+16,(256*11)+0xC7); esp_move(espunit_data->x+ 16,espunit_data->y+16,(256*11)+0xC8); esp_move(espunit_data->x+ 32,espunit_data->y+16,(256*11)+0xC9); esp_move(espunit_data->x+ 48,espunit_data->y+16,(256*11)+0xCA); esp_move(espunit_data->x+ 64,espunit_data->y+16,(256*11)+0xCB); esp_move(espunit_data->x+ 80,espunit_data->y+16,(256*11)+0xCC); esp_move(espunit_data->x+ 96,espunit_data->y+16,(256*11)+0xCD); esp_move(espunit_data->x+112,espunit_data->y+16,(256*11)+0xCE); } if(espunit_data->count>100){ /* qdctroc */ esp_move(espunit_data->x ,espunit_data->y+32,(256*11)+0xCF); esp_move(espunit_data->x+16,espunit_data->y+32,(256*11)+0xD0); esp_move(espunit_data->x+32,espunit_data->y+32,(256*11)+0xD1); esp_move(espunit_data->x+48,espunit_data->y+32,(256*11)+0xD2); esp_move(espunit_data->x+64,espunit_data->y+32,(256*11)+0xD3); } if(espunit_data->count>130){ /* G */ for(i=0;i<4;i++){ esp_move(espunit_data->x+ 96,espunit_data->y+32+(i*16),(256*11)+0xD4+(4*i)); esp_move(espunit_data->x+112,espunit_data->y+32+(i*16),(256*11)+0xD5+(4*i)); esp_move(espunit_data->x+128,espunit_data->y+32+(i*16),(256*11)+0xD6+(4*i)); esp_move(espunit_data->x+144,espunit_data->y+32+(i*16),(256*11)+0xD7+(4*i)); } } if(espunit_data->count>160){ /* 󁕐 */ esp_move(espunit_data->x+80,espunit_data->y+80,(256*11)+0xE4); esp_move(espunit_data->x+48,espunit_data->y+64,(256*11)+0xE5); esp_move(espunit_data->x+64,espunit_data->y+64,(256*11)+0xE6); esp_move(espunit_data->x+48,espunit_data->y+80,(256*11)+0xE7); esp_move(espunit_data->x+64,espunit_data->y+80,(256*11)+0xE8); } espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< EINStbN >>*/ void espunit_rsTEINStbN(espunit_data) ESPUNIT_DATA *espunit_data; { int i; espunit_data->count+=1; switch(espunit_data->count){ /* xύX */ case 171: txt_data->dy=-2; break; case 871: txt_data->dy=-3; break; case 971: txt_data->dy=-8; break; case 1021: txt_data->dy=-16; break; } txt_data->hx+=txt_data->dx; /* XN[ */ txt_data->hy+=txt_data->dy; txt_data->x=txt_data->hx/32; txt_data->y=txt_data->hy/32; if(txt_data->y<=0){ /* xOɒBAAjɃN */ txt_data->hy=0; txt_data->y=0; txt_data->dy=0; espunit_data->count=0; espunit_data->type=69; } } /*---------------------------------------------------------<< EINSAj >>*/ void espunit_rsTEINSAj(espunit_data) ESPUNIT_DATA *espunit_data; { int i; short cx[]={ 0,256,512,768,256,512,768, 0,256,512,768, 0,256,512,768}; short cy[]={ 0, 0, 0, 0,256,256,256,512,512,512,512,768,768,768,768}; int gpalet[]={0,1,2,3,4,5,6,7,8,9,10,11,12,13,14}; int cnt; short *work; cnt=espunit_data->count/3; if(espunit_data->count==0){ /* u[X^[{e[ */ jiki_cont->booster=2; jiki_cont->flatter=1; se_adpcm1(zm_data->pcm[SE_ST5WARPIN],zm_data->pcmsize[SE_ST5WARPIN],SEPRW_ESP); } if(cnt<=14){ /* Aj */ txt_data->x=cx[cnt]; txt_data->y=cy[cnt]; work=sp_data->transpal.tpal_buff[2]+(16*cnt); /* eLXg̃pbg */ for(i=0;i<16;i++){ sp_data->next_palet[0][i]=*work++; } sp_data->send_palet[0]=1; work=sp_data->transpal.tpal_buff[6]+(16*gpalet[cnt]); /* OtBbÑpbg */ for(i=0;i<16;i++){ grp_data->next_palet[i]=*work++; } grp_data->send_palet=1; for(i=0;iene_max;i++)ene_data[i]->y+=cnt*2; /* Gɗ */ } /* ŌɃtbV */ if(cnt==15){ /* ҂ */ for(i=0;i<16;i++){ sp_data->keep_palet[0][i]=0; sp_data->next_palet[0][i]=65535; sp_data->send_palet[0]=1; sp_data->next_palet[1][i]=0; /* @̓VGbg */ sp_data->send_palet[1]=1; } grp_data->dy2-=9*15; /* fqo */ grp_data->dy3-=5*15; TRANSSP(14,0x00,80) /* ro̓]vAŏo */ TRANSPAL(8,4,7) } if(cnt==16){ /* tF[h */ scrn_prw(2,0,1); sp_data->fade_count[0]=0; sp_data->fade[0]=2; sp_data->fade_count[1]=0; sp_data->fade[1]=2; espunit_data->count=0; espunit_data->type=71; /* JUPIWJɃN */ jiki_cont->flatter=0; TRANSSP(15,0xF0,11) /* ro̓]vAŏo */ return; } espunit_data->count+=1; } /*---------------------------------------------------------<< EAPPAj >>*/ void espunit_rsTEAPPAj(espunit_data) ESPUNIT_DATA *espunit_data; { int i; short cx[]={ 0,256, 0,256, 0,256, 0,256}; short cy[]={ 0, 0,256,256, 0, 0,256,256}; int sw0[]={1,1,1,1,0,0,0,0}; int sw1[]={0,0,0,0,1,1,1,1}; int cnt; int gpalet[]={14,13,12,11,10,9,8,7,6,5,4,3,2,1,0}; short *work; cnt=espunit_data->count/3; if(espunit_data->count==0){ se_adpcm1(zm_data->pcm[SE_ST5WARPOUT],zm_data->pcmsize[SE_ST5WARPOUT],SEPRW_ESP); } if(espunit_data->count==48){ se_adpcm1(zm_data->pcm[SE_BLADE],zm_data->pcmsize[SE_BLADE],SEPRW_ESP); } if(cnt<=14){ work=sp_data->transpal.tpal_buff[6]+(16*gpalet[cnt]); /* OtBbÑpbg */ for(i=0;i<16;i++){ grp_data->next_palet[i]=*work++; } grp_data->send_palet=1; jiki_cont->flatter=1; } if(cnt==15){ grp_data->x2=256; grp_data->x3=256; grp_data->hx2=grp_data->x2*32; grp_data->hx3=grp_data->x3*32; } if((cnt>=16)&&(cnt<=23)){ /* Aj */ grp_data->x0=cx[cnt-16]; grp_data->y0=cy[cnt-16]; grp_data->x1=cx[cnt-16]; grp_data->y1=cy[cnt-16]; grp_data->hx0=grp_data->x0*32; grp_data->hy0=grp_data->y0*32; grp_data->hx1=grp_data->x1*32; grp_data->hy1=grp_data->y1*32; grp_data->onoff.bit.grp0_onoff=sw0[cnt-16]; grp_data->onoff.bit.grp1_onoff=sw1[cnt-16]; grp_data->send_onoff=1; work=sp_data->transpal.tpal_buff[3]+(16*(cnt-16)); for(i=0;i<16;i++){ grp_data->next_palet[i]=*work++; } grp_data->send_palet=1; grp_data->dy2+=9+6; /* fqo */ grp_data->dy3+=5+3; } if(cnt>=24){ /* nAjɃN */ espunit_data->type=75; espunit_data->count=0; jiki_cont->flatter=0; return; } espunit_data->count+=1; } /*---------------------------------------------------------<< JUPIWJ >>*/ void espunit_rsTJUPIWJ(espunit_data) ESPUNIT_DATA *espunit_data; { unsigned int i; int d_pixel=200; /* POOsNZŃuCN */ if(espunit_data->count==0){ work1=(unsigned char*)sp_data->transsp.tsp_buff[10]; work2=(unsigned char*)0xE00000; w_size=0; f_size=140482; /* IIIII 摜t@C̃TCYIIII */ work1+=4; /* WJ̃TCYXLbv */ w_size+=4; espunit_data->count=1; } d_size=0; /* WJsNZJEg */ while(1){ /* 肩 */ if(*work1 >=128){ /* Am */ unsigned char c_size; c_size=(*work1++)-128; /* ̂ */ w_size+=1; for(i=0;i<=c_size;i++){ /* 肩 */ *work2++=*work1; d_size+=1; } work1++; w_size+=1; if(w_size>=f_size){ /* IɃqbg */ scrn_prw(1,0,2); espunit_data->type=76; /* ‚ɃN */ espunit_data->count=0; break; } if(d_size>=d_pixel)break; /* WJsNZŃuCN */ } else { /* •ʃm */ unsigned char c_size; c_size=*work1++; /* ̂ */ w_size+=1; for(i=0;i<=c_size;i++){ *work2++=*work1++; w_size+=1; d_size+=1; } if(w_size>=f_size){ /* IɃqbg */ scrn_prw(1,0,2); espunit_data->type=76; /* ‚ɃN */ espunit_data->count=0; break; } if(d_size>=d_pixel)break; /* WJsNZŃuCN */ } } } /*---------------------------------------------------------<< JUPIAj >>*/ void espunit_rsTJUPIAj(espunit_data) ESPUNIT_DATA *espunit_data; { int i; short cx[]={ 0,256,512,768, 0,256,512,768, 0,256,512,768, 0,256,512,768}; short cy[]={ 0, 0, 0, 0,256,256,256,256,512,512,512,512,768,768,768,768}; int gpalet[]={14,13,12,11,10,9,8,7,6,5,4,3,2,1,0,0}; int cnt; short *work; cnt=espunit_data->count/3; if(espunit_data->count==0){ jiki_cont->booster=1; jiki_cont->flatter=1; se_adpcm1(zm_data->pcm[SE_BLADE],zm_data->pcmsize[SE_BLADE],SEPRW_ESP); } if(cnt<=15){ /* Aj */ txt_data->x=cx[cnt]; txt_data->y=cy[cnt]; work=sp_data->transpal.tpal_buff[4]+(16*cnt); /* swspbg */ for(i=0;i<16;i++){ sp_data->next_palet[0][i]=*work++; } sp_data->send_palet[0]=1; work=sp_data->transpal.tpal_buff[6]+(16*gpalet[cnt]); /* OtBbÑpbg */ for(i=0;i<16;i++){ grp_data->next_palet[i]=*work++; } grp_data->send_palet=1; grp_data->dy2=0; /* fqo */ grp_data->dy3=0; } if(cnt==20){ espunit_data->count=0; espunit_data->type=73; /* AjɃN */ return; } /* ŌɃtbV */ espunit_data->count+=1; } /*---------------------------------------------------------<< JUPIAj >>*/ void espunit_rsTJUPIAj(espunit_data) ESPUNIT_DATA *espunit_data; { int i; short cx[]={768,768,512,512,256,256, 0, 0,768,768,512,512,256, 0,768,512,256, 0,768,512,256, 0}; short cy[]={768,768,768,768,768,768,768,768,512,512,512,512,512,512,256,256,256,256, 0, 0, 0, 0}; short palnum[]={15,15,14,14,13,13,12,12,11,11,10,10,9,8,7,6, 5, 4, 3, 2, 1, 0}; int gpalet[]={ 0, 0, 1, 1, 2, 2, 3, 3, 4, 4, 5, 5,6,7,8,9,10,11,12,13,14,14}; int cnt; short *work; if(espunit_data->count==0){ se_adpcm1(zm_data->pcm[SE_ST5WARPIN],zm_data->pcmsize[SE_ST5WARPIN],SEPRW_ESP); } cnt=espunit_data->count/3; if(cnt<=21){ /* Aj */ txt_data->x=cx[cnt]; txt_data->y=cy[cnt]; work=sp_data->transpal.tpal_buff[4]+(16*palnum[cnt]); /* swspbg */ for(i=0;i<16;i++){ sp_data->next_palet[0][i]=*work++; } sp_data->send_palet[0]=1; work=sp_data->transpal.tpal_buff[6]+(16*gpalet[cnt]); /* OtBbÑpbg */ for(i=0;i<16;i++){ grp_data->next_palet[i]=*work++; } grp_data->send_palet=1; } if(cnt==22){ /* ҂ */ se_adpcm1(zm_data->pcm[SE_JIKIBURN],zm_data->pcmsize[SE_JIKIBURN],SEPRW_JIKIBOOST); jiki_cont->booster=2; for(i=0;i<16;i++){ sp_data->keep_palet[0][i]=0; sp_data->next_palet[0][i]=65535; sp_data->send_palet[0]=1; sp_data->next_palet[1][i]=0; /* @̓VGbg */ sp_data->send_palet[1]=1; } grp_data->dy2-=9*15; /* fqo */ grp_data->dy3-=5*15; TRANSSP(16,0xC0,20) /* {bg̊G] */ TRANSPAL(9,11,1) } if(cnt==23){ /* tF[h */ sp_data->fade_count[0]=0; sp_data->fade[0]=2; sp_data->fade_count[1]=0; sp_data->fade[1]=2; scrn_prw(2,0,1); } if(cnt==23+25){ /* ؂ւ */ espunit_data->count=0; espunit_data->type=74; /* EBASEWJɃN */ jiki_cont->flatter=0; return; } espunit_data->count+=1; } /*---------------------------------------------------------<< EBASEWJ >>*/ void espunit_rsTEBASEWJ(espunit_data) ESPUNIT_DATA *espunit_data; { unsigned int i; int d_pixel=200; if(espunit_data->count==0){ work1=(unsigned char*)sp_data->transsp.tsp_buff[11]; work2=(unsigned char*)0xE00000; w_size=0; f_size=126481; /* IIIII 摜t@C̃TCYIIII */ work1+=4; /* WJ̃TCYXLbv */ w_size+=4; espunit_data->count=1; } d_size=0; while(1){ /* loop 񂭂肩 */ if(*work1 >=128){ /* Am */ unsigned char c_size; c_size=(*work1++)-128; /* ̂ */ w_size+=1; for(i=0;i<=c_size;i++){ /* 肩 */ *work2++=*work1; d_size+=1; } work1++; w_size+=1; if(w_size>=f_size){ /* IɃqbg */ espunit_data->type=-1; scrn_prw(1,0,2); break; } if(d_size>=d_pixel)break; } else { /* •ʃm */ unsigned char c_size; c_size=*work1++; /* ̂ */ w_size+=1; for(i=0;i<=c_size;i++){ *work2++=*work1++; w_size+=1; d_size+=1; } if(w_size>=f_size){ /* IɃqbg */ espunit_data->type=-1; scrn_prw(1,0,2); break; } if(d_size>=d_pixel)break; } } } /*---------------------------------------------------------<< EBASEAj >>*/ void espunit_rsTEBASEAj(espunit_data) ESPUNIT_DATA *espunit_data; { int i; short cx[]={ 0,256,512,768, 0,256,512,768, 0,256,512,768, 0,256,512,768}; short cy[]={ 0, 0, 0, 0,256,256,256,256,512,512,512,512,768,768,768,768}; int cnt; short *work; if(espunit_data->count==0){ grp_data->onoff.bit.grp0_onoff=0; grp_data->onoff.bit.grp1_onoff=0; grp_data->send_onoff=1; jiki_cont->booster=1; /* e[ */ } cnt=espunit_data->count/4; cnt&=15; txt_data->x=cx[cnt]; txt_data->y=cy[cnt]; work=sp_data->transpal.tpal_buff[5]+(16*cnt); for(i=0;i<16;i++){ sp_data->next_palet[0][i]=*work++; } sp_data->send_palet[0]=1; espunit_data->count+=1; } /*---------------------------------------------------------<< JUPI >>*/ void espunit_rsTJUPI(espunit_data) ESPUNIT_DATA *espunit_data; { int i; short cx[]={ 0,256,512,768, 0,256,512,768, 0,256,512,768, 0,256,512,768}; short cy[]={ 0, 0, 0, 0,256,256,256,256,512,512,512,512,768,768,768,768}; int gpalet[]={14,13,12,11,10,9,8,7,6,5,4,3,2,1,0,0}; int cnt,ptn; short *work; cnt=espunit_data->count/3; if(espunit_data->count==0){ /* */ se_adpcm1(zm_data->pcm[SE_ST5WARPOUT],zm_data->pcmsize[SE_ST5WARPOUT],SEPRW_ESP); ptn=8; txt_data->x=cx[ptn]; txt_data->y=cy[ptn]; work=sp_data->transpal.tpal_buff[4]+(16*ptn); /* swspbg */ for(i=0;i<16;i++){ sp_data->next_palet[0][i]=*work++; } sp_data->send_palet[0]=1; } if(espunit_data->count==1){ /* */ for(i=0;i<16;i++)sp_data->next_palet[0][i]=0; sp_data->send_palet[0]=1; } if(espunit_data->count==30){ /* */ ptn=12; txt_data->x=cx[ptn]; txt_data->y=cy[ptn]; work=sp_data->transpal.tpal_buff[4]+(16*ptn); /* swspbg */ for(i=0;i<16;i++){ sp_data->next_palet[0][i]=*work++; } sp_data->send_palet[0]=1; } if(espunit_data->count==31){ /* */ for(i=0;i<16;i++)sp_data->next_palet[0][i]=0; sp_data->send_palet[0]=1; } if(espunit_data->count==42){ /* */ ptn=10; txt_data->x=cx[ptn]; txt_data->y=cy[ptn]; work=sp_data->transpal.tpal_buff[4]+(16*ptn); /* swspbg */ for(i=0;i<16;i++){ sp_data->next_palet[0][i]=*work++; } sp_data->send_palet[0]=1; } if(espunit_data->count==43){ /* */ for(i=0;i<16;i++)sp_data->next_palet[0][i]=0; sp_data->send_palet[0]=1; } if(espunit_data->count==51){ /* */ ptn=8; txt_data->x=cx[ptn]; txt_data->y=cy[ptn]; work=sp_data->transpal.tpal_buff[4]+(16*ptn); /* swspbg */ for(i=0;i<16;i++){ sp_data->next_palet[0][i]=*work++; } sp_data->send_palet[0]=1; } if(espunit_data->count==52){ /* */ for(i=0;i<16;i++)sp_data->next_palet[0][i]=0; sp_data->send_palet[0]=1; } if(espunit_data->count==55){ /* */ ptn=5; txt_data->x=cx[ptn]; txt_data->y=cy[ptn]; work=sp_data->transpal.tpal_buff[4]+(16*ptn); /* swspbg */ for(i=0;i<16;i++){ sp_data->next_palet[0][i]=*work++; } sp_data->send_palet[0]=1; } if(espunit_data->count==56){ /* */ for(i=0;i<16;i++)sp_data->next_palet[0][i]=0; sp_data->send_palet[0]=1; } if(espunit_data->count==57){ /* */ ptn=3; txt_data->x=cx[ptn]; txt_data->y=cy[ptn]; work=sp_data->transpal.tpal_buff[4]+(16*ptn); /* swspbg */ for(i=0;i<16;i++){ sp_data->next_palet[0][i]=*work++; } sp_data->send_palet[0]=1; } if(espunit_data->count==58){ /* */ for(i=0;i<16;i++)sp_data->next_palet[0][i]=0; sp_data->send_palet[0]=1; } if(espunit_data->count==59){ /* */ ptn=1; txt_data->x=cx[ptn]; txt_data->y=cy[ptn]; work=sp_data->transpal.tpal_buff[4]+(16*ptn); /* swspbg */ for(i=0;i<16;i++){ sp_data->next_palet[0][i]=*work++; } sp_data->send_palet[0]=1; } if(espunit_data->count==60){ espunit_data->count=0; espunit_data->type=72; /* AjɃN */ for(i=0;i<16;i++)sp_data->next_palet[0][i]=0; sp_data->send_palet[0]=1; return; } espunit_data->count+=1; } ne_data->x+12,ene_data->y+15,8*cost[48-6],8*sint[48-6],0,0,ene_data); eneshot_appear(4,ene_data->x+12,ene_data->y+15,8*cost[48+6],8*sint[48+6],0,0,ene_data); } else { eneshot_appear(4,ene_data->x-12,ene_data->y+15,8*cost[48 ],8*sint[48],0,0,ene_data); eneshot_appear(4,ene_data->x-12,ene_data->y+15,8*cost[48-3],8*sint[48-3],0,0,ene_data); eneshot_appear(4,ene_data->x-12,ene_data->y+15,8*cost[48+3],8*sint[48+3],0,0,ene_data); eneshot_appear(4,ene_data-/*--------------------<< vg^Cv錾 >>---------------*/ void espunit_rsTJnP(ESPUNIT_DATA*); void espunit_rsTJnQ(ESPUNIT_DATA*); void espunit_rsTJnR(ESPUNIT_DATA*); void espunit_rsTGP(ESPUNIT_DATA*); void espunit_rsTG(ESPUNIT_DATA*); void espunit_rsTG(ESPUNIT_DATA*); void espunit_rsTGG(ESPUNIT_DATA*); void espunit_rsTGG(ESPUNIT_DATA*); void espunit_rsTG(ESPUNIT_DATA*); void espunit_rsTGI(ESPUNIT_DATA*); void espunit_rsTnarxr(ESPUNIT_DATA*); void espunit_rsT{XTC(ESPUNIT_DATA*); void espunit_rsT[vAEg(ESPUNIT_DATA*); void espunit_rsTEINStbN(ESPUNIT_DATA*); void espunit_rsTEINSAj(ESPUNIT_DATA*); void espunit_rsTEAPPAj(ESPUNIT_DATA*); void espunit_rsTJUPIWJ(ESPUNIT_DATA*); void espunit_rsTJUPI(ESPUNIT_DATA*); void espunit_rsTJUPIAj(ESPUNIT_DATA*); void espunit_rsTJUPIAj(ESPUNIT_DATA*); void espunit_rsTEBASEWJ(ESPUNIT_DATA*); void espunit_rsTEBASEAj(ESPUNIT_DATA*);  *hit_cont->ene_field[ef_y+i][ef_x+c]++=e_sel; *hit_cont->ene_field[ef_y+i][ef_x+c] =-1; } } //C_LOCATE(0,0); //printf("ene_count:%8d\n",ene_data->count); } /*--------------< GړB rsUriv3 >---------------*/ void enemove_rsUriv3(ene_data) ENE_DATA *ene_data; { static short ef_x; /* enemy field ̍ʒu */ static short ef_y; static int i,c; /* --- {̂̓Lq --- */ if(ene_data->count==0){ /* */ ene_data->se_hit=3; ene_data->setdir[4]=0; /* Ki[AV[^[̃tbO */ // if(ene_data->x<128){ if(rnd1()){ ene_data->hdx=(216-ene_data->x); /* RQ{WARQt[ *32/32 ƂȂāAȂɂȂėǂ */ ene_data->hdy=( 50-ene_data->y); ene_data->anim1=1; /* E */ ene_data->anim3=1; } else { ene_data->hdx=( 40-ene_data->x); ene_data->hdy=( 50-ene_data->y); ene_data->anim1=0; /* */ ene_data->anim3=3#include #include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "..\\sepcm.h" #include "esp.h" #include "exp.h" #include "espunit6.h" /*--------------------- •ʂdro[` -------------------*/ /*---------------------------------------------------------<< rsUJńuceQv >>*/ void espunit_rsUJnP(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>287){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ esp_move(espunit_data->x-24 ,espunit_data->y ,(256*10)+0xC0-0xC0+1); esp_move(espunit_data->x-24+16,espunit_data->y ,(256*10)+0xC1-0xC0+1); esp_move(espunit_data->x-24+32,espunit_data->y ,(256*10)+0xC2-0xC0+1); esp_move(espunit_data->x-24 ,espunit_data->y+16,(256*10)+0xC3-0xC0+1); esp_move(espunit_data->x-24+16,espunit_data->y+16,(256*10)+0xC4-0xC0+1); esp_move(espunit_data->x-24+32,espunit_data->y+16,(256*10)+0xC5-0xC0+1); espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx>0)espunit_data->dx-=1; } /*---------------------------------------------------------<< rsUJńurs`fdUv >>*/ void espunit_rsUJnQ(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>287){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ esp_move(espunit_data->x-40 ,espunit_data->y+8+2 ,(256*10)+0xC6-0xC0+1); esp_move(espunit_data->x-40+16,espunit_data->y+8+2 ,(256*10)+0xC7-0xC0+1); esp_move(espunit_data->x-40+32,espunit_data->y+8+2 ,(256*10)+0xC8-0xC0+1); esp_move(espunit_data->x-40+48,espunit_data->y+8+2 ,(256*10)+0xC9-0xC0+1); esp_move(espunit_data->x-40+64,espunit_data->y+8+2 ,(256*10)+0xCA-0xC0+1); espunit_data->x+=espunit_data->dx; /* ʒuړ */ if(espunit_data->dx<0)espunit_data->dx+=1; } /*---------------------------------------------------------<< rsUJn̉p >>*/ void espunit_rsUJnR(espunit_data) ESPUNIT_DATA *espunit_data; { espunit_data->count+=1; /* JE^ */ if(espunit_data->count>250){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1){ esp_move(espunit_data->x-56 ,espunit_data->y+8+2 ,(256*10)+0xCB-0xC0+1); esp_move(espunit_data->x-56+16,espunit_data->y+8+2 ,(256*10)+0xCC-0xC0+1); esp_move(espunit_data->x-56+32,espunit_data->y+8+2 ,(256*10)+0xCD-0xC0+1); esp_move(espunit_data->x-56+48,espunit_data->y+8+2 ,(256*10)+0xCE-0xC0+1); esp_move(espunit_data->x-56+64,espunit_data->y+8+2 ,(256*10)+0xCF-0xC0+1); } } /*---------------------------------------------------------<< bqtrg sgdlII >>*/ void espunit_rsUbqtrg(espunit_data) ESPUNIT_DATA *espunit_data; { int i; switch(espunit_data->count){ case 0: case 60: case 120: case 180: case 240: se_adpcm1(zm_data->pcm[SE_CAUTION],zm_data->pcmsize[SE_CAUTION],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>250){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if((espunit_data->count>120)&&(espunit_data->count&1))return; if( (((espunit_data->count>>4)&1)==0)||(espunit_data->count>70) ){ for(i=0;i<2;i++){ esp_move(espunit_data->x ,espunit_data->y+(i*16),(256*4)+0xC0+(i*9)); esp_move(espunit_data->x+ 16,espunit_data->y+(i*16),(256*4)+0xC1+(i*9)); esp_move(espunit_data->x+ 32,espunit_data->y+(i*16),(256*4)+0xC2+(i*9)); esp_move(espunit_data->x+ 48,espunit_data->y+(i*16),(256*4)+0xC3+(i*9)); esp_move(espunit_data->x+ 64,espunit_data->y+(i*16),(256*4)+0xC4+(i*9)); esp_move(espunit_data->x+ 80,espunit_data->y+(i*16),(256*4)+0xC5+(i*9)); esp_move(espunit_data->x+ 96,espunit_data->y+(i*16),(256*4)+0xC6+(i*9)); esp_move(espunit_data->x+112,espunit_data->y+(i*16),(256*4)+0xC7+(i*9)); esp_move(espunit_data->x+128,espunit_data->y+(i*16),(256*4)+0xC8+(i*9)); } for(i=2;i<4;i++){ esp_move(espunit_data->x ,espunit_data->y+(i*16)+8,(256*4)+0xC0+(i*9)); esp_move(espunit_data->x+ 16,espunit_data->y+(i*16)+8,(256*4)+0xC1+(i*9)); esp_move(espunit_data->x+ 32,espunit_data->y+(i*16)+8,(256*4)+0xC2+(i*9)); esp_move(espunit_data->x+ 48,espunit_data->y+(i*16)+8,(256*4)+0xC3+(i*9)); esp_move(espunit_data->x+ 64,espunit_data->y+(i*16)+8,(256*4)+0xC4+(i*9)); esp_move(espunit_data->x+ 80,espunit_data->y+(i*16)+8,(256*4)+0xC5+(i*9)); esp_move(espunit_data->x+ 96,espunit_data->y+(i*16)+8,(256*4)+0xC6+(i*9)); esp_move(espunit_data->x+112,espunit_data->y+(i*16)+8,(256*4)+0xC7+(i*9)); esp_move(espunit_data->x+128,espunit_data->y+(i*16)+8,(256*4)+0xC8+(i*9)); } } } /*---------------------------------------------------------<< bdmsq`k >>*/ void espunit_rsUbdmsq`k(espunit_data) ESPUNIT_DATA *espunit_data; { int i; switch(espunit_data->count){ case 0: case 60: case 120: case 180: case 240: case 300: se_adpcm1(zm_data->pcm[SE_CAUTION],zm_data->pcmsize[SE_CAUTION],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>300){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1)return; if(!((espunit_data->count>>4)&1)){ /* v`qmhmf */ esp_move(espunit_data->x+16,espunit_data->y ,(256*4)+0xC0); esp_move(espunit_data->x+32,espunit_data->y ,(256*4)+0xC1); esp_move(espunit_data->x+48,espunit_data->y ,(256*4)+0xC2); esp_move(espunit_data->x+64,espunit_data->y ,(256*4)+0xC3); esp_move(espunit_data->x+80,espunit_data->y ,(256*4)+0xC4); esp_move(espunit_data->x+96,espunit_data->y ,(256*4)+0xC5); } if(espunit_data->count>70){ /* p */ esp_move(espunit_data->x+16,espunit_data->y+16,(256*4)+0xC6); esp_move(espunit_data->x+32,espunit_data->y+16,(256*4)+0xC7); esp_move(espunit_data->x+48,espunit_data->y+16,(256*4)+0xC8); esp_move(espunit_data->x+64,espunit_data->y+16,(256*4)+0xC9); esp_move(espunit_data->x+80,espunit_data->y+16,(256*4)+0xCA); esp_move(espunit_data->x+96,espunit_data->y+16,(256*4)+0xCB); } } /*---------------------------------------------------------<< v`qmhmf >>*/ void espunit_rsUwarning(espunit_data) ESPUNIT_DATA *espunit_data; { int i; switch(espunit_data->count){ case 0: case 60: case 120: case 180: case 240: case 300: se_adpcm1(zm_data->pcm[SE_CAUTION],zm_data->pcmsize[SE_CAUTION],SEPRW_ESP); break; } espunit_data->count+=1; /* JE^ */ if(espunit_data->count>300){ /* ݒJEgz */ espunit_data->type=-1; /* */ return; } /* JE^zĂȂ΁Aȉ̏ */ if(disp_cont->status&1)return; if(!((espunit_data->count>>4)&1)){ /* v`qmhmf */ esp_move(espunit_data->x+16,espunit_data->y ,(256*4)+0xC0); esp_move(espunit_data->x+32,espunit_data->y ,(256*4)+0xC1); esp_move(espunit_data->x+48,espunit_data->y ,(256*4)+0xC2); esp_move(espunit_data->x+64,espunit_data->y ,(256*4)+0xC3); esp_move(espunit_data->x+80,espunit_data->y ,(256*4)+0xC4); esp_move(espunit_data->x+96,espunit_data->y ,(256*4)+0xC5); } } /*---------------------------------------------------------<< wiAj >>*/ void espunit_rsUwi(espunit_data) ESPUNIT_DATA *espunit_data; { /* X:\RQ{摜ԍ̑ Y:\摜ԍ DY:RQ{摜ԍ */ int i; static short cx[]={ 0,256,512,768, 0,256,512,768, 0,256,512,768, 0,256,512,768}; static short cy[]={ 0, 0, 0, 0,256,256,256,256,512,512,512,512,768,768,768,768}; int cnt; short *work; espunit_data->dy+=espunit_data->x; /* ԍXV */ espunit_data->y=espunit_data->dy/32; /* ԍ */ cnt=espunit_data->y&15; /* PTŃ}XN cnt Ɋi[ */ txt_data->x=cx[cnt]; txt_data->y=cy[cnt]; work=sp_data->transpal.tpal_buff[1]+(16*cnt); //work=sp_data->transpal.tpal_buff[1]+16; for(i=0;i<16;i++){ sp_data->next_palet[0][i]=*work++; } sp_data->send_palet[0]=1; } /*---------------------------------------------------------<< wiAjxύX >>*/ void espunit_rsUwixύX(espunit_data) ESPUNIT_DATA *espunit_data; { /* X:\RQ{摜ԍ̑ Y:\摜ԍ DX:^[Qbgx DY:RQ{摜ԍ */ int i; static short cx[]={ 0,256,512,768, 0,256,512,768, 0,256,512,768, 0,256,512,768}; static short cy[]={ 0, 0, 0, 0,256,256,256,256,512,512,512,512,768,768,768,768}; int cnt; short *work; espunit_data->dy+=espunit_data->x; /* ԍXV */ espunit_data->y=espunit_data->dy/32; /* ԍ */ cnt=espunit_data->y&15; /* PTŃ}XN cnt Ɋi[ */ txt_data->x=cx[cnt]; txt_data->y=cy[cnt]; work=sp_data->transpal.tpal_buff[1]+(16*cnt); for(i=0;i<16;i++){ sp_data->next_palet[0][i]=*work++; } sp_data->send_palet[0]=1; if(espunit_data->x > espunit_data->dx)espunit_data->x-=((disp_cont->status&7)==0); if(espunit_data->x < espunit_data->dx)espunit_data->x+=((disp_cont->status&7)==0); if(espunit_data->x == espunit_data->dx)espunit_data->type=77; /* v type ߂ */ } /*---------------------------------------------------------<< wiAjEotbN >>*/ void espunit_rsUEotbN(espunit_data) ESPUNIT_DATA *espunit_data; { /* X:\RQ{摜ԍ̑ Y:\摜ԍ DY:RQ{摜ԍ */ int i; static short cx[]={ 0,256,512,768, 0,256,512,768, 0,256,512,768, 0,256,512,768}; static short cy[]={ 0, 0, 0, 0,256,256,256,256,512,512,512,512,768,768,768,768}; int cnt; short *work; espunit_data->dy+=espunit_data->x; /* ԍXV */ espunit_data->y=espunit_data->dy/32; /* ԍ */ cnt=espunit_data->y&15; /* PTŃ}XN cnt Ɋi[ */ txt_data->x=cx[cnt]; txt_data->y=cy[cnt]; work=sp_data->transpal.tpal_buff[1]+(16*cnt); for(i=0;i<16;i++){ sp_data->next_palet[0][i]=*work++; } sp_data->send_palet[0]=1; if((cnt==0)||(cnt==1)){ /* tbN */ espunit_data->type=80; espunit_data->count=0; return; } } /*---------------------------------------------------------<< Eo >>*/ void espunit_rsUEo(espunit_data) ESPUNIT_DATA *espunit_data; { int i; short cx[]={ 0,256, 0,256, 0,256, 0,256}; short cy[]={ 0, 0,256,256, 0, 0,256,256}; int sw0[]={1,1,1,1,0,0,0,0}; int sw1[]={0,0,0,0,1,1,1,1}; int cnt; short *work; //cnt=espunit_data->count/2; cnt=espunit_data->count; if(cnt<=7){ /* Aj */ grp_data->x0=cx[cnt]; grp_data->y0=cy[cnt]; grp_data->x1=cx[cnt]; grp_data->y1=cy[cnt]; grp_data->hx0=grp_data->x0*32; grp_data->hy0=grp_data->y0*32; grp_data->hx1=grp_data->x1*32; grp_data->hy1=grp_data->y1*32; grp_data->onoff.bit.grp0_onoff=sw0[cnt]; grp_data->onoff.bit.grp1_onoff=sw1[cnt]; grp_data->send_onoff=1; work=sp_data->transpal.tpal_buff[2]+(16*(cnt)); for(i=0;i<16;i++){ grp_data->next_palet[i]=*work++; } grp_data->send_palet=1; } if(cnt==8){ /* Ō */ grp_data->onoff.bit.grp0_onoff=0; grp_data->onoff.bit.grp1_onoff=0; grp_data->x2=0; grp_data->y2=256; grp_data->hx2=grp_data->x2*32; grp_data->hy2=grp_data->y2*32; grp_data->dy2=-512; grp_data->seg2=0; grp_data->segoff2=2; /* p̏M^ */ grp_data->onoff.bit.grp2_onoff=1; grp_data->send_onoff=1; work=sp_data->transpal.tpal_buff[2]+(16*(7)); for(i=0;i<16;i++){ grp_data->next_palet[i]=*work; grp_data->keep_palet[i]=*work++; } grp_data->send_palet=1; espunit_data->type=-1; return; } espunit_data->count+=1; } a->y,6*cost[8],6*sint[8],0,0,ene_data); eneshot_appear(4,ene_data->x,ene_data->y,6*cost[24],6*sint[2/*--------------------<< vg^Cv錾 >>---------------*/ void espunit_rsUJnP(ESPUNIT_DATA*); void espunit_rsUJnQ(ESPUNIT_DATA*); void espunit_rsUJnR(ESPUNIT_DATA*); void espunit_rsUbqtrg(ESPUNIT_DATA*); void espunit_rsUbdmsq`k(ESPUNIT_DATA*); void espunit_rsUwi(ESPUNIT_DATA*); void espunit_rsUwixύX(ESPUNIT_DATA*); void espunit_rsUEotbN(ESPUNIT_DATA*); void espunit_rsUEo(ESPUNIT_DATA*); void espunit_rsUwarning(ESPUNIT_DATA*); etdir[4]=0; /* Ki[ɂȂ */ } if(ene_data->count==302){ /* I */ if(ene_data->anim1)ene_data->anim3=10; else ene_data->anim3=12; } if(ene_data->count==310){ /* I */ if(ene_data->anim1)ene_data->anim3=11; else ene_data->anim3=13; } if((ene_data->count>=310)&&(ene_data->count<446)){ /* ɓ */ if(ene_data->anim1){ ene_data->hdx+=ene_data->count&1; } else { ene_data->hdx-=ene_data->count&1; } } if((ene_data->count>=310)&&(ene#include #include //#include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "..\\sepcm.h" #include "eventmacro.h" #include "event1.h" #include "vdisp.h" #include "esp.h" extern volatile STICK_UNIT *STC1_IO; /* WCXeBbN */ /*--------------< Cx^ Pʗp >---------------*/ void event1() { int i,c; short x; short y; //C_LOCATE(0,0); //printf("BG :%5d\n",all_cont->disp_cont->bg_data->bg_y); //txt_data->crtcreg->bit.txt_onoff=1; /* fobOpɂnmɂEEE */ /* af xWŊǗ */ if(bg_data->bg_y==53599){ TRANSSP(0,0xF0,18) /* ceQ rs`fdP ̊G] */ chdir("bgm"); zm_zmdplay(zm_data->zmd[10]); /* aflX^[g */ chdir(".."); } if(bg_data->bg_y==53557){ /* ceQrsP\ */ se_adpcm1(zm_data->pcm[SE_SSTART],zm_data->pcmsize[SE_SSTART],SEPRW_STAGESTART); espunit_appear(0,1,-24,64-32, 16,0); /* uceQv */ espunit_appear(1,2,300,80-32,-16,0); /* ursPv */ } if(bg_data->bg_y==53520){ /* ceQrsP̉p\ */ espunit_appear(2,3,160,96-32,0,0); /* */ } if(bg_data->bg_y==53500){ /* rotF[hC */ sp_data->fade_count[1]=0; /* tF[hEFCgJE^ */ sp_data->fade[1] =1; /* rõtF[hv */ grp_data->send_onoff=1; } if(bg_data->bg_y==53498){ /* fqotF[hC */ grp_data->fade_count=0; /* tF[hEFCgJE^ */ grp_data->fade =3; /* OtBbÑtF[hv */ } //// /* ------ ](debugp) -------- */ //if(bg_data->bg_y==53497){ // TRANSPAL(5,11,1); /* droppbg] */ // } //if(bg_data->bg_y==53496){ // GRP_REDUSPD0(-192); /* fqoy[WO */ // GRP_REDUSPD3(-128); /* fqoy[WR */ // TRANSPAL(4,4,7); // TRANSSP(20,0xC0,48) /* ro] */ // // jiki_data->x=128; // jiki_data->y=200; // jiki_cont->security=0; /* ΊZLeBXCb` */ // jiki_cont->autopilot=0; /* ^񒆂փI[gpCbg */ // jiki_cont->freeze=0; /* c֎~ */ // jiki_cont->flatter=0; /* tb^[ */ // jiki_cont->booster=0; /* u[X^[ */ // //// bg_data->bg_ny=21929; /* Lẍʒu */ // bg_data->bg_ny=22470; /* {Ẍʒu */ //// C_LOCATE(0,5); //// printf("gvqcfn\n"); // } //// /* ---------- bb܂ ----------- */ if(bg_data->bg_y==53466){ TRANSSP(11,0xC0,48) /* J^pg̊G] */ } if(bg_data->bg_y==53465){ espunit_appear(3,13,0,370,0,-4); /* J^pgo */ } if(bg_data->bg_y==53430){ espunit_appear2(4,15,40+ 0,32+96); /* J^pgpbZ[Wo */ } if(bg_data->bg_y==53082){ GRP_RSPD0(4,-192); /* fqoy[WO */ GRP_RSPD3(4,-128); /* fqoy[WR */ } if(bg_data->bg_y==53081){ /* eLpbg] */ TRANSPAL(4,4,7); } if(bg_data->bg_y==53080){ TRANSSP(20,0xC0,48) /* ro] */ TRANSPAL(5,11,1); /* droppbg] */ } //if(bg_data->bg_y==52949)bg_data->bg_ny=32730; /* fIBXe[W̓eփN(^^; */ if(bg_data->bg_y==53079)bg_data->bg_ny=32620; /* fIBXe[W̓eփN(^^; */ if(bg_data->bg_y==32619){ TRANSSP(1,0xC0,28) /* ^[QbgP̊G] */ } if(bg_data->bg_y==32618){ /* ^[QbgP\ */ espunit_appear2(0,4,30+32,30+32); } if(bg_data->bg_y==32617){ /* G̊G */ TRANSPAL(4,4,7) TRANSSP(18,0x01,79) /* GiGAj */ } if(bg_data->bg_y==32616){ TRANSSP(19,0xF0,15) /* GiGAj */ } if(bg_data->bg_y==32615-425){ /* Gij */ TRANSSP(20,0xC0,48) } //if(bg_data->bg_y==29701){ /* ^[QbgwQ̊G] */ // TRANSSP(2,0xC0,40) // } //if(bg_data->bg_y==29700){ /* ^[QbgwQ\ */ // espunit_appear2(0,5,30,30); // } if(bg_data->bg_y==28101){ /* A[X}bv̊G] */ TRANSSP(6,0xC0,42) TRANSPAL(6,11,1) } if(bg_data->bg_y==28100){ /* A[X}bv\ */ espunit_appear2(0,7,100,80); } if(bg_data->bg_y==27900){ /* ɋȂ */ grp_data->dx0=-48; grp_data->dx1=-12; grp_data->dy1=- 6; grp_data->dx2=-27; grp_data->dy2=-18; grp_data->dx3=-16; GRP_REDUSPD0(-32); /* fqoy[WO */ GRP_REDUSPD3( 1); /* fqoy[WR */ } if(bg_data->bg_y==27900-256){ /* tg^[I */ grp_data->dx0=8; grp_data->dx1=-2; grp_data->dy1=-1; grp_data->dx2=-3; grp_data->dy2=-2; grp_data->dx3=-8; } if(bg_data->bg_y==26050){ /* ƌ~܂ */ grp_data->dx0=0; grp_data->dx1=0; grp_data->dy1=0; grp_data->dx2=0; grp_data->dy2=0; grp_data->dx3=0; } if(bg_data->bg_y==27949){ /* Rj[AeNX`p^[ubN] */ TRANSSP(13,0x00,26) TRANSPAL(2,11,1) } if(bg_data->bg_y==27948){ /* Rj[Aafp^[] */ TRANSSP(14,0xC0,64) } if(bg_data->bg_y==27947){ /* afAW */ bg_data->x1 =256; bg_data->y1 =256; bg_data->hx1=bg_data->x1*32; bg_data->hy1=bg_data->y1*32; bg_data->dx1=0; bg_data->dy1=0; } if(bg_data->bg_y==27946){ /* afA\Cl[u */ bg_data->send_onoff=1; bg_data->bg_onoff=1; /* bg_data->dx1=-24; /* ‚łɁA͂ */ /* bg_data->dy1=-4; íAe[u쐬ŊǗj*/ } if(bg_data->bg_y==27945){ /* X^Cl[u */ RAS_ON(rint_st1,rtable_st1,40+(2*0),40+(2*0) +256 +1); } if(bg_data->bg_y==27945-677){ /* afA\fBZ[u */ bg_data->send_onoff=1; bg_data->bg_onoff=0; bg_data->dx1=0; /* ‚łɁAS */ bg_data->dy1=0; RAS_OFF } if(bg_data->bg_y==27944-677){ /* GroA */ TRANSSP(18,0x01,79) } if(bg_data->bg_y==27943-677){ /* GroA */ TRANSSP(19,0xF0,15) } if(bg_data->bg_y==27942-677){ /* GroA */ TRANSSP(20,0xC0,48) bg_data->bg_ny-=250; /* QTOJEgEEE */ } if(bg_data->bg_y==27501-235){ TRANSPAL(5,11,1); /* droppbg] */ } //if(bg_data->bg_y==27501-235){ /* ^[QbgwR̊G] */ // TRANSSP(3,0xC0,33) // } //if(bg_data->bg_y==27500-235){ /* ^[QbgwR\ */ // espunit_appear2(0,6,120,30); // } //if(bg_data->bg_y==25451-235){ /* ^[QbgwS̊G] */ // TRANSSP(4,0xC0,33) // } //if(bg_data->bg_y==25450-235){ /* ^[QbgwS\ */ // espunit_appear2(0,8,100,30); // } /* --- ɔ(debug) --- */ if(bg_data->bg_y==22702-235){ /* cĂGSĔj */ ALL_EXPLODE } if(bg_data->bg_y==22701-235){ /* {X[_[̊G] */ TRANSSP(7,0x01,0x34) zm_fadeout(10); /* afltF[hAEg */ } if(bg_data->bg_y==22700-235){ /* {X[_[\ */ espunit_appear2(0,9,100,30); } if(bg_data->bg_y==22282-235){ BGMPLAY(0) /* anrr aflX^[g */ TRANSSP(22,0xF8,6) /* {X[U[̊G */ } if(bg_data->bg_y==22281-235){ /* {X̊G */ TRANSSP(3,0xC0,55) TRANSPAL(0,4,4) } if(bg_data->bg_y==22280-235){ /* {X̊G */ TRANSSP(2,0x01,77) } if(bg_data->bg_y==22200-235){ /* {Xo */ se_adpcm1(zm_data->pcm[SE_JIKIBURN],zm_data->pcmsize[SE_JIKIBURN],SEPRW_ESP); GRP_REDUSPD0(-4); /* fqoy[WO */ BOSS_APPEAR_C(10,25,128,-43,1) /* { */ BOSS_APPEAR_H( 6,26,0,-128,-10,-16,0) /* oJ */ BOSS_APPEAR_H( 7,27,0,-128,+10,-16,0) /* oJE */ BOSS_APPEAR_H( 8,30,0,-128,-32, 8,0) /* A[}[ */ BOSS_APPEAR_H( 9,31,0,-128,+32, 8,0) /* A[}[E */ BOSS_APPEAR_H(11,28,0,-128,-16,-16,0) /* K */ BOSS_APPEAR_H(12,29,0,-128,+16,-16,0) /* KE */ STOP_BGY } if(bg_data->bg_y==22199-235){ /* {̂Ă͂Ȃ̂ */ /* ŊĎĂȂႢȂ̂ */ if(ene_data[10]->power<100){ /* ꂩAƃJ}̂ */ ene_data[10]->se_hit=1; ene_data[6]->se_hit=1; ene_data[7]->se_hit=1; ene_data[8]->se_hit=1; ene_data[9]->se_hit=1; ene_data[11]->se_hit=1; ene_data[12]->se_hit=1; bg_data->bg_dy=-1; ene_data[0]->type=-1; /* [U[ */ ene_data[1]->type=-1; } } if(bg_data->bg_y==22198-235){ /* {Xj󃌁[U[ */ espunit_appear(2,10,ene_data[12]->x-224-32,ene_data[12]->y+112-32,16,-8); /* ^ */ espunit_appear(3,10,ene_data[12]->x-224 ,ene_data[12]->y+112 ,16,-8); /* ^ */ espunit_appear(4,10,ene_data[12]->x-224-16,ene_data[12]->y+112+48,16,-8); /* ^ */ z_stop(0,0,0); /* aflXgbv */ } if(bg_data->bg_y==22184-235){ /* {X */ for(i=0;i<16;i++)exp_appear(ene_data[10]->x-32+rnd63(),ene_data[10]->y-32+rnd63(),32*(-4+rnd7()),32*(-4+rnd7()),rnd1()); ALL_EXPLODE_S GRP_SPEEDUP0(-192); /* fqoy[WO */ GRP_SPEEDUP3(-128); /* fqoy[WR */ GRP_SPEEDUP1(-48); /* fqoy[WP */ GRP_SPEEDUP2(-32); /* fqoy[WQ */ } /* --- ɔ(debug) --- */ if(bg_data->bg_y==22162-235){ /* G}[WFV[̊G */ TRANSSP(9,0xC0,60); } //if(bg_data->bg_y==22161-235){ /* LxCWARNING ̊G */ // TRANSSP(21,0x01,16); /* _uobt@Ô߁A]͕KvȂ */ // TRANSPAL(7,4,1); // } //if(bg_data->bg_y==22160-235){ /* ~TC̊G */ // TRANSSP(22,0x11,32); // TRANSPAL(8,5,1); // } if(bg_data->bg_y==22100-235){ espunit_appear2(0,11,40,30); /* G}[WFV[\ */ } //if(bg_data->bg_y==22070-235){ /* EH[jO */ // espunit_appear2(1,12,0,90); // } if(bg_data->bg_y==21974-235){ /* ƌ */ grp_data->onoff.bit.grp1_onoff=0; grp_data->onoff.bit.grp2_onoff=0; grp_data->send_onoff=1; /* MM */ } if(bg_data->bg_y==21715){ /* Lxo */ BGMPLAY(0) /* anrr aflX^[g */ BOSS_APPEAR(55,-40,116) STOP_BGY } if(bg_data->bg_y==21695){ /* LxCB */ zm_fadeout(10); /* afl */ GRP_RSPD0(2,0); /* OtBbNXgbv */ GRP_RSPD3(2,0); } if(bg_data->bg_y==21450+100){ /* OtBbNtցI */ grp_data->dx0=140; grp_data->dy0=1010; grp_data->dx1=400; grp_data->dy1=780; grp_data->dx2=480; grp_data->dy2=780; grp_data->dx3=120; grp_data->dy3=900; jiki_cont->freeze=1; /* @ACx^ */ jiki_cont->security=1; /* ̂ŁAs֎~ */ } if(bg_data->bg_y==21450-16+100){ /* fʂuԁBBB */ grp_data->dx1=0; /* f̃XN[Xgbv */ grp_data->dy1=0; grp_data->dx2=0; /* f̃XN[Xgbv */ grp_data->dy2=0; grp_data->dx0=0; grp_data->dx3=0; GRP_SUP0(5,0); /* ̑͌ */ GRP_SUP3(5,0); } /* @ʊOցEEE */ if( (bg_data->bg_y<=21450+100) &&(bg_data->bg_y>=21450-16+100)){ jiki_data->x-=5; /* ƃˁALq(^^; */ jiki_data->y-=20; /* ƃˁALq(^^; */ } if(bg_data->bg_y==21280+100){ /* ͓oEEE */ TRANSSP(12,0xC0,30); TRANSPAL(10,9,1); espunit_appear(0,14,128,320,0,-grp_data->dy0); } if(bg_data->bg_y==20820+100){ /* PʏI */ disp_cont->vd_mode=0; VD_MACRO G_CLR_ON(); for(i=0;i<128;i++)SP_REGST(i,-1,0,0,0,3); Wbetaread("sprite\\clear1.mdt",SP_DEF_ADD(0xC0),0x80*16*4); Wbetaread("sprite\\title\\moji.sp ",SP_DEF_ADD(0x00),fsize("sprite\\title\\moji.sp" )); Wbetaread("sprite\\title\\moji.pal",SP_PAL_ADD(0x01),fsize("sprite\\title\\moji.pal")); VD_MACRO SP_ON(); BGCTRLST(1,1,1); BGSCRLST(0x80000001,0,0); for(i=0;i<300;i++){ STC1_IO->mixed=*((char*)0xE9A001); /* WCXeBbN */ if(STC1_IO->data.trg!=3)break; VD_MACRO }; all_cont->stage_end=1; VD_MACRO BGCTRLST(1,1,0); } } >---------------*/ void enemove_rsURA(ene_data) ENE_DATA *ene_data; { static short ef_x; /* enemy field ̍ʒu */ static short ef_y; st/*-------------------------< vg^Cv錾 >--------------------------------*/ void event1(); /* rsPp */ )==0){ exp_appear(ene_data->x-16+rnd31(),ene_data->y-16+rnd31(),0,0,rnd1()); } ene_data->count+=1; ef_x = (ene_data->x - ene_data->size_x)/32; /* enemy field check */ ef_y = (ene_data->y - ene_data->size_y)/32; for(i=0;iearea_by[ene_data->type];i++){ for(c=0;cearea_bx[ene_data->type];c++){ if((ef_x+c)< 0)continue; /* NbsO */ if((ef_x+c)>=8)continue; if((ef_y+i)< 0)continue; if((ef_y+i)>=8)continue; *hit_cont->ene_field[ef_y+i][ef_x+c]++=e_sel; *hit_cont->ene_field[ef_y+i][ef_x+c] =-1; } } } /*--------------< GړB crystal >---------------*/ void enemove_rsUcrystal(ene_data) ENE_DATA *ene_data; { static short ef_x; /* enemy field ̍ʒu */ static short ef_y; static int i,c; int count=ene_data->count; int type =ene_data->type; if(ene_data->count<512){ ene_data->hy+=16; ene_data->y =#include #include //#include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "..\\sepcm.h" #include "eventmacro.h" #include "event2.h" #include "vdisp.h" #include "esp.h" extern volatile STICK_UNIT *STC1_IO; /* WCXeBbN */ /*--------------< Cx^ Qʗp >---------------*/ void event2() { int i,c; //C_LOCATE(0,0); //printf("BG :%5d\n",all_cont->disp_cont->bg_data->bg_y); /* o^C~O */ switch(bg_data->bg_y){ case 33087: case 32300: case 31500: case 30700: case 29900: case 29100: case 28700: espunit_appear(4,67,0,0,0,0); /* fqoO̊ */ break; } /* af xWŊǗ */ if(bg_data->bg_y==53599){ TRANSSP(0,0x01,16) /* ceQ rs`fdQ ̊G] */ TRANSPAL(0,11,1) /* ceQ rs`fdQ ̂o`k] */ chdir("bgm"); zm_zmdplay(zm_data->zmd[10]); /* aflX^[g */ chdir(".."); } if(bg_data->bg_y==53598){ /* R[XẘG] */ TRANSSP(1,0x11,33) TRANSPAL(3,10,1) } if(bg_data->bg_y==53597){ /* Av[`̊G] */ TRANSSP(2,0xC0,34) } if(bg_data->bg_y==53557){ /* ceQrsQ\ */ se_adpcm1(zm_data->pcm[SE_SSTART],zm_data->pcmsize[SE_SSTART],SEPRW_STAGESTART); espunit_appear(0,16,-24,64-32, 16,0); /* uceQv */ espunit_appear(1,17,300,80-32,-16,0); /* ursQv */ } if(bg_data->bg_y==53520){ /* ceQrsQ̉p\ */ espunit_appear(2,18,160,96-32,0,0); /* */ } if(bg_data->bg_y==53519){ /* fqotF[hC */ grp_data->fade_count=0; /* tF[hEFCgJE^ */ grp_data->fade =3; /* OtBbÑtF[hv */ } if(bg_data->bg_y==53510){ /* @i */ jiki_data->status=1; jiki_data->count=0; jiki_data->x=128; jiki_data->y=272; jiki_data->hx=jiki_data->x*32; jiki_data->hy=jiki_data->y*32; jiki_data->dy=-400; jiki_cont->security=0; /* Ίgp */ jiki_cont->freeze=0; /* c */ } if(bg_data->bg_y==53480){ /* R[Xw */ espunit_appear2(3,19,90+48,24+80); } if(bg_data->bg_y==53400){ /* Av[`̊G\ */ espunit_appear2(4,20,30-16,24+80); } if(bg_data->bg_y==53400-160){ /* ̋̊G\ */ espunit_appear(0,21,0,-16,0,16); } if(bg_data->bg_y==53400-160-22)bg_data->bg_ny=33599-40; /* fIBXe[W̓eփN(^^; */ //if(bg_data->bg_y==33599-40-5)bg_data->bg_ny=28900; /* [ */ if(bg_data->bg_y==33599-40){ /* kdes^[P */ grp_data->dx2=-16; grp_data->dx3=-3; grp_data->dy3=-3; grp_data->reduspd1=1; /* MM */ grp_data->target_spd1=-32; /* ^[Qbg̓Xs[h32 */ grp_data->reduspd2=1; /* MM */ grp_data->target_spd2=-16; /* ^[Qbg̓Xs[h16 */ } if(bg_data->bg_y==33498){ TRANSSP(7,0x01,60) /* G O[v` */ } if(bg_data->bg_y==33497){ TRANSSP(9,0xF0,16) /* G O[vQ */ } if(bg_data->bg_y==33496){ TRANSSP(10,0x44,11) /* G O[vf */ } if(bg_data->bg_y==33495){ TRANSSP(11,0xC0,40) /* G O[vl */ TRANSPAL(2,4,7) /* G pbg */ } if(bg_data->bg_y==33599-256){ /* kdes^[Q */ grp_data->dx1=-32; } if(bg_data->bg_y==33599-512){ /* kdes^[I */ grp_data->dx1=0; grp_data->dx2=0; grp_data->dx3=-1; grp_data->dy3=-1; } if(bg_data->bg_y==28801){ /* LxAT[Ot̊G] */ ALL_EXPLODE TRANSPAL(3,11,1) TRANSSP(3,0xC0,36) } if(bg_data->bg_y==28800){ /* LxAT[Ot̊G` */ espunit_appear2(0,22,40,20); } if(bg_data->bg_y==28700){ /* LxAڐG\z̖` */ espunit_appear2(1,23,0,70); } //if(bg_data->bg_y==28301){ /* LxAG] */ // TRANSSP(6,0xC0,40) // TRANSPAL(1,11,1) // } if(bg_data->bg_y==28300){ /* LxAo */ BOSS_APPEAR(61,-40,276+24) STOP_BGY GRP_REDUSPD1(0) GRP_REDUSPD2(0) grp_data->dx3=0; grp_data->dy3=0; } if(bg_data->bg_y==28298){ /* XN[ĊJ */ GRP_SPEEDUP0(-32) GRP_SPEEDUP1(-16) grp_data->dx3=-1; grp_data->dy3=-1; } if(bg_data->bg_y==28280){ /* Ȃ̊G */ TRANSSP(4,0xC0,15) TRANSPAL(3,11,1) } if(bg_data->bg_y==28279){ /* ȕ` */ espunit_appear2(0,24,128,0); } if(bg_data->bg_y==28275){ /* _bVI */ GRP_SPEEDUP1(-400) GRP_SPEEDUP2(-280) jiki_cont->booster=1; se_adpcm1(zm_data->pcm[SE_JIKIBURN],zm_data->pcmsize[SE_JIKIBURN],SEPRW_JIKIBOOST); } if(bg_data->bg_y==28100){ /* I */ grp_data->x0=256; grp_data->y0=256; grp_data->hx0=256*32; grp_data->hy0=256*32; grp_data->dx0=0; grp_data->dy0=-512; grp_data->onoff.bit.grp0_onoff=1; grp_data->send_onoff=1; grp_data->seg0=0; grp_data->segoff0=0; } if(bg_data->bg_y==28000){ /* Xgbv */ grp_data->dx3=0; grp_data->dy3=0; TRANSSP(8,0x01,54) /* G O[va */ } if(bg_data->bg_y==27971){ /* LxCēo̊G */ dmacpy((unsigned short*)(&(sp_data->transsp.tsp_buff[6][5*5*0x40*7])),(unsigned short*)SP_DEF_ADD(0xE0),5*5*(0x80/4)); dmacpy((unsigned short*)(&(sp_data->transpal.tpal_buff[1][16*7])),(unsigned short*)SP_PAL_ADD(8),8); } if(bg_data->bg_y==27970){ /* LxCēo */ BOSS_APPEAR(30,128,-80) } if(bg_data->bg_y==26200){ /* tb^[Jn */ jiki_cont->flatter=1; } if(bg_data->bg_y==26100){ /* I[o[q[g̊G */ TRANSSP(5,0xC0,22) TRANSPAL(3,11,1) } if(bg_data->bg_y==26099){ BOSS_APPEAR(31,ene_data[12]->x,ene_data[12]->y) } if(bg_data->bg_y==25999){ /* I[o[q[g` */ espunit_appear2(0,25,30,60); } if(bg_data->bg_y==25990){ /* */ jiki_cont->booster=0; /* u[X^[Jbg */ grp_data->reduspd0=1; /* MM */ grp_data->target_spd0=-32; /* ^[Qbg̓Xs[h32 */ grp_data->reduspd1=1; /* MM */ grp_data->target_spd1=-24; /* ^[Qbg̓Xs[h24 */ grp_data->reduspd2=1; /* MM */ grp_data->target_spd2=-16; /* ^[Qbg̓Xs[h16 */ } if(bg_data->bg_y==25900){ /* Lx */ espunit_appear2(1,26,80,40); } if(bg_data->bg_y==25450){ /* tb^[I */ jiki_cont->flatter=0; } if(bg_data->bg_y==25400){ /* ʂ̃tF[hAEg */ /* OtBbN */ for(i=0;i<16;i++)grp_data->keep_palet[i]=0; grp_data->fade_count=0; /* tF[hEFCgJE^ */ grp_data->fade =7; /* OtBbÑtF[hv */ for(i=0;i<16;i++){ /* ro */ sp_data->keep_palet[1][i]=0; sp_data->keep_palet[2][i]=0; sp_data->keep_palet[3][i]=0; } sp_data->fade_count[1]=0; /* tF[hEFCgJE^ */ sp_data->fade_count[2]=0; sp_data->fade_count[3]=0; sp_data->fade[1] =7; /* tF[hv */ sp_data->fade[2] =7; sp_data->fade[3] =7; zm_fadeout(15); } if(bg_data->bg_y==25100){ /* QʏI */ disp_cont->vd_mode=0; VD_MACRO G_CLR_ON(); for(i=0;i<128;i++)SP_REGST(i,-1,0,0,0,3); Wbetaread("sprite\\clear2.mdt",SP_DEF_ADD(0xC0),0x80*16*4); Wbetaread("sprite\\title\\moji.sp ",SP_DEF_ADD(0x00),fsize("sprite\\title\\moji.sp" )); Wbetaread("sprite\\title\\moji.pal",SP_PAL_ADD(0x01),fsize("sprite\\title\\moji.pal")); VD_MACRO SP_ON(); BGCTRLST(1,1,1); BGSCRLST(0x80000001,0,0); for(i=0;i<300;i++){ STC1_IO->mixed=*((char*)0xE9A001); /* WCXeBbN */ if(STC1_IO->data.trg!=3)break; VD_MACRO }; all_cont->stage_end=1; VD_MACRO BGCTRLST(1,1,0); } } >pcmsize[0]); if(piece_cont->piece)piece_appear(rnd2(),jiki_data->x,jiki_data->y,15); /* j */ } else { /* V[hP */ jiki_data->shield-=1; /* _[W */ jiki_data->count=0; /* JE^Oɖ߂ */ jiki_data->status=2; /* GԂ */ zm_pcmplay(zm_data->pcm[1],z/*-------------------------< vg^Cv錾 >--------------------------------*/ void event2(); /* rsQp */ alet[2][i]=esp_cont->s_palet[3-jiki_data->shield][i]; } sp_data->fade[2]=1; sp_data->fade_count[2]=0; } } } } #include #include //#include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "..\\sepcm.h" #include "eventmacro.h" #include "event3.h" #include "vdisp.h" #include "esp.h" extern volatile STICK_UNIT *STC1_IO; /* WCXeBbN */ /*--------------< Cx^ Rʗp >---------------*/ void event3() { int i; short palet[3][16]= { 0x0000,0x0854,0x0A16,0x3030,0x07C0,0x693C,0x6AD6,0x6AF8 ,0x73A4,0xA3BA,0x8FC0,0xAD5C,0xAD6C,0xC57C,0x003E,0xE736 ,0x0000,0x0854,0x0A16,0x3030,0x07C0,0x693C,0x6AD6,0x6AF8 ,0x73A4,0xA3BA,0x8FC0,0xAD5C,0xAD6C,0xC57C,0xEFC0,0xE736 ,0x0000,0x0854,0x0A16,0x6E40,0x07C0,0x3DC0,0x5740,0x8700 ,0x5DC0,0x8E80,0x8FC0,0x8E80,0x8782,0xB702,0xEFC0,0x9FC0 }; //C_LOCATE(0,0); //printf("BG :%5d\n",all_cont->disp_cont->bg_data->bg_y); //// /* ------ ](debugp) -------- */ //if(bg_data->bg_y==53497){ // TRANSPAL(10,11,1); /* droppbg] */ // ene_cont->appear=0; // } //if(bg_data->bg_y==53496){ // // jiki_data->x=128; // jiki_data->y=200; // jiki_cont->security=0; /* ΊZLeBXCb` */ // jiki_cont->freeze=0; /* c֎~ */ // jiki_cont->flatter=0; /* tb^[ */ // jiki_cont->booster=0; /* u[X^[ */ // // bg_data->bg_ny=27010; /* {Ẍʒu */ // } //// /* ---------- bb܂ ----------- */ if(grp_data->y3==1){ /* ny[WԏŃXgbv */ grp_data->dx3=0; grp_data->dy3=0; } /* af xWŊǗ */ if(bg_data->bg_y==53599){ TRANSSP(0,0x01,17) /* ceQ rs`fdR ̊G] */ TRANSPAL(0,10,1) /* ceQ rs`fdR ̂o`k] */ chdir("bgm"); zm_zmdplay(zm_data->zmd[10]); /* aflX^[g */ chdir(".."); } if(bg_data->bg_y==53557){ /* ceQrsR\ */ se_adpcm1(zm_data->pcm[SE_SSTART],zm_data->pcmsize[SE_SSTART],SEPRW_STAGESTART); espunit_appear(0,27,-24,64-32, 16,0); /* uceQv */ espunit_appear(1,28,300,80-32,-16,0); /* ursRv */ } if(bg_data->bg_y==53520){ /* ceQrsR̉p\ */ espunit_appear(2,29,160,96-32,0,0); /* */ } if(bg_data->bg_y==53519){ /* fqotF[hC */ grp_data->onoff.bit.grp0_onoff=0; grp_data->onoff.bit.grp1_onoff=0; grp_data->onoff.bit.grp2_onoff=0; grp_data->onoff.bit.grp3_onoff=1; grp_data->send_onoff=1; grp_data->fade_count=0; /* tF[hEFCgJE^ */ grp_data->fade =5; /* OtBbÑtF[hv */ } if(bg_data->bg_y==53510){ /* @i */ jiki_data->status=1; jiki_data->count=0; jiki_data->x=128; jiki_data->y=272; jiki_data->hx=jiki_data->x*32; jiki_data->hy=jiki_data->y*32; jiki_data->dy=-400; jiki_cont->security=0; /* Ίgp */ jiki_cont->freeze=0; /* c */ } if(bg_data->bg_y==53481){ /* R[XẘG] */ TRANSSP(1,0xC0,55) TRANSPAL(10,11,1) } if(bg_data->bg_y==53480){ /* R[Xw */ espunit_appear2(3,30,110-32,56+72); } if(bg_data->bg_y==53220)bg_data->bg_ny=33599; /* fIBXe[W̓eփN(^^; */ if(bg_data->bg_y==33598){ /* GO[vk ̊G] */ TRANSSP(12,0xE0,27); TRANSPAL(7,4,2); } if(bg_data->bg_y==33597){ /* GO[v` ̊G] */ TRANSSP(8,0x01,79); TRANSPAL(4,6,4); } if(bg_data->bg_y==33596){ /* GO[vl-` ̊G] */ TRANSSP(13,0xC0,31); TRANSPAL(8,10,1); } if(bg_data->bg_y==32130){ /* ԂȂEEEiPj */ for(i=0;i<16;i++)grp_data->keep_palet[i]=palet[1][i]; /* L[vpbgɃf[^] */ grp_data->onoff.bit.grp1_onoff=1; /* OtBbNpage1AnmI */ grp_data->send_onoff=1; grp_data->dy1=-256; /* XN[Xs[h */ grp_data->fade_count=0; /* tF[hEFCgJE^ */ grp_data->fade =4; /* OtBbÑtF[hv */ } if(bg_data->bg_y==32000){ /* ԂȂEEEiQj */ for(i=0;i<16;i++)grp_data->keep_palet[i]=palet[2][i]; /* L[vpbgɃf[^] */ grp_data->accel1=1; /* ` */ grp_data->target_spd1=-416; grp_data->fade_count=0; /* tF[hEFCgJE^ */ grp_data->fade =30; /* OtBbÑtF[hv */ } if(bg_data->bg_y==31971){ /* veNVtB[h̊G] */ // TRANSSP(2,0xC0,63) TRANSSP(2,0x01,63) } if(bg_data->bg_y==31970){ /* veNVtB[hJ */ espunit_appear2(0,31,40,40); } if(bg_data->bg_y==31520){ /* ΉԊJn */ (void*)esp_cont->regular_func=(void*)esp_set2; jiki_cont->flatter=1; } if(bg_data->bg_y==31500){ /* GO[va ̊G] */ TRANSSP(9,0x01,77); TRANSPAL(5,6,4); } //if(bg_data->bg_y==31202){ /* tb^[̊G] */ // TRANSSP(3,0xC0,17) // } //if(bg_data->bg_y==31201){ /* fdsshmf ek`ssdq */ // espunit_appear2(0,32,70, 50); // } if( (bg_data->bg_y<=31200) && (bg_data->bg_y>=29600) ){ for(i=0;iene_max;i++){ /* G̃u */ ene_data[i]->x+=rnd2()-1; ene_data[i]->y+=rnd2()-1; } } if(bg_data->bg_y==30500){ /* e_X^[g */ grp_data->onoff.bit.grp2_onoff=1; /* OtBbNpage2AnmI */ grp_data->send_onoff=1; grp_data->dy2=-320; /* XN[Xs[h */ grp_data->seg2=0; } if(bg_data->bg_y==29600){ /* ̐Fɂǂ */ (void*)esp_cont->regular_func=(void*)esp_set1; /* ΉԏI */ jiki_cont->flatter=0; for(i=0;i<16;i++)grp_data->keep_palet[i]=palet[0][i]; /* L[vpbgɃf[^] */ grp_data->fade_count=0; /* tF[hEFCgJE^ */ grp_data->fade =10; /* OtBbÑtF[hv */ } if(bg_data->bg_y==29500){ /* Z_X^[g */ grp_data->onoff.bit.grp0_onoff=1; /* OtBbNpage0AnmI */ grp_data->send_onoff=1; grp_data->dy0=-512; /* XN[Xs[h */ grp_data->seg0=16; } if(bg_data->bg_y==29450){ /* Z_̉ł낢돀 */ grp_data->x1 =256; /* C */ grp_data->hx1=256*32; grp_data->dy1=-32; } if(bg_data->bg_y==29400){ /* Z_X[_E */ grp_data->reduspd0=1; grp_data->target_spd0=-256; } if(bg_data->bg_y==29371){ /* ǂd̊G] */ TRANSSP(4,0xC0,17) } if(bg_data->bg_y==29370){ /* ǂdI */ espunit_appear2(0,33,70,55); } //if(bg_data->bg_y==29369){ /* G(spider)̊G */ // TRANSSP(6,0x3A,21) // } //if(bg_data->bg_y==29368){ /* G(spider)̂o`k */ // TRANSPAL(1,11,1) // } if(bg_data->bg_y==29200){ /* GO[vb-1 ̊G] */ TRANSSP(10,0x01,76); TRANSPAL(6,4,5); } if(bg_data->bg_y==29199){ /* GO[vl-b ̊G] */ TRANSSP(14,0xC0,25); TRANSPAL(9,10,1); } if(bg_data->bg_y==29198){ /* GO[vb-2 ̊G] */ TRANSSP(11,0xE0-7,39); } if(bg_data->bg_y==28000){ /* _I */ grp_data->seg0=0; grp_data->segoff0=0; } if(bg_data->bg_y==27960){ /* SOt[ɐݒB */ grp_data->seg0=256*32; grp_data->segoff0=1; } if(bg_data->bg_y==27001){ /* {X[_[ */ TRANSSP(5,0xC0,40) } if(bg_data->bg_y==27000){ /* {X[_[ */ espunit_appear2(0,34,50,45); GRP_REDUSPD3(0) zm_fadeout(20); /* afl */ } if(bg_data->bg_y==26500){ /* {Xafl */ BGMPLAY(0); TRANSSP(17,0xF8,6) /* {X[U[̊G */ } if(bg_data->bg_y==26499){ TRANSSP(18,0xF0,6) /* {Xu[h̊G */ } if(bg_data->bg_y==26452){ /* {X̊G */ TRANSSP(15,0x01,61) } if(bg_data->bg_y==26451){ /* {X̊G */ TRANSSP(16,0xC0,34) TRANSPAL(3,4,3) ALL_EXPLODE } if(bg_data->bg_y==26450){ /* {Xo */ ene_cont->appear=1; BOSS_APPEAR_H(12,55,128,-56, 0,256,0) /* {fB */ BOSS_APPEAR_H(13,56,128,-56,-26, 4,0) /* A[ */ BOSS_APPEAR_H(14,57,128,-56,+26, 4,0) /* A[E */ BOSS_APPEAR_H(15,58,128,-56,+ 7,+31,0) /* }js[^ */ BOSS_APPEAR_H(16,59,128,-56,- 7,+31,0) /* }js[^E */ STOP_BGY } if(bg_data->bg_y==26449){ /* {X */ if( (ene_data[13]->type==-1) &&(ene_data[15]->type==58) ){ ene_data[15]->type=72; ene_data[15]->count=0; } if( (ene_data[14]->type==-1) &&(ene_data[16]->type==59) ){ ene_data[16]->type=72; ene_data[16]->count=0; } if( (ene_data[12]->type==71) ){ if(ene_data[13]->type!=-1){ ene_data[13]->type=72; ene_data[13]->count=0; } if(ene_data[14]->type!=-1){ ene_data[14]->type=72; ene_data[14]->count=0; } if(ene_data[15]->type!=-1){ ene_data[15]->type=72; ene_data[15]->count=0; } if(ene_data[16]->type!=-1){ ene_data[16]->type=72; ene_data[16]->count=0; } ene_data[0]->type=-1; /* [U[Au[h */ ene_data[1]->type=-1; bg_data->bg_dy=-1; /* JEgĊJ */ } } if(bg_data->bg_y==26448){ /* {X| */ zm_fadeout(8); /* afl */ } if(bg_data->bg_y==26150){ /* ʂ̃tF[hAEg */ /* OtBbN */ for(i=0;i<16;i++)grp_data->keep_palet[i]=0; grp_data->fade_count=0; /* tF[hEFCgJE^ */ grp_data->fade =7; /* OtBbÑtF[hv */ for(i=0;i<16;i++){ /* ro */ sp_data->keep_palet[1][i]=0; sp_data->keep_palet[2][i]=0; sp_data->keep_palet[3][i]=0; } sp_data->fade_count[1]=0; /* tF[hEFCgJE^ */ sp_data->fade_count[2]=0; sp_data->fade_count[3]=0; sp_data->fade[1] =7; /* tF[hv */ sp_data->fade[2] =7; sp_data->fade[3] =7; } if(bg_data->bg_y==25850){ /* RʏI */ disp_cont->vd_mode=0; VD_MACRO G_CLR_ON(); for(i=0;i<128;i++)SP_REGST(i,-1,0,0,0,3); Wbetaread("sprite\\clear3.mdt",SP_DEF_ADD(0xC0),0x80*16*4); Wbetaread("sprite\\title\\moji.sp ",SP_DEF_ADD(0x00),fsize("sprite\\title\\moji.sp" )); Wbetaread("sprite\\title\\moji.pal",SP_PAL_ADD(0x01),fsize("sprite\\title\\moji.pal")); VD_MACRO SP_ON(); BGCTRLST(1,1,1); BGSCRLST(0x80000001,0,0); for(i=0;i<300;i++){ STC1_IO->mixed=*((char*)0xE9A001); /* WCXeBbN */ if(STC1_IO->data.trg!=3)break; VD_MACRO }; all_cont->stage_end=1; VD_MACRO BGCTRLST(1,1,0); } } /*-------------------------< vg^Cv錾 >--------------------------------*/ void event3(); /* rsRp */ *--------------------------------------------------------------------------*/ /* L[͎󂯕t Fkey_get(); ԂlFchar L[̈ʒuR[h @\FL[obt@PoCgǂݍ݁A̓͏Ԃ܂B sɔAL[obt@NA܂B */ extern char key_get(); /*--------------------------------------------------------------------------*/ /* x^CgAx^[h֐ */ /* Fbetaread(filename,address,size) address filename size oCgǂ betawrite(filename,address,size) address filename size oCg Fchar *filename t@Cl[̐擪AhX char *address ǂݍ݁i݁j̃AhX int size ǂݍ݁i݁joCg ԂlFint st st= 0:I st=-1:ُI @\Fx^ǂݍ݁i݁j܂B#include #include //#include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "..\\sepcm.h" #include "eventmacro.h" #include "event4.h" #include "vdisp.h" #include "esp.h" #include "subs.h" extern volatile STICK_UNIT *STC1_IO; /* WCXeBbN */ /*--------------< Cx^ Sʗp >---------------*/ void event4() { int i; //C_LOCATE(0,10); //printf("BG :%5d\n",all_cont->disp_cont->bg_data->bg_y); /* rIʓIȋLq */ grp_data->seg0=0; /* cceXN[ */ grp_data->segoff0=2; if(bg_data->bg_y==29179-15)txt_data->dy=ras_data->dy1; if(bg_data->bg_y>=29180-15){ /* X^[Jn܂ł */ txt_data->y=bg_data->y1; /* eLXgafƓē */ txt_data->hy=txt_data->y*32; } else { /* łȂ΁AX^WƓ */ if(bg_data->bg_y>28050-15){ txt_data->hy+=txt_data->dy; txt_data->y=txt_data->hy/32; } } /* af xWŊǗ */ if(bg_data->bg_y==53599){ TRANSSP(0,0x40,16) /* ceQ rs`fdS ̊G] */ TRANSPAL(0,9,1) /* ceQ rs`fdS ̂o`k] */ chdir("bgm"); zm_zmdplay(zm_data->zmd[10]); /* aflX^[g */ chdir(".."); } if(bg_data->bg_y==53557){ /* ceQrsS\ */ se_adpcm1(zm_data->pcm[SE_SSTART],zm_data->pcmsize[SE_SSTART],SEPRW_STAGESTART); espunit_appear(0,35,-24,64-32, 16,0); /* uceQv */ espunit_appear(1,36,300,80-32,-16,0); /* ursSv */ } if(bg_data->bg_y==53520){ /* ceQrsS̉p\ */ espunit_appear(2,37,160,96-32,0,0); /* */ } if(bg_data->bg_y==53519){ /* fqotF[hC */ grp_data->fade_count=0; /* tF[hEFCgJE^ */ grp_data->fade =3; /* OtBbÑtF[hv */ sp_data->fade_count[11]=0; /* af̃tF[hEFCgJE^ */ sp_data->fade[11] =3; /* af̃tF[hv */ sp_data->fade_count[0]=0; /* sws̃tF[hEFCgJE^ */ sp_data->fade[0] =3; /* swstF[hv */ for(i=0;i<16;i++){ sp_data->keep_palet[0][i]=sp_data->transpal.tpal_buff[4][i]; } } if(bg_data->bg_y==53510){ /* @i */ jiki_data->status=1; jiki_data->count=0; jiki_data->x=128; jiki_data->y=272; jiki_data->hx=jiki_data->x*32; jiki_data->hy=jiki_data->y*32; jiki_data->dy=-400; jiki_cont->security=0; /* Ίgp */ jiki_cont->freeze=0; /* c */ jiki_cont->booster=1; /* ŏ̓u[X^[I */ se_adpcm1(zm_data->pcm[SE_JIKIBURN],zm_data->pcmsize[SE_JIKIBURN],SEPRW_JIKIBOOST); } if(bg_data->bg_y==53481){ /* X^[gbZ[W */ TRANSSP(1,0x0A,41) TRANSPAL(8,10,1) } if(bg_data->bg_y==53480){ espunit_appear2(3,38,64-32,48+48); } if(bg_data->bg_y==53220)bg_data->bg_ny=33599; /* fIBXe[W̓eփN(^^; */ //if(bg_data->bg_y==33595)bg_data->bg_ny=30351; /* [ */ if(bg_data->bg_y==33598){ /* G̊G]i`j */ TRANSSP(9,0x24,44); TRANSPAL(5,4,5); } if(bg_data->bg_y==32101){ /* GlM[e邼II̊G */ TRANSSP(2,0x0A,26) } /* EEE */ if(bg_data->bg_y==32100){ /* GlM[e邼II */ espunit_appear2(0,39,90,48); } if(bg_data->bg_y==32080){ /* ڐG\ */ espunit_appear(1,43,38,150,0,0); } if((bg_data->bg_y<=31800)&(bg_data->bg_y>=31768)){ /* GlM[ê */ if(bg_data->bg_y&1){ // char s1; // s1=47+rnd3(); // eneshot_appear(0,40+rnd15(),0,cost[s1]*12,sint[s1]*12,0,0,0); eneshot_appear(1,54-32+rnd63(),0,cost[48]*12,sint[48]*12,0,0,0); } } /* EEEE */ if(bg_data->bg_y==31700){ /* GlM[e邼II */ espunit_appear2(0,39,90,48); } if(bg_data->bg_y==31680){ /* ڐG\ */ espunit_appear(1,43,186,150,0,0); } if((bg_data->bg_y<=31400)&(bg_data->bg_y>=31368)){ /* GlM[ê */ if(bg_data->bg_y&1){ // char s1; // s1=47+rnd3(); // eneshot_appear(0,186+rnd15(),0,cost[s1]*12,sint[s1]*12,0,0,0); eneshot_appear(1,202-32+rnd63(),0,cost[48]*12,sint[48]*12,0,0,0); } } /* ^񒆂EEE */ if(bg_data->bg_y==31300){ /* GlM[e邼II */ espunit_appear2(0,39,90,48); } if(bg_data->bg_y==31280){ /* ڐG\ */ espunit_appear(1,43,112,150,0,0); jiki_cont->booster=0; /* u[X^[It */ } if((bg_data->bg_y<=31000)&(bg_data->bg_y>=30900)){ /* GlM[ê */ if(bg_data->bg_y&1){ // char s1; // s1=47+rnd3(); // eneshot_appear(0,112+rnd15(),0,cost[s1]*12,sint[s1]*12,0,0,0); eneshot_appear(1,128-32+rnd63(),0,cost[48]*12,sint[48]*12,0,0,0); } } if(bg_data->bg_y==30801){ /* LxC邼II̊G */ TRANSSP(3,0x0A,26) } if(bg_data->bg_y==30800){ /* LxC邼II */ espunit_appear2(0,40,90,48); BG_REDUSPD1(0); } //if(bg_data->bg_y==30351){ /* LxAG] */ // TRANSSP(7,0x0A,40) // TRANSPAL(2,10,1) // } if(bg_data->bg_y==30350){ /* LxAo */ // ALL_EXPLODE TRANSSP(16,0x48,6) /* {X[U[̊G */ BOSS_APPEAR_C(12,27,128,-40,0) STOP_BGY } if(bg_data->bg_y==30348){ /* OtBbNXN[ĊJ */ ene_data[0]->type=-1; /* [U[ */ ene_data[1]->type=-1; BG_SPEEDUP1(-256); jiki_cont->booster=1; /* u[X^[I */ se_adpcm1(zm_data->pcm[SE_JIKIBURN],zm_data->pcmsize[SE_JIKIBURN],SEPRW_JIKIBOOST); TRANSPAL(8,10,1); /* drõpbg߂ */ } if(bg_data->bg_y==30347){ /* G̊G]i`j */ TRANSSP(9,0x24,44); TRANSPAL(5,4,5); } if(bg_data->bg_y==30271){ /* [ǂȂ̊G */ TRANSSP(8,0x0A,17) } if(bg_data->bg_y==30270){ /* [ǂȕ` */ espunit_appear2(0,47,128,0); } if(bg_data->bg_y==30000){ /* ΂炭i񂾂A */ BG_REDUSPD1(-32); jiki_cont->booster=0; /* u[X^[؂ */ } if(bg_data->bg_y==29700){ /* ΂炭i񂾂AXɓ */ bg_data->seg1=0; bg_data->segoff1=0; } if(bg_data->bg_y==29260){ /* XɓƂɁAafAswsɉH(^^; */ bg_data->seg1=257; bg_data->segoff1=2; } if(bg_data->bg_y==29180-15){ /* X^[Jn */ ras_data->hx1=bg_data->hx1; ras_data->x1=bg_data->x1; ras_data->hy1=bg_data->hy1+bg_data->dy1; ras_data->y1=ras_data->hy1/32; ras_data->dx1=bg_data->dx1; ras_data->dy1=-8; /* X^[͑̕xႤ */ ras_data->start_dot=256-ras_data->y1; ras_data->end_dot =256-ras_data->y1+127; /* af́Â܂܃XN[ */ RAS_ON(rint_st4,rtable_st4,40+(2*ras_data->start_dot),40+(2*(ras_data->end_dot+1))); } if(bg_data->bg_y==29050-100){ /* G̊G]iaj */ TRANSSP(10,0x01,72); TRANSPAL(6,4,7); } if(bg_data->bg_y==29049-100){ /* G̊G]ia-j */ TRANSSP(11,0xD4,28); } if(bg_data->bg_y==29048-100){ /* G̊G]ia-2ndj */ TRANSSP(12,0xF0,15); } if(bg_data->bg_y==29047-100){ /* drõpbg */ TRANSPAL(8,11,1); } if(bg_data->bg_y==28499){ /* hqR邼̊G */ TRANSSP(4,0xC0,20) } if(bg_data->bg_y==28498){ /* hqR邼II */ espunit_appear2(0,41,90,48); } if(bg_data->bg_y==28428){ espunit_appear2(1,44,128,80); } if(bg_data->bg_y==28050){ /* hqCRo */ GRP_REDUSPD0(0); /* XN[Xgbv */ TRANSSP(6,0xC0,8) /* p^[] */ TRANSPAL(1,11,1) /* pbg] */ ene_cont->appear=0; /* Gos */ ALL_EXPLODE /* GSĔj */ } if(bg_data->bg_y==28011){ /* oI */ for(i=0;i<8;i++){ BOSS_APPEAR_C(i,60,16+(i*32),-16,0) } ene_data[3]->type+=2; /* ^񒆂̂Q‚̓RA */ ene_data[4]->type+=2; ene_data[3]->power+=200; /* RA͂ */ ene_data[4]->power+=200; STOP_BGY /* afXN[Xgbv */ } if(bg_data->bg_y==28009){ /* hqCR˔j */ ALL_EXPLODE /* GSĔj */ GRP_REDUSPD0(-16); /* XN[ĊJ */ ene_cont->appear=1; /* Go */ TRANSPAL(8,11,1); /* dro pbg */ } if(bg_data->bg_y==28532){ /* ɐi񂾂Aɐi( */ grp_data->reduspd0=1; grp_data->target_spd0=-16; } if(bg_data->bg_y==27010){ /* hqQ邼̊G */ TRANSSP(4,0xC0,20) } if(bg_data->bg_y==27009){ /* hqQ邼II */ espunit_appear2(0,41,90,48); } if(bg_data->bg_y==26939){ espunit_appear2(1,45,128,80); } if(bg_data->bg_y==26551){ /* hqCQo */ GRP_REDUSPD0(0); /* XN[Xgbv */ TRANSSP(6,0xC0,8) /* p^[] */ TRANSPAL(1,11,1) /* pbg] */ ene_cont->appear=0; /* Gos */ ALL_EXPLODE /* GSĔj */ } if(bg_data->bg_y==26501){ /* oI */ for(i=0;i<8;i++){ BOSS_APPEAR_C(i,60,16+(i*32),-16,0) } ene_data[3]->type+=2; /* ^񒆂̂Q‚̓RA */ ene_data[4]->type+=2; ene_data[3]->power+=300; /* RA͂ */ ene_data[4]->power+=300; STOP_BGY /* afXN[Xgbv */ } if(bg_data->bg_y==26499){ /* hqCQ˔j */ ALL_EXPLODE /* GSĔj */ GRP_REDUSPD0(-16); /* XN[ĊJ */ ene_cont->appear=1; /* Go */ TRANSPAL(8,11,1); /* dro pbg */ } if(bg_data->bg_y==26498){ /* G̊G]ibj */ TRANSSP(13,0x01,79); TRANSPAL(7,4,7); } if(bg_data->bg_y==26497){ /* G̊G]ib-j */ TRANSSP(14,0xD4,28); } if(bg_data->bg_y==26496){ /* G̊G]ib-2ndj */ TRANSSP(15,0xF0,15); } if(bg_data->bg_y==26601){ /* ɐi񂾂Aɂɐi( */ grp_data->reduspd0=1; grp_data->target_spd0=-16; } if(bg_data->bg_y==25510){ /* hqP邼̊G */ TRANSSP(4,0xC0,20) } if(bg_data->bg_y==25509){ /* hqP邼II */ espunit_appear2(0,41,90,48); } if(bg_data->bg_y==25439){ espunit_appear2(1,46,128,80); } if(bg_data->bg_y==25051){ /* hqCPo */ GRP_REDUSPD0(0); /* XN[Xgbv */ TRANSSP(6,0xC0,8) /* p^[] */ TRANSPAL(1,11,1) /* pbg] */ ene_cont->appear=0; /* Gos */ ALL_EXPLODE /* GSĔj */ } if(bg_data->bg_y==25001){ /* oI */ for(i=0;i<8;i++){ BOSS_APPEAR_C(i,60,16+(i*32),-16,0) } ene_data[3]->type+=2; /* ^񒆂̂Q‚̓RA */ ene_data[4]->type+=2; ene_data[3]->power+=400; /* RA͂ */ ene_data[4]->power+=400; STOP_BGY /* afXN[Xgbv */ } if(bg_data->bg_y==24999){ /* hqCP˔j */ ALL_EXPLODE /* GSĔj */ GRP_REDUSPD0(-16); /* XN[ĊJ */ ene_cont->appear=1; /* Go */ TRANSPAL(8,11,1); /* dro pbg */ } if(bg_data->bg_y==23860){ /* ŏIʒuŃXN[~ */ grp_data->dy0=0; } if(bg_data->bg_y==23500){ /* ʂ̃tF[hAEg */ /* OtBbN */ for(i=0;i<16;i++)grp_data->keep_palet[i]=0; grp_data->fade_count=0; /* tF[hEFCgJE^ */ grp_data->fade =7; /* OtBbÑtF[hv */ for(i=0;i<16;i++){ /* ro */ sp_data->keep_palet[1][i]=0; sp_data->keep_palet[2][i]=0; sp_data->keep_palet[3][i]=0; } sp_data->fade_count[1]=0; /* tF[hEFCgJE^ */ sp_data->fade_count[2]=0; sp_data->fade_count[3]=0; sp_data->fade[1] =7; /* tF[hv */ sp_data->fade[2] =7; sp_data->fade[3] =7; zm_fadeout(15); } if(bg_data->bg_y==23200){ /* SʏI */ disp_cont->vd_mode=0; VD_MACRO G_CLR_ON(); for(i=0;i<16;i++)*((short*)(0xE82200+(2*i)))=0; /* eLXg܂ */ for(i=0;i<128;i++)SP_REGST(i,-1,0,0,0,3); Wbetaread("sprite\\clear4.mdt",SP_DEF_ADD(0xC0),0x80*16*4); Wbetaread("sprite\\title\\moji.sp ",SP_DEF_ADD(0x00),fsize("sprite\\title\\moji.sp" )); Wbetaread("sprite\\title\\moji.pal",SP_PAL_ADD(0x01),fsize("sprite\\title\\moji.pal")); VD_MACRO SP_ON(); BGCTRLST(1,1,1); BGSCRLST(0x80000001,0,0); for(i=0;i<300;i++){ STC1_IO->mixed=*((char*)0xE9A001); /* WCXeBbN */ if(STC1_IO->data.trg!=3)break; VD_MACRO }; all_cont->stage_end=1; VD_MACRO BGCTRLST(1,1,0); } } ^ŃANZX܂B X[p[oCU[hŎgpĂB ߂lFȂ */ extern void dmacpy(unsigned short *,unsigned short *,unsigned short); /*---------------------------------------------------------------------------*/ /*y|ltrhb߂̊֐ F int zm_sdinit(); @\ F y|ltrhb̏܂B ߂lF I O G[OȊOԂ F Ȃ F int zm_zmdplay(char *zmd); @\ F ylcf[^t܂B ߂lF G[R[hԂ܂B F char *zmd; .zmd t@C̃x^[ḧ̐擪ւ̃|C^ F void zm_pcmplay(char *pcmtop,int size); @\ F ʉobl‚炵܂B ߂lF Ȃ F char *pcmtop; adpcm̃f[^̃x^[ḧ̐/*-------------------------< vg^Cv錾 >--------------------------------*/ void event4(); /* rsSp */ Eg܂ ߂lF O:ݒI -1:ݒ莸s F int speed; -85`-1 tF[hCxݒ 0 ݒ 1`85 tF[hAEgxݒ F int zm_offset(char *zmd); @\ F ʉ̂ylcf[^́Af[^{̂܂ł̃ItZbg߂܂ ߂lF ItZbg F char *zmd; ylc̃x^[ḧւ̃|C^ */ extern int zm_sdinit(); extern void zm_zmdplay(char *); extern void zm_fadeout(int); extern void zm_pcmplay(char *,int); extern int zm_offset(char*); /* ȉAzlib.s Ɋ܂܂֐Q */ extern void z_init() ; extern int z_alloc( int track , int size ) ; extern int z_assign( int channel , int track ) ; extern int z_stat( int bitptr ) ; extern int z_play( int d2 , int d3 , int d4 ) ; extern int z_stop( int d2 , int d3 , int d4 ) ; extern int/*---------------------- I espunit ̂SԂ́AeLXgǗpɐL܂ -----*/ #include #include //#include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "..\\sepcm.h" #include "eventmacro.h" #include "event5.h" #include "vdisp.h" #include "esp.h" extern volatile STICK_UNIT *STC1_IO; /* WCXeBbN */ /*--------------< Cx^ Tʗp >---------------*/ void event5() { int i; //C_LOCATE(0,0); //printf("BG :%5d\n",all_cont->disp_cont->bg_data->bg_y); //// /* ------ ](debugp) -------- */ //if(bg_data->bg_y==53497){ // TRANSPAL(10,11,1); /* droppbg] */ // ene_cont->appear=0; // espunit_data[4]->type=-1; /* eLXgǗA~ */ // } //if(bg_data->bg_y==53496){ // // jiki_data->x=128; // jiki_data->y=200; // jiki_cont->security=0; /* ΊZLeBXCb` */ // jiki_cont->freeze=0; /* c֎~ */ // jiki_cont->flatter=0; /* tb^[ */ // jiki_cont->booster=0; /* u[X^[ */ // // bg_data->bg_ny=26900; /* {Ẍʒu */ // } //// /* ---------- bb܂ ----------- */ /* af xWŊǗ */ if(bg_data->bg_y==53599){ TRANSSP(0,0x01,16) /* ceQ rs`fdT ̊G] */ TRANSPAL(0,10,1) /* ceQ rs`fdT ̂o`k] */ chdir("bgm"); zm_zmdplay(zm_data->zmd[10]); /* aflX^[g */ chdir(".."); } if(bg_data->bg_y==53557){ /* ceQrsQ\ */ se_adpcm1(zm_data->pcm[SE_SSTART],zm_data->pcmsize[SE_SSTART],SEPRW_STAGESTART); espunit_appear(0,48,-24,64-32, 16,0); /* uceQv */ espunit_appear(1,49,300,80-32,-16,0); /* ursTv */ } if(bg_data->bg_y==53520){ /* ceQrsT̉p\ */ espunit_appear(2,50,160,96-32,0,0); /* */ } if(bg_data->bg_y==53519){ /* fqo,swstF[hC */ grp_data->fade_count=0; /* tF[hEFCgJE^ */ grp_data->fade =3; /* OtBbÑtF[hv */ sp_data->fade_count[0]=0; /* tF[hEFCgJE^ */ sp_data->fade[0] =3; /* swstF[hv */ for(i=0;i<16;i++){ sp_data->keep_palet[0][i]=sp_data->transpal.tpal_buff[2][i]; } espunit_appear(4,68,0,0,0,0); /* eLXgǗX^[g */ } if(bg_data->bg_y==53510){ /* @i */ jiki_data->status=1; jiki_data->count=0; jiki_data->x=128; jiki_data->y=272; jiki_data->hx=jiki_data->x*32; jiki_data->hy=jiki_data->y*32; jiki_data->dy=-400; jiki_cont->security=0; /* Ίgp */ jiki_cont->freeze=0; /* c */ } if(bg_data->bg_y==53482){ TRANSPAL(11,11,1) /* dropbg */ TRANSSP(1,0xC0,15) /* G̕ */ } if(bg_data->bg_y==53481){ TRANSSP(2,0xD0,32) /* G̊Og{ZbgAbvbZ[W */ } if(bg_data->bg_y==53480){ /* G\ */ espunit_appear2(5+0,51,48+48,120+32); /* */ } if(bg_data->bg_y==53450){ espunit_appear2(5+2,52,128+48,112+32); /* g */ espunit_appear2(5+3,53,128+48,112+32); /* ZbgAbvldr */ } if(bg_data->bg_y==53351){ TRANSSP(3,0xD0,16) /* G̊GP̊G] */ } if(bg_data->bg_y==53350){ espunit_appear(5+3,54,128+48,112+32, 0,0); /* GP */ } if(bg_data->bg_y==53321){ TRANSSP(4,0xD0,16) /* G̊GQ̊G] */ } if(bg_data->bg_y==53320){ espunit_appear(5+3,54,128+48,112+32, 0,0); /* GQ */ } if(bg_data->bg_y==53291){ TRANSSP(5,0xD0,20) /* G̊GR̊G] */ } if(bg_data->bg_y==53290){ espunit_appear(5+3,60,128+48,112+32, 0,0); /* GR */ } if(bg_data->bg_y==53280){ espunit_appear2(5+2,59,128+48,178+32); /* cdsdbsdc */ espunit_appear2(5+1,55,194+16,122); /* WI */ } if(bg_data->bg_y==53200)bg_data->bg_ny=33599; /* fIBXe[W̓eփN(^^; */ if(bg_data->bg_y==33597){ /* O[v`̃L] */ TRANSSP(12,0x00,69) TRANSPAL(7,4,5) esp_cont->espunit_max=5; } if(bg_data->bg_y==33596){ /* O[v` 2nd ̃L] */ TRANSSP(13,0xF0,11) } if(bg_data->bg_y==33550){ jiki_cont->booster=1; /* u[X^[_ */ se_adpcm1(zm_data->pcm[SE_JIKIBURN],zm_data->pcmsize[SE_JIKIBURN],SEPRW_JIKIBOOST); } if(bg_data->bg_y==33301){ /* narxr̊G] */ TRANSSP(6,0xC0,36) } if(bg_data->bg_y==33300){ /* narxr\ */ espunit_appear2(0,56, 48,48); /* */ } if(bg_data->bg_y==28201-560){ /* [vAEg̊G] */ TRANSSP(8,0xC0,41) TRANSPAL(11,11,1) /* ESP pal */ } if(bg_data->bg_y==28200-560){ /* [vAEg̊G` */ espunit_appear2(0,58, 48+32,48); } if(bg_data->bg_y==28000-560){ /* no */ espunit_appear(4,70,0,0,0,0); } if(bg_data->bg_y==27999-560){ /* O[v`̃L] */ TRANSSP(12,0x00,69) TRANSPAL(7,4,5) } if(bg_data->bg_y==27998-560){ /* O[v` 2nd ̃L] */ TRANSSP(13,0xF0,10) } if(bg_data->bg_y==27800-560){ jiki_cont->booster=0; /* u[X^[ */ grp_data->reduspd2=1; /* */ grp_data->target_spd2=-4; grp_data->reduspd3=1; /* */ grp_data->target_spd3=-2; } if(bg_data->bg_y==27501-560){ /* {XTC̊G] */ TRANSSP(7,0xC0,41) } if(bg_data->bg_y==26940){ /* {XTC̊G` */ espunit_appear2(0,57, 48,48); /* iROOJEgj */ zm_fadeout(20); /* afl */ } if(bg_data->bg_y==26591){ /* */ ALL_EXPLODE } if(bg_data->bg_y==26590){ /* {Xro */ TRANSSP(17,0x01,0x43) TRANSPAL(12,4,1) } if(bg_data->bg_y==26589){ /* [vAEgro */ TRANSSP(18,0xC0,0x32) TRANSPAL(13,5,1) } if(bg_data->bg_y==26588){ /* {Xo */ BGMPLAY(0); BOSS_APPEAR_C(12,50, 64,80,0) BOSS_APPEAR_C(13,50,192,80,0) STOP_BGY } if(bg_data->bg_y==26587){ /* 󂵂i */ if( (ene_cont->ene_data[12]->type==-1) &&(ene_cont->ene_data[13]->type==-1))bg_data->bg_dy=-1; } if(bg_data->bg_y==26520){ /* ʂ̃tF[hAEg */ /* OtBbN */ for(i=0;i<16;i++)grp_data->keep_palet[i]=0; grp_data->fade_count=0; /* tF[hEFCgJE^ */ grp_data->fade =7; /* OtBbÑtF[hv */ for(i=0;i<16;i++){ /* ro */ sp_data->keep_palet[1][i]=0; sp_data->keep_palet[2][i]=0; sp_data->keep_palet[3][i]=0; } sp_data->fade_count[1]=0; /* tF[hEFCgJE^ */ sp_data->fade_count[2]=0; sp_data->fade_count[3]=0; sp_data->fade[1] =7; sp_data->fade[2] =7; sp_data->fade[3] =7; *((short*)0xE8E000)=0; /* VXe|[ggpătF[h */ /* ieLXgAjŃpbg]Ă邽߁j */ zm_fadeout(15); } if(bg_data->bg_y==26220){ /* TʏI */ disp_cont->vd_mode=0; G_CLR_ON(); for(i=0;i<16;i++)*((short*)(0xE82200+(2*i)))=0; /* eLXg܂ */ for(i=0;i<128;i++)SP_REGST(i,-1,0,0,0,3); Wbetaread("sprite\\clear5.mdt",SP_DEF_ADD(0xC0),0x80*16*4); Wbetaread("sprite\\title\\moji.sp ",SP_DEF_ADD(0x00),fsize("sprite\\title\\moji.sp" )); Wbetaread("sprite\\title\\moji.pal",SP_PAL_ADD(0x01),fsize("sprite\\title\\moji.pal")); *((short*)0xE8E000)=15; /* VXe|[ggpătF[h */ for(i=0;i<32;i++){VD_MACRO} VD_MACRO SP_ON(); BGCTRLST(1,1,1); BGSCRLST(0x80000001,0,0); for(i=0;i<300;i++){ STC1_IO->mixed=*((char*)0xE9A001); /* WCXeBbN */ if(STC1_IO->data.trg!=3)break; VD_MACRO }; all_cont->stage_end=1; VD_MACRO BGCTRLST(1,1,0); } } 0 /* p */ }; char se_hit_set3[]={ /* ZbgRp */ 3,3,3,3,3,3,3,3,3,3 ,3,3,3,3,3,3,3,3,3,3 ,3,3,3,3,3,3,3,1,1,1 ,1,1,1,1,1,3,3,3,3,3 ,3,3,3,3,3,3,3,3,3,3 ,3,3,3,3,3,3,3,3,3,3 ,3,3,3,3,3,3,3,3,3,3 ,0,0,0,0,0,0,0,0,0,0 /* p */ }; char se_hit_set4[]={ /* ZbgSp */ 3,3,3,3,3,3,3,3,3,3 ,3,3,3,3,3,3,3,3,3,3 ,3,3,3,3,3,3,3,3,3,3/*-------------------------< vg^Cv錾 >--------------------------------*/ void event5(); /* rsTp */ ,0 /* p */ }; char se_hit_set5[]={ /* ZbgTp */ 1,0,1,0,1,0,1,0,1,0 ,1,0,1,3,3,3,3,3,3,3 ,1,1,1,1,1,1,1,1,1,1 ,3,3,3,3,3,3,3,3,3,3 ,3,3,3,3,3,3,3,3,3,3 ,3,3,3,3,3,3,3,3,3,3 ,3,3,3,3,3,3,3,3,3,3 ,0,0,0,0,0,0,0,0,0,0 /* p */ }; extern volatile STICK_UNIT *STC1_IO; /*--------------< 蔻胋[` >---------------*/ void hit() { static int c; for(c=0;cene_max;c++)ene_data[c]->flash=0; /* Ƃ肠flash */ shot_ene(); /* @e|G{ */ add_target(); /* lje|lje^[Qbg */ add_ene(); /* lj|G */ jiki_ene(); /* @ |G{ */ jiki_eneshot(); /* @ | Ge */ blade_ene(); /* u[h|G{ */ blade_eneshot(); /* u[h|Ge */ } /*--------------< @e|G{̓蔻 >--------------- enemy field ok*/ void shot_ene() /* IIIII rs`fdUAESPUNIT ̂SԂeLXg̏ŐL IIIII */ #include #include //#include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "..\\sepcm.h" #include "eventmacro.h" #include "event6.h" #include "vdisp.h" #include "esp.h" static short _red; static short _blue; static short _green; static union{ short mixed; struct{ unsigned green:5; unsigned red:5; unsigned blue:5; unsigned I:1; }bit; }cast; /*--------------< Cx^ Uʗp >---------------*/ void event6() { int i; //C_LOCATE(0,0); //printf("BG :%5d\n",all_cont->disp_cont->bg_data->bg_y); /* af xWŊǗ */ if(bg_data->bg_y==53599){ ene_cont->appear=0; /* Go֎~B */ cast.bit.red=31; /* Fiԁj */ cast.bit.green=0; cast.bit.blue=0; _red=cast.mixed; cast.bit.red=0; /* Fij */ cast.bit.green=0; cast.bit.blue=31; _blue=cast.mixed; cast.bit.red=0; /* Fi΁j */ cast.bit.green=20; cast.bit.blue=0; _green=cast.mixed; TRANSSP(0,0x01,16) /* ceQ rs`fdU ̊G] */ TRANSPAL(0,10,1) /* ceQ rs`fdU ̂o`k] */ chdir("bgm"); zm_zmdplay(zm_data->zmd[10]); /* aflX^[g */ chdir(".."); espunit_appear(4,77,64, 0 , 0 , 0 ); /* eLXgǗX^[g */ disp_cont->vd_mode=2; } if(bg_data->bg_y==53557){ /* ceQrsU\ */ se_adpcm1(zm_data->pcm[SE_SSTART],zm_data->pcmsize[SE_SSTART],SEPRW_STAGESTART); espunit_appear(0,61,-24,64-32, 16,0); /* uceQv */ espunit_appear(1,62,300,80-32,-16,0); /* ursUv */ } if(bg_data->bg_y==53520){ /* ceQrsỦp\ */ espunit_appear(2,63,160,96-32,0,0); /* */ } if(bg_data->bg_y==53510){ /* @i */ jiki_data->status=1; jiki_data->count=0; jiki_data->x=128; jiki_data->y=272; jiki_data->hx=jiki_data->x*32; jiki_data->hy=jiki_data->y*32; jiki_data->dy=-400; jiki_cont->security=0; /* Ίgp */ jiki_cont->freeze=0; /* c */ jiki_cont->booster=1; se_adpcm1(zm_data->pcm[SE_JIKIBURN],zm_data->pcmsize[SE_JIKIBURN],SEPRW_JIKIBOOST); } if(bg_data->bg_y==53481){ /* bqtrg sgdlII̊G */ TRANSSP(1,0xC0,36) } if(bg_data->bg_y==53480){ /* bqtrg sgdl\ */ espunit_appear(3,64,80,48+72, 0,0); espunit_data[4]->type=78; /* wi */ espunit_data[4]->dx=32; jiki_cont->booster=0; } if(bg_data->bg_y==53230)bg_data->bg_ny=33599; /* fIBXe[W̓eփN(^^; */ if(bg_data->bg_y==33492){ /* {Xro */ TRANSSP(7,0x01,0x43) TRANSPAL(7,5,1) } if(bg_data->bg_y==33491){ /* [vAEgro */ TRANSSP(8,0xC0,0x32) TRANSPAL(8,6,1) } if(bg_data->bg_y==33490){ /* {Xo */ BOSS_APPEAR_C(12,15, 64,80,0) BOSS_APPEAR_C(13,15,192,80,0) BOSS_APPEAR_C(14,15,128,80,0) STOP_BGY } if(bg_data->bg_y==33489){ /* S󂵂i */ if( (ene_cont->ene_data[12]->type==-1) &&(ene_cont->ene_data[13]->type==-1) &&(ene_cont->ene_data[14]->type==-1))bg_data->bg_dy=-1; } if(bg_data->bg_y==33401){ /* [ɂ񂮂̊G */ TRANSSP(9,0xC0,6) } if(bg_data->bg_y==33400){ /* [ɂ \ */ espunit_appear(0,81,80,48, 0,0); } //if(bg_data->bg_y==33200){ /* wi */ // espunit_data[4]->dx=0; // espunit_data[4]->type=78; // } /* ŁACoo */ if(bg_data->bg_y==33200){ /* wi */ TRANSSP(10,0x48,6) /* {X[U[̊G */ espunit_data[4]->dx=64; espunit_data[4]->type=78; jiki_cont->booster=1; se_adpcm1(zm_data->pcm[SE_JIKIBURN],zm_data->pcmsize[SE_JIKIBURN],SEPRW_JIKIBOOST); BOSS_APPEAR_C(12,20,128,-40,0) STOP_BGY } if(bg_data->bg_y==33198){ ene_data[0]->type=-1; /* [U[ */ ene_data[1]->type=-1; } if(bg_data->bg_y==33151){ /* X{X߂恙̊G */ TRANSSP(2,0xC0,12) } if(bg_data->bg_y==33150){ /* X{X߂恙\ */ espunit_appear(0,65,80,48, 0,0); } if(bg_data->bg_y==32900){ /* tbNJnEo */ espunit_data[4]->type=79; jiki_cont->booster=0; } if(bg_data->bg_y==32762){ /* X{Xro]iRAj */ TRANSSP(4,0x01,0x44) TRANSPAL(4,4,4) } if(bg_data->bg_y==32761){ /* X{Xro]iNX^j */ TRANSSP(5,0xC0,4*16) TRANSPAL(5,8,1) } if(bg_data->bg_y==32760){ /* X{Xo */ for(i=0;i<16;i++){ /* pbg] */ grp_data->keep_palet[i]=sp_data->transpal.tpal_buff[3][i]; grp_data->next_palet[i]=sp_data->transpal.tpal_buff[3][i]; } grp_data->dy2=-16; /* 0.5dot/frame ̏^ */ // BOSS_APPEAR_C(N,CODE,X,Y,ACC) BOSS_APPEAR_C( 8, 0,128+ 40,128-117-256,0) BOSS_APPEAR_C( 9, 2,128- 40,128-117-256,0) BOSS_APPEAR_C(10, 4,128+ 92,128- 86-256,0) BOSS_APPEAR_C(11, 6,128- 92,128- 86-256,0) BOSS_APPEAR_C(12, 8,128+ 69,128- 27-256,0) BOSS_APPEAR_C(13,10,128- 69,128- 27-256,0) BOSS_APPEAR_C(14,12,128 ,128- 98-256,0) } if(bg_data->bg_y==32248){ /* QTUhbgXN[~ */ grp_data->dy2=0; grp_data->dy3=0; ene_data[ 8]->se_hit=3; ene_data[ 9]->se_hit=3; ene_data[10]->se_hit=3; ene_data[11]->se_hit=3; ene_data[12]->se_hit=3; ene_data[13]->se_hit=3; STOP_BGY } if(bg_data->bg_y==32247){ /* RASĉ󂵂ANX^󂹂悤ɂȂ */ if( (ene_data[ 8]->type== 1) &&(ene_data[ 9]->type== 3) &&(ene_data[10]->type== 5) &&(ene_data[11]->type== 7) &&(ene_data[12]->type== 9) &&(ene_data[13]->type==11) ){ ene_data[14]->se_hit=3; /* 蔻苖 */ ene_data[14]->accel=1; bg_data->bg_dy=-1; /* JEgĊJ */ } } if(bg_data->bg_y==32246){ /* NX^j҂ */ STOP_BGY } if(bg_data->bg_y==32200){ jiki_data->status=2; jiki_data->count=0; jiki_cont->security=1; /* ΊZLeBXCb` */ jiki_cont->freeze=1; /* c֎~ */ jiki_cont->flatter=0; /* tb^[ */ jiki_cont->booster=1; /* u[X^[ */ se_adpcm1(zm_data->pcm[SE_JIKIBURN],zm_data->pcmsize[SE_JIKIBURN],SEPRW_JIKIBOOST); } if((bg_data->bg_y<=32200)&&(bg_data->bg_y>32100)){ jiki_data->rot=8; jiki_data->count=0; for(i=0;i<8;i++)jiki_data->keeprot[i]=8; } if(bg_data->bg_y==32100)se_adpcm1(zm_data->pcm[SE_JIKIBURN],zm_data->pcmsize[SE_JIKIBURN],SEPRW_JIKIBOOST); if((bg_data->bg_y<=32100)&&(bg_data->bg_y>32000)){ jiki_data->y-=8; jiki_data->rot=8; jiki_data->count=0; for(i=0;i<8;i++)jiki_data->keeprot[i]=8; } if(bg_data->bg_y>32010){ /* Xg̃tF[h̑O܂ */ if(bg_data->bg_y<=32900){ /* wi */ int red_flag; int blue_flag; int green_flag; if((disp_cont->status&255)== 85) red_flag=1; else red_flag=0; if((disp_cont->status&255)==170) blue_flag=1; else blue_flag=0; if((disp_cont->status&255)==255)green_flag=1; else green_flag=0; if(red_flag){ GRP_PAL_ADD[11]=_red; grp_data->fade=3; grp_data->fade_count=0; } if(blue_flag){ GRP_PAL_ADD[13]=_green; grp_data->fade=5; grp_data->fade_count=0; } if(green_flag){ GRP_PAL_ADD[15]=_blue; grp_data->fade=3; grp_data->fade_count=0; } } } if(bg_data->bg_y==31910){ /* ʂ̃tF[hAEg */ /* OtBbN */ for(i=0;i<16;i++)grp_data->keep_palet[i]=0; grp_data->fade_count=0; /* tF[hEFCgJE^ */ grp_data->fade =7; /* OtBbÑtF[hv */ for(i=0;i<16;i++){ /* ro */ sp_data->keep_palet[1][i]=0; sp_data->keep_palet[2][i]=0; sp_data->keep_palet[3][i]=0; sp_data->keep_palet[7][i]=0; sp_data->keep_palet[13][i]=0; } sp_data->fade_count[1]=0; /* tF[hEFCgJE^ */ sp_data->fade_count[2]=0; sp_data->fade_count[3]=0; sp_data->fade_count[7]=0; sp_data->fade_count[13]=0; sp_data->fade[1] =7; /* tF[hv */ sp_data->fade[2] =7; sp_data->fade[3] =7; sp_data->fade[7] =7; sp_data->fade[13] =7; zm_fadeout(15); } if(bg_data->bg_y==31910-600){ /* UʏI */ disp_cont->vd_mode=0; all_cont->stage_end=1; all_cont->all_clear=1; } } if((ef_y+i)>=8)continue; ef=hit_cont->ene_field_init[ef_y+i][ef_x+d]; /* ANZX|C^Zbg */ while(1){ if(*ef==-1)break; /* T[`I */ c=*ef++; /* G̔ԍI */ if(ene_data[c]->type==-1)continue; /* ݂ȂȂXLbv */ if(hit_cont->se_hit_set[ene_data[c]->type]==0)continue; /* ȂȂXLbv */ if(ene_data[c]->ground==1)continue; /* nucȂXLbv */ dx=(sub_cont->add_data.x)-(ene_data[c]->x); dy=(sub_cont->add_data.y)-(ene_data[c]->y); if(dx<0)dx*=-1; if(dy<0)dy*=-1; if( (dxsize_x+sub_cont->add_data.add_dx) /* ˒ɂI */ &&(dysize_y+sub_cont->add_data.add_dy) /*-------------------------< vg^Cv錾 >--------------------------------*/ void event6(); /* rsUp */ t>>1){ /* _[WH炤ȂEEE */ ene_data[c]->power-=sub_cont->add_data.power; ene_data[c]->flash =1; } if(ene_data[c]->power<=0){ all_cont->score+=ene_cont->score_set[ene_data[c]->type]; /* XRAZ */ ene_data[c] ->type =hit_cont->exp_set[ene_data[c]->type]; /* */ ene_data[c] ->anim1=0; /* JE^O */ ene_data[c] ->anim2=0; ene_data[c] ->anim3=0; ene_data[c] ->count=0; ene_data[c] ->flash=0; ene_data[c] ->se_hit=hit_cont->se_hit_set[ene_data[c]->type]; ene_data[c]->power =ene_cont->power_set[ene_data[c]->type]; if(ene_data[c]->accel){ bg_data->bg_dy=-1; /* MM */ } break; /* A̎@eƂ̔XLbv */ } } } } } } /*--------------< u[h|G{̓蔻 >--------------- enemy field ok.*/ void blade_ene() { static /*------------------ Cx^ł悭ĝ}N` -----------------*/ /* ro`GAւ}N */ #define TRANSSP(SETNO,TARGET,COUNT) sp_data->transsp.send=1; \ sp_data->transsp.set=(SETNO); \ sp_data->transsp.cnt=(COUNT); \ sp_data->transsp.target=(TARGET); /* pbgGAւ}N */ #define TRANSPAL(SETNO,TARGET,COUNT) sp_data->transpal.send=1; \ sp_data->transpal.set=(SETNO); \ sp_data->transpal.cnt=(COUNT); \ sp_data->transpal.target=(TARGET); /* fqoʂ茸肷}N */ /* */ #define GRP_SPEEDUP0(VAL) grp_data->accel0=1; \ grp_data->target_spd0=(VAL); #define GRP_SPEEDUP1(VAL) grp_data->accel1=1; \ grp_data->target_spd1=(VAL); #define GRP_SPEEDUP2(VAL) grp_data->accel2=1; \ grp_data->target_spd2=(VAL); #define GRP_SPEEDUP3(VAL) grp_data->accel3=1; \ grp_data->target_spd3=(VAL); #define GRP_SUP0(RATE,VAL) grp_data->accel0=(RATE); \ grp_data->target_spd0=(VAL); #define GRP_SUP1(RATE,VAL) grp_data->accel1=(RATE); \ grp_data->target_spd1=(VAL); #define GRP_SUP2(RATE,VAL) grp_data->accel2=(RATE); \ grp_data->target_spd2=(VAL); #define GRP_SUP3(RATE,VAL) grp_data->accel3=(RATE); \ grp_data->target_spd3=(VAL); /* */ #define GRP_REDUSPD0(VAL) grp_data->reduspd0=1; \ grp_data->target_spd0=(VAL); #define GRP_REDUSPD1(VAL) grp_data->reduspd1=1; \ grp_data->target_spd1=(VAL); #define GRP_REDUSPD2(VAL) grp_data->reduspd2=1; \ grp_data->target_spd2=(VAL); #define GRP_REDUSPD3(VAL) grp_data->reduspd3=1; \ grp_data->target_spd3=(VAL); #define GRP_RSPD0(RATE,VAL) grp_data->reduspd0=(RATE); \ grp_data->target_spd0=(VAL); #define GRP_RSPD1(RATE,VAL) grp_data->reduspd1=(RATE); \ grp_data->target_spd1=(VAL); #define GRP_RSPD2(RATE,VAL) grp_data->reduspd2=(RATE); \ grp_data->target_spd2=(VAL); #define GRP_RSPD3(RATE,VAL) grp_data->reduspd3=(RATE); \ grp_data->target_spd3=(VAL); /* afʂ茸肷}N */ /* */ #define BG_SPEEDUP1(VAL) bg_data->accel1=1; \ bg_data->target_spd1=(VAL); /* */ #define BG_REDUSPD1(VAL) bg_data->reduspd1=1; \ bg_data->target_spd1=(VAL); /* Ԃ~߂}N */ #define STOP_BGY bg_data->bg_dy=0; /* {Xo}N */ #define BOSS_APPEAR(CODE,X,Y) ene_data[12]->type =(CODE); \ ene_data[12]->x =(X); \ ene_data[12]->y =(Y); \ ene_data[12]->hx =(X)*32; \ ene_data[12]->hy =(Y)*32; \ ene_data[12]->dx =enemove->dx[(CODE)]; \ ene_data[12]->dy =enemove->dy[(CODE)]; \ ene_data[12]->atr =enemove->atr[(CODE)]; \ ene_data[12]->count=0; \ ene_data[12]->power=ene_cont->power_set[(CODE)]; \ ene_data[12]->accel=1; \ ene_data[12]->target=-16; \ ene_data[12]->size_x=ene_cont->sizex_set[(CODE)]; \ ene_data[12]->size_y=ene_cont->sizey_set[(CODE)]; \ ene_data[12]->anim1=0; \ ene_data[12]->anim2=0; \ ene_data[12]->anim3=0; \ ene_data[12]->ground=ene_cont->ground_set[(CODE)]; \ ene_data[12]->se_hit=hit_cont->se_hit_set[(CODE)]; /* {Xo}Niio[w‚j */ #define BOSS_APPEAR_C(N,CODE,X,Y,ACC) \ ene_data[(N)]->type =(CODE); \ ene_data[(N)]->x =(X); \ ene_data[(N)]->y =(Y); \ ene_data[(N)]->hx =(X)*32; \ ene_data[(N)]->hy =(Y)*32; \ ene_data[(N)]->dx =enemove->dx[(CODE)]; \ ene_data[(N)]->dy =enemove->dy[(CODE)]; \ ene_data[(N)]->atr =enemove->atr[(CODE)]; \ ene_data[(N)]->count=0; \ ene_data[(N)]->power=ene_cont->power_set[(CODE)]; \ ene_data[(N)]->accel=(ACC); \ ene_data[(N)]->target=-16; \ ene_data[(N)]->size_x=ene_cont->sizex_set[(CODE)]; \ ene_data[(N)]->size_y=ene_cont->sizey_set[(CODE)]; \ ene_data[(N)]->anim1=0; \ ene_data[(N)]->anim2=0; \ ene_data[(N)]->anim3=0; \ ene_data[(N)]->ground=ene_cont->ground_set[(CODE)]; \ ene_data[(N)]->se_hit=hit_cont->se_hit_set[(CODE)]; /* {Xo}Niio[Ahdx,hdyw‚j */ #define BOSS_APPEAR_H(N,CODE,X,Y,HDX,HDY,ACC) \ ene_data[(N)]->type =(CODE); \ ene_data[(N)]->x =(X); \ ene_data[(N)]->y =(Y); \ ene_data[(N)]->hx =(X)*32; \ ene_data[(N)]->hy =(Y)*32; \ ene_data[(N)]->dx =enemove->dx[(CODE)]; \ ene_data[(N)]->dy =enemove->dy[(CODE)]; \ ene_data[(N)]->atr =enemove->atr[(CODE)]; \ ene_data[(N)]->hdx =(HDX); \ ene_data[(N)]->hdy =(HDY); \ ene_data[(N)]->count=0; \ ene_data[(N)]->power=ene_cont->power_set[(CODE)]; \ ene_data[(N)]->accel=(ACC); \ ene_data[(N)]->target=-16; \ ene_data[(N)]->size_x=ene_cont->sizex_set[(CODE)]; \ ene_data[(N)]->size_y=ene_cont->sizey_set[(CODE)]; \ ene_data[(N)]->anim1=0; \ ene_data[(N)]->anim2=0; \ ene_data[(N)]->anim3=0; \ ene_data[(N)]->ground=ene_cont->ground_set[(CODE)]; \ ene_data[(N)]->se_hit=hit_cont->se_hit_set[(CODE)]; /* GSĔj}N */ #define ALL_EXPLODE for(i=0;iene_max;i++){ \ if(ene_data[i]->type!=-1){ \ ene_data[i] ->type=70; \ ene_data[i] ->count=0; \ ene_data[i] ->se_hit=0; \ ene_data[i] ->anim1=0; \ ene_data[i] ->anim2=0; \ ene_data[i] ->anim3=0; \ ene_data[i] ->flash=0; \ } \ } /* GSĔj}NiŁj */ #define ALL_EXPLODE2 for(i=0;iene_max;i++){ \ if(ene_data[i]->type!=-1){ \ ene_data[i] ->type=hit_cont->exp_set[ene_data[i]->type]; \ ene_data[i] ->count=0; \ ene_data[i] ->se_hit=0; \ ene_data[i] ->anim1=0; \ ene_data[i] ->anim2=0; \ ene_data[i] ->anim3=0; \ ene_data[i] ->flash=0; \ } \ } /* GSĔj}NiŃXRA‚j */ #define ALL_EXPLODE_S for(i=0;iene_max;i++){ \ if(ene_data[i]->type!=-1){ \ all_cont->score+=ene_cont->score_set[ene_data[i]->type]; \ ene_data[i] ->type=hit_cont->exp_set[ene_data[i]->type]; \ ene_data[i] ->count=0; \ ene_data[i] ->se_hit=0; \ ene_data[i] ->anim1=0; \ ene_data[i] ->anim2=0; \ ene_data[i] ->anim3=0; \ ene_data[i] ->flash=0; \ } \ } /* afl‚炷}N */ #define BGMPLAY(NUM) chdir("bgm"); \ zm_zmdplay(zm_data->zmd[NUM]); \ chdir(".."); /* obl‚炷}N(vCIeBő) */ #define PCMPLAY(NUM) se_adpcm1(zm_data->pcm[(NUM)],zm_data->pcmsize[(NUM)],0x00FF0403); /* X^[XN[}N */ #define RAS_ON(IFUNC,TFUNC,SRAS,ERAS) ras_data->r_on=1; \ ras_data->r_interfunc=(IFUNC); \ ras_data->r_maketable=(TFUNC); \ ras_data->start_raster=(SRAS); \ ras_data->end_raster=(ERAS); \ ras_data->srflag=1; /* X^[XN[}N */ #define RAS_OFF ras_data->r_off=1; ki_data->x=RIGHTMAX; if(jiki_data->x < LEFTMAX )jiki_data->x=LEFTMAX; } break; case 1: /* ------ i ------ */ /* hx,hy,dy ݒ肳Ă邱ƂOłB */ jiki_data->count+=1; if(jiki_data->count<65){ jiki_data->dy+=10; jiki_data->hy+=jiki_data->dy; jiki_data-> y =jiki_data->hy/32; } if(jiki_data->count>=65){ jiki_data->dy-=10; if(jiki_data->dy>0)jiki_data->hy+=jiki_data->dy; jiki_data-> y =jiki_data->hy/32; } if(jiki_data->count==100){ jiki_data->count=0; /* JE^Oɖ߂ */ jiki_data->status=2; /* GԂ֕A */ } break; case 3: /* ------ ------ */ jiki_data->count+=1; /* JE^i߂ */ /* ŏ̃#include #include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "eventmacro.h" #include "evento.h" #include "vdisp.h" #include "esp.h" /*--------------< Cx^ Q[I[o[p >---------------*/ void evento() { int i,c; short x; short y; //C_LOCATE(0,0); //printf("BG :%5d\n",all_cont->disp_cont->bg_data->bg_y); //txt_data->crtcreg->bit.txt_onoff=1; /* fobOpɂnmɂEEE */ jiki_cont->freeze=1; /* @́AʉɌł߂Ă(^^; */ jiki_cont->security=1; jiki_cont->flatter=0; jiki_data->x=128; jiki_data->y=400; jiki_data->status=0; /* t[io[ŊǗ */ if(all_cont->over_count>50){ /* TOt[́Aɂ̂܂ܗ */ if((all_cont->over_count&7)==0){ /* RgXg */ disp_cont->over_contrast-=1; if(disp_cont->over_contrast<0)disp_cont->over_contrast=0; *((short*)0xE8E000)=disp_cont->over_contrast; } } if(all_cont->over_count==50)zm_fadeout(20); /* afltF[hAEg */ if(all_cont->over_count>250){ /* QTOJEg */ all_cont->stage_end=1; /* I */ } all_cont->over_count+=1; }  sp_data->fade[2]=1; sp_data->fade_count[2]=0; } } break; default: /* ------ ------ */ printf("@Xe[^XɌl𔭌B\n"); VDISPST(0,0,0); exit(); break; } /* switch ̃lXg */ jiki_data->keepx[disp_cont->status&7]=jiki_data->x; /* u[hcp̃f[^ۑ */ jiki_data->keepy[disp_cont->status&7]=jiki_data->y; jiki_data->keeprot[disp_cont->status&7]=jiki_data->rot; } /*-------------------------< vg^Cv錾 >--------------------------------*/ void evento(); /* Q[I[o[ */ /* G\[`ւ̃|C^vfɎ”zǂ */ void (*enedisp_func0[])(ENE_DATA*); void (*enedisp_func1[])(ENE_DATA*); void (*enedisp_func2[])(ENE_DATA*); void (*enedisp_func3[])(ENE_DATA*); void (*enedisp_func4[])(ENE_DATA*); void (*enedisp_func5[])(ENE_DATA*); /* vg^Cv錾 */ void (*emc0[])(ENE_DATA*); /* G̎ނƂ̈ړ֐ւ̃|C^ */ void (*emc1[])(ENE_DATA*); void (*emc2[])(ENE_DATA*); void (*emc3[])(ENE_DATA*); void (*emc4[])(ENE_DATA*); void (*emc5[])(ENE_DATA*); /* SETƂ̑ϋv */ int power_set0[]; int power_set1[]; int power_set2[]; int power_set3[]; int power_set4[]; int power_set5[]; /* SETƂ̃XRA */ int score_set0[]; int score_set1[]; int score_set2[]; int score_set3[]; int score_set4[]; int score_set5[]; /* SETƂ̓蔻̃TCY */ short sizex_set0[]; short sizey_set0[]; short sizex_set1[]; short sizey_set1[]; short sizex_set2[]; short sizey_set2[]; short sizex_set3[]; short sizey_set3[]; short sizex_set4[]; short sizey_set4[]; short sizex_set5[]; short sizey_set5[]; short ground_set0[]; short ground_set1[]; short ground_set2[]; short ground_set3[]; short ground_set4[]; short ground_set5[]; void (*shot_func0[])(ENE_DATA*); void (*shot_func1[])(ENE_DATA*); void (*shot_func2[])(ENE_DATA*); void (*shot_func3[])(ENE_DATA*); void (*shot_func4[])(ENE_DATA*); void (*shot_func5[])(ENE_DATA*); /* GSETƂ̔R[h */ char exp_set0[]; char exp_set1[]; char exp_set2[]; char exp_set3[]; char exp_set4[]; char exp_set5[]; /* GSETƂ[@e|G]̓蔻L薳XCb` */ char se_hit_set0[]; char se_hit_set1[]; char se_hit_set2[]; char se_hit_set3[]; char se_hit_set4[]; char se_hit_set5[]; ce_data[i]->count =0; break; } } } } #include #include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "..\\sepcm.h" #include "ene.h" #include "subs.h" #include "exp.h" #include "exemove1.h" /*---------------------< ` >---------------------------------*/ #define LEFTMAX -32 #define RIGHTMAX 290 #define UPMAX -32 #define DOWNMAX 290 /*---------------------< ϐ錾 >--------------------------------*/ int e_sel; /* G̃VAio[i̍ł(;_;)j */ /* fcrn̎`ɍB 肠悤ȂAstructs ɑgݍ݂܂傤 */ /*--------------< GړB P >---------------*/ void enemove_P(ene_data) ENE_DATA *ene_data; { if(ene_data->count==0){ piece_appear(rnd2(),ene_data->x,ene_data->y,3); /* j */ } switch(ene_data->ground){ case 0: if(ene_data->count==0){ int temp; temp=rnd3(); se_adpcm1(zm_data->pcm[SE_ZAKOBOMB1+temp],zm_data->pcmsize[SE_ZAKOBOMB1+temp],SEPRW_ZAKOBOMB); exp_appear(ene_data->x ,ene_data->y ,0,0,1); } if(ene_data->count==2)exp_appear(ene_data->x-6,ene_data->y-8,-64+rnd127(),-64+rnd127(),0); if(ene_data->count==3)exp_appear(ene_data->x-4,ene_data->y+7,-64+rnd127(),-64+rnd127(),0); if(ene_data->count==4)exp_appear(ene_data->x+8,ene_data->y+6,-64+rnd127(),-64+rnd127(),0); break; case 1: if(ene_data->count==0){ int temp; temp=rnd3(); se_adpcm1(zm_data->pcm[SE_ZAKOBOMB1+temp],zm_data->pcmsize[SE_ZAKOBOMB1+temp],SEPRW_ZAKOBOMB); exp_appear(ene_data->x ,ene_data->y ,-32+rnd63(),-32+rnd63(),0); } if(ene_data->count==2)exp_appear(ene_data->x-1,ene_data->y-2,-32+rnd63(),-32+rnd63(),0); if(ene_data->count==4)exp_appear(ene_data->x+2,ene_data->y+1,-32+rnd63(),-32+rnd63(),0); break; } if(ene_data->count>=4)ene_data->type=-1; /* SIŏ */ ene_data->count+=1; /* JE^i߂ */ } /*--------------< GړB Q >---------------*/ void enemove_Q(ene_data) ENE_DATA *ene_data; { if(ene_data->count==0){ int temp; temp=rnd3(); se_adpcm1(zm_data->pcm[SE_ZAKOBOMB1+temp],zm_data->pcmsize[SE_ZAKOBOMB1+temp],SEPRW_ZAKOBOMB); piece_appear(rnd2(),ene_data->x,ene_data->y,3); /* j */ } if(ene_data->count==0)exp_appear(ene_data->x ,ene_data->y ,0,0,0); if(ene_data->count==2)exp_appear(ene_data->x-3,ene_data->y-3,0,0,0); if(ene_data->count==4)exp_appear(ene_data->x+5,ene_data->y+2,0,0,0); if(ene_data->count>=4)ene_data->type=-1; /* SIŏ */ ene_data->count+=1; /* JE^i߂ */ } /*--------------< GړB R >---------------*/ void enemove_R(ene_data) ENE_DATA *ene_data; { if(ene_data->count==0){ int temp; piece_appear(rnd2(),ene_data->x,ene_data->y,5); /* j */ temp=rnd3(); se_adpcm1(zm_data->pcm[SE_MIDBOMB1+temp],zm_data->pcmsize[SE_MIDBOMB1+temp],SEPRW_ENEBOMB); } /*if(ene_data->count&1){*/ exp_appear(ene_data->x-16+rnd31(),ene_data->y-64+rnd127(),0,0,1); /* }*/ if(ene_data->count>=35)ene_data->type=-1; /* SIŏ */ ene_data->count+=1; /* JE^i߂ */ } /*--------------< GړB mid >---------------*/ void enemove_mid(ene_data) ENE_DATA *ene_data; { if(ene_data->count==0){ int temp; piece_appear(rnd2(),ene_data->x,ene_data->y,7); /* j */ temp=rnd3(); se_adpcm1(zm_data->pcm[SE_MIDBOMB1+temp],zm_data->pcmsize[SE_MIDBOMB1+temp],SEPRW_ENEBOMB); } /*if(ene_data->count&1){*/ exp_appear(ene_data->x-16+rnd31(),ene_data->y-16+rnd31(),-64+rnd127(),-64+rnd127(),rnd1()); /* }*/ if(ene_data->count>=35)ene_data->type=-1; /* SIŏ */ ene_data->count+=1; /* JE^i߂ */ } /*--------------< GړB mid2 >---------------*/ void enemove_mid2(ene_data) ENE_DATA *ene_data; { if(ene_data->count==0){ int temp; piece_appear(rnd2(),ene_data->x,ene_data->y,7); /* j */ temp=rnd3(); se_adpcm1(zm_data->pcm[SE_MIDBOMB1+temp],zm_data->pcmsize[SE_MIDBOMB1+temp],SEPRW_ENEBOMB); } /*if(ene_data->count&1){*/ exp_appear(ene_data->x-16+rnd31(),ene_data->y-32+rnd63(),-64+rnd127(),-64+rnd127(),rnd1()); /* }*/ if(ene_data->count>=35)ene_data->type=-1; /* SIŏ */ ene_data->count+=1; /* JE^i߂ */ } /*--------------< GړB gmid >---------------*/ void enemove_gmid(ene_data) ENE_DATA *ene_data; { if(ene_data->count==0){ int temp; piece_appear(rnd2(),ene_data->x,ene_data->y,3); /* j */ temp=rnd3(); se_adpcm1(zm_data->pcm[SE_MIDBOMB1+temp],zm_data->pcmsize[SE_MIDBOMB1+temp],SEPRW_ENEBOMB); } if(ene_data->count==0)exp_appear(ene_data->x ,ene_data->y ,0,0,1); //if(ene_data->count==2)exp_appear(ene_data->x-3,ene_data->y-3,0,0,0); //if(ene_data->count==4)exp_appear(ene_data->x+5,ene_data->y+2,0,0,0); if(ene_data->count>=4)ene_data->type=-1; /* SIŏ */ ene_data->count+=1; /* JE^i߂ */ } /*--------------< GړB g25 >---------------*/ void enemove_g25(ene_data) ENE_DATA *ene_data; { if(ene_data->count==0){ int temp; temp=rnd3(); se_adpcm1(zm_data->pcm[SE_ZAKOBOMB1+temp],zm_data->pcmsize[SE_ZAKOBOMB1+temp],SEPRW_ZAKOBOMB); piece_appear(rnd2(),ene_data->x,ene_data->y,3); /* j */ } if(ene_data->ground){ if(ene_data->count==0)exp_appear(ene_data->x ,ene_data->y -8,-64+rnd127(),-64+rnd127(),0); //if(ene_data->count==2)exp_appear(ene_data->x-3,ene_data->y-3-8,-64+rnd127(),-64+rnd127(),0); if(ene_data->count==4)exp_appear(ene_data->x+5,ene_data->y+2-8,-64+rnd127(),-64+rnd127(),0); if(ene_data->count==0)exp_appear(ene_data->x ,ene_data->y +8,-64+rnd127(),-64+rnd127(),0); if(ene_data->count==2)exp_appear(ene_data->x-3,ene_data->y-3+8,-64+rnd127(),-64+rnd127(),0); //if(ene_data->count==4)exp_appear(ene_data->x+5,ene_data->y+2+8,-64+rnd127(),-64+rnd127(),0); } else { if(ene_data->count==0)exp_appear(ene_data->x ,ene_data->y ,0,0,1); if(ene_data->count==2)exp_appear(ene_data->x-6,ene_data->y-8,-64+rnd127(),-64+rnd127(),0); if(ene_data->count==3)exp_appear(ene_data->x-4,ene_data->y+7,-64+rnd127(),-64+rnd127(),0); if(ene_data->count==4)exp_appear(ene_data->x+8,ene_data->y+6,-64+rnd127(),-64+rnd127(),0); } if(ene_data->count>=4)ene_data->type=-1; /* SIŏ */ ene_data->count+=1; /* JE^i߂ */ } /*--------------< GړB g26 >---------------*/ void enemove_g26(ene_data) ENE_DATA *ene_data; { if(ene_data->count==0){ int temp; temp=rnd3(); se_adpcm1(zm_data->pcm[SE_ZAKOBOMB1+temp],zm_data->pcmsize[SE_ZAKOBOMB1+temp],SEPRW_ZAKOBOMB); piece_appear(rnd2(),ene_data->x,ene_data->y,3); /* j */ } if(ene_data->ground){ if(ene_data->count==0)exp_appear(ene_data->x -4,ene_data->y ,-64+rnd127(),-64+rnd127(),0); if(ene_data->count==2)exp_appear(ene_data->x-3-4,ene_data->y-3,-64+rnd127(),-64+rnd127(),0); if(ene_data->count==4)exp_appear(ene_data->x+5-4,ene_data->y+2,-64+rnd127(),-64+rnd127(),0); if(ene_data->count==0)exp_appear(ene_data->x +4,ene_data->y ,-64+rnd127(),-64+rnd127(),0); if(ene_data->count==2)exp_appear(ene_data->x-3+4,ene_data->y-3,-64+rnd127(),-64+rnd127(),0); if(ene_data->count==4)exp_appear(ene_data->x+5+4,ene_data->y+2,-64+rnd127(),-64+rnd127(),0); } else { if(ene_data->count==0)exp_appear(ene_data->x -8,ene_data->y ,-64+rnd127(),-64+rnd127(),1); if(ene_data->count==2)exp_appear(ene_data->x-3-8,ene_data->y-3,-64+rnd127(),-64+rnd127(),0); if(ene_data->count==4)exp_appear(ene_data->x+5-8,ene_data->y+2,-64+rnd127(),-64+rnd127(),0); if(ene_data->count==0)exp_appear(ene_data->x +8,ene_data->y ,-64+rnd127(),-64+rnd127(),1); if(ene_data->count==2)exp_appear(ene_data->x-3+8,ene_data->y-3,-64+rnd127(),-64+rnd127(),0); if(ene_data->count==4)exp_appear(ene_data->x+5+8,ene_data->y+2,-64+rnd127(),-64+rnd127(),0); } if(ene_data->count>=4)ene_data->type=-1; /* SIŏ */ ene_data->count+=1; /* JE^i߂ */ } 4*32)-shot_cont->oc_hx[3])/OC_FRAME; shot_cont->oc_dy[0]= (((-48-4)*32)-shot_con/*---------------------< vg^Cv錾 >---------------------------------*/ void enemove_P(ENE_DATA*); /* P̈ړvZ[` */ void enemove_Q(ENE_DATA*); /* Q̈ړvZ[` */ void enemove_R(ENE_DATA*); /* R̈ړvZ[` */ void enemove_mid(ENE_DATA*); /* WIȒL̔ */ void enemove_mid2(ENE_DATA*); /* WIȒL̔icj */ void enemove_gmid(ENE_DATA*); /* WIȒn㒆L̔ */ void enemove_g25(ENE_DATA*); /* num25inj̔ */ void enemove_g26(ENE_DATA*); /* num25inj̔ */ hot_data[i]->type){ case 0: if(shot_data[i]->type==-1)continue; /* ݃iVŃLZ */ shot_data[i]->hx+=shot_data[i]->dx; /* gWœB */ shot_data[i]->x=shot_data[i]->hx/32; /* Wɕϊ */ shot_data[i]->y-=24; /* x͒ڕύX */ if(shot_data[i]->y < UPMAX )shot_data[i]->type=-1; /* NbsO */ break; case 1: case 2: shot_data[i]->hx+#include #include #include "gtnlib.h" #include "..\\structs.h" /* A‚͊{ */ #include "..\\sepcm.h" #include "ene.h" #include "subs.h" #include "exemovea.h" /*---------------------< ` >---------------------------------*/ #define LEFTMAX -32 #define RIGHTMAX 290 #define UPMAX -32 #define DOWNMAX 290 /*---------------------< ϐ錾 >--------------------------------*/ int e_sel; /* G̃VAio[i̍ł(;_;)j */ /* fcrn̎`ɍB 肠悤ȂAstructs ɑgݍ݂܂傤 */ /*--------------< GړB rsPriv >---------------*/ void enemove_rsPriv(ene_data) ENE_DATA *ene_data; { static short ef_x; /* enemy field ̍ʒu */ static short ef_y; static int i,c; /* --- {̂̓Lq --- */ if(ene_data->count==0){ /* oA */ se_adpcm1(zm_data->pcm[SE_RIVAPP],zm_data->pcmsize[SE_RIVAPP],SEPRW_RIVAPP); ene_data->hdx=152; ene_data->hdy=-64; ene_data->setdir[4]=0; /* Ki[AV[^[̃tbO */ } if(ene_data->count<76){ /* o */ ene_data->hdx-=2; ene_data->hdy+=1; if(ene_data->count==56)ene_data->anim3=1; if(ene_data->count==66)ene_data->anim3=2; } if(ene_data->count==76){ /* Xgbv */ ene_data->hdx=0; ene_data->hdy=0; se_adpcm1(zm_data->pcm[SE_RIVSET],zm_data->pcmsize[SE_RIVSET],SEPRW_RIVAPP); } if(ene_data->count==110){ /* */ ene_data->hdx=-7*32; ene_data->hdy=+4*32; ene_data->anim3=3; } if(ene_data->count==125)se_adpcm1(zm_data->pcm[SE_RIVMOTION],zm_data->pcmsize[SE_RIVMOTION],SEPRW_RIVATK); if(ene_data->count==125){ /* Xgbv */ ene_data->hdx=0; ene_data->hdy=0; ene_data->anim3=2; } if(ene_data->count==129)ene_data->anim3=10; if(ene_data->count==133)ene_data->anim3=11; if( (ene_data->count==143) ||(ene_data->count==153) ||(ene_data->count==163) ||(ene_data->count==173) ){ eneshot_appear(4,ene_data->x-12,ene_data->y+15,8*cost[(48 )&63],8*sint[(48)&63],0,0,ene_data); eneshot_appear(4,ene_data->x-12,ene_data->y+15,8*cost[(48-3)&63],8*sint[(48-3)&63],0,0,ene_data); eneshot_appear(4,ene_data->x-12,ene_data->y+15,8*cost[(48+3)&63],8*sint[(48+3)&63],0,0,ene_data); eneshot_appear(4,ene_data->x-12,ene_data->y+15,8*cost[(48-6)&63],8*sint[(48-6)&63],0,0,ene_data); eneshot_appear(4,ene_data->x-12,ene_data->y+15,8*cost[(48+6)&63],8*sint[(48+6)&63],0,0,ene_data); } if(ene_data->count==181)ene_data->anim3=10; if(ene_data->count==185){ /* E */ ene_data->hdx=+7*32; ene_data->hdy=0; ene_data->anim3=1; } if(ene_data->count==200)se_adpcm1(zm_data->pcm[SE_RIVMOTION],zm_data->pcmsize[SE_RIVMOTION],SEPRW_RIVATK); if(ene_data->count==200){ /* Xgbv */ ene_data->hdx=0; ene_data->hdy=0; ene_data->anim3=2; } if(ene_data->count==204)ene_data->anim3=10; if(ene_data->count==208)ene_data->anim3=11; if( (ene_data->count==211) ||(ene_data->count==221) ||(ene_data->count==231) ||(ene_data->count==241) ){ eneshot_appear(4,ene_data->x-12,ene_data->y+15,8*cost[(48 )&63],8*sint[(48)&63],0,0,ene_data); eneshot_appear(4,ene_data->x-12,ene_data->y+15,8*cost[(48-3)&63],8*sint[(48-3)&63],0,0,ene_data); eneshot_appear(4,ene_data->x-12,ene_data->y+15,8*cost[(48+3)&63],8*sint[(48+3)&63],0,0,ene_data); eneshot_appear(4,ene_data->x-12,ene_data->y+15,8*cost[(48-6)&63],8*sint[(48-6)&63],0,0,ene_data); eneshot_appear(4,ene_data->x-12,ene_data->y+15,8*cost[(48+6)&63],8*sint[(48+6)&63],0,0,ene_data); } if(ene_data->count==256)ene_data->anim3=10; if(ene_data->count==260){ /* E */ ene_data->hdx=+7*32; ene_data->hdy=0; ene_data->anim3=1; } if(ene_data->count==275)se_adpcm1(zm_data->pcm[SE_RIVMOTION],zm_data->pcmsize[SE_RIVMOTION],SEPRW_RIVATK); if(ene_data->count==275){ /* Xgbv */ ene_data->hdx=0; ene_data->hdy=0; ene_data->anim3=2; } if(ene_data->count==279)ene_data->anim3=10; if(ene_data->count==283)ene_data->anim3=11; if( (ene_data->count==293) ||(ene_data->count==303) ||(ene_data->count==313) ||(ene_data->count==323) ){ eneshot_appear(4,ene_data->x-12,ene_data->y+15,8*cost[(48 )&63],8*sint[(48)&63],0,0,ene_data); eneshot_appear(4,ene_data->x-12,ene_data->y+15,8*cost[(48-3)&63],8*sint[(48-3)&63],0,0,ene_data); eneshot_appear(4,ene_data->x-12,ene_data->y+15,8*cost[(48+3)&63],8*sint[(48+3)&63],0,0,ene_data); eneshot_appear(4,ene_data->x-12,ene_data->y+15,8*cost[(48-6)&63],8*sint[(48-6)&63],0,0,ene_data); eneshot_appear(4,ene_data->x-12,ene_data->y+15,8*cost[(48+6)&63],8*sint[(48+6)&63],0,0,ene_data); } if(ene_data->count==331)ene_data->anim3=10; if(ene_data->count==335){ /* */ ene_data->hdx=-7*32; ene_data->hdy=+4*32; ene_data->anim3=3; } if(ene_data->count==350){ /* Xgbv */ ene_data->hdx=0; ene_data->hdy=0; ene_data->anim3=2; } if(ene_data->count==358)se_adpcm1(zm_data->pcm[SE_RIVCHG],zm_data->pcmsize[SE_RIVCHG],SEPRW_RIVCHG); if(ene_data->count==358)ene_data->anim3=14; /* ό` */ if((ene_data->count>358)&&(ene_data->count<422)){ ene_data->anim3+=ene_data->count&1; } if(ene_data->count==422){ /* */ ene_data->hdx=-5*32; ene_data->hdy=0; ene_data->setdir[4]=1; /* Ki[AV[^[̃tbO */ } if((ene_data->count>422)&&(ene_data->count<500)){ ene_data->hdx+=6; ene_data->hdy-=4; if(ene_data->count==426)ene_data->anim3=6; if(ene_data->count==430)ene_data->anim3=5; if(ene_data->count==442)ene_data->anim3=6; if(ene_data->count==446)ene_data->anim3=7; if(ene_data->count==450)ene_data->anim3=8; if(ene_data->count==454)ene_data->anim3=9; } if(ene_data->count==500){ ene_data->hdx=0; ene_data->hdy=0; ene_data->type=-1; bg_data->bg_dy=-1; /* afANZ */ return; } /* --- ʒu --- i{́j */ ene_data->hx+=ene_data->hdx; ene_data->hy+=ene_data->hdy; ene_data->x =ene_data->hx/32; ene_data->y =ene_data->hy/32; ene_data->count+=1; /* JE^{P */ ef_x = (ene_data->x - ene_data->size_x)/32; /* enemy field check */ ef_y = (ene_data->y - ene_data->size_y)/32; for(i=0;iearea_by[ene_data->type];i++){ for(c=0;cearea_bx[ene_data->type];c++){ if((ef_x+c)< 0)continue; /* NbsO */ if((ef_x+c)>=8)continue; if((ef_y+i)< 0)continue; if((ef_y+i)>=8)continue; *hit_cont->ene_field[ef_y+i][ef_x+c]++=e_sel; *hit_cont->ene_field[ef_y+i][ef_x+c] =-1; } } //C_LOCATE(0,0); //printf("ene_count:%8d\n",ene_data->count); } /*--------------< GړB rsPb1body >---------------*/ void enemove_rsPb1body(ene_data) ENE_DATA *ene_data; { static short ef_x; /* enemy field ̍ʒu */ static short ef_y; static int i,c; /* --- {̂̓ --- */ if(ene_data->count==0){ ene_data->hdx=0; /* */ ene_data->hdy=10*32; ene_data->se_hit=1; } if( (ene_data->count>= 0) &&(ene_data->count< 40))ene_data->hdy-=8*(ene_data->hdy>0); /* I(y:320 -> 0) */ if( (ene_data->count>= 40) &&(ene_data->count< 72)){ /* オ */ ene_data->hdy-=2; /* (y:0 -> -64) */ } if( (ene_data->count>=56) &&(ene_data->count<72))ene_data->hdx-=1; /* ɓ͂ (x:0 -> -16) */ if( (ene_data->count>=72) &&(ene_data->count<136))ene_data->hdy+=1; /* ~܂(y:-64 -> 0) */ if(ene_data->count==136)ene_data->se_hit=3; if( (ene_data->count>=200) &&(ene_data->count<216)){ ene_data->hdx+=1; /* ړ(x:-16 -> 0) */ ene_data->hdy+=2; /* c (y: 0 -> 32) */ } if( (ene_data->count>=248) &&(ene_data->count<264)){ ene_data->hdx+=1; /* ړE(x:0 -> 16) */ } if( (ene_data->count>=248) &&(ene_data->count<268)){ ene_data->hdy-=2; /* cړ(y:32->-8) */ } if( (ene_data->count>=268) &&(ene_data->count<420)){ /* EʒuցI */ ene_data->hdx=0; ene_data->hdy=0; if(ene_data->x>200)ene_data->x-=1; if(ene_data->x<200)ene_data->x+=1; if(ene_data->y> 48)ene_data->y-=1; if(ene_data->y< 48)ene_data->y+=1; ene_data->hx=ene_data->x*32; ene_data->hy=ene_data->y*32; } if( (ene_data->count==150) /* U */ ||(ene_data->count==210) ||(ene_data->count==270) ||(ene_data->count==330) ||(ene_data->count==390) ){ if(ene_cont->ene_data[6]->type!=-1){ eneshot_appear(0,ene_cont->ene_data[6]->x-4,ene_cont->ene_data[6]->y+8,4*cost[48-3],4*sint[48-3],0,0,ene_data); eneshot_appear(0,ene_cont->ene_data[6]->x+4,ene_cont->ene_data[6]->y+8,4*cost[48-1],4*sint[48-1],0,0,ene_data); } if(ene_cont->ene_data[7]->type!=-1){ eneshot_appear(0,ene_cont->ene_data[7]->x-4,ene_cont->ene_data[7]->y+8,4*cost[48+1],4*sint[48+1],0,0,ene_data); eneshot_appear(0,ene_cont->ene_data[7]->x+4,ene_cont->ene_data[7]->y+8,4*cost[48+3],4*sint[48+3],0,0,ene_data); } } if( (ene_data->count==180) /* U */ ||(ene_data->count==240) ||(ene_data->count==300) ||(ene_data->count==360) ||(ene_data->count==420) ){ if(ene_cont->ene_data[6]->type!=-1){ eneshot_appear(0,ene_cont->ene_data[6]->x-4,ene_cont->ene_data[6]->y+8,3*cost[48 ],3*sint[48-3],0,0,ene_data); eneshot_appear(0,ene_cont->ene_data[6]->x+4,ene_cont->ene_data[6]->y+8,3*cost[48+2],3*sint[48-1],0,0,ene_data); } if(ene_cont->ene_data[7]->type!=-1){ eneshot_appear(0,ene_cont->ene_data[7]->x-4,ene_cont->ene_data[7]->y+8,3*cost[48-1],3*sint[48+1],0,0,ene_data); eneshot_appear(0,ene_cont->ene_data[7]->x+4,ene_cont->ene_data[7]->y+8,3*cost[48 ],3*sint[48+3],0,0,ene_data); } } if( (ene_data->count==270) /* U */ ||(ene_data->count==280) ||(ene_data->count==290) ||(ene_data->count==300) ||(ene_data->count==310) ||(ene_data->count==320) ||(ene_data->count==330) ){ eneshot_appear(1,ene_cont->ene_data[10]->x-22,ene_cont->ene_data[10]->y-16,6*cost[48],6*sint[48],0,0,ene_data); eneshot_appear(1,ene_cont->ene_data[10]->x+22,ene_cont->ene_data[10]->y-16,6*cost[48],6*sint[48],0,0,ene_data); } /* ---------- ̂ւŃ[v ---------- */ if( (ene_data->count>=422) &&(ene_data->count<454)){ ene_data->hdx-=2; /* ړ(x:0 -> -64) */ } if( (ene_data->count>=498) &&(ene_data->count<530)){ ene_data->hdx+=2; /* ړ~܂(x:-64 -> 0) */ } if( (ene_data->count>=462) &&(ene_data->count<530))ene_data->hdy+=2; /* cړ */ if(ene_data->count==530)ene_data->hdy=0; /* c~܂ */ if( (ene_data->count==440) /* U */ ||(ene_data->count==470) ){ if(ene_cont->ene_data[6]->type!=-1){ eneshot_appear(0,ene_cont->ene_data[6]->x-4,ene_cont->ene_data[6]->y+8,4*cost[48-3],4*sint[48-3],0,0,ene_data); eneshot_appear(0,ene_cont->ene_data[6]->x+4,ene_cont->ene_data[6]->y+8,4*cost[48-1],4*sint[48-1],0,0,ene_data); } if(ene_cont->ene_data[7]->type!=-1){ eneshot_appear(0,ene_cont->ene_data[7]->x-4,ene_cont->ene_data[7]->y+8,4*cost[48+1],4*sint[48+1],0,0,ene_data); eneshot_appear(0,ene_cont->ene_data[7]->x+4,ene_cont->ene_data[7]->y+8,4*cost[48+3],4*sint[48+3],0,0,ene_data); } if(ene_cont->ene_data[6]->type!=-1){ eneshot_appear(0,ene_cont->ene_data[6]->x-4,ene_cont->ene_data[6]->y+8,3*cost[48 ],3*sint[48-3],0,0,ene_data); eneshot_appear(0,ene_cont->ene_data[6]->x+4,ene_cont->ene_data[6]->y+8,3*cost[48+2],3*sint[48-1],0,0,ene_data); } if(ene_cont->ene_data[7]->type!=-1){ eneshot_appear(0,ene_cont->ene_data[7]->x-4,ene_cont->ene_data[7]->y+8,3*cost[48-1],3*sint[48+1],0,0,ene_data); eneshot_appear(0,ene_cont->ene_data[7]->x+4,ene_cont->ene_data[7]->y+8,3*cost[48 ],3*sint[48+3],0,0,ene_data); } } if( (ene_data->count>=530) /* U */ &&(ene_data->count<=650) ){ if((ene_data->count>>1)&1){ eneshot_appear(4,ene_cont->ene_data[10]->x,ene_cont->ene_data[10]->y,4*cost[(ene_data->count )&63],4*sint[(ene_data->count )&63],0,0,ene_data); eneshot_appear(4,ene_cont->ene_data[10]->x,ene_cont->ene_data[10]->y,4*cost[(ene_data->count+32)&63],4*sint[(ene_data->count+32)&63],0,0,ene_data); } } if( (ene_data->count>=650) &&(ene_data->count<682))ene_data->hdy-=2; /* cړ (y:0 -> -64) */ if( (ene_data->count>=720) &&(ene_data->count<752))ene_data->hdy+=2; /* cړ~܂ (y:-64 -> 0) */ if(ene_data->count==752){ /* I[vII */ ene_cont->ene_data[ 6]->anim1=1; ene_cont->ene_data[ 7]->anim1=1; ene_cont->ene_data[ 8]->anim1=1; ene_cont->ene_data[ 9]->anim1=1; ene_cont->ene_data[11]->anim1=1; ene_cont->ene_data[12]->anim1=1; } if( (ene_data->count>=860) &&(ene_data->count<876)){ ene_data->hdx+=1; /* ړE(x:0 -> 16) */ } if( (ene_data->count>=1150) &&(ene_data->count<1166)){ ene_data->hdx-=1; /* ړ~܂(x:16 -> 0) */ } if(ene_data->count==1166){ /* N[YII */ ene_cont->ene_data[ 6]->anim2=1; ene_cont->ene_data[ 7]->anim2=1; ene_cont->ene_data[ 8]->anim2=1; ene_cont->ene_data[ 9]->anim2=1; ene_cont->ene_data[11]->anim2=1; ene_cont->ene_data[12]->anim2=1; } if( (ene_data->count==860) /* U */ ||(ene_data->count==890) ||(ene_data->count==920) ||(ene_data->count==950) ||(ene_data->count==980) ||(ene_data->count==1010) ||(ene_data->count==1040) ){ int temp; temp=set_dir(ene_cont->ene_data[10]->x,ene_cont->ene_data[10]->y,jiki_data->x,jiki_data->y); eneshot_appear(4,ene_cont->ene_data[10]->x,ene_cont->ene_data[10]->y,4*cost[(temp-6)&63],4*sint[(temp-6)&63],0,0,ene_data); eneshot_appear(4,ene_cont->ene_data[10]->x,ene_cont->ene_data[10]->y,4*cost[(temp-3)&63],4*sint[(temp-3)&63],0,0,ene_data); eneshot_appear(4,ene_cont->ene_data[10]->x,ene_cont->ene_data[10]->y,4*cost[(temp )&63],4*sint[(temp )&63],0,0,ene_data); eneshot_appear(4,ene_cont->ene_data[10]->x,ene_cont->ene_data[10]->y,4*cost[(temp+3)&63],4*sint[(temp+3)&63],0,0,ene_data); eneshot_appear(4,ene_cont->ene_data[10]->x,ene_cont->ene_data[10]->y,4*cost[(temp+6)&63],4*sint[(temp+6)&63],0,0,ene_data); } if(ene_data->count==860)se_adpcm1(zm_data->pcm[SE_BIGLASER1],zm_data->pcmsize[SE_BIGLASER1],SEPRW_ENEBIGLASER); if((ene_data->count>860)&&(ene_data->count<920)){ /* [U[ҋ@ */ if(ene_cont->ene_data[11]->type!=-1)ene_cont->ene_data[0]->type=60; else ene_cont->ene_data[0]->type=-1; ene_cont->ene_data[0]->x=ene_cont->ene_data[11]->x-16; ene_cont->ene_data[0]->y=ene_cont->ene_data[11]->y+48; ene_cont->ene_data[0]->anim3=0; if(ene_cont->ene_data[12]->type!=-1)ene_cont->ene_data[1]->type=60; else ene_cont->ene_data[1]->type=-1; ene_cont->ene_data[1]->x=ene_cont->ene_data[12]->x+16; ene_cont->ene_data[1]->y=ene_cont->ene_data[12]->y+48; ene_cont->ene_data[1]->anim3=0; } if(ene_data->count==920)se_adpcm1(zm_data->pcm[SE_BIGLASER2],zm_data->pcmsize[SE_BIGLASER2],SEPRW_ENEBIGLASER+0x10000); if((ene_data->count>=920)&&(ene_data->count<1100)){ /* [U[ */ if(ene_cont->ene_data[11]->type!=-1)ene_cont->ene_data[0]->type=60; else ene_cont->ene_data[0]->type=-1; ene_cont->ene_data[0]->x=ene_cont->ene_data[11]->x-16; ene_cont->ene_data[0]->y=ene_cont->ene_data[11]->y+48; ene_cont->ene_data[0]->anim3=1; if(ene_cont->ene_data[12]->type!=-1)ene_cont->ene_data[1]->type=60; else ene_cont->ene_data[1]->type=-1; ene_cont->ene_data[1]->x=ene_cont->ene_data[12]->x+16; ene_cont->ene_data[1]->y=ene_cont->ene_data[12]->y+48; ene_cont->ene_data[1]->anim3=1; } if((ene_data->count>=1100)&&(ene_data->count<1120)){ /* [U[P */ if(ene_cont->ene_data[11]->type!=-1)ene_cont->ene_data[0]->type=60; else ene_cont->ene_data[0]->type=-1; ene_cont->ene_data[0]->x=ene_cont->ene_data[11]->x-16; ene_cont->ene_data[0]->y=ene_cont->ene_data[11]->y+48; ene_cont->ene_data[0]->anim3=2; if(ene_cont->ene_data[12]->type!=-1)ene_cont->ene_data[1]->type=60; else ene_cont->ene_data[1]->type=-1; ene_cont->ene_data[1]->x=ene_cont->ene_data[12]->x+16; ene_cont->ene_data[1]->y=ene_cont->ene_data[12]->y+48; ene_cont->ene_data[1]->anim3=2; } if((ene_data->count>=1120)&&(ene_data->count<1140)){ /* [U[Q */ if(ene_cont->ene_data[11]->type!=-1)ene_cont->ene_data[0]->type=60; else ene_cont->ene_data[0]->type=-1; ene_cont->ene_data[0]->x=ene_cont->ene_data[11]->x-16; ene_cont->ene_data[0]->y=ene_cont->ene_data[11]->y+48; ene_cont->ene_data[0]->anim3=3; if(ene_cont->ene_data[12]->type!=-1)ene_cont->ene_data[1]->type=60; else ene_cont->ene_data[1]->type=-1; ene_cont->ene_data[1]->x=ene_cont->ene_data[12]->x+16; ene_cont->ene_data[1]->y=ene_cont->ene_data[12]->y+48; ene_cont->ene_data[1]->anim3=3; } if(ene_data->count==1140){ /* [U[ */ ene_cont->ene_data[0]->type=-1; ene_cont->ene_data[1]->type=-1; } if( (ene_data->count>=1274) &&(ene_data->count<1430)){ /* ʒuցI */ ene_data->hdx=0; ene_data->hdy=0; if(ene_data->x> 56)ene_data->x-=1; if(ene_data->x< 56)ene_data->x+=1; if(ene_data->y> 48)ene_data->y-=1; if(ene_data->y< 48)ene_data->y+=1; ene_data->hx=ene_data->x*32; ene_data->hy=ene_data->y*32; } if( (ene_data->count>=1280) /* U */ &&(ene_data->count< 1430) ){ if((ene_data->count>>1)&1){ eneshot_appear(4,ene_cont->ene_data[10]->x,ene_cont->ene_data[10]->y,4*cost[(ene_data->count )&63],4*sint[(ene_data->count )&63],0,0,ene_data); eneshot_appear(4,ene_cont->ene_data[10]->x,ene_cont->ene_data[10]->y,4*cost[(ene_data->count+32)&63],4*sint[(ene_data->count+32)&63],0,0,ene_data); } } /* ---------- ̂ւ񂩂u㔼v̓ ---------- */ if( (ene_data->count>=422 +1008) &&(ene_data->count<454 +1008)){ ene_data->hdx+=2; /* ړE(x:0 -> +64) */ } if( (ene_data->count>=498 +1008) &&(ene_data->count<530 +1008)){ ene_data->hdx-=2; /* ړ~܂(x:+64 -> 0) */ } if( (ene_data->count>=462 +1008) &&(ene_data->count<530 +1008))ene_data->hdy+=2; /* cړ */ if(ene_data->count==530 +1008)ene_data->hdy=0; /* c~܂ */ if( (ene_data->count==440+1008) /* U */ ||(ene_data->count==470+1008) ){ if(ene_cont->ene_data[6]->type!=-1){ eneshot_appear(0,ene_cont->ene_data[6]->x-4,ene_cont->ene_data[6]->y+8,4*cost[48-3],4*sint[48-3],0,0,ene_data); eneshot_appear(0,ene_cont->ene_data[6]->x+4,ene_cont->ene_data[6]->y+8,4*cost[48-1],4*sint[48-1],0,0,ene_data); } if(ene_cont->ene_data[7]->type!=-1){ eneshot_appear(0,ene_cont->ene_data[7]->x-4,ene_cont->ene_data[7]->y+8,4*cost[48+1],4*sint[48+1],0,0,ene_data); eneshot_appear(0,ene_cont->ene_data[7]->x+4,ene_cont->ene_data[7]->y+8,4*cost[48+3],4*sint[48+3],0,0,ene_data); } if(ene_cont->ene_data[6]->type!=-1){ eneshot_appear(0,ene_cont->ene_data[6]->x-4,ene_cont->ene_data[6]->y+8,3*cost[48 ],3*sint[48-3],0,0,ene_data); eneshot_appear(0,ene_cont->ene_data[6]->x+4,ene_cont->ene_data[6]->y+8,3*cost[48+2],3*sint[48-1],0,0,ene_data); } if(ene_cont->ene_data[7]->type!=-1){ eneshot_appear(0,ene_cont->ene_data[7]->x-4,ene_cont->ene_data[7]->y+8,3*cost[48-1],3*sint[48+1],0,0,ene_data); eneshot_appear(0,ene_cont->ene_data[7]->x+4,ene_cont->ene_data[7]->y+8,3*cost[48 ],3*sint[48+3],0,0,ene_data); } } if( (ene_data->count>=530+1008) /* U */ &&(ene_data->count<=650+1008) ){ if((ene_data->count>>1)&1){ eneshot_appear(4,ene_cont->ene_data[10]->x,ene_cont->ene_data[10]->y,4*cost[(ene_data->count )&63],4*sint[(ene_data->count )&63],0,0,ene_data); eneshot_appear(4,ene_cont->ene_data[10]->x,ene_cont->ene_data[10]->y,4*cost[(ene_data->count+32)&63],4*sint[(ene_data->count+32)&63],0,0,ene_data); } } if( (ene_data->count>=650 +1008) &&(ene_data->count<682 +1008))ene_data->hdy-=2; /* cړ (y:0 -> -64) */ if( (ene_data->count>=720 +1008) &&(ene_data->count<752 +1008))ene_data->hdy+=2; /* cړ~܂ (y:-64 -> 0) */ if(ene_data->count==752+1008){ /* I[vII */ ene_cont->ene_data[ 6]->anim1=1; ene_cont->ene_data[ 7]->anim1=1; ene_cont->ene_data[ 8]->anim1=1; ene_cont->ene_data[ 9]->anim1=1; ene_cont->ene_data[11]->anim1=1; ene_cont->ene_data[12]->anim1=1; } if( (ene_data->count>=860 +1008) &&(ene_data->count<876 +1008)){ ene_data->hdx-=1; /* ړ(x:0 -> -16) */ } if( (ene_data->count>=1150 +1008) &&(ene_data->count<1166 +1008)){ ene_data->hdx+=1; /* ړ~܂(x:-16 -> 0) */ } if(ene_data->count==1166+1008){ /* N[YII */ ene_cont->ene_data[ 6]->anim2=1; ene_cont->ene_data[ 7]->anim2=1; ene_cont->ene_data[ 8]->anim2=1; ene_cont->ene_data[ 9]->anim2=1; ene_cont->ene_data[11]->anim2=1; ene_cont->ene_data[12]->anim2=1; } if( (ene_data->count==860+1008) /* U */ ||(ene_data->count==890+1008) ||(ene_data->count==920+1008) ||(ene_data->count==950+1008) ||(ene_data->count==980+1008) ||(ene_data->count==1010+1008) ||(ene_data->count==1040+1008) ){ int temp; temp=set_dir(ene_cont->ene_data[10]->x,ene_cont->ene_data[10]->y,jiki_data->x,jiki_data->y); eneshot_appear(4,ene_cont->ene_data[10]->x,ene_cont->ene_data[10]->y,4*cost[(temp-6)&63],4*sint[(temp-6)&63],0,0,ene_data); eneshot_appear(4,ene_cont->ene_data[10]->x,ene_cont->ene_data[10]->y,4*cost[(temp-3)&63],4*sint[(temp-3)&63],0,0,ene_data); eneshot_appear(4,ene_cont->ene_data[10]->x,ene_cont->ene_data[10]->y,4*cost[(temp )&63],4*sint[(temp )&63],0,0,ene_data); eneshot_appear(4,ene_cont->ene_data[10]->x,ene_cont->ene_data[10]->y,4*cost[(temp+3)&63],4*sint[(temp+3)&63],0,0,ene_data); eneshot_appear(4,ene_cont->ene_data[10]->x,ene_cont->ene_data[10]->y,4*cost[(temp+6)&63],4*sint[(temp+6)&63],0,0,ene_data); } if(ene_data->count==860+1008)se_adpcm1(zm_data->pcm[SE_BIGLASER1],zm_data->pcmsize[SE_BIGLASER1],SEPRW_ENEBIGLASER); if((ene_data->count>860+1008)&&(ene_data->count<920+1008)){ /* [U[ҋ@ */ if(ene_cont->ene_data[11]->type!=-1)ene_cont->ene_data[0]->type=60; else ene_cont->ene_data[0]->type=-1; ene_cont->ene_data[0]->x=ene_cont->ene_data[11]->x-16; ene_cont->ene_data[0]->y=ene_cont->ene_data[11]->y+48; ene_cont->ene_data[0]->anim3=0; if(ene_cont->ene_data[12]->type!=-1)ene_cont->ene_data[1]->type=60; else ene_cont->ene_data[1]->type=-1; ene_cont->ene_data[1]->x=ene_cont->ene_data[12]->x+16; ene_cont->ene_data[1]->y=ene_cont->ene_data[12]->y+48; ene_cont->ene_data[1]->anim3=0; } if(ene_data->count==920+1008)se_adpcm1(zm_data->pcm[SE_BIGLASER2],zm_data->pcmsize[SE_BIGLASER2],SEPRW_ENEBIGLASER+0x10000); if((ene_data->count>=920+1008)&&(ene_data->count<1100+1008)){ /* [U[ */ if(ene_cont->ene_data[11]->type!=-1)ene_cont->ene_data[0]->type=60; else ene_cont->ene_data[0]->type=-1; ene_cont->ene_data[0]->x=ene_cont->ene_data[11]->x-16; ene_cont->ene_data[0]->y=ene_cont->ene_data[11]->y+48; ene_cont->ene_data[0]->anim3=1; if(ene_cont->ene_data[12]->type!=-1)ene_cont->ene_data[1]->type=60; else ene_cont->ene_data[1]->type=-1; ene_cont->ene_data[1]->x=ene_cont->ene_data[12]->x+16; ene_cont->ene_data[1]->y=ene_cont->ene_data[12]->y+48; ene_cont->ene_data[1]->anim3=1; } if((ene_data->count>=1100+1008)&&(ene_data->count<1120+1008)){ /* [U[P */ if(ene_cont->ene_data[11]->type!=-1)ene_cont->ene_data[0]->type=60; else ene_cont->ene_data[0]->type=-1; ene_cont->ene_data[0]->x=ene_cont->ene_data[11]->x-16; ene_cont->ene_data[0]->y=ene_cont->ene_data[11]->y+48; ene_cont->ene_data[0]->anim3=2; if(ene_cont->ene_data[12]->type!=-1)ene_cont->ene_data[1]->type=60; else ene_cont->ene_data[1]->type=-1; ene_cont->ene_data[1]->x=ene_cont->ene_data[12]->x+16; ene_cont->ene_data[1]->y=ene_cont->ene_data[12]->y+48; ene_cont->ene_data[1]->anim3=2; } if((ene_data->count>=1120+1008)&&(ene_data->count<1140+1008)){ /* [U[Q */ if(ene_cont->ene_data[11]->type!=-1)ene_cont->ene_data[0]->type=60; else ene_cont->ene_data[0]->type=-1; ene_cont->ene_data[0]->x=ene_cont->ene_data[11]->x-16; ene_cont->ene_data[0]->y=ene_cont->ene_data[11]->y+48; ene_cont->ene_data[0]->anim3=3; if(ene_cont->ene_data[12]->type!=-1)ene_cont->ene_data[1]->type=60; else ene_cont->ene_data[1]->type=-1; ene_cont->ene_data[1]->x=ene_cont->ene_data[12]->x+16; ene_cont->ene_data[1]->y=ene_cont->ene_data[12]->y+48; ene_cont->ene_data[1]->anim3=3; } if(ene_data->count==1140+1008){ /* [U[ */ ene_cont->ene_data[0]->type=-1; ene_cont->ene_data[1]->type=-1; } if( (ene_data->count>=1274 +1008) &&(ene_data->count<1430 +1008)){ /* EʒuցI */ ene_data->hdx=0; ene_data->hdy=0; if(ene_data->x>200)ene_data->x-=1; if(ene_data->x<200)ene_data->x+=1; if(ene_data->y> 48)ene_data->y-=1; if(ene_data->y< 48)ene_data->y+=1; ene_data->hx=ene_data->x*32; ene_data->hy=ene_data->y*32; } if( (ene_data->count>=1280+1008) /* U */ &&(ene_data->count< 1430+1008) ){ if((ene_data->count>>1)&1){ eneshot_appear(4,ene_cont->ene_data[10]->x,ene_cont->ene_data[10]->y,4*cost[(ene_data->count )&63],4*sint[(ene_data->count )&63],0,0,ene_data); eneshot_appear(4,ene_cont->ene_data[10]->x,ene_cont->ene_data[10]->y,4*cost[(ene_data->count+32)&63],4*sint[(ene_data->count+32)&63],0,0,ene_data); } } if(ene_data->count==1430+1008)ene_data->count=422-1; /* JEg߂I */ /* --- ʒu --- i{́j */ ene_data->hx+=ene_data->hdx; ene_data->hy+=ene_data->hdy; ene_data->x =ene_data->hx/32; ene_data->y =ene_data->hy/32; ene_data->count+=1; /* JE^{P */ /* --- ʒu --- ip[cǂj */ ene_cont->ene_data[6]->x =ene_data->x+ene_cont->ene_data[6]->hdx; /* oJ */ ene_cont->ene_data[6]->y =ene_data->y+ene_cont->ene_data[6]->hdy; ene_cont->ene_data[7]->x =ene_data->x+ene_cont->ene_data[7]->hdx; ene_cont->ene_data[7]->y =ene_data->y+ene_cont->ene_data[7]->hdy; ene_cont->ene_data[8]->x =ene_data->x+ene_cont->ene_data[8]->hdx; /* A[}[ */ ene_cont->ene_data[8]->y =ene_data->y+ene_cont->ene_data[8]->hdy; ene_cont->ene_data[9]->x =ene_data->x+ene_cont->ene_data[9]->hdx; ene_cont->ene_data[9]->y =ene_data->y+ene_cont->ene_data[9]->hdy; ene_cont->ene_data[11]->x =ene_data->x+ene_cont->ene_data[11]->hdx; /* K */ ene_cont->ene_data[11]->y =ene_data->y+ene_cont->ene_data[11]->hdy; ene_cont->ene_data[12]->x =ene_data->x+ene_cont->ene_data[12]->hdx; ene_cont->ene_data[12]->y =ene_data->y+ene_cont->ene_data[12]->hdy; ef_x = (ene_data->x - ene_data->size_x)/32; /* enemy field check */ ef_y = (ene_data->y - ene_data->size_y)/32; for(i=0;iearea_by[ene_data->type];i++){ for(c=0;cearea_bx[ene_data->type];c++){ if((ef_x+c)< 0)continue; /* NbsO */ if((ef_x+c)>=8)continue; if((ef_y+i)< 0)continue; if((ef_y+i)>=8)continue; *hit_cont->ene_field[ef_y+i][ef_x+c]++=e_sel; *hit_cont->ene_field[ef_y+i][ef_x+c] =-1; } } //C_LOCATE(0,0); //printf("ene_count:%8d\n",ene_data->count); } /*--------------< GړB rsPb1bul_l >---------------*/ void enemove_rsPb1bul_l(ene_data) ENE_DATA *ene_data; { static short ef_x; /* enemy field ̍ʒu */ static short ef_y; static int i,c; /* anim1 : I[vM */ /* anim2 : N[YM */ /* anim3 : \p^[ */ if(ene_data->anim1){ /* I[v */ if(ene_data->anim1&1)ene_data->hdy-=1; ene_data->anim1+=1; if(ene_data->anim1>32)ene_data->anim1=0; } if(ene_data->anim2){ /* N[Y */ if(ene_data->anim2&1)ene_data->hdy+=1; ene_data->anim2+=1; if(ene_data->anim2>32)ene_data->anim2=0; } ef_x = (ene_data->x - ene_data->size_x)/32; /* enemy field check */ ef_y = (ene_data->y - ene_data->size_y)/32; for(i=0;iearea_by[ene_data->type];i++){ for(c=0;cearea_bx[ene_data->type];c++){ if((ef_x+c)< 0)continue; /* NbsO */ if((ef_x+c)>=8)continue; if((ef_y+i)< 0)continue; if((ef_y+i)>=8)continue; *hit_cont->ene_field[ef_y+i][ef_x+c]++=e_sel; *hit_cont->ene_field[ef_y+i][ef_x+c] =-1; }