globals
effect array e
effect array n
real V
real E
real X
real O
real R
real I
real A
real N
real B
integer C
boolean D=false
integer f
rect array F
region array G
integer h=0
rect array H
boolean J=false
integer K=0
constant integer L=$70
integer m
boolean M=false
boolean P=false
boolean array q
region array Q
rect array S
integer T=0
real U=0
real w=0
region array W
rect array Y
integer z=0
rect array Z
string array vv
constant hashtable xv=InitHashtable()
constant integer ov=StringHash("jass")
region rv
integer iv
integer av
integer nv
integer Vv
integer Ev
integer Xv
integer Ov
integer Rv
integer Iv
integer Av
integer Nv
integer bv
integer Bv
integer cv
integer Cv
integer dv
integer Dv
integer fv
integer Fv
boolean array gv
boolean array Gv
unit array hv
region array Hv
rect array jv
integer Jv=0
integer kv
integer array Kv
integer array lv
boolean array Lv
boolean array mv
boolean array Mv
boolean array pv
boolean array Pv
string array qv
real array Qv
integer array sv
integer array Sv
integer tv=1
boolean Tv=false
integer uv=2
integer Uv
region wv
region Wv
region yv
region Yv
region zv
region Zv
region ve
region ee
region xe
region oe
region re
region ie
region ae
region ne
hashtable Ve=InitHashtable()
sound Ee
trigger Xe=CreateTrigger()
trigger Oe=CreateTrigger()
boolean Re=false
boolean Ie=false
integer Ae=0
integer array Ne
timer be=CreateTimer()
timer Be=CreateTimer()
timer ce=CreateTimer()
timerdialog Ce
integer de
group De=CreateGroup()
hashtable fe=InitHashtable()
hashtable Fe=InitHashtable()
trigger ge=null
string array Ge
texttag array he
hashtable je
integer Je=0
constant integer ke=$28829022
boolean Ke=false
hashtable le=InitHashtable()
boolean array Le
boolean array me
region Me
trigger pe
string array Pe
string array qe
string array Qe
string array se
string array Se
string array te
string array Te
string array ue
string array Ue
string array We
string array ye
string array Ye
string array ze
integer Ze=0
region array vx
region ex
real array xx
real array ox
trigger rx
integer ix
rect ax
integer Vx
integer Ex
integer Xx
boolean array Ox
boolean array Rx
integer array Ix
integer Ax
region Nx
rect array bx
integer array Bx
string array cx
region Cx
rect array Dx
integer array fx
string array Fx
trigger gx
boolean Gx=false
boolean hx=false
integer Hx
timer jx=CreateTimer()
timer Jx=CreateTimer()
timerdialog kx
unit Kx
unit array lx
rect Lx
trigger mx
integer Mx
timer Px=CreateTimer()
timer qx=CreateTimer()
timerdialog Qx
unit sx
unit array Sx
rect tx
boolean Tx=false
boolean ux=false
boolean Ux=false
boolean wx=false
trigger Wx
integer yx
unit Yx=null
unit zx=null
rect Zx
boolean vo=false
boolean eo=false
boolean array xo
boolean oo=false
boolean ro=false
trigger io
integer ao
unit Vo=null
rect Eo
trigger Xo
integer Oo
unit Ro=null
rect Io
timer Ao=CreateTimer()
trigger No
integer bo
rect Bo
integer co=0
real Co=0
boolean do=false
group Do=CreateGroup()
integer fo
trigger array Fo
integer go=0
trigger Go=null
rect ho=null
rect Ho=null
rect jo=null
rect Jo=null
rect ko=null
rect Ko=null
rect lo=null
rect Lo=null
rect mo=null
rect Mo=null
rect po=null
rect Po=null
rect qo=null
rect Qo=null
rect so=null
rect So=null
rect to=null
rect To=null
rect uo=null
rect Uo=null
rect wo=null
rect Wo=null
rect yo=null
rect Yo=null
rect zo=null
rect Zo=null
rect vr=null
rect er=null
rect xr=null
rect rr=null
rect ir=null
rect ar=null
rect nr=null
rect Vr=null
rect Er=null
rect Xr=null
rect Rr=null
rect Ir=null
rect Ar=null
rect Nr=null
rect br=null
rect Br=null
rect cr=null
rect Cr=null
rect dr=null
rect Dr=null
rect fr=null
rect Fr=null
rect gr=null
rect Gr=null
rect hr=null
rect Hr=null
rect jr=null
rect Jr=null
rect kr=null
rect Kr=null
rect lr=null
rect Lr=null
rect mr=null
rect Mr=null
rect pr=null
rect Pr=null
rect qr=null
rect Qr=null
rect sr=null
rect Sr=null
rect tr=null
rect Tr=null
rect ur=null
rect Ur=null
rect wr=null
rect Wr=null
rect yr=null
rect Yr=null
rect zr=null
rect Zr=null
rect vi=null
rect ei=null
rect xi=null
rect oi=null
rect ri=null
rect ii=null
rect ai=null
rect ni=null
rect Vi=null
rect Ei=null
rect Xi=null
rect Oi=null
rect Ri=null
rect Ii=null
rect Ai=null
rect Ni=null
rect bi=null
rect Bi=null
rect ci=null
rect Ci=null
rect di=null
rect Di=null
rect fi=null
rect Fi=null
rect gi=null
rect Gi=null
rect hi=null
rect Hi=null
rect ji=null
rect Ji=null
rect ki=null
rect Ki=null
rect li=null
rect Li=null
rect mi=null
rect Mi=null
rect pi=null
rect Pi=null
rect qi=null
rect Qi=null
rect si=null
rect Si=null
rect ti=null
rect Ti=null
rect ui=null
rect Ui=null
rect wi=null
rect Wi=null
rect yi=null
rect Yi=null
rect zi=null
rect Zi=null
rect va=null
rect ea=null
rect xa=null
rect oa=null
rect ra=null
rect ia=null
rect aa=null
rect na=null
rect Va=null
rect Ea=null
rect Xa=null
rect Oa=null
rect Ra=null
rect Ia=null
rect Aa=null
rect Na=null
rect ba=null
rect Ba=null
rect ca=null
rect Ca=null
rect da=null
rect Da=null
rect fa=null
rect Fa=null
rect ga=null
rect Ga=null
rect ha=null
rect Ha=null
rect ja=null
rect Ja=null
rect ka=null
rect Ka=null
rect la=null
rect La=null
rect ma=null
rect Ma=null
rect pa=null
rect Pa=null
rect qa=null
rect Qa=null
rect sa=null
rect Sa=null
rect ta=null
rect Ta=null
rect ua=null
rect Ua=null
rect wa=null
rect Wa=null
rect ya=null
rect Ya=null
rect za=null
rect Za=null
rect vn=null
rect en=null
rect xn=null
rect on=null
rect rn=null
rect in=null
rect an=null
rect nn=null
rect Vn=null
rect En=null
rect Xn=null
rect On=null
rect Rn=null
rect In=null
rect An=null
rect Nn=null
rect bn=null
rect Bn=null
rect cn=null
rect Cn=null
rect dn=null
rect Dn=null
rect fn=null
rect Fn=null
rect gn=null
rect Gn=null
rect hn=null
rect Hn=null
rect jn=null
rect Jn=null
rect kn=null
rect Kn=null
rect ln=null
rect Ln=null
rect mn=null
rect Mn=null
rect pn=null
rect Pn=null
rect qn=null
rect Qn=null
rect sn=null
rect Sn=null
rect tn=null
rect Tn=null
rect un=null
rect Un=null
rect wn=null
rect Wn=null
rect yn=null
rect Yn=null
rect zn=null
rect Zn=null
rect vV=null
rect eV=null
rect xV=null
rect oV=null
rect rV=null
rect iV=null
rect aV=null
rect nV=null
rect VV=null
rect EV=null
rect XV=null
rect OV=null
rect RV=null
rect IV=null
rect AV=null
rect NV=null
rect bV=null
rect BV=null
rect cV=null
rect CV=null
rect dV=null
rect DV=null
rect fV=null
rect FV=null
rect gV=null
rect GV=null
rect hV=null
rect HV=null
rect jV=null
rect JV=null
rect kV=null
rect KV=null
rect lV=null
rect LV=null
rect mV=null
rect MV=null
rect pV=null
rect PV=null
rect qV=null
rect QV=null
rect sV=null
rect SV=null
rect tV=null
rect TV=null
rect uV=null
rect UV=null
rect wV=null
rect WV=null
rect yV=null
rect YV=null
rect zV=null
rect ZV=null
rect vE=null
rect eE=null
rect xE=null
rect oE=null
rect rE=null
rect iE=null
rect aE=null
rect nE=null
rect VE=null
rect EE=null
rect XE=null
rect OE=null
rect RE=null
rect IE=null
rect AE=null
rect NE=null
rect bE=null
rect BE=null
rect cE=null
rect CE=null
rect dE=null
rect DE=null
rect fE=null
rect FE=null
rect gE=null
rect GE=null
rect hE=null
rect HE=null
rect jE=null
rect JE=null
rect kE=null
rect KE=null
rect lE=null
rect LE=null
rect mE=null
rect ME=null
rect pE=null
rect PE=null
rect qE=null
rect QE=null
rect sE=null
rect SE=null
rect tE=null
rect TE=null
rect uE=null
rect UE=null
rect wE=null
rect WE=null
rect yE=null
rect YE=null
rect zE=null
rect ZE=null
rect vX=null
rect eX=null
rect xX=null
rect oX=null
rect rX=null
rect iX=null
rect aX=null
rect nX=null
rect VX=null
rect EX=null
rect XX=null
rect OX=null
rect RX=null
rect IX=null
rect AX=null
rect NX=null
rect bX=null
rect BX=null
rect cX=null
rect CX=null
rect dX=null
rect DX=null
rect fX=null
rect FX=null
rect gX=null
rect GX=null
rect hX=null
rect HX=null
rect jX=null
rect JX=null
rect kX=null
rect KX=null
rect lX=null
rect LX=null
rect mX=null
rect MX=null
rect pX=null
rect PX=null
rect qX=null
rect QX=null
rect sX=null
rect SX=null
rect tX=null
rect TX=null
rect uX=null
rect UX=null
rect wX=null
rect WX=null
rect yX=null
rect YX=null
rect zX=null
rect ZX=null
rect vO=null
rect eO=null
rect xO=null
rect oO=null
rect rO=null
rect iO=null
rect aO=null
rect nO=null
rect VO=null
rect EO=null
rect XO=null
rect OO=null
rect RO=null
rect IO=null
rect AO=null
rect NO=null
rect bO=null
rect BO=null
rect cO=null
rect CO=null
rect dO=null
rect DO=null
rect fO=null
rect FO=null
rect gO=null
rect GO=null
rect hO=null
rect HO=null
rect jO=null
rect JO=null
rect kO=null
rect KO=null
rect lO=null
rect LO=null
rect mO=null
rect MO=null
rect pO=null
rect PO=null
rect qO=null
rect QO=null
rect sO=null
rect SO=null
rect tO=null
rect TO=null
rect uO=null
rect UO=null
rect wO=null
rect WO=null
rect yO=null
rect YO=null
rect zO=null
rect ZO=null
rect vR=null
rect eR=null
rect xR=null
rect oR=null
rect rR=null
rect iR=null
rect aR=null
rect nR=null
rect VR=null
rect ER=null
rect XR=null
rect OR=null
rect RR=null
rect IR=null
rect AR=null
rect NR=null
rect bR=null
rect BR=null
rect cR=null
rect CR=null
rect dR=null
rect DR=null
rect fR=null
rect FR=null
rect gR=null
rect GR=null
rect hR=null
rect HR=null
rect jR=null
rect JR=null
rect kR=null
rect KR=null
rect lR=null
rect LR=null
rect mR=null
rect MR=null
rect pR=null
rect PR=null
rect qR=null
rect QR=null
rect sR=null
rect SR=null
rect tR=null
rect TR=null
rect uR=null
rect UR=null
rect wR=null
rect WR=null
rect yR=null
rect YR=null
rect zR=null
rect ZR=null
rect vI=null
rect eI=null
rect xI=null
rect oI=null
rect rI=null
rect iI=null
rect aI=null
rect nI=null
rect VI=null
rect EI=null
rect XI=null
rect OI=null
rect RI=null
rect II=null
rect AI=null
rect NI=null
rect bI=null
rect BI=null
rect cI=null
rect CI=null
rect dI=null
rect DI=null
rect fI=null
rect FI=null
rect gI=null
rect GI=null
rect hI=null
rect HI=null
rect jI=null
rect JI=null
rect kI=null
rect KI=null
rect lI=null
rect LI=null
rect mI=null
rect MI=null
rect pI=null
rect PI=null
rect qI=null
rect QI=null
rect sI=null
rect SI=null
rect tI=null
rect TI=null
rect uI=null
rect UI=null
rect wI=null
rect WI=null
rect yI=null
rect YI=null
rect zI=null
rect ZI=null
rect vA=null
rect eA=null
rect xA=null
rect oA=null
rect rA=null
rect iA=null
rect aA=null
rect nA=null
rect VA=null
rect EA=null
rect XA=null
rect OA=null
rect RA=null
rect IA=null
rect AA=null
rect NA=null
rect bA=null
rect BA=null
rect cA=null
rect CA=null
rect dA=null
rect DA=null
rect fA=null
rect FA=null
rect gA=null
rect GA=null
rect hA=null
rect HA=null
rect jA=null
rect JA=null
rect kA=null
rect KA=null
rect lA=null
rect LA=null
rect mA=null
rect MA=null
rect pA=null
rect PA=null
rect qA=null
rect QA=null
rect sA=null
rect SA=null
rect tA=null
rect TA=null
rect uA=null
rect UA=null
rect wA=null
rect WA=null
rect yA=null
rect YA=null
rect zA=null
rect ZA=null
rect vN=null
rect eN=null
rect xN=null
rect oN=null
rect rN=null
rect iN=null
rect aN=null
rect nN=null
rect VN=null
rect EN=null
rect XN=null
rect ON=null
rect RN=null
rect IN=null
rect AN=null
rect NN=null
rect bN=null
rect BN=null
rect cN=null
rect CN=null
rect dN=null
rect DN=null
rect fN=null
rect FN=null
rect gN=null
rect GN=null
rect hN=null
rect HN=null
rect jN=null
rect JN=null
rect kN=null
rect KN=null
rect lN=null
rect LN=null
rect mN=null
rect MN=null
rect pN=null
rect PN=null
rect qN=null
rect QN=null
rect sN=null
rect SN=null
rect tN=null
rect TN=null
rect uN=null
rect UN=null
rect wN=null
rect WN=null
rect yN=null
rect YN=null
rect zN=null
rect ZN=null
rect vb=null
rect eb=null
rect xb=null
rect ob=null
rect rb=null
rect ib=null
rect ab=null
rect nb=null
rect Vb=null
rect Eb=null
rect Xb=null
rect Ob=null
rect Rb=null
rect Ib=null
rect Ab=null
rect Nb=null
rect bb=null
rect Bb=null
rect cb=null
rect Cb=null
rect db=null
rect Db=null
rect fb=null
rect Fb=null
rect gb=null
rect Gb=null
rect hb=null
rect Hb=null
rect jb=null
rect Jb=null
rect kb=null
rect Kb=null
rect lb=null
rect Lb=null
rect mb=null
rect Mb=null
rect pb=null
rect Pb=null
rect qb=null
rect Qb=null
rect sb=null
rect Sb=null
rect tb=null
rect Tb=null
rect ub=null
rect Ub=null
rect wb=null
rect Wb=null
rect yb=null
rect Yb=null
rect zb=null
rect Zb=null
rect vB=null
rect eB=null
rect xB=null
rect oB=null
rect rB=null
rect iB=null
rect aB=null
rect nB=null
rect VB=null
rect EB=null
rect XB=null
rect OB=null
rect RB=null
rect IB=null
rect AB=null
rect NB=null
rect bB=null
rect BB=null
rect cB=null
rect CB=null
rect dB=null
rect DB=null
rect fB=null
rect FB=null
rect gB=null
rect GB=null
rect hB=null
rect HB=null
rect jB=null
rect JB=null
rect kB=null
rect KB=null
rect lB=null
rect LB=null
rect mB=null
rect MB=null
rect pB=null
rect PB=null
rect qB=null
rect QB=null
rect sB=null
rect SB=null
rect tB=null
rect TB=null
rect uB=null
rect UB=null
rect wB=null
rect WB=null
rect yB=null
rect YB=null
rect zB=null
rect ZB=null
rect vc=null
rect ec=null
rect xc=null
rect oc=null
rect rc=null
rect ic=null
rect ac=null
rect nc=null
rect Vc=null
rect Ec=null
rect Xc=null
rect Oc=null
rect Rc=null
rect Ic=null
rect Ac=null
rect Nc=null
rect bc=null
rect Bc=null
rect cc=null
rect Cc=null
rect dc=null
rect Dc=null
rect fc=null
rect Fc=null
rect gc=null
rect Gc=null
rect hc=null
rect Hc=null
rect jc=null
rect Jc=null
rect kc=null
rect Kc=null
rect lc=null
rect Lc=null
rect mc=null
rect Mc=null
rect pc=null
rect Pc=null
rect qc=null
rect Qc=null
rect sc=null
rect Sc=null
rect tc=null
rect Tc=null
rect uc=null
rect Uc=null
rect wc=null
rect Wc=null
rect yc=null
rect Yc=null
rect zc=null
rect Zc=null
rect vC=null
rect eC=null
rect xC=null
rect oC=null
rect rC=null
rect iC=null
rect aC=null
rect nC=null
rect VC=null
rect EC=null
rect XC=null
rect OC=null
rect RC=null
rect IC=null
rect AC=null
rect NC=null
rect bC=null
rect BC=null
rect cC=null
rect CC=null
rect dC=null
rect DC=null
rect fC=null
rect FC=null
rect gC=null
rect GC=null
rect hC=null
rect HC=null
rect jC=null
rect JC=null
rect kC=null
rect KC=null
rect lC=null
rect LC=null
rect mC=null
rect MC=null
rect pC=null
rect PC=null
rect qC=null
rect QC=null
rect sC=null
rect SC=null
rect tC=null
rect TC=null
rect uC=null
rect UC=null
rect wC=null
rect WC=null
rect yC=null
rect YC=null
rect zC=null
rect ZC=null
rect vd=null
rect ed=null
rect xd=null
rect od=null
rect rd=null
rect ad=null
rect nd=null
rect Vd=null
rect Ed=null
rect Xd=null
rect Od=null
rect Rd=null
rect Id=null
rect Ad=null
rect Nd=null
rect bd=null
rect Bd=null
rect cd=null
rect Cd=null
rect dd=null
rect Dd=null
rect fd=null
rect Fd=null
rect gd=null
rect Gd=null
rect hd=null
rect Hd=null
rect jd=null
rect Jd=null
rect kd=null
rect Kd=null
rect ld=null
rect Ld=null
rect md=null
rect Md=null
rect pd=null
rect Pd=null
rect qd=null
rect Qd=null
rect sd=null
rect Sd=null
rect td=null
rect Td=null
rect ud=null
rect Ud=null
rect wd=null
rect Wd=null
rect yd=null
rect Yd=null
rect zd=null
rect Zd=null
rect vD=null
rect eD=null
rect xD=null
rect oD=null
rect rD=null
rect iD=null
rect aD=null
rect nD=null
rect VD=null
rect ED=null
rect XD=null
rect OD=null
rect RD=null
rect ID=null
rect AD=null
rect ND=null
rect bD=null
rect BD=null
rect cD=null
rect CD=null
rect dD=null
rect DD=null
rect fD=null
rect FD=null
rect gD=null
rect GD=null
rect hD=null
rect HD=null
rect jD=null
rect JD=null
rect kD=null
rect KD=null
rect lD=null
rect LD=null
rect mD=null
rect MD=null
rect pD=null
rect PD=null
rect qD=null
rect QD=null
rect sD=null
rect SD=null
rect tD=null
rect TD=null
rect uD=null
rect UD=null
rect wD=null
rect WD=null
rect yD=null
rect YD=null
rect zD=null
rect ZD=null
rect vf=null
rect ef=null
rect xf=null
rect of=null
rect rf=null
rect af=null
rect nf=null
rect Vf=null
rect Ef=null
rect Xf=null
rect Of=null
rect Rf=null
rect If=null
rect Af=null
rect Nf=null
rect bf=null
rect Bf=null
rect cf=null
rect Cf=null
rect df=null
rect Df=null
rect ff=null
rect Ff=null
rect gf=null
rect Gf=null
rect hf=null
rect Hf=null
rect jf=null
rect Jf=null
rect kf=null
rect Kf=null
rect lf=null
rect Lf=null
rect mf=null
rect Mf=null
rect pf=null
rect Pf=null
rect qf=null
rect Qf=null
rect sf=null
rect Sf=null
rect tf=null
rect Tf=null
rect uf=null
rect Uf=null
rect wf=null
rect Wf=null
rect yf=null
rect Yf=null
rect zf=null
rect Zf=null
rect vF=null
rect eF=null
rect xF=null
rect oF=null
rect rF=null
rect iF=null
rect aF=null
rect nF=null
rect VF=null
rect EF=null
rect XF=null
rect OF=null
rect RF=null
rect IF=null
rect AF=null
rect NF=null
rect bF=null
rect BF=null
rect cF=null
rect CF=null
rect dF=null
rect DF=null
rect fF=null
rect FF=null
rect gF=null
rect GF=null
rect hF=null
rect HF=null
rect jF=null
rect JF=null
rect kF=null
rect KF=null
rect lF=null
rect LF=null
rect mF=null
rect MF=null
rect pF=null
rect PF=null
rect qF=null
rect QF=null
rect sF=null
rect SF=null
rect tF=null
rect TF=null
rect uF=null
rect UF=null
rect wF=null
rect WF=null
rect yF=null
rect YF=null
rect zF=null
rect ZF=null
rect vg=null
rect eg=null
rect xg=null
rect og=null
rect rg=null
rect ig=null
rect ag=null
rect ng=null
rect Vg=null
rect Eg=null
rect Xg=null
rect Og=null
rect Rg=null
rect Ig=null
rect Ag=null
rect Ng=null
rect bg=null
rect Bg=null
rect cg=null
rect Cg=null
rect dg=null
rect Dg=null
rect fg=null
rect Fg=null
rect gg=null
rect Gg=null
rect hg=null
rect Hg=null
rect jg=null
rect Jg=null
rect kg=null
rect Kg=null
rect lg=null
rect Lg=null
rect mg=null
rect Mg=null
rect pg=null
rect Pg=null
rect qg=null
rect Qg=null
rect sg=null
rect Sg=null
rect tg=null
rect Tg=null
rect ug=null
rect Ug=null
rect wg=null
rect Wg=null
rect yg=null
rect Yg=null
rect zg=null
rect Zg=null
rect vG=null
rect eG=null
rect xG=null
rect oG=null
rect rG=null
rect iG=null
rect aG=null
rect nG=null
rect VG=null
rect EG=null
rect XG=null
rect OG=null
rect RG=null
rect IG=null
rect AG=null
rect NG=null
rect bG=null
rect BG=null
rect cG=null
rect CG=null
rect dG=null
rect DG=null
rect fG=null
rect FG=null
rect gG=null
rect GG=null
rect hG=null
rect HG=null
rect jG=null
rect JG=null
rect kG=null
rect KG=null
rect lG=null
rect LG=null
rect mG=null
rect MG=null
rect pG=null
rect PG=null
rect qG=null
rect QG=null
rect sG=null
rect SG=null
rect tG=null
rect TG=null
rect uG=null
rect UG=null
rect wG=null
rect WG=null
rect yG=null
rect YG=null
rect zG=null
rect ZG=null
rect vh=null
rect eh=null
rect xh=null
rect oh=null
rect rh=null
rect ih=null
rect ah=null
rect nh=null
rect Vh=null
rect Eh=null
rect Xh=null
rect Oh=null
rect Rh=null
rect Ih=null
rect Ah=null
rect Nh=null
rect bh=null
rect Bh=null
rect ch=null
rect Ch=null
rect dh=null
rect Dh=null
rect fh=null
rect Fh=null
rect gh=null
rect Gh=null
rect hh=null
rect Hh=null
rect jh=null
rect Jh=null
rect kh=null
rect Kh=null
rect lh=null
rect Lh=null
rect mh=null
rect Mh=null
rect ph=null
rect Ph=null
rect qh=null
rect Qh=null
rect sh=null
rect Sh=null
rect th=null
rect Th=null
rect uh=null
rect Uh=null
rect wh=null
rect Wh=null
rect yh=null
rect Yh=null
rect zh=null
rect Zh=null
rect vH=null
rect eH=null
rect xH=null
rect oH=null
rect rH=null
rect iH=null
rect aH=null
rect nH=null
rect VH=null
rect EH=null
rect XH=null
rect OH=null
rect RH=null
rect IH=null
rect AH=null
rect NH=null
rect bH=null
rect BH=null
rect cH=null
rect CH=null
rect dH=null
rect DH=null
rect fH=null
rect FH=null
rect gH=null
rect GH=null
rect hH=null
rect HH=null
rect jH=null
rect JH=null
rect kH=null
rect KH=null
rect lH=null
rect LH=null
rect mH=null
rect MH=null
rect pH=null
rect PH=null
rect qH=null
rect QH=null
rect sH=null
rect SH=null
rect tH=null
rect TH=null
rect uH=null
rect UH=null
rect wH=null
rect WH=null
rect yH=null
rect YH=null
rect zH=null
rect ZH=null
rect vj=null
rect ej=null
rect xj=null
rect oj=null
rect rj=null
rect ij=null
rect aj=null
rect nj=null
rect Vj=null
rect Ej=null
rect Xj=null
rect Oj=null
rect Rj=null
rect Ij=null
rect Aj=null
rect Nj=null
rect bj=null
rect Bj=null
rect cj=null
rect Cj=null
rect dj=null
rect Dj=null
rect fj=null
rect Fj=null
rect gj=null
rect Gj=null
rect hj=null
rect Hj=null
rect jj=null
rect Jj=null
rect kj=null
rect Kj=null
rect lj=null
rect Lj=null
rect mj=null
rect Mj=null
rect pj=null
rect Pj=null
rect qj=null
rect Qj=null
rect sj=null
rect Sj=null
rect tj=null
rect Tj=null
rect uj=null
rect Uj=null
rect wj=null
rect Wj=null
rect yj=null
rect Yj=null
rect zj=null
rect Zj=null
rect vJ=null
rect eJ=null
rect xJ=null
rect oJ=null
rect rJ=null
rect iJ=null
rect aJ=null
rect nJ=null
rect VJ=null
rect EJ=null
rect XJ=null
rect OJ=null
rect RJ=null
rect IJ=null
rect AJ=null
rect NJ=null
rect bJ=null
rect BJ=null
rect cJ=null
rect CJ=null
rect dJ=null
rect DJ=null
rect fJ=null
rect FJ=null
rect gJ=null
rect GJ=null
rect hJ=null
rect HJ=null
rect jJ=null
rect JJ=null
rect kJ=null
rect KJ=null
rect lJ=null
rect LJ=null
rect mJ=null
rect MJ=null
rect pJ=null
rect PJ=null
rect qJ=null
rect QJ=null
rect sJ=null
rect SJ=null
rect tJ=null
rect TJ=null
rect uJ=null
rect UJ=null
rect wJ=null
rect WJ=null
rect yJ=null
rect YJ=null
rect zJ=null
rect ZJ=null
rect vk=null
rect ek=null
rect xk=null
rect ok=null
rect rk=null
rect ik=null
rect ak=null
rect nk=null
rect Vk=null
rect Ek=null
rect Xk=null
rect Ok=null
rect Rk=null
rect Ik=null
rect Ak=null
rect Nk=null
rect bk=null
rect Bk=null
rect ck=null
rect Ck=null
rect dk=null
rect Dk=null
rect fk=null
rect Fk=null
rect gk=null
rect Gk=null
rect hk=null
rect Hk=null
rect jk=null
rect Jk=null
rect kk=null
rect Kk=null
rect lk=null
rect Lk=null
rect mk=null
rect Mk=null
rect pk=null
rect Pk=null
rect qk=null
rect Qk=null
rect sk=null
rect Sk=null
rect Tk=null
rect uk=null
rect Uk=null
rect wk=null
rect Wk=null
rect yk=null
rect Yk=null
rect zk=null
rect Zk=null
rect vK=null
rect eK=null
rect xK=null
rect oK=null
rect rK=null
rect iK=null
rect aK=null
rect nK=null
rect VK=null
rect EK=null
rect XK=null
rect OK=null
rect RK=null
rect IK=null
rect AK=null
rect NK=null
rect bK=null
rect BK=null
rect cK=null
rect CK=null
rect dK=null
rect DK=null
rect fK=null
rect FK=null
rect gK=null
rect GK=null
rect hK=null
rect HK=null
rect jK=null
rect JK=null
rect kK=null
rect KK=null
rect lK=null
rect LK=null
rect mK=null
rect MK=null
rect pK=null
rect PK=null
rect qK=null
rect QK=null
rect sK=null
rect SK=null
rect tK=null
rect TK=null
rect uK=null
rect UK=null
rect wK=null
rect WK=null
rect yK=null
rect YK=null
rect zK=null
rect ZK=null
rect vl=null
rect el=null
rect xl=null
rect ol=null
rect rl=null
rect il=null
rect al=null
rect nl=null
rect Vl=null
rect El=null
rect Xl=null
rect Ol=null
rect Rl=null
rect Il=null
rect Al=null
rect Nl=null
rect bl=null
rect Bl=null
rect cl=null
rect Cl=null
rect dl=null
rect Dl=null
rect fl=null
rect Fl=null
rect gl=null
rect Gl=null
rect hl=null
rect Hl=null
rect jl=null
rect Jl=null
rect kl=null
rect Kl=null
rect ll=null
rect Ll=null
rect ml=null
rect Ml=null
rect pl=null
rect Pl=null
rect ql=null
rect Ql=null
rect sl=null
rect Sl=null
rect tl=null
rect Tl=null
rect ul=null
rect Ul=null
rect wl=null
rect Wl=null
rect yl=null
rect Yl=null
rect zl=null
rect Zl=null
rect vL=null
rect eL=null
rect xL=null
rect oL=null
rect rL=null
rect iL=null
rect aL=null
rect nL=null
rect VL=null
rect EL=null
rect XL=null
rect OL=null
rect RL=null
rect IL=null
rect AL=null
rect NL=null
rect bL=null
rect BL=null
rect cL=null
rect CL=null
rect dL=null
rect DL=null
rect fL=null
rect FL=null
rect gL=null
rect GL=null
rect hL=null
rect HL=null
rect jL=null
rect JL=null
rect kL=null
rect KL=null
rect lL=null
rect LL=null
rect mL=null
rect ML=null
rect pL=null
rect PL=null
rect qL=null
rect QL=null
rect sL=null
rect SL=null
rect tL=null
rect TL=null
rect uL=null
rect UL=null
rect wL=null
rect WL=null
rect yL=null
rect YL=null
rect zL=null
rect ZL=null
rect vm=null
rect em=null
rect xm=null
rect om=null
rect rm=null
rect im=null
rect am=null
rect nm=null
rect Vm=null
rect Em=null
rect Xm=null
rect Om=null
rect Rm=null
rect Im=null
rect Am=null
rect Nm=null
rect bm=null
rect Bm=null
rect cm=null
rect Cm=null
rect dm=null
rect Dm=null
rect fm=null
rect Fm=null
rect gm=null
rect Gm=null
rect hm=null
rect Hm=null
rect jm=null
rect Jm=null
rect km=null
rect Km=null
rect lm=null
rect Lm=null
rect mm=null
rect Mm=null
rect pm=null
rect Pm=null
rect qm=null
rect Qm=null
rect sm=null
rect Sm=null
rect tm=null
rect Tm=null
rect um=null
rect Um=null
rect wm=null
rect Wm=null
rect ym=null
rect Ym=null
rect zm=null
rect Zm=null
rect vM=null
rect eM=null
rect xM=null
rect oM=null
rect rM=null
rect iM=null
rect aM=null
rect nM=null
rect VM=null
rect EM=null
rect XM=null
rect OM=null
rect RM=null
rect IM=null
rect AM=null
rect NM=null
rect bM=null
rect BM=null
rect cM=null
rect CM=null
rect dM=null
rect DM=null
rect fM=null
rect FM=null
rect gM=null
rect GM=null
rect hM=null
rect HM=null
rect jM=null
rect JM=null
rect kM=null
rect KM=null
rect lM=null
rect LM=null
rect mM=null
rect MM=null
rect pM=null
rect PM=null
rect qM=null
rect QM=null
rect sM=null
rect SM=null
rect tM=null
rect TM=null
rect uM=null
rect UM=null
rect wM=null
rect WM=null
rect yM=null
rect YM=null
rect zM=null
rect ZM=null
rect vp=null
rect ep=null
rect xp=null
rect op=null
rect rp=null
rect ip=null
rect ap=null
rect np=null
rect Vp=null
rect Ep=null
rect Xp=null
rect Op=null
rect Rp=null
rect Ip=null
rect Ap=null
rect Np=null
rect bp=null
rect Bp=null
rect cp=null
rect Cp=null
rect dp=null
rect Dp=null
rect fp=null
rect Fp=null
rect gp=null
rect Gp=null
rect hp=null
rect Hp=null
rect jp=null
rect Jp=null
rect kp=null
rect Kp=null
rect lp=null
rect Lp=null
rect mp=null
rect Mp=null
rect pp=null
rect Pp=null
rect qp=null
rect Qp=null
rect sp=null
rect Sp=null
rect Tp=null
rect up=null
rect Up=null
rect wp=null
rect Wp=null
rect yp=null
rect Yp=null
rect zp=null
rect Zp=null
rect vP=null
rect eP=null
rect xP=null
rect oP=null
rect rP=null
rect iP=null
rect aP=null
rect nP=null
rect VP=null
rect EP=null
rect XP=null
rect OP=null
rect RP=null
rect IP=null
rect AP=null
rect NP=null
rect bP=null
rect BP=null
rect cP=null
rect CP=null
rect dP=null
rect DP=null
rect fP=null
rect FP=null
rect gP=null
rect GP=null
rect hP=null
rect HP=null
rect jP=null
rect JP=null
rect kP=null
rect KP=null
rect lP=null
rect LP=null
rect MP=null
rect pP=null
rect PP=null
rect qP=null
rect QP=null
rect sP=null
rect SP=null
rect tP=null
rect TP=null
rect uP=null
rect UP=null
rect wP=null
rect WP=null
rect yP=null
rect YP=null
rect zP=null
rect ZP=null
rect vq=null
rect eq=null
rect xq=null
rect oq=null
rect rq=null
rect iq=null
rect aq=null
rect nq=null
rect Vq=null
rect Eq=null
rect Xq=null
rect Oq=null
rect Rq=null
rect Iq=null
rect Aq=null
rect Nq=null
rect bq=null
rect Bq=null
rect cq=null
rect Cq=null
rect dq=null
rect Dq=null
rect fq=null
rect Fq=null
rect gq=null
rect Gq=null
rect hq=null
rect Hq=null
rect jq=null
rect Jq=null
rect kq=null
rect Kq=null
rect lq=null
rect Lq=null
rect mq=null
rect Mq=null
rect pq=null
rect Pq=null
rect qq=null
rect Qq=null
rect sq=null
rect Sq=null
rect tq=null
rect Tq=null
rect uq=null
rect Uq=null
rect wq=null
rect Wq=null
rect yq=null
rect Yq=null
rect zq=null
rect Zq=null
rect vQ=null
rect eQ=null
rect xQ=null
rect oQ=null
rect rQ=null
rect iQ=null
rect aQ=null
rect nQ=null
rect VQ=null
rect EQ=null
rect XQ=null
rect OQ=null
rect RQ=null
rect IQ=null
rect AQ=null
rect NQ=null
rect bQ=null
rect BQ=null
rect cQ=null
rect CQ=null
rect dQ=null
rect DQ=null
rect fQ=null
rect FQ=null
rect gQ=null
rect GQ=null
rect hQ=null
rect HQ=null
rect jQ=null
rect JQ=null
rect kQ=null
rect KQ=null
rect lQ=null
rect LQ=null
rect mQ=null
rect MQ=null
rect pQ=null
rect PQ=null
rect qQ=null
rect QQ=null
rect sQ=null
rect SQ=null
rect tQ=null
rect TQ=null
rect uQ=null
rect UQ=null
rect wQ=null
rect WQ=null
rect yQ=null
rect YQ=null
rect zQ=null
rect ZQ=null
rect vs=null
rect es=null
rect xs=null
rect os=null
rect rs=null
rect is=null
rect as=null
rect ns=null
rect Vs=null
rect Es=null
rect Xs=null
rect Os=null
rect Rs=null
rect Is=null
rect As=null
rect Ns=null
rect bs=null
rect Bs=null
rect cs=null
rect Cs=null
rect ds=null
rect Ds=null
rect fs=null
rect Fs=null
rect gs=null
rect Gs=null
rect hs=null
rect Hs=null
rect js=null
rect Js=null
rect ks=null
rect Ks=null
rect ls=null
rect Ls=null
rect ms=null
rect Ms=null
rect ps=null
rect Ps=null
rect qs=null
rect Qs=null
rect ss=null
sound Ss=null
sound ts=null
sound Ts=null
sound us=null
sound Us=null
sound ws=null
sound Ws=null
sound ys=null
sound Ys=null
sound zs=null
sound Zs=null
sound vS=null
sound eS=null
sound xS=null
sound oS=null
sound rS=null
sound iS=null
sound aS=null
sound nS=null
sound VS=null
sound ES=null
sound XS=null
sound OS=null
sound RS=null
sound IS=null
sound AS=null
sound NS=null
sound bS=null
sound BS=null
sound cS=null
sound CS=null
sound dS=null
sound DS=null
sound fS=null
sound FS=null
sound gS=null
sound GS=null
sound hS=null
sound HS=null
sound jS=null
sound JS=null
sound kS=null
sound KS=null
sound lS=null
sound LS=null
sound mS=null
sound MS=null
sound pS=null
sound PS=null
sound qS=null
sound QS=null
group sS=CreateGroup()
real array SS
integer tS=0
integer TS=0
integer array uS
trigger US
real array wS
real array WS
real yS
boolean YS=false
boolean array zS
boolean array ZS
boolean array vt
boolean et=false
boolean array xt
boolean ot=false
hashtable rt=InitHashtable()
boolean it=false
unit array at
unit array nt
unit array Vt
unit array Et
timer array Xt
rect Ot
integer array Rt
integer It=0
integer At
hashtable Nt=InitHashtable()
boolean bt=false
boolean Bt=false
boolean array ct
integer Ct=0
integer dt=0
timer Dt=CreateTimer()
timerdialog ft
dialog Ft
dialog array gt
dialog array Gt
button array ht
dialog Ht
button array jt
integer array Jt
integer array kt
string array Kt
integer array lt
string array Lt
integer array mt
string array Mt
integer array pt
string array Pt
integer array qt
string array Qt
integer array St
string array tt
integer array Tt
string array ut
integer array Ut
string array wt
button array Wt
boolean array yt
integer Yt=0
integer zt=0
boolean array Zt
trigger vT
boolean array eT
integer xT
unit oT
rect rT
region array iT
rect array aT
real array nT
string array VT
integer ET
integer XT=0
integer OT=0
integer array RT
integer IT=1
integer AT=2
integer NT=3
integer bT=4
real array BT
integer array cT
boolean array CT
unit array dT
integer array DT
trigger array fT
integer FT=0
integer gT=0
integer array GT
boolean array hT
integer array HT
integer array jT
integer array JT
integer kT=0
integer KT=0
integer array lT
integer array LT
trigger array mT
trigger array MT
integer array pT
boolean array PT
region array qT
string array QT
rect array sT
rect array ST
unit array tT
rect array TT
integer array uT
integer array UT
integer wT=0
integer WT=0
integer array yT
boolean array YT
integer array zT
integer array ZT
integer array vu
integer eu=0
integer xu=0
integer array ou
trigger array ru
integer array iu
integer array au
integer array nu
region array Vu
trigger array Eu
integer array Xu
integer Ou=0
integer Ru=0
integer array Iu
real array Au
real array Nu
integer bu=0
integer Bu=0
integer array cu
integer array Cu
integer array du
integer array Du
integer fu=0
integer Fu=0
integer array gu
integer array Gu
integer array hu
integer array Hu
integer ju=0
integer Ju=0
integer array ku
integer array Ku
trigger array lu
trigger array Lu
integer array mu
string array Mu
integer array pu
integer Pu=0
integer qu=0
integer array Qu
integer array su
integer array Su
integer tu=0
integer Tu=0
integer array uu
integer array Uu
integer array wu
integer array Wu
integer yu=0
integer Yu=0
integer array zu
integer array Zu
integer array vU
integer array eU
integer xU=0
integer oU=0
integer array rU
rect array iU
integer array aU
integer array nU
integer array VU
boolean array EU
integer XU=0
integer OU=0
integer array RU
integer array IU
integer array AU
integer array NU
integer bU=0
integer BU=0
integer array cU
integer array CU
integer array dU
integer array DU
integer fU=0
integer FU=0
integer array gU
hashtable GU=InitHashtable()
integer hU=0
integer HU=0
integer array jU
integer JU
integer kU
integer KU
integer lU
integer LU
integer mU
rect MU
integer pU=0
integer PU=0
integer array qU
multiboard array QU
integer array sU
integer array SU
integer array tU
integer array TU
boolean array uU
integer UU=0
integer wU=0
integer array WU
integer array yU
integer array YU
integer array zU
integer ZU=0
integer vw=0
integer array ew
integer array xw
integer array ow
integer array rw
integer iw=0
integer aw=0
integer array nw
integer array Vw
integer array Ew
integer array Xw
integer Ow=0
integer Rw=0
integer array Iw
integer Aw=0
hashtable Nw=InitHashtable()
timer array bw
integer array Bw
integer array cw
integer Cw=0
integer dw=0
integer array Dw
integer array fw
trigger array Fw
integer gw=0
integer Gw=0
integer array hw
boolean array Hw
integer array jw
integer array Jw
integer array kw
integer Kw=0
integer lw=0
integer array Lw
trigger array mw
trigger array Mw
region array pw
rect array Pw
boolean array qw
integer array Qw
integer array sw
integer Sw=0
integer tw=0
integer array Tw
integer array uw
integer array Uw
integer array ww
integer array Ww
integer array yw
integer Yw=0
integer zw=0
integer array Zw
integer array vW
integer array eW
integer array xW
integer oW=0
integer rW=0
integer array iW
integer array aW
integer array nW
integer array VW
integer EW=0
integer XW=0
integer array OW
timer RW=CreateTimer()
boolean array IW
integer AW=0
integer NW=0
integer array bW
real array BW
real array cW
integer array CW
integer dW=0
integer DW=0
integer array fW
integer array FW
integer array gW
integer array GW
integer hW=0
integer HW=0
integer array jW
integer array JW
integer array kW
integer array KW
integer lW=0
integer LW=0
integer array mW
integer array MW
integer pW=0
integer PW=0
integer array qW
region array QW
rect array sW
trigger array SW
trigger array tW
boolean array TW
integer array uW
integer array UW
integer array wW
integer WW=0
integer yW=0
integer array YW
integer array zW
integer array ZW
integer array vy
integer ey=0
integer xy=0
integer array oy
integer array ry
integer array iy
integer array ay
integer Vy=0
integer Ey=0
integer array Xy
integer Oy=0
integer Ry=0
integer array Iy
boolean array Ay
integer array Ny
integer by=0
integer By=0
integer array cy
boolean array Cy
integer array Dy
integer array fy
integer array Fy
integer gy=0
integer Gy=0
integer array hy
integer Hy=0
integer jy=0
integer Jy=0
integer ky=0
integer Ky=0
integer array ly
integer array Ly
integer array my
integer array My
integer array Py
integer array qy
integer array Qy
integer array sy
integer array Sy
integer array ty
integer array Ty
integer array uy
integer array Uy
integer wy=0
integer Wy=0
integer array yy
integer array Yy
integer zy=0
integer Zy=0
integer array vY
boolean array eY
integer array xY
integer array oY
integer array rY
timer array iY
boolean array aY
trigger array nY
trigger array VY
trigger array EY
trigger array XY
integer array OY
trigger array RY
integer array IY
trigger array AY
integer array NY
trigger array bY
trigger BY
trigger cY
trigger CY
trigger dY
trigger DY
trigger fY
trigger FY
trigger gY
trigger GY
trigger hY
trigger HY
trigger jY
trigger JY
trigger kY
trigger KY
trigger lY
trigger LY
trigger mY
trigger array MY
trigger array pY
trigger array PY
integer qY
integer QY
real sY
real SY
code tY
boolean TY
string uY
integer UY
integer wY
trigger WY
real zY=.0
real ZY=.0
group vz=null
boolexpr xz=null
endglobals
native JNStringLength takes string str returns integer
native JNStringSub takes string str,integer start,integer length returns string
native JNStringInsert takes string str,integer index,string val returns string
native JNStringReplace takes string str,string old,string newstr returns string
native JNStringSplit takes string str,string sub,integer index returns string
native JNStringContains takes string str,string sub returns boolean
native JNStringCount takes string str,string sub returns integer
native JNStringRegex takes string str,string regex,integer index returns string
native JNStringTrimEnd takes string str returns string
native JNStringTrimStart takes string str returns string
native JNStringTrim takes string str returns string
native JNStringReverse takes string str returns string
native JNStringPos takes string str,string sub returns integer
native JNStopwatchTick takes integer id returns real
native JNStopwatchElapsedHour takes integer id returns integer
native JNStopwatchElapsedMinute takes integer id returns integer
native JNStopwatchElapsedSecond takes integer id returns integer
native JNStopwatchElapsedMS takes integer id returns integer
native JNStopwatchDestroy takes integer id returns nothing
native JNStopwatchReset takes integer id returns nothing
native JNStopwatchPause takes integer id returns nothing
native JNStopwatchStart takes integer id returns nothing
native JNStopwatchCreate takes nothing returns integer
native JNServerPluginVersion takes nothing returns integer
native JNServerUnixTime takes nothing returns integer
native JNServerTime takes string Format returns string
native JNOpenBrowser takes string uri returns nothing
native JNSetLog takes string MapId,string UserId,string SecretKey,string Character,string Version,string Loging returns string
native JNGetLoadCode takes string MapId,string UserId,string SecretKey,string Character returns string
native JNSetSaveCode takes string MapId,string UserId,string SecretKey,string Character,string Code returns string
native JNSetPVPLog takes string MapId,string UserId,string SecretKey,string Character,boolean Win,integer Kill,integer Death,integer Assist,string Loging returns string
native JNPVPWin takes string UserId,boolean Win returns nothing
native JNPVPAssist takes string UserId returns nothing
native JNPVPDeath takes string UserId returns nothing
native JNPVPKill takes string UserId returns nothing
native JNPVPCharacter takes string UserId,string Character returns nothing
native JNPVPLog takes string UserId,string Log returns nothing
native JNObjectMapGetReal takes string Field returns real
native JNObjectMapGetBoolean takes string Field returns boolean
native JNObjectMapGetString takes string Field returns string
native JNObjectMapGetInt takes string Field returns integer
native JNObjectMapInit takes string MapId,string SecretKey returns integer
native JNObjectUserResetCharacter takes string UserId returns nothing
native JNObjectUserClearField takes string UserId returns nothing
native JNObjectUserRemoveField takes string UserId,string Field returns nothing
native JNObjectUserGetReal takes string UserId,string Field returns real
native JNObjectUserSetReal takes string UserId,string Field,real value returns nothing
native JNObjectUserGetBoolean takes string UserId,string Field returns boolean
native JNObjectUserSetBoolean takes string UserId,string Field,boolean value returns nothing
native JNObjectUserGetString takes string UserId,string Field returns string
native JNObjectUserSetString takes string UserId,string Field,string value returns nothing
native JNObjectUserGetInt takes string UserId,string Field returns integer
native JNObjectUserSetInt takes string UserId,string Field,integer value returns nothing
native JNObjectUserUseEndGameSave takes string MapId,string UserId,string SecretKey,string Character returns nothing
native JNObjectUserSave takes string MapId,string UserId,string SecretKey,string Character returns string
native JNObjectUserInit takes string MapId,string UserId,string SecretKey,string Character returns integer
native JNObjectCharacterResetCharacter takes string UserId returns nothing
native JNObjectCharacterSendGlobalMessage takes string message returns nothing
native JNObjectCharacterPopGlobalMessage takes nothing returns string
native JNObjectCharacterGetCharacterNameByIndex takes string UserId,integer index returns string
native JNObjectCharacterGetCharacterCount takes string MapId,string UserId,string SecretKey returns integer
native JNObjectCharacterClearField takes string UserId returns nothing
native JNObjectCharacterRemoveField takes string UserId,string Field returns nothing
native JNObjectCharacterResetScore takes string UserId returns nothing
native JNObjectCharacterAddScore takes string UserId,integer value returns nothing
native JNObjectCharacterSetScore takes string UserId,integer value returns nothing
native JNObjectCharacterGetReal takes string UserId,string Field returns real
native JNObjectCharacterSetReal takes string UserId,string Field,real value returns nothing
native JNObjectCharacterGetBoolean takes string UserId,string Field returns boolean
native JNObjectCharacterSetBoolean takes string UserId,string Field,boolean value returns nothing
native JNObjectCharacterGetString takes string UserId,string Field returns string
native JNObjectCharacterSetString takes string UserId,string Field,string value returns nothing
native JNObjectCharacterGetInt takes string UserId,string Field returns integer
native JNObjectCharacterSetInt takes string UserId,string Field,integer value returns nothing
native JNObjectCharacterUseEndGameSave takes string MapId,string UserId,string SecretKey,string Character returns nothing
native JNObjectCharacterSave takes string MapId,string UserId,string SecretKey,string Character returns string
native JNObjectCharacterInit takes string MapId,string UserId,string SecretKey,string Character returns integer
native JNObjectCharacterServerConnectCheck takes nothing returns boolean
native JNPVPUse takes string MapId,string SecretKey returns nothing
native JNUse takes nothing returns boolean
native JNProcCall takes integer callConv,integer address,hashtable params returns boolean
native JNMemorySetString takes integer offset,string value returns nothing
native JNMemoryGetString takes integer offset,integer length returns string
native JNMemorySetReal takes integer offset,real value returns nothing
native JNMemoryGetReal takes integer offset returns real
native JNMemorySetInteger takes integer offset,integer value returns nothing
native JNMemoryGetInteger takes integer offset returns integer
native JNMemorySetByte takes integer offset,integer value returns nothing
native JNMemoryGetByte takes integer offset returns integer
native JNFindModuleHandle takes integer offset,integer signature returns integer
native JNGetModuleHandle takes string moduleName returns integer
native JNProcessStart takes string fileName,string arguments returns boolean
native JNGetConnectionState takes nothing returns integer
native JNSetSyncDelay takes integer delay returns nothing
native JNGetSyncDelay takes nothing returns integer
native IsHostPlayer takes nothing returns boolean
native IsReplayMode takes nothing returns boolean
native JNSetMaxAttackSpeed takes real speed returns nothing
native JNGetMaxAttackSpeed takes nothing returns real
native JNGetLocalUnixTime takes nothing returns integer
native JNGetLocalDateTime takes nothing returns string
native JNWriteLogReal takes real r returns nothing
native JNWriteLog takes string str returns nothing
native JNR2I takes real r returns integer
native JNI2R takes integer i returns real
native BitXor takes integer x,integer y returns integer
native BitAnd takes integer x,integer y returns integer
native BitOr takes integer x,integer y returns integer
native DzGetTriggerSyncPlayer takes nothing returns player
native DzGetTriggerSyncData takes nothing returns string
native DzSyncData takes string prefix,string data returns nothing
native DzTriggerRegisterSyncData takes trigger trig,string prefix,boolean server returns nothing
native DzGetLocale takes nothing returns string
native DzSetWar3MapMap takes string map returns nothing
native DzSetUnitModel takes unit whichUnit,string path returns nothing
native DzSetUnitID takes unit whichUnit,integer id returns nothing
native DzSetMemory takes integer address,real value returns nothing
native DzSetUnitTexture takes unit whichUnit,string path,integer texId returns nothing
native DzGetUnitUnderMouse takes nothing returns unit
native DzExecuteFunc takes string funcName returns nothing
native DzSetUnitPosition takes unit whichUnit,real x,real y returns nothing
native DzDestructablePosition takes destructable d,real x,real y returns nothing
native DzIsWindowActive takes nothing returns boolean
native DzTriggerRegisterWindowResizeEventByCode takes trigger trig,boolean sync,code funcHandle returns nothing
native DzTriggerRegisterWindowResizeEvent takes trigger trig,boolean sync,string func returns nothing
native DzGetWindowY takes nothing returns integer
native DzGetWindowX takes nothing returns integer
native DzGetWindowHeight takes nothing returns integer
native DzGetWindowWidth takes nothing returns integer
native DzGetTriggerKeyPlayer takes nothing returns player
native DzIsKeyDown takes integer iKey returns boolean
native DzGetWheelDelta takes nothing returns integer
native DzGetTriggerKey takes nothing returns integer
native DzTriggerRegisterMouseMoveEventByCode takes trigger trig,boolean sync,code funcHandle returns nothing
native DzTriggerRegisterMouseMoveEvent takes trigger trig,boolean sync,string func returns nothing
native DzTriggerRegisterMouseWheelEventByCode takes trigger trig,boolean sync,code funcHandle returns nothing
native DzTriggerRegisterMouseWheelEvent takes trigger trig,boolean sync,string func returns nothing
native DzTriggerRegisterKeyEventByCode takes trigger trig,integer key,integer status,boolean sync,code funcHandle returns nothing
native DzTriggerRegisterKeyEvent takes trigger trig,integer key,integer status,boolean sync,string func returns nothing
native DzTriggerRegisterMouseEventByCode takes trigger trig,integer btn,integer status,boolean sync,code funcHandle returns nothing
native DzTriggerRegisterMouseEvent takes trigger trig,integer btn,integer status,boolean sync,string func returns nothing
native DzSetMousePos takes integer x,integer y returns nothing
native DzGetMouseYRelative takes nothing returns integer
native DzGetMouseXRelative takes nothing returns integer
native DzGetMouseY takes nothing returns integer
native DzGetMouseX takes nothing returns integer
native DzIsMouseOverUI takes nothing returns boolean
native DzGetMouseTerrainZ takes nothing returns real
native DzGetMouseTerrainY takes nothing returns real
native DzGetMouseTerrainX takes nothing returns real
native DzFrameGetName takes integer frame returns string
native DzFrameSetTextAlignment takes integer frame,integer align returns nothing
native DzFrameGetParent takes integer frame returns integer
native DzFrameSetFont takes integer frame,string fileName,real height,integer flag returns nothing
native DzFrameGetHeight takes integer frame returns real
native DzFrameSetParent takes integer frame,integer parent returns nothing
native DzFrameSetPriority takes integer frame,integer priority returns nothing
native DzFrameSetVertexColor takes integer frame,integer color returns nothing
native DzCreateFrameByTagName takes string frameType,string name,integer parent,string template,integer id returns integer
native DzFrameSetSize takes integer frame,real w,real h returns nothing
native DzFrameSetValue takes integer frame,real value returns nothing
native DzFrameSetStepValue takes integer frame,real step returns nothing
native DzFrameSetMinMaxValue takes integer frame,real minValue,real maxValue returns nothing
native DzFrameGetValue takes integer frame returns real
native DzFrameCageMouse takes integer frame,boolean enable returns nothing
native DzFrameSetTooltip takes integer frame,integer tooltip returns nothing
native DzFrameSetScale takes integer frame,real scale returns nothing
native DzFrameSetTexture takes integer frame,string texture,integer flag returns nothing
native DzFrameSetAnimateOffset takes integer frame,real offset returns nothing
native DzFrameSetAnimate takes integer frame,integer animId,boolean autocast returns nothing
native DzFrameGetAlpha takes integer frame returns integer
native DzFrameSetAlpha takes integer frame,integer alpha returns nothing
native DzFrameGetEnable takes integer frame returns boolean
native DzFrameSetModel takes integer frame,string modelFile,integer modelType,integer flag returns nothing
native DzFrameSetFocus takes integer frame,boolean enable returns boolean
native DzFrameSetAllPoints takes integer frame,integer relativeFrame returns boolean
native DzGetMouseFocus takes nothing returns integer
native DzFrameSetTextColor takes integer frame,integer color returns nothing
native DzFrameGetTextSizeLimit takes integer frame returns integer
native DzFrameSetTextSizeLimit takes integer frame,integer size returns nothing
native DzFrameGetText takes integer frame returns string
native DzFrameSetText takes integer frame,string text returns nothing
native DzEnableWideScreen takes boolean enable returns nothing
native DzSetCustomFovFix takes real value returns nothing
native DzClickFrame takes integer frame returns nothing
native DzGetGameUI takes nothing returns integer
native DzSimpleTextureFindByName takes string name,integer id returns integer
native DzSimpleFontStringFindByName takes string name,integer id returns integer
native DzSimpleFrameFindByName takes string name,integer id returns integer
native DzFrameFindByName takes string name,integer id returns integer
native DzGetTriggerUIEventFrame takes nothing returns integer
native DzGetTriggerUIEventPlayer takes nothing returns player
native DzFrameSetScriptByCode takes integer frame,integer eventId,code funcHandle,boolean sync returns nothing
native DzFrameSetScript takes integer frame,integer eventId,string func,boolean sync returns nothing
native DzFrameSetEnable takes integer name,boolean enable returns nothing
native DzFrameClearAllPoints takes integer frame returns nothing
native DzFrameSetAbsolutePoint takes integer frame,integer point,real x,real y returns nothing
native DzFrameSetPoint takes integer frame,integer point,integer relativeFrame,integer relativePoint,real x,real y returns nothing
native DzLoadToc takes string fileName returns nothing
native DzDestroyFrame takes integer frame returns nothing
native DzCreateSimpleFrame takes string frame,integer parent,integer id returns integer
native DzCreateFrame takes string frame,integer parent,integer id returns integer
native DzFrameShow takes integer frame,boolean enable returns nothing
native DzFrameSetUpdateCallbackByCode takes code funcHandle returns nothing
native DzFrameSetUpdateCallback takes string func returns nothing
native DzGetColor takes integer a,integer r,integer g,integer b returns integer
native DzFrameGetTopMessage takes nothing returns integer
native DzFrameGetUnitMessage takes nothing returns integer
native DzFrameGetChatMessage takes nothing returns integer
native DzFrameGetTooltip takes nothing returns integer
native DzFrameGetUpperButtonBarButton takes integer buttonId returns integer
native DzFrameGetMinimapButton takes integer buttonId returns integer
native DzFrameGetItemBarButton takes integer buttonId returns integer
native DzFrameGetHeroManaBar takes integer buttonId returns integer
native DzFrameGetHeroHPBar takes integer buttonId returns integer
native DzFrameGetHeroBarButton takes integer buttonId returns integer
native DzFrameGetCommandBarButton takes integer row,integer column returns integer
native DzFrameGetMinimap takes nothing returns integer
native DzFrameGetPortrait takes nothing returns integer
native DzFrameEditBlackBorders takes real upperHeight,real bottomHeight returns nothing
native DzFrameHideInterface takes nothing returns nothing
function rz takes nothing returns boolean
local real dx=GetDestructableX(GetFilterDestructable())-zY
local real dy=GetDestructableY(GetFilterDestructable())-ZY
return(dx*dx+dy*dy<=bj_enumDestructableRadius)
endfunction
function iz takes rect r returns group
set vz=CreateGroup()
call GroupEnumUnitsInRect(vz,r,xz)
return vz
endfunction
function az takes player nz,playercolor Vz,boolean Ez returns nothing
local group g
call SetPlayerColor(nz,Vz)
if Ez then
set bj_setPlayerTargetColor=Vz
set g=CreateGroup()
call GroupEnumUnitsOfPlayer(g,nz,xz)
call ForGroup(g,function SetPlayerColorBJEnum)
call DestroyGroup(g)
set g=null
endif
endfunction
function Xz takes itemtype Oz,integer Rz returns nothing
local group g
set bj_stockPickedItemType=Oz
set bj_stockPickedItemLevel=Rz
set g=CreateGroup()
call GroupEnumUnitsOfType(g,"marketplace",xz)
call ForGroup(g,function UpdateEachStockBuildingEnum)
call DestroyGroup(g)
set g=null
endfunction
function Iz takes nothing returns nothing
local integer pickedItemId
local itemtype Az
local integer Nz=0
local integer bz=0
local integer Rz
set Rz=1
loop
if(bj_stockAllowedPermanent[Rz])then
set bz=bz+1
if(GetRandomInt(1,bz)==1)then
set Az=ITEM_TYPE_PERMANENT
set Nz=Rz
endif
endif
if(bj_stockAllowedCharged[Rz])then
set bz=bz+1
if(GetRandomInt(1,bz)==1)then
set Az=ITEM_TYPE_CHARGED
set Nz=Rz
endif
endif
if(bj_stockAllowedArtifact[Rz])then
set bz=bz+1
if(GetRandomInt(1,bz)==1)then
set Az=ITEM_TYPE_ARTIFACT
set Nz=Rz
endif
endif
set Rz=Rz+1
exitwhen Rz>$A
endloop
if(bz==0)then
set Az=null
return
endif
call Xz(Az,Nz)
set Az=null
endfunction
function Bz takes nothing returns nothing
call Iz()
call TimerStart(bj_stockUpdateTimer,bj_STOCK_RESTOCK_INTERVAL,true,function Iz)
endfunction
function Cz takes nothing returns boolean
return true
endfunction
function Fz takes integer gz returns nothing
call SetUnitScale(dT[gz],BT[gz],BT[gz],1)
call SetUnitVertexColorBJ(dT[gz],100.,100.,100.,cT[gz])
set cT[gz]=cT[gz]+5
endfunction
function Gz takes nothing returns integer
local integer gz=XT
if(gz!=0)then
set XT=RT[gz]
else
set OT=OT+1
set gz=OT
endif
if(gz>8190)then
return 0
endif
set BT[gz]=.7
set cT[gz]=70
set CT[gz]=false
set RT[gz]=-1
return gz
endfunction
function hz takes integer gz returns nothing
if gz==null then
return
elseif(RT[gz]!=-1)then
return
endif
set RT[gz]=XT
set XT=gz
endfunction
function Hz takes nothing returns integer
local integer gz=zy
if(gz!=0)then
set zy=vY[gz]
else
set Zy=Zy+1
set gz=Zy
endif
if(gz>$491)then
return 0
endif
set oY[gz]=(gz-1)*7
set eY[gz]=false
set rY[gz]=7
set vY[gz]=-1
return gz
endfunction
function Jz takes integer gz,integer kz returns integer
if kz>=1 and kz<=2 then
return 1
elseif kz==3 then
return Ly[Yy[gz]]
elseif kz==4 then
return my[Yy[gz]]
elseif kz==5 then
return My[Yy[gz]]
elseif kz==6 then
return Py[Yy[gz]]
elseif kz==7 then
return qy[Yy[gz]]
elseif kz==8 then
return Qy[Yy[gz]]
elseif kz==9 then
return sy[Yy[gz]]
elseif kz==$A then
return Sy[Yy[gz]]
elseif kz==$B then
return ty[Yy[gz]]
elseif kz==$C then
return Ty[Yy[gz]]
elseif kz==$D then
return uy[Yy[gz]]
else
return 0
endif
endfunction
function Kz takes nothing returns integer
local integer gz=wy
if(gz!=0)then
set wy=yy[gz]
else
set Wy=Wy+1
set gz=Wy
endif
if(gz>8190)then
return 0
endif
set yy[gz]=-1
return gz
endfunction
function Lz takes nothing returns integer
local integer gz=ky
if(gz!=0)then
set ky=ly[gz]
else
set Ky=Ky+1
set gz=Ky
endif
if(gz>8190)then
return 0
endif
set Ly[gz]=0
set my[gz]=0
set My[gz]=0
set Py[gz]=0
set qy[gz]=0
set Qy[gz]=0
set sy[gz]=0
set Sy[gz]=0
set ty[gz]=0
set Ty[gz]=0
set uy[gz]=0
set Uy[gz]=0
set ly[gz]=-1
return gz
endfunction
function s__Maze___deepestPos__allocate takes nothing returns integer
local integer gz=gy
if(gz!=0)then
set gy=hy[gz]
else
set Gy=Gy+1
set gz=Gy
endif
if(gz>8190)then
return 0
endif
set hy[gz]=-1
return gz
endfunction
function mz takes nothing returns integer
local integer gz=by
if(gz!=0)then
set by=cy[gz]
else
set By=By+1
set gz=By
endif
if(gz>263)then
return 0
endif
set fy[gz]=(gz-1)*31
set Cy[gz]=false
set Fy[gz]=31
set cy[gz]=-1
return gz
endfunction
function pz takes nothing returns integer
local integer gz=Oy
if(gz!=0)then
set Oy=Iy[gz]
else
set Ry=Ry+1
set gz=Ry
endif
if(gz>$AD)then
return 0
endif
set Ny[gz]=(gz-1)*47
set Iy[gz]=-1
return gz
endfunction
function qz takes nothing returns integer
local integer gz=FT
if(gz!=0)then
set FT=GT[gz]
else
set gT=gT+1
set gz=gT
endif
if(gz>$491)then
return 0
endif
set jT[gz]=(gz-1)*7
set hT[gz]=false
set JT[gz]=7
set GT[gz]=-1
return gz
endfunction
function Qz takes integer gz returns nothing
if gz==null then
return
elseif(GT[gz]!=-1)then
return
endif
set GT[gz]=FT
set FT=gz
endfunction
function sz takes integer gz,integer i,integer Sz returns nothing
set UY=gz
set qY=i
set QY=Sz
call TriggerEvaluate(CY)
endfunction
function tz takes integer gz returns nothing
set UY=gz
call TriggerEvaluate(dY)
endfunction
function Tz takes nothing returns integer
local integer gz=kT
if(gz!=0)then
set kT=lT[gz]
else
set KT=KT+1
set gz=KT
endif
if(gz>$491)then
return 0
endif
set pT[gz]=(gz-1)*4
set uT[gz]=(gz-1)*7
set LT[gz]=0
set PT[gz]=false
set lT[gz]=-1
return gz
endfunction
function uz takes integer gz,integer Uz returns nothing
set UY=gz
set qY=Uz
call TriggerEvaluate(XY[NY[gz]])
endfunction
function wz takes integer Wz returns integer
set qY=Wz
call TriggerEvaluate(lY)
return wY
endfunction
function yz takes nothing returns integer
local integer gz=Vy
if(gz!=0)then
set Vy=Xy[gz]
else
set Ey=Ey+1
set gz=Ey
endif
if(gz>8190)then
return 0
endif
set NY[gz]=60
set Xy[gz]=-1
return gz
endfunction
function Yz takes nothing returns integer
local integer gz=wT
if(gz!=0)then
set wT=yT[gz]
else
set WT=WT+1
set gz=WT
endif
if(gz>$491)then
return 0
endif
set ZT[gz]=(gz-1)*7
set YT[gz]=false
set vu[gz]=7
set yT[gz]=-1
return gz
endfunction
function Zz takes integer gz,integer vZ returns nothing
set UY=gz
set qY=vZ
call TriggerEvaluate(DY)
endfunction
function eZ takes nothing returns integer
local integer gz=eu
if(gz!=0)then
set eu=ou[gz]
else
set xu=xu+1
set gz=xu
endif
if(gz>$554)then
return 0
endif
set iu[gz]=(gz-1)*4
set nu[gz]=(gz-1)*6
set Xu[gz]=0
set ou[gz]=-1
return gz
endfunction
function xZ takes integer gz returns nothing
if gz==null then
return
elseif(ou[gz]!=-1)then
return
endif
set ou[gz]=eu
set eu=gz
endfunction
function oZ takes nothing returns integer
local integer gz=ey
if(gz!=0)then
set ey=oy[gz]
else
set xy=xy+1
set gz=xy
endif
if(gz>8190)then
return 0
endif
set ry[gz]=0
set iy[gz]=0
set ay[gz]=0
set oy[gz]=-1
return gz
endfunction
function rZ takes nothing returns integer
local integer gz=WW
if(gz!=0)then
set WW=YW[gz]
else
set yW=yW+1
set gz=yW
endif
if(gz>8190)then
return 0
endif
set ZW[gz]=0
set vy[gz]=0
set YW[gz]=-1
return gz
endfunction
function iZ takes nothing returns integer
local integer gz=pW
if(gz!=0)then
set pW=qW[gz]
else
set PW=PW+1
set gz=PW
endif
if(gz>8190)then
return 0
endif
set qW[gz]=-1
return gz
endfunction
function aZ takes integer gz,string nZ returns nothing
set UY=gz
set uY=nZ
call TriggerEvaluate(KY)
endfunction
function VZ takes nothing returns integer
local integer gz=lW
if(gz!=0)then
set lW=mW[gz]
else
set LW=LW+1
set gz=LW
endif
if(gz>8190)then
return 0
endif
set mW[gz]=-1
return gz
endfunction
function EZ takes nothing returns integer
local integer gz=hW
if(gz!=0)then
set hW=jW[gz]
else
set HW=HW+1
set gz=HW
endif
if(gz>8190)then
return 0
endif
set JW[gz]=0
set kW[gz]=0
set KW[gz]=0
set jW[gz]=-1
return gz
endfunction
function XZ takes nothing returns integer
local integer gz=dW
if(gz!=0)then
set dW=fW[gz]
else
set DW=DW+1
set gz=DW
endif
if(gz>8190)then
return 0
endif
set gW[gz]=0
set GW[gz]=0
set fW[gz]=-1
return gz
endfunction
function OZ takes nothing returns integer
local integer gz=Ou
if(gz!=0)then
set Ou=Iu[gz]
else
set Ru=Ru+1
set gz=Ru
endif
if(gz>8190)then
return 0
endif
set Iu[gz]=-1
return gz
endfunction
function RZ takes nothing returns integer
local integer gz=bu
if(gz!=0)then
set bu=cu[gz]
else
set Bu=Bu+1
set gz=Bu
endif
if(gz>8190)then
return 0
endif
set du[gz]=0
set Du[gz]=0
set cu[gz]=-1
return gz
endfunction
function IZ takes integer gz returns nothing
set UY=gz
call TriggerEvaluate(VY[IY[gz]])
endfunction
function AZ takes integer gz returns nothing
set UY=gz
call TriggerEvaluate(EY[IY[gz]])
endfunction
function NZ takes real x,real y,integer bZ returns integer
set sY=x
set SY=y
set qY=bZ
call TriggerEvaluate(kY)
return wY
endfunction
function BZ takes nothing returns integer
local integer gz=AW
if(gz!=0)then
set AW=bW[gz]
else
set NW=NW+1
set gz=NW
endif
if(gz>8190)then
return 0
endif
set IY[gz]=44
set bW[gz]=-1
return gz
endfunction
function s__StoneStatue_cameraControler__allocate takes nothing returns integer
local integer gz=EW
if(gz!=0)then
set EW=OW[gz]
else
set XW=XW+1
set gz=XW
endif
if(gz>8190)then
return 0
endif
set OW[gz]=-1
return gz
endfunction
function cZ takes nothing returns integer
local integer gz=oW
if(gz!=0)then
set oW=iW[gz]
else
set rW=rW+1
set gz=rW
endif
if(gz>8190)then
return 0
endif
set aW[gz]=0
set nW[gz]=0
set VW[gz]=0
set iW[gz]=-1
return gz
endfunction
function CZ takes nothing returns integer
local integer gz=Yw
if(gz!=0)then
set Yw=Zw[gz]
else
set zw=zw+1
set gz=zw
endif
if(gz>8190)then
return 0
endif
set eW[gz]=0
set xW[gz]=0
set Zw[gz]=-1
return gz
endfunction
function dZ takes nothing returns integer
local integer gz=Sw
if(gz!=0)then
set Sw=Tw[gz]
else
set tw=tw+1
set gz=tw
endif
if(gz>$554)then
return 0
endif
set yw[gz]=(gz-1)*6
set ww[gz]=0
set Tw[gz]=-1
return gz
endfunction
function DZ takes integer gz,integer i returns nothing
set UY=gz
set qY=i
call TriggerEvaluate(JY)
endfunction
function fZ takes nothing returns integer
local integer gz=Kw
if(gz!=0)then
set Kw=Lw[gz]
else
set lw=lw+1
set gz=lw
endif
if(gz>545)then
return 0
endif
set Qw[gz]=(gz-1)*$F
set Lw[gz]=-1
return gz
endfunction
function FZ takes nothing returns integer
local integer gz=gw
if(gz!=0)then
set gw=hw[gz]
else
set Gw=Gw+1
set gz=Gw
endif
if(gz>545)then
return 0
endif
set Jw[gz]=(gz-1)*$F
set Hw[gz]=false
set kw[gz]=$F
set hw[gz]=-1
return gz
endfunction
function GZ takes integer hZ returns integer
set qY=hZ
call TriggerEvaluate(hY)
return wY
endfunction
function HZ takes integer gz returns nothing
set UY=gz
call TriggerEvaluate(jY)
endfunction
function jZ takes nothing returns integer
local integer gz=Ow
if(gz!=0)then
set Ow=Iw[gz]
else
set Rw=Rw+1
set gz=Rw
endif
if(gz>8190)then
return 0
endif
set Iw[gz]=-1
return gz
endfunction
function JZ takes integer gz returns nothing
if gz==null then
return
elseif(Iw[gz]!=-1)then
return
endif
set Iw[gz]=Ow
set Ow=gz
endfunction
function sc__eventStruct__get_e takes nothing returns integer
return LoadInteger(Fe,0,GetHandleId(GetTriggeringTrigger()))
endfunction
function kZ takes integer id,integer ev,code c returns trigger
set qY=id
set QY=ev
set tY=c
call TriggerEvaluate(GY)
return WY
endfunction
function KZ takes nothing returns integer
local integer gz=iw
if(gz!=0)then
set iw=nw[gz]
else
set aw=aw+1
set gz=aw
endif
if(gz>8190)then
return 0
endif
set Vw[gz]=0
set Ew[gz]=0
set Xw[gz]=0
set nw[gz]=-1
return gz
endfunction
function lZ takes nothing returns integer
local integer gz=ZU
if(gz!=0)then
set ZU=ew[gz]
else
set vw=vw+1
set gz=vw
endif
if(gz>8190)then
return 0
endif
set ow[gz]=0
set rw[gz]=0
set ew[gz]=-1
return gz
endfunction
function LZ takes nothing returns integer
local integer gz=UU
if(gz!=0)then
set UU=WU[gz]
else
set wU=wU+1
set gz=wU
endif
if(gz>8190)then
return 0
endif
set WU[gz]=-1
return gz
endfunction
function mZ takes nothing returns integer
local integer gz=pU
if(gz!=0)then
set pU=qU[gz]
else
set PU=PU+1
set gz=PU
endif
if(gz>8190)then
return 0
endif
set qU[gz]=-1
return gz
endfunction
function s__Key__keyMapManager__allocate takes nothing returns integer
local integer gz=hU
if(gz!=0)then
set hU=jU[gz]
else
set HU=HU+1
set gz=HU
endif
if(gz>8190)then
return 0
endif
set jU[gz]=-1
return gz
endfunction
function s__Key_keyMap__allocate takes nothing returns integer
local integer gz=fU
if(gz!=0)then
set fU=gU[gz]
else
set FU=FU+1
set gz=FU
endif
if(gz>8190)then
return 0
endif
set gU[gz]=-1
return gz
endfunction
function MZ takes nothing returns integer
local integer gz=bU
if(gz!=0)then
set bU=cU[gz]
else
set BU=BU+1
set gz=BU
endif
if(gz>8190)then
return 0
endif
set CU[gz]=0
set dU[gz]=0
set DU[gz]=0
set cU[gz]=-1
return gz
endfunction
function pZ takes nothing returns integer
local integer gz=XU
if(gz!=0)then
set XU=RU[gz]
else
set OU=OU+1
set gz=OU
endif
if(gz>8190)then
return 0
endif
set AU[gz]=0
set NU[gz]=0
set RU[gz]=-1
return gz
endfunction
function PZ takes integer gz returns nothing
set UY=gz
call TriggerEvaluate(FY)
endfunction
function qZ takes nothing returns integer
local integer gz=xU
if(gz!=0)then
set xU=rU[gz]
else
set oU=oU+1
set gz=oU
endif
if(gz>8190)then
return 0
endif
set rU[gz]=-1
return gz
endfunction
function QZ takes nothing returns integer
local integer gz=yu
if(gz!=0)then
set yu=zu[gz]
else
set Yu=Yu+1
set gz=Yu
endif
if(gz>8190)then
return 0
endif
set Zu[gz]=0
set vU[gz]=0
set eU[gz]=0
set zu[gz]=-1
return gz
endfunction
function sZ takes nothing returns integer
local integer gz=tu
if(gz!=0)then
set tu=uu[gz]
else
set Tu=Tu+1
set gz=Tu
endif
if(gz>8190)then
return 0
endif
set wu[gz]=0
set Wu[gz]=0
set uu[gz]=-1
return gz
endfunction
function SZ takes nothing returns integer
local integer gz=fu
if(gz!=0)then
set fu=gu[gz]
else
set Fu=Fu+1
set gz=Fu
endif
if(gz>8190)then
return 0
endif
set Gu[gz]=0
set hu[gz]=0
set Hu[gz]=0
set gu[gz]=-1
return gz
endfunction
function tZ takes integer gz,real x,real y returns nothing
set UY=gz
set sY=x
set SY=y
call TriggerEvaluate(Lu[Ku[gz]])
endfunction
function TZ takes integer uZ,integer UZ returns integer
set qY=uZ
set QY=UZ
call TriggerEvaluate(fY)
return wY
endfunction
function wZ takes integer gz,real x,real y returns nothing
set UY=gz
set sY=x
set SY=y
call TriggerEvaluate(nY[OY[gz]])
endfunction
function WZ takes nothing returns integer
local integer gz=Pu
if(gz!=0)then
set Pu=Qu[gz]
else
set qu=qu+1
set gz=qu
endif
if(gz>8190)then
return 0
endif
set OY[gz]=18
set Qu[gz]=-1
return gz
endfunction
function yZ takes nothing returns integer
local integer YZ
local integer gz=ju
if(gz!=0)then
set ju=ku[gz]
else
set Ju=Ju+1
set gz=Ju
endif
if(gz>8190)then
return 0
endif
set Ku[gz]=17
set YZ=gz
set ku[gz]=-1
return gz
endfunction
function zZ takes nothing returns integer
local integer YZ
local integer gz=ju
if(gz!=0)then
set ju=ku[gz]
else
set Ju=Ju+1
set gz=Ju
endif
if(gz>8190)then
return 0
endif
set Ku[gz]=16
set YZ=gz
set ku[gz]=-1
return gz
endfunction
function ZZ takes integer Wz returns integer
local integer gz=wz(Wz)
local integer YZ
if(gz==0)then
return 0
endif
set NY[gz]=63
set YZ=gz
return gz
endfunction
function v0 takes integer uZ,integer UZ returns integer
local integer gz=TZ(uZ,UZ)
local integer YZ
if(gz==0)then
return 0
endif
set OY[gz]=19
set YZ=gz
return gz
endfunction
function e0 takes integer uZ,integer UZ returns integer
local integer gz=TZ(uZ,UZ)
local integer YZ
if(gz==0)then
return 0
endif
set OY[gz]=20
set YZ=gz
return gz
endfunction
function x0 takes real x,real y,integer bZ returns integer
local integer gz=NZ(x,y,bZ)
local integer YZ
if(gz==0)then
return 0
endif
set IY[gz]=45
set YZ=gz
return gz
endfunction
function o0 takes real x,real y,integer bZ returns integer
local integer gz=NZ(x,y,bZ)
local integer YZ
if(gz==0)then
return 0
endif
set IY[gz]=46
set YZ=gz
return gz
endfunction
function s__BytePtr__allocate takes nothing returns integer
local integer YZ
local integer gz=Cw
if(gz!=0)then
set Cw=Dw[gz]
else
set dw=dw+1
set gz=dw
endif
if(gz>8190)then
return 0
endif
set fw[gz]=53
set YZ=gz
set Dw[gz]=-1
return gz
endfunction
function s__IntPtr__allocate takes nothing returns integer
local integer YZ
local integer gz=Cw
if(gz!=0)then
set Cw=Dw[gz]
else
set dw=dw+1
set gz=dw
endif
if(gz>8190)then
return 0
endif
set fw[gz]=54
set YZ=gz
set Dw[gz]=-1
return gz
endfunction
function s__RealPtr__allocate takes nothing returns integer
local integer YZ
local integer gz=Cw
if(gz!=0)then
set Cw=Dw[gz]
else
set dw=dw+1
set gz=dw
endif
if(gz>8190)then
return 0
endif
set fw[gz]=55
set YZ=gz
set Dw[gz]=-1
return gz
endfunction
function s__PtrPtr__allocate takes nothing returns integer
local integer YZ
local integer gz=Cw
if(gz!=0)then
set Cw=Dw[gz]
else
set dw=dw+1
set gz=dw
endif
if(gz>8190)then
return 0
endif
set fw[gz]=56
set YZ=gz
set Dw[gz]=-1
return gz
endfunction
function s__CommandButtonData__allocate takes nothing returns integer
local integer YZ
local integer gz=Cw
if(gz!=0)then
set Cw=Dw[gz]
else
set dw=dw+1
set gz=dw
endif
if(gz>8190)then
return 0
endif
set fw[gz]=57
set YZ=gz
set Dw[gz]=-1
return gz
endfunction
function s__GameUI__allocate takes nothing returns integer
local integer YZ
local integer gz=Cw
if(gz!=0)then
set Cw=Dw[gz]
else
set dw=dw+1
set gz=dw
endif
if(gz>8190)then
return 0
endif
set fw[gz]=58
set YZ=gz
set Dw[gz]=-1
return gz
endfunction
function s__CommandButton__allocate takes nothing returns integer
local integer YZ
local integer gz=Cw
if(gz!=0)then
set Cw=Dw[gz]
else
set dw=dw+1
set gz=dw
endif
if(gz>8190)then
return 0
endif
set fw[gz]=59
set YZ=gz
set Dw[gz]=-1
return gz
endfunction
function r0 takes integer Wz returns integer
local integer gz=wz(Wz)
local integer YZ
if(gz==0)then
return 0
endif
set NY[gz]=61
set YZ=gz
return gz
endfunction
function i0 takes integer Wz returns integer
local integer gz=wz(Wz)
local integer YZ
if(gz==0)then
return 0
endif
set NY[gz]=62
set YZ=gz
return gz
endfunction
function a0 takes integer i,integer a1,integer a2 returns nothing
set qY=a1
set QY=a2
call TriggerExecute(pY[i])
endfunction
function n0 takes integer i,integer a1 returns nothing
set qY=a1
call TriggerExecute(PY[i])
endfunction
function V0 takes real x1,real y1,real x2,real y2 returns real
local real dx=x2-x1
local real dy=y2-y1
return SquareRoot(dx*dx+dy*dy)
endfunction
function E0 takes nothing returns nothing
local integer i=GetPlayerId(GetEnumPlayer())+1
if Zt[i]==false and GetEnumPlayer()==GetLocalPlayer()then
call StartSound(Ee)
endif
endfunction
function X0 takes integer O0 returns boolean
local boolean b=O0=='hpea' or O0=='uaco' or O0=='ushd' or O0=='ugho' or O0=='uabo' or O0=='umtw' or O0=='ucry' or O0=='ugar'
set b=b or O0=='uban' or O0=='unec' or O0=='uobs' or O0=='ufro' or O0=='earc' or O0=='esen' or O0=='edry'
set b=b or O0=='nmyr' or O0=='nnrg' or O0=='nhyc' or O0=='nmpe' or O0=='nanm' or O0=='nanb' or O0=='nanc' or O0=='nanw'
set b=b or O0=='n000' or O0=='h003' or O0=='n007' or O0=='o003' or O0=='o002' or O0=='n008'
return b or O0=='ehpr' or O0=='echm' or O0=='edot' or O0=='edoc' or O0=='emtg' or O0=='efdr' or O0=='nnsw'
endfunction
function R0 takes real I0,real A0,real N0,real b0,real x,real y returns boolean
return I0<=x and x<=N0 and A0<=y and y<=b0
endfunction
function B0 takes nothing returns integer
local integer i=1
local integer j=0
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set j=j+1
endif
set i=i+1
endloop
return j
endfunction
function c0 takes integer i,real x,real y returns nothing
local real C0=GetUnitX(at[i])
local real d0=GetUnitY(at[i])
set C0=C0-x
set C0=C0*.95
set d0=d0-y
set d0=d0*.95
if vo==false then
set C0=GetUnitX(Et[i])+C0
set d0=GetUnitY(Et[i])+d0
if GetUnitX(at[i])-386>C0 then
call SetUnitX(Et[i],GetUnitX(at[i])-386)
elseif GetUnitX(at[i])+386<C0 then
call SetUnitX(Et[i],GetUnitX(at[i])+386)
else
call SetUnitX(Et[i],C0)
endif
if GetUnitY(at[i])-$C8>d0 then
call SetUnitY(Et[i],GetUnitY(at[i])-$C8)
elseif GetUnitY(at[i])+$C8<d0 then
call SetUnitY(Et[i],GetUnitY(at[i])+$C8)
else
call SetUnitY(Et[i],d0)
endif
else
call SetUnitX(Et[i],GetUnitX(at[i]))
call SetUnitY(Et[i],GetUnitY(at[i]))
endif
endfunction
function D0 takes integer i,integer O0 returns nothing
local real x=GetUnitX(at[i])
local real y=GetUnitY(at[i])
set Qv[i]=.0
call StopSound(CS,false,false)
call StartSound(CS)
call DestroyEffect(AddSpecialEffect("war3mapImported\\Morph.mdl",x,y))
call RemoveUnit(at[i])
if P==false then
set at[i]=CreateUnit(Player(i-1),O0,x,y,270)
else
set at[i]=CreateUnit(Player(i-1),O0,x,y,90)
endif
if qv[i]=="Left" then
if P==false then
call SetUnitAnimation(at[i],"Stand First")
else
call SetUnitAnimation(at[i],"Stand Second")
endif
else
if P==false then
call SetUnitAnimation(at[i],"Stand Second")
else
call SetUnitAnimation(at[i],"Stand First")
endif
endif
call SetUnitBlendTime(at[i],.0)
if P==false then
call SetCameraTargetControllerNoZForPlayer(Player(i-1),at[i],0,$80,false)
else
call SetCameraTargetControllerNoZForPlayer(Player(i-1),at[i],0,-$80,false)
endif
endfunction
function f0 takes nothing returns nothing
local integer i=LoadInteger(rt,GetHandleId(GetExpiredTimer()),0)
local real x=GetUnitX(at[i])
local real y=GetUnitY(at[i])
local unit u
if GetUnitTypeId(at[i])=='ohun' then
set u=CreateUnit(Player($B),'hmtt',x,y,270)
call GroupAddUnit(sS,u)
if qv[i]=="Left" then
call SetUnitUserData(u,0)
else
call SetUnitUserData(u,1)
endif
elseif GetUnitTypeId(at[i])=='o003' or GetUnitTypeId(at[i])=='o002' then
call DestroyEffect(n[i])
if Player(i-1)==GetLocalPlayer()then
call StopSound(CS,false,false)
call StartSound(CS)
endif
call DestroyEffect(AddSpecialEffect("war3mapImported\\Morph.mdl",x,y))
call RemoveUnit(at[i])
if P==false then
if GetUnitTypeId(at[i])=='o003' then
set at[i]=CreateUnit(Player(i-1),'o002',x,y,270)
set Rt[i]='o002'
else
set at[i]=CreateUnit(Player(i-1),'o003',x,y,270)
endif
else
if GetUnitTypeId(at[i])=='o003' then
set at[i]=CreateUnit(Player(i-1),'o002',x,y,90)
else
set at[i]=CreateUnit(Player(i-1),'o003',x,y,90)
endif
endif
set Rt[i]=GetUnitTypeId(at[i])
if qv[i]=="Left" then
if P==false then
call SetUnitAnimation(at[i],"Stand First")
else
call SetUnitAnimation(at[i],"Stand Second")
endif
else
if P==false then
call SetUnitAnimation(at[i],"Stand Second")
else
call SetUnitAnimation(at[i],"Stand First")
endif
endif
call SetUnitBlendTime(at[i],.0)
if P==false then
call SetCameraTargetControllerNoZForPlayer(Player(i-1),at[i],0,$80,false)
else
call SetCameraTargetControllerNoZForPlayer(Player(i-1),at[i],0,-$80,false)
endif
endif
set u=null
endfunction
function F0 takes unit u,string g0 returns nothing
local integer tp=GetUnitTypeId(u)
if g0=="Walk First" then
if tp=='uobs' then
call SetUnitAnimationByIndex(u,0)
elseif tp=='ufro' or tp=='earc' then
call SetUnitAnimationByIndex(u,6)
elseif tp=='esen' or tp=='edry' then
call SetUnitAnimationByIndex(u,4)
elseif tp=='ohun' or tp=='edot' then
call SetUnitAnimationByIndex(u,6)
elseif tp=='orai' then
call SetUnitAnimation(u,"Stand First")
else
call SetUnitAnimationByIndex(u,1)
endif
elseif g0=="Walk Second" then
if tp=='ogru' or tp=='uabo' or tp=='otau' or tp=='umtw' then
call SetUnitAnimationByIndex(u,4)
elseif tp=='uobs' then
call SetUnitAnimationByIndex(u,1)
elseif tp=='ufro' or tp=='earc' then
call SetUnitAnimationByIndex(u,7)
elseif tp=='ohun' or tp=='edot' then
call SetUnitAnimationByIndex(u,7)
elseif tp=='orai' then
call SetUnitAnimation(u,"Stand Second")
else
call SetUnitAnimationByIndex(u,5)
endif
endif
endfunction
function G0 takes integer i returns nothing
if(Rt[i]=='nanw' or Rt[i]=='n007')and gv[i]==false then
call DestroyEffect(e[i])
set e[i]=AddSpecialEffectTarget("war3mapImported\\MushmomEye.mdl",at[i],"origin")
if Player(i-1)==GetLocalPlayer()then
call StopSound(KS,false,false)
call StartSound(KS)
endif
endif
endfunction
function h0 takes integer i returns nothing
local string s=".mdx"
local real x=GetUnitX(at[i])
local real y=GetUnitY(at[i])
if GetUnitTypeId(at[i])=='o003' or GetUnitTypeId(at[i])=='o002' then
call DestroyEffect(n[i])
if qv[i]=="Left" then
if Player(i-1)==GetLocalPlayer()then
set s="war3mapImported\\[UI]SpellBar1.5.mdx"
endif
else
if Player(i-1)==GetLocalPlayer()then
set s="war3mapImported\\[UI]SpellBar1.5Right.mdx"
endif
endif
set n[i]=AddSpecialEffectTarget(s,at[i],"origin")
endif
endfunction
function H0 takes integer i returns nothing
if mv[i]==false and Mv[i]==false then
if(Rt[i]=='nanw' or Rt[i]=='n007')and gv[i]==false then
call DestroyEffect(e[i])
set e[i]=AddSpecialEffectTarget("war3mapImported\\MushmomEye.mdl",at[i],"origin")
if Player(i-1)==GetLocalPlayer()then
call StopSound(KS,false,false)
call StartSound(KS)
endif
elseif GetUnitTypeId(at[i])=='ohun' then
call TimerStart(Xt[i],1.5,false,function f0)
if GetUnitTypeId(at[i])=='ohun' and Player(i-1)==GetLocalPlayer()then
call StopSound(dS,false,false)
call StartSound(dS)
endif
elseif GetUnitTypeId(at[i])=='o003' or GetUnitTypeId(at[i])=='o002' then
call TimerStart(Xt[i],1.5,false,function f0)
call h0(i)
endif
endif
endfunction
function j0 takes integer i returns nothing
if(Rt[i]=='nanw' or Rt[i]=='n007')and gv[i]==false and e[i]!=null then
if Player(i-1)==GetLocalPlayer()then
call StopSound(KS,false,false)
endif
call DestroyEffect(e[i])
set e[i]=null
elseif GetUnitTypeId(at[i])=='ohun' or GetUnitTypeId(at[i])=='o003' or GetUnitTypeId(at[i])=='o002' then
call PauseTimer(Xt[i])
if GetUnitTypeId(at[i])=='ohun' and Player(i-1)==GetLocalPlayer()then
call StopSound(dS,false,false)
endif
if GetUnitTypeId(at[i])=='o003' or GetUnitTypeId(at[i])=='o002' then
call DestroyEffect(n[i])
set n[i]=null
endif
endif
endfunction
function J0 takes nothing returns nothing
local integer i=GetPlayerId(GetEnumPlayer())+1
if GetLocalPlayer()==Player(i-1)then
call CinematicFilterGenericBJ(V,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",E,X,O,R,I,A,N,B)
endif
endfunction
function k0 takes real K0,real l0,real L0,real m0,real M0,real p0,real P0,real q0,real Q0 returns nothing
set V=K0
set E=l0
set X=L0
set O=m0
set R=M0
set I=p0
set A=P0
set N=q0
set B=Q0
call ForForce(bj_FORCE_ALL_PLAYERS,function J0)
endfunction
function s0 takes nothing returns nothing
local integer S0=(LoadInteger(Fe,0,GetHandleId(GetTriggeringTrigger())))
call Fz(S0)
if cT[S0]>90 then
call DestroyTrigger(fT[S0])
call RemoveUnit(dT[S0])
set fT[S0]=null
set dT[S0]=null
endif
endfunction
function t0 takes integer gz returns nothing
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Undead\\FrostArmor\\FrostArmorDamage.mdl",GetUnitX(dT[gz]),GetUnitY(dT[gz])))
call RemoveUnit(dT[gz])
call DestroyTrigger(fT[gz])
set fT[gz]=null
set dT[gz]=null
if CT[gz]==false then
call hz(gz)
set CT[gz]=true
endif
endfunction
function T0 takes integer gz returns nothing
local integer i=0
local integer S0
loop
exitwhen i>=JT[gz]
set S0=HT[jT[gz]+i]
if S0>0 then
call t0(S0)
endif
set i=i+1
endloop
if hT[gz]==false then
call Qz(gz)
set hT[gz]=true
endif
endfunction
function u0 takes integer gz returns nothing
local integer i=0
call T0(UT[gz])
call DestroyTrigger(mT[gz])
call RemoveRegion(qT[gz])
call RemoveUnit(tT[gz])
call RemoveRect(ST[gz])
call RemoveRect(sT[gz])
set mT[gz]=null
set qT[gz]=null
set tT[gz]=null
set ST[gz]=null
set sT[gz]=null
loop
exitwhen i>=7
call RemoveRect(TT[uT[gz]+i])
set TT[uT[gz]+i]=null
if i<4 then
call DestroyTrigger(MT[pT[gz]+i])
set MT[pT[gz]+i]=null
endif
set i=i+1
endloop
endfunction
function U0 takes integer gz returns nothing
if gz==null then
return
elseif(lT[gz]!=-1)then
return
endif
call u0(gz)
set lT[gz]=kT
set kT=gz
endfunction
function w0 takes nothing returns nothing
local integer S0=Bw[C]
call U0(S0)
endfunction
function W0 takes nothing returns nothing
local integer S0=(LoadInteger(Fe,0,GetHandleId(GetTriggeringTrigger())))
local integer i=0
loop
exitwhen i>=7
if GetPlayerId(GetOwningPlayer(GetTriggerUnit()))!=i and RectContainsUnit(TT[uT[S0]+i],at[i+1])==false then
return
endif
set i=i+1
endloop
call tz(S0)
endfunction
function y0 takes nothing returns nothing
local integer S0=(LoadInteger(Fe,0,GetHandleId(GetTriggeringTrigger())))
local integer i=GetPlayerId(GetTriggerPlayer())
if RectContainsUnit(TT[uT[S0]+LT[S0]],at[i+1])and LT[S0]==i then
call sz(S0,i,IT)
endif
endfunction
function Y0 takes nothing returns nothing
local integer S0=(LoadInteger(Fe,0,GetHandleId(GetTriggeringTrigger())))
local integer i=GetPlayerId(GetTriggerPlayer())
if RectContainsUnit(TT[uT[S0]+LT[S0]],at[i+1])and LT[S0]==i then
call sz(S0,i,AT)
endif
endfunction
function z0 takes nothing returns nothing
local integer S0=(LoadInteger(Fe,0,GetHandleId(GetTriggeringTrigger())))
local integer i=GetPlayerId(GetTriggerPlayer())
if RectContainsUnit(TT[uT[S0]+LT[S0]],at[i+1])and LT[S0]==i then
call sz(S0,i,NT)
endif
endfunction
function Z0 takes nothing returns nothing
local integer S0=(LoadInteger(Fe,0,GetHandleId(GetTriggeringTrigger())))
local integer i=GetPlayerId(GetTriggerPlayer())
if RectContainsUnit(TT[uT[S0]+LT[S0]],at[i+1])and LT[S0]==i then
call sz(S0,i,bT)
endif
endfunction
function v1 takes integer gz returns nothing
local integer i=0
set MT[pT[gz]]=kZ(gz,0,function y0)
set MT[pT[gz]+1]=kZ(gz,0,function Y0)
set MT[pT[gz]+2]=kZ(gz,0,function z0)
set MT[pT[gz]+3]=kZ(gz,0,function Z0)
loop
exitwhen i>=7
call TriggerRegisterPlayerEvent(MT[pT[gz]],Player(i),EVENT_PLAYER_ARROW_DOWN_DOWN)
call TriggerRegisterPlayerEvent(MT[pT[gz]+1],Player(i),EVENT_PLAYER_ARROW_LEFT_DOWN)
call TriggerRegisterPlayerEvent(MT[pT[gz]+2],Player(i),EVENT_PLAYER_ARROW_RIGHT_DOWN)
call TriggerRegisterPlayerEvent(MT[pT[gz]+3],Player(i),EVENT_PLAYER_ARROW_UP_DOWN)
set i=i+1
endloop
endfunction
function e1 takes integer gz returns nothing
local integer i=0
call DestroyTrigger(Eu[gz])
call RemoveRegion(Vu[gz])
set Eu[gz]=null
set Vu[gz]=null
loop
exitwhen i>=4
call DestroyTrigger(ru[iu[gz]+i])
set ru[iu[gz]+i]=null
set i=i+1
endloop
call xZ(gz)
endfunction
function o1 takes nothing returns nothing
local integer S0=(LoadInteger(Fe,0,GetHandleId(GetTriggeringTrigger())))
call Zz(S0,IT)
endfunction
function i1 takes nothing returns nothing
local integer S0=(LoadInteger(Fe,0,GetHandleId(GetTriggeringTrigger())))
call Zz(S0,AT)
endfunction
function n1 takes nothing returns nothing
local integer S0=(LoadInteger(Fe,0,GetHandleId(GetTriggeringTrigger())))
call Zz(S0,NT)
endfunction
function V1 takes nothing returns nothing
local integer S0=(LoadInteger(Fe,0,GetHandleId(GetTriggeringTrigger())))
call Zz(S0,bT)
endfunction
function E1 takes nothing returns nothing
local integer S0=(LoadInteger(Fe,0,GetHandleId(GetTriggeringTrigger())))
local integer i=0
set ru[iu[S0]]=kZ(S0,0,function o1)
set ru[iu[S0]+1]=kZ(S0,0,function i1)
set ru[iu[S0]+2]=kZ(S0,0,function n1)
set ru[iu[S0]+3]=kZ(S0,0,function V1)
loop
exitwhen i>=7
call TriggerRegisterPlayerEvent(ru[iu[S0]],Player(i),EVENT_PLAYER_ARROW_DOWN_DOWN)
call TriggerRegisterPlayerEvent(ru[iu[S0]+1],Player(i),EVENT_PLAYER_ARROW_LEFT_DOWN)
call TriggerRegisterPlayerEvent(ru[iu[S0]+2],Player(i),EVENT_PLAYER_ARROW_RIGHT_DOWN)
call TriggerRegisterPlayerEvent(ru[iu[S0]+3],Player(i),EVENT_PLAYER_ARROW_UP_DOWN)
set i=i+1
endloop
call DestroyTrigger(Eu[S0])
set Eu[S0]=null
endfunction
function X1 takes nothing returns nothing
local integer i=0
local integer j=0
set f=Yz()
loop
exitwhen i>=7
set zT[ZT[(f)]+(i)]=(Tz())
set qT[(zT[ZT[(f)]+(i)])]=CreateRegion()
if i==0 then
set ST[(zT[ZT[(f)]+(i)])]=IF
set sT[(zT[ZT[(f)]+(i)])]=QO
set QT[(zT[ZT[(f)]+(i)])]="Up"
set TT[uT[(zT[ZT[(f)]+(i)])]]=tX
set TT[uT[(zT[ZT[(f)]+(i)])]+1]=TX
set TT[uT[(zT[ZT[(f)]+(i)])]+2]=uX
set TT[uT[(zT[ZT[(f)]+(i)])]+3]=UX
set TT[uT[(zT[ZT[(f)]+(i)])]+4]=wX
set TT[uT[(zT[ZT[(f)]+(i)])]+5]=WX
set TT[uT[(zT[ZT[(f)]+(i)])]+6]=yX
elseif i==1 then
set ST[(zT[ZT[(f)]+(i)])]=AF
set sT[(zT[ZT[(f)]+(i)])]=sO
set QT[(zT[ZT[(f)]+(i)])]="Left"
set TT[uT[(zT[ZT[(f)]+(i)])]]=YX
set TT[uT[(zT[ZT[(f)]+(i)])]+1]=zX
set TT[uT[(zT[ZT[(f)]+(i)])]+2]=ZX
set TT[uT[(zT[ZT[(f)]+(i)])]+3]=vO
set TT[uT[(zT[ZT[(f)]+(i)])]+4]=eO
set TT[uT[(zT[ZT[(f)]+(i)])]+5]=xO
set TT[uT[(zT[ZT[(f)]+(i)])]+6]=oO
elseif i==2 then
set ST[(zT[ZT[(f)]+(i)])]=NF
set sT[(zT[ZT[(f)]+(i)])]=SO
set QT[(zT[ZT[(f)]+(i)])]="Up"
set TT[uT[(zT[ZT[(f)]+(i)])]]=rO
set TT[uT[(zT[ZT[(f)]+(i)])]+1]=iO
set TT[uT[(zT[ZT[(f)]+(i)])]+2]=aO
set TT[uT[(zT[ZT[(f)]+(i)])]+3]=nO
set TT[uT[(zT[ZT[(f)]+(i)])]+4]=VO
set TT[uT[(zT[ZT[(f)]+(i)])]+5]=EO
set TT[uT[(zT[ZT[(f)]+(i)])]+6]=XO
elseif i==3 then
set ST[(zT[ZT[(f)]+(i)])]=bF
set sT[(zT[ZT[(f)]+(i)])]=tO
set QT[(zT[ZT[(f)]+(i)])]="Up"
set TT[uT[(zT[ZT[(f)]+(i)])]]=OO
set TT[uT[(zT[ZT[(f)]+(i)])]+1]=RO
set TT[uT[(zT[ZT[(f)]+(i)])]+2]=IO
set TT[uT[(zT[ZT[(f)]+(i)])]+3]=AO
set TT[uT[(zT[ZT[(f)]+(i)])]+4]=NO
set TT[uT[(zT[ZT[(f)]+(i)])]+5]=bO
set TT[uT[(zT[ZT[(f)]+(i)])]+6]=BO
elseif i==4 then
set ST[(zT[ZT[(f)]+(i)])]=BF
set sT[(zT[ZT[(f)]+(i)])]=TO
set QT[(zT[ZT[(f)]+(i)])]="Right"
set TT[uT[(zT[ZT[(f)]+(i)])]]=cO
set TT[uT[(zT[ZT[(f)]+(i)])]+1]=CO
set TT[uT[(zT[ZT[(f)]+(i)])]+2]=dO
set TT[uT[(zT[ZT[(f)]+(i)])]+3]=DO
set TT[uT[(zT[ZT[(f)]+(i)])]+4]=fO
set TT[uT[(zT[ZT[(f)]+(i)])]+5]=FO
set TT[uT[(zT[ZT[(f)]+(i)])]+6]=gO
elseif i==5 then
set PT[(zT[ZT[(f)]+(i)])]=true
set ST[(zT[ZT[(f)]+(i)])]=cF
set sT[(zT[ZT[(f)]+(i)])]=uO
set QT[(zT[ZT[(f)]+(i)])]="Stand Ready"
set TT[uT[(zT[ZT[(f)]+(i)])]]=GO
set TT[uT[(zT[ZT[(f)]+(i)])]+1]=hO
set TT[uT[(zT[ZT[(f)]+(i)])]+2]=HO
set TT[uT[(zT[ZT[(f)]+(i)])]+3]=jO
set TT[uT[(zT[ZT[(f)]+(i)])]+4]=JO
set TT[uT[(zT[ZT[(f)]+(i)])]+5]=kO
set TT[uT[(zT[ZT[(f)]+(i)])]+6]=KO
elseif i==6 then
set ST[(zT[ZT[(f)]+(i)])]=CF
set sT[(zT[ZT[(f)]+(i)])]=UO
set QT[(zT[ZT[(f)]+(i)])]="Left"
set TT[uT[(zT[ZT[(f)]+(i)])]]=lO
set TT[uT[(zT[ZT[(f)]+(i)])]+1]=LO
set TT[uT[(zT[ZT[(f)]+(i)])]+2]=mO
set TT[uT[(zT[ZT[(f)]+(i)])]+3]=MO
set TT[uT[(zT[ZT[(f)]+(i)])]+4]=pO
set TT[uT[(zT[ZT[(f)]+(i)])]+5]=PO
set TT[uT[(zT[ZT[(f)]+(i)])]+6]=qO
endif
set j=0
loop
exitwhen j>=7
call RegionAddRect(qT[(zT[ZT[(f)]+(i)])],TT[uT[(zT[ZT[(f)]+(i)])]+j])
set j=j+1
endloop
set mT[(zT[ZT[(f)]+(i)])]=kZ((zT[ZT[(f)]+(i)]),0,function W0)
call TriggerRegisterEnterRegion(mT[(zT[ZT[(f)]+(i)])],qT[(zT[ZT[(f)]+(i)])],null)
set i=i+1
endloop
endfunction
function O1 takes nothing returns nothing
local integer i=0
local integer j=0
local unit u
local integer array R1
set R1[0]='nmyr'
set R1[1]='nnrg'
set R1[2]='nhyc'
set R1[3]='nmpe'
set R1[4]='nanm'
set R1[5]='hpea'
set R1[6]='nanb'
loop
exitwhen i>=7
set j=0
loop
exitwhen j>=7
if i!=5 then
set u=CreateUnit(Player($B),R1[j],GetRectCenterX(TT[uT[(zT[ZT[(f)]+(i)])]+j]),GetRectCenterY(TT[uT[(zT[ZT[(f)]+(i)])]+j])-16.,270)
else
set u=CreateUnit(Player($B),R1[j],GetRectCenterX(TT[uT[(zT[ZT[(f)]+(i)])]+j]),GetRectCenterY(TT[uT[(zT[ZT[(f)]+(i)])]+j])+16.,90)
endif
call SetUnitVertexColorBJ(u,100.,100.,100.,20)
set j=j+1
endloop
set i=i+1
endloop
set u=null
endfunction
function I1 takes nothing returns nothing
local integer S0=eZ()
set Eu[S0]=kZ(S0,6,function E1)
set Vu[S0]=CreateRegion()
call RegionAddRect(Vu[S0],QX)
call TriggerRegisterEnterRegion(Eu[S0],Vu[S0],null)
set au[nu[S0]]=bT
set au[nu[S0]+1]=bT
set au[nu[S0]+2]=NT
set au[nu[S0]+3]=bT
set au[nu[S0]+4]=AT
set au[nu[S0]+5]=AT
endfunction
function A1 takes nothing returns nothing
set D=true
call CreateUnit(Player($B),'h005',GetRectCenterX(sX),GetRectCenterY(sX),270)
endfunction
function N1 takes nothing returns nothing
set C=GZ(0)
call X1()
call O1()
call I1()
endfunction
function b1 takes nothing returns nothing
local integer i=0
loop
exitwhen i>=h
if GetTriggeringRegion()==G[i]and X0(GetUnitTypeId(GetTriggerUnit()))then
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Items\\StaffOfPurification\\PurificationCaster.mdl",GetRectCenterX(F[i]),GetRectCenterY(F[i])))
call SetDoodadAnimation(GetRectMinX(H[i]),GetRectMaxY(H[i]),128.,'YOf3',false,"stand",false)
call CreateUnit(Player($B),'h005',GetRectCenterX(F[i]),GetRectCenterY(F[i]),270)
call RemoveRegion(G[i])
set G[i]=null
return
endif
set i=i+1
endloop
endfunction
function B1 takes nothing returns nothing
local integer i=0
loop
exitwhen i>=h
call SetDoodadAnimation(GetRectMinX(H[i]),GetRectMaxY(H[i]),128.,'YOf3',false,"death",false)
set i=i+1
endloop
endfunction
function c1 takes trigger t,rect r1,rect r2 returns nothing
set G[h]=CreateRegion()
call RegionAddRect(G[h],r1)
set F[h]=r1
set H[h]=r2
call TriggerRegisterEnterRegion(t,G[h],null)
set h=h+1
endfunction
function C1 takes nothing returns nothing
local trigger t=CreateTrigger()
call c1(t,wO,XA)
call c1(t,yO,OA)
call c1(t,zO,RA)
call c1(t,vR,IA)
call c1(t,xR,AA)
call c1(t,rR,NA)
call c1(t,aR,bA)
call TriggerAddAction(t,function b1)
call B1()
set t=null
endfunction
function d1 takes integer D1 returns nothing
set J=true
set K=D1
endfunction
function f1 takes nothing returns nothing
set J=false
set K=0
endfunction
function JNHideOriginFrames takes nothing returns nothing
call DzFrameHideInterface()
endfunction
function JNGetGameUI takes nothing returns integer
return DzGetGameUI()
endfunction
function JNFrameGetMinimap takes nothing returns integer
return DzFrameGetMinimap()
endfunction
function JNFrameGetTooltip takes nothing returns integer
return DzFrameGetTooltip()
endfunction
function JNFrameGetChatMessage takes nothing returns integer
return DzFrameGetChatMessage()
endfunction
function JNFrameGetUnitMessage takes nothing returns integer
return DzFrameGetUnitMessage()
endfunction
function JNFrameGetTopMessage takes nothing returns integer
return DzFrameGetTopMessage()
endfunction
function JNFrameGetPortrait takes nothing returns integer
return DzFrameGetPortrait()
endfunction
function JNGetTriggerUIEventPlayer takes nothing returns player
return DzGetTriggerUIEventPlayer()
endfunction
function JNGetTriggerUIEventFrame takes nothing returns integer
return DzGetTriggerUIEventFrame()
endfunction
function JNGetTriggerPlayerMouseX takes nothing returns real
return DzGetMouseTerrainX()
endfunction
function JNGetTriggerPlayerMouseY takes nothing returns real
return DzGetMouseTerrainY()
endfunction
function JNGetTriggerPlayerMousePosition takes nothing returns location
return Location(DzGetMouseTerrainX(),DzGetMouseTerrainY())
endfunction
function JNGetTriggerKey takes nothing returns integer
return DzGetTriggerKey()
endfunction
function JNGetTriggerIsKeyDown takes nothing returns boolean
return DzIsKeyDown(DzGetTriggerKey())
endfunction
function JNGetTriggerKeyPlayer takes nothing returns player
return DzGetTriggerKeyPlayer()
endfunction
function JNGetLocalClientWidth takes nothing returns integer
return DzGetWindowWidth()
endfunction
function JNGetLocalClientHeight takes nothing returns integer
return DzGetWindowHeight()
endfunction
function JNIsLocalClientActive takes nothing returns boolean
return DzIsWindowActive()
endfunction
function JNGetMouseFocusUnit takes nothing returns unit
return DzGetUnitUnderMouse()
endfunction
function JNGetLocale takes nothing returns string
return DzGetLocale()
endfunction
function JNGetTriggerSyncData takes nothing returns string
return DzGetTriggerSyncData()
endfunction
function JNGetTriggerSyncPlayer takes nothing returns player
return DzGetTriggerSyncPlayer()
endfunction
function g1 takes nothing returns nothing
call SetUnitTimeScale(GetEnumUnit(),1)
endfunction
function G1 takes nothing returns nothing
call SetUnitTimeScale(GetEnumUnit(),0)
endfunction
function h1 takes nothing returns boolean
local integer H1=GetUnitTypeId(GetTriggerUnit())
return X0(H1)or H1=='opeo' or H1=='ogru' or H1=='otau' or H1=='ocat' or H1=='ohun' or H1=='o000' or H1=='o001'
endfunction
function j1 takes nothing returns nothing
local integer i=1
local real x
local real y
call HZ(m)
set M=false
set P=not(P)
call SetSoundVolume(Ee,$7F)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",.0,.0,.0,30,0,0,0,'d')
call ForGroup(De,function g1)
if U!=0 or w!=0 then
call TriggerExecute(Oe)
endif
loop
exitwhen i>7+Ae
if i<=7 then
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set Kv[i]=0
call SetUnitTimeScale(at[i],1)
set Qv[i]=Qv[i]*-1
if Qv[i]<-30 then
set Qv[i]=-30
endif
if mv[i]==false or Mv[i]==false then
if mv[i] then
set mv[i]=false
set Mv[i]=true
set qv[i]="Right"
elseif Mv[i] then
set mv[i]=true
set Mv[i]=false
set qv[i]="Left"
endif
endif
if he[i]!=null and Ox[i]==false then
call SetTextTagVisibility(he[i],true)
if P==false then
call SetUnitFacing(at[i],270)
call SetUnitFacing(Vt[i],270)
call SetTextTagPos(he[i],GetUnitX(at[i])-50,GetUnitY(at[i])-'x',0)
else
call SetUnitFacing(at[i],90)
call SetUnitFacing(Vt[i],90)
call SetTextTagPos(he[i],GetUnitX(at[i])+50,GetUnitY(at[i])+'x',0)
endif
endif
endif
else
call SetUnitTimeScale(at[i],1)
if mv[i]==false or Mv[i]==false then
if mv[i] then
set mv[i]=false
set Mv[i]=true
set qv[i]="Right"
elseif Mv[i] then
set mv[i]=true
set Mv[i]=false
set qv[i]="Left"
endif
endif
set Kv[i]=0
set Qv[i]=Qv[i]*-1
if Qv[i]<-30 then
set Qv[i]=-30
endif
if P==false then
call SetUnitFacing(at[i],270)
else
call SetUnitFacing(at[i],90)
endif
if GetUnitTypeId(at[i])=='orai' then
set x=GetUnitX(at[i])
set y=GetUnitY(at[i])
call RemoveUnit(at[i])
if P==false then
set at[i]=CreateUnit(Player(i-1),'orai',x,y,270)
else
set at[i]=CreateUnit(Player(i-1),'orai',x,y,90)
endif
call SetUnitBlendTime(at[i],.0)
call SetUnitUserData(at[i],0)
if qv[i]=="Left" then
if P==false then
call SetUnitAnimation(at[i],"Stand First")
else
call SetUnitAnimation(at[i],"Stand Second")
endif
elseif qv[i]=="Right" then
if P==false then
call SetUnitAnimation(at[i],"Stand Second")
else
call SetUnitAnimation(at[i],"Stand First")
endif
endif
endif
endif
set i=i+1
endloop
endfunction
function J1 takes nothing returns nothing
local integer i=1
loop
exitwhen S[i]==null
if q[i] then
set q[i]=false
call SetDoodadAnimationRect(S[i],'LOar',"Stand",false)
endif
set i=i+1
endloop
endfunction
function k1 takes nothing returns nothing
local integer i=1
set M=true
call SetSoundVolume(Ee,80)
call StopSound(nS,false,false)
call StartSound(nS)
call ForGroup(De,function G1)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",.0,.0,.0,'d',0,0,0,30)
loop
exitwhen i>7+Ae
if i<=7 then
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitTimeScale(at[i],0)
if he[i]!=null then
call SetTextTagVisibility(he[i],false)
endif
if P==false then
call SetUnitFacingTimed(at[i],85.,.82)
else
call SetUnitFacingTimed(at[i],275.,.82)
endif
if P==false and Player(i-1)==GetLocalPlayer()then
if Ix[i]==0 then
call PanCameraToTimed(GetUnitX(at[i]),GetUnitY(at[i])-$80,1)
else
call PanCameraToTimed(GetUnitX(at[Ix[i]]),GetUnitY(at[Ix[i]])-$80,1)
endif
elseif Player(i-1)==GetLocalPlayer()then
if Ix[i]==0 then
call PanCameraToTimed(GetUnitX(at[i]),GetUnitY(at[i])+$80,1)
else
call PanCameraToTimed(GetUnitX(at[Ix[i]]),GetUnitY(at[Ix[i]])+$80,1)
endif
endif
endif
else
call SetUnitTimeScale(at[i],0)
if P==false then
call SetUnitFacingTimed(at[i],85.,.82)
else
call SetUnitFacingTimed(at[i],275.,.82)
endif
endif
set i=i+1
endloop
if P==false then
call SetCameraField(CAMERA_FIELD_ROTATION,270.,1)
else
call SetCameraField(CAMERA_FIELD_ROTATION,90.,1)
endif
set m=GZ(0)
call TimerStart(bw[(m)],((1.)*1.),(false),(function j1))
endfunction
function K1 takes nothing returns nothing
local integer i=1
local real x
local real y
if M==false and Re==false then
loop
exitwhen S[i]==null
if GetTriggeringRegion()==Q[i]and q[i]==false and h1() then
set U=TimerGetRemaining(Be)
call PauseTimer(Be)
if TimerGetRemaining(ce)!=0 then
set w=TimerGetRemaining(ce)
call PauseTimer(ce)
endif
set x=GetRectCenterX(S[i])
set y=GetRectCenterY(S[i])
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Items\\AIem\\AIemTarget.mdl",x,y))
call SetDoodadAnimationRect(S[i],'LOar',"death",false)
set q[i]=true
call k1()
endif
set i=i+1
endloop
endif
endfunction
function l1 takes trigger t,rect r returns nothing
set T=T+1
set Q[T]=CreateRegion()
call RegionAddRect(Q[T],r)
set S[T]=r
call TriggerRegisterEnterRegion(t,Q[T],null)
endfunction
function L1 takes nothing returns nothing
local trigger t=CreateTrigger()
call l1(t,YR)
call l1(t,zR)
call l1(t,ZR)
call l1(t,vI)
call l1(t,eI)
call l1(t,xI)
call l1(t,oI)
call l1(t,rI)
call l1(t,iI)
call l1(t,aI)
call l1(t,nI)
call l1(t,VI)
call l1(t,EI)
call l1(t,XI)
call l1(t,OI)
call l1(t,RI)
call l1(t,II)
call l1(t,AI)
call l1(t,NI)
call l1(t,bI)
call l1(t,BI)
call l1(t,cI)
call l1(t,CI)
call l1(t,dI)
call l1(t,DI)
call l1(t,fI)
call l1(t,FI)
call l1(t,gI)
call l1(t,GI)
call l1(t,hI)
call l1(t,HI)
call l1(t,jI)
call l1(t,JI)
call l1(t,kI)
call l1(t,KI)
call l1(t,lI)
call l1(t,LI)
call l1(t,mI)
call l1(t,MI)
call l1(t,pI)
call l1(t,PI)
call l1(t,qI)
call l1(t,QI)
call l1(t,sI)
call l1(t,SI)
call l1(t,tI)
call l1(t,TI)
call TriggerAddAction(t,function K1)
set t=null
endfunction
function m1 takes nothing returns nothing
local integer i=1
local integer j=1
local integer p=GetPlayerId(GetOwningPlayer(GetTriggerUnit()))+1
loop
exitwhen Y[i]==null
if GetTriggeringRegion()==W[i]and GetTriggerUnit()==at[p]then
loop
exitwhen j>7
if IsUnitInRegion(W[j],at[j])==false then
return
endif
set j=j+1
endloop
call k0(1.,'d','d','d',0,'d','d','d','d')
call SetDoodadAnimation(6144,-$71C0,128.,'LOxx',false,"stand ready",false)
call DestroyTrigger(GetTriggeringTrigger())
return
endif
set i=i+1
endloop
endfunction
function M1 takes nothing returns nothing
local integer i=1
local integer p=GetPlayerId(GetOwningPlayer(GetTriggerUnit()))+1
loop
exitwhen i>7
if GetPlayerId(GetOwningPlayer(GetTriggerUnit()))!=i-1 and IsUnitInRegion(W[i+7],at[i])==false then
return
endif
set i=i+1
endloop
call k0(1.,'d','d','d',0,'d','d','d','d')
call SetDoodadAnimation($33EF,-$7B18,128.,'LOxx',false,"stand work",false)
call DestroyTrigger(GetTriggeringTrigger())
endfunction
function p1 takes trigger t,rect r returns nothing
set z=z+1
set W[z]=CreateRegion()
call RegionAddRect(W[z],r)
set Y[z]=r
call TriggerRegisterEnterRegion(t,W[z],null)
endfunction
function P1 takes nothing returns nothing
local trigger t=CreateTrigger()
call p1(t,uI)
call p1(t,UI)
call p1(t,wI)
call p1(t,WI)
call p1(t,yI)
call p1(t,YI)
call p1(t,zI)
call TriggerAddAction(t,function m1)
set t=CreateTrigger()
call p1(t,zF)
call p1(t,ZF)
call p1(t,vg)
call p1(t,eg)
call p1(t,xg)
call p1(t,og)
call p1(t,rg)
call TriggerAddAction(t,function M1)
set t=null
endfunction
function q1 takes integer i returns nothing
local integer j=1
loop
exitwhen Z[j]==null
if RectContainsUnit(Z[j],at[i]) then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,.05,vv[j])
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Items\\StaffOfPurification\\PurificationCaster.mdl",GetRectCenterX(Z[j]),GetRectCenterY(Z[j])))
return
endif
set j=j+1
endloop
endfunction
function Q1 takes rect r,integer i,string s returns nothing
set Z[i]=r
set vv[i]=s
set r=null
endfunction
function S1 takes nothing returns nothing
call Q1(ZI,1,"-E??????????")
call Q1(vA,2,"-?L?????????")
call Q1(eA,3,"-??L????????")
call Q1(xA,4,"-???I???????")
call Q1(oA,5,"-????N??????")
call Q1(rA,6,"-?????F?????")
call Q1(iA,7,"-??????O????")
call Q1(aA,8,"-???????R???")
call Q1(nA,9,"-????????E??")
call Q1(VA,$A,"-?????????S?")
call Q1(EA,$B,"-??????????T")
endfunction
function t1 takes integer i returns nothing
local real x=GetUnitX(at[i])
local real y=GetUnitY(at[i])
local boolean T1
local integer k=1
set T1=IsPointInRegion(rv,x,y)
if P==false then
set T1=T1 or IsPointInRegion(rv,x,y-40)
set T1=T1 or IsPointInRegion(rv,x-8,y-40)
set T1=T1 or IsPointInRegion(rv,x+40,y-40)
else
set T1=T1 or IsPointInRegion(rv,x,y+40)
set T1=T1 or IsPointInRegion(rv,x-8,y+40)
set T1=T1 or IsPointInRegion(rv,x+40,y+40)
endif
set T1=T1 or IsPointInRegion(rv,x-8,y)
set T1=T1 or IsPointInRegion(rv,x-8,y-Qv[i])
set T1=T1 or IsPointInRegion(rv,x-8,y+Qv[i])
set T1=T1 or IsPointInRegion(rv,x+40,y)
set T1=T1 or IsPointInRegion(rv,x+40,y-Qv[i])
set T1=T1 or IsPointInRegion(rv,x+40,y+Qv[i])
if T1 then
if GetUnitTypeId(at[i])!='orai' and GetUnitTypeId(at[i])!='o001' then
set Qv[i]=50.
set Kv[i]=0
if P==false then
call DestroyEffect(AddSpecialEffect("war3mapImported\\JumperEffect.mdl",x,y-80))
else
call DestroyEffect(AddSpecialEffect("war3mapImported\\JumperEffect.mdl",x,y+80))
endif
if i<=7 then
if P==false then
if qv[i]=="Left" then
call SetUnitAnimation(at[i],"Spell First")
elseif qv[i]=="Right" then
call SetUnitAnimation(at[i],"Spell Second")
endif
else
if qv[i]=="Left" then
call SetUnitAnimation(at[i],"Spell Second")
elseif qv[i]=="Right" then
call SetUnitAnimation(at[i],"Spell First")
endif
endif
endif
endif
endif
endfunction
function u1 takes nothing returns nothing
set rv=CreateRegion()
call RegionAddRect(rv,BA)
call RegionAddRect(rv,cA)
call RegionAddRect(rv,CA)
call RegionAddRect(rv,dA)
call RegionAddRect(rv,DA)
call RegionAddRect(rv,fA)
call RegionAddRect(rv,FA)
call RegionAddRect(rv,gA)
call RegionAddRect(rv,GA)
call RegionAddRect(rv,hA)
call RegionAddRect(rv,HA)
call RegionAddRect(rv,jA)
call RegionAddRect(rv,JA)
call RegionAddRect(rv,kA)
call RegionAddRect(rv,KA)
call RegionAddRect(rv,lA)
call RegionAddRect(rv,LA)
call RegionAddRect(rv,mA)
call RegionAddRect(rv,MA)
call RegionAddRect(rv,pA)
call RegionAddRect(rv,PA)
call RegionAddRect(rv,qA)
call RegionAddRect(rv,QA)
call RegionAddRect(rv,sA)
call RegionAddRect(rv,SA)
call RegionAddRect(rv,tA)
call RegionAddRect(rv,TA)
call RegionAddRect(rv,uA)
call RegionAddRect(rv,UA)
call RegionAddRect(rv,wA)
call RegionAddRect(rv,WA)
call RegionAddRect(rv,yA)
call RegionAddRect(rv,YA)
call RegionAddRect(rv,zA)
call RegionAddRect(rv,ZA)
call RegionAddRect(rv,vN)
call RegionAddRect(rv,eN)
call RegionAddRect(rv,xN)
call RegionAddRect(rv,oN)
call RegionAddRect(rv,rN)
call RegionAddRect(rv,iN)
call RegionAddRect(rv,aN)
call RegionAddRect(rv,nN)
call RegionAddRect(rv,VN)
call RegionAddRect(rv,EN)
call RegionAddRect(rv,XN)
call RegionAddRect(rv,ON)
call RegionAddRect(rv,RN)
call RegionAddRect(rv,IN)
call RegionAddRect(rv,AN)
call RegionAddRect(rv,NN)
call RegionAddRect(rv,bN)
call RegionAddRect(rv,BN)
call RegionAddRect(rv,cN)
call RegionAddRect(rv,CN)
call RegionAddRect(rv,dN)
call RegionAddRect(rv,DN)
call RegionAddRect(rv,fN)
call RegionAddRect(rv,FN)
call RegionAddRect(rv,gN)
call RegionAddRect(rv,GN)
call RegionAddRect(rv,hN)
call RegionAddRect(rv,HN)
call RegionAddRect(rv,jN)
call RegionAddRect(rv,JN)
call RegionAddRect(rv,kN)
call RegionAddRect(rv,KN)
call RegionAddRect(rv,lN)
call RegionAddRect(rv,LN)
call RegionAddRect(rv,mN)
call RegionAddRect(rv,MN)
call RegionAddRect(rv,pN)
call RegionAddRect(rv,PN)
call RegionAddRect(rv,qN)
call RegionAddRect(rv,QN)
call RegionAddRect(rv,sN)
call RegionAddRect(rv,SN)
call RegionAddRect(rv,tN)
call RegionAddRect(rv,TN)
call RegionAddRect(rv,uN)
call RegionAddRect(rv,UN)
call RegionAddRect(rv,wN)
call RegionAddRect(rv,WN)
call RegionAddRect(rv,yN)
call RegionAddRect(rv,YN)
call RegionAddRect(rv,zN)
call RegionAddRect(rv,ZN)
call RegionAddRect(rv,vb)
call RegionAddRect(rv,eb)
call RegionAddRect(rv,xb)
call RegionAddRect(rv,ob)
call RegionAddRect(rv,rb)
call RegionAddRect(rv,ib)
call RegionAddRect(rv,ab)
call RegionAddRect(rv,nb)
call RegionAddRect(rv,Vb)
call RegionAddRect(rv,Eb)
call RegionAddRect(rv,Xb)
call RegionAddRect(rv,Ob)
call RegionAddRect(rv,Rb)
call RegionAddRect(rv,Ib)
call RegionAddRect(rv,Ab)
call RegionAddRect(rv,Nb)
call RegionAddRect(rv,bb)
call RegionAddRect(rv,Bb)
call RegionAddRect(rv,cb)
call RegionAddRect(rv,Cb)
call RegionAddRect(rv,db)
call RegionAddRect(rv,Db)
call RegionAddRect(rv,fb)
call RegionAddRect(rv,Fb)
call RegionAddRect(rv,gb)
call RegionAddRect(rv,Gb)
call RegionAddRect(rv,hb)
call RegionAddRect(rv,Hb)
call RegionAddRect(rv,jb)
call RegionAddRect(rv,Jb)
call RegionAddRect(rv,kb)
call RegionAddRect(rv,Kb)
call RegionAddRect(rv,lb)
call RegionAddRect(rv,Lb)
call RegionAddRect(rv,mb)
call RegionAddRect(rv,Mb)
call RegionAddRect(rv,pb)
call RegionAddRect(rv,Pb)
call RegionAddRect(rv,qb)
call RegionAddRect(rv,Qb)
call RegionAddRect(rv,sb)
call RegionAddRect(rv,Sb)
call RegionAddRect(rv,tb)
call RegionAddRect(rv,Tb)
call RegionAddRect(rv,ub)
call RegionAddRect(rv,Ub)
call RegionAddRect(rv,wb)
call RegionAddRect(rv,Wb)
call RegionAddRect(rv,yb)
call RegionAddRect(rv,Yb)
call RegionAddRect(rv,zb)
call RegionAddRect(rv,Zb)
call RegionAddRect(rv,vB)
call RegionAddRect(rv,eB)
call RegionAddRect(rv,xB)
call RegionAddRect(rv,oB)
call RegionAddRect(rv,rB)
call RegionAddRect(rv,iB)
call RegionAddRect(rv,aB)
call RegionAddRect(rv,nB)
call RegionAddRect(rv,VB)
call RegionAddRect(rv,EB)
call RegionAddRect(rv,XB)
call RegionAddRect(rv,OB)
call RegionAddRect(rv,RB)
call RegionAddRect(rv,IB)
call RegionAddRect(rv,AB)
call RegionAddRect(rv,NB)
call RegionAddRect(rv,bB)
call RegionAddRect(rv,BB)
call RegionAddRect(rv,cB)
call RegionAddRect(rv,CB)
call RegionAddRect(rv,dB)
call RegionAddRect(rv,DB)
call RegionAddRect(rv,fB)
call RegionAddRect(rv,FB)
call RegionAddRect(rv,gB)
call RegionAddRect(rv,GB)
call RegionAddRect(rv,hB)
call RegionAddRect(rv,HB)
call RegionAddRect(rv,jB)
call RegionAddRect(rv,JB)
call RegionAddRect(rv,kB)
call RegionAddRect(rv,KB)
call RegionAddRect(rv,lB)
call RegionAddRect(rv,LB)
call RegionAddRect(rv,mB)
call RegionAddRect(rv,MB)
call RegionAddRect(rv,pB)
call RegionAddRect(rv,PB)
call RegionAddRect(rv,qB)
call RegionAddRect(rv,QB)
call RegionAddRect(rv,sB)
call RegionAddRect(rv,SB)
call RegionAddRect(rv,tB)
call RegionAddRect(rv,TB)
call RegionAddRect(rv,uB)
call RegionAddRect(rv,UB)
call RegionAddRect(rv,wB)
call RegionAddRect(rv,WB)
call RegionAddRect(rv,yB)
call RegionAddRect(rv,YB)
call RegionAddRect(rv,zB)
call RegionAddRect(rv,ZB)
call RegionAddRect(rv,vc)
call RegionAddRect(rv,ec)
call RegionAddRect(rv,xc)
call RegionAddRect(rv,oc)
call RegionAddRect(rv,rc)
call RegionAddRect(rv,ic)
call RegionAddRect(rv,ac)
call RegionAddRect(rv,nc)
call RegionAddRect(rv,Vc)
call RegionAddRect(rv,Ec)
call RegionAddRect(rv,Xc)
call RegionAddRect(rv,Oc)
call RegionAddRect(rv,Rc)
call RegionAddRect(rv,Ic)
call RegionAddRect(rv,Ac)
call RegionAddRect(rv,Nc)
call RegionAddRect(rv,bc)
call RegionAddRect(rv,Bc)
call RegionAddRect(rv,cc)
call RegionAddRect(rv,Cc)
call RegionAddRect(rv,dc)
call RegionAddRect(rv,Dc)
call RegionAddRect(rv,tQ)
call RegionAddRect(rv,cs)
call RegionAddRect(rv,Cs)
call RegionAddRect(rv,ds)
call RegionAddRect(rv,Ds)
call RegionAddRect(rv,fs)
call RegionAddRect(rv,Fs)
call RegionAddRect(rv,gs)
call RegionAddRect(rv,Gs)
call RegionAddRect(rv,hs)
call RegionAddRect(rv,Hs)
call RegionAddRect(rv,js)
call RegionAddRect(rv,Js)
call RegionAddRect(rv,ks)
call RegionAddRect(rv,Ks)
call RegionAddRect(rv,ls)
call RegionAddRect(rv,Ls)
call RegionAddRect(rv,ms)
call RegionAddRect(rv,Ms)
call RegionAddRect(rv,ps)
call RegionAddRect(rv,Ps)
call RegionAddRect(rv,qs)
call RegionAddRect(rv,Qs)
call RegionAddRect(rv,ss)
endfunction
function U1 takes nothing returns nothing
set iv=GetTerrainType(-8069,-$7DE9)
set av=GetTerrainType(-7960,-$7DE9)
set nv=GetTerrainType(-7816,-$7DE9)
set Vv=GetTerrainType(-7681,-$7DE9)
set Ev=GetTerrainType(-7566,-$7DE9)
set Xv=GetTerrainType(-7426,-$7DE9)
set Ov=GetTerrainType(-7292,-$7DE9)
set Rv=GetTerrainType(-7173,-$7DE9)
set Iv=GetTerrainType(-7036,-$7DE9)
set Av=GetTerrainType(-6906,-$7DE9)
set Nv=GetTerrainType(-6786,-$7DE9)
endfunction
function w1 takes nothing returns boolean
local integer H1=GetUnitTypeId(GetTriggerUnit())
return X0(H1)or H1=='opeo' or H1=='ogru' or H1=='otau' or H1=='ocat' or H1=='ohun' or H1=='o000' or H1=='o001'
endfunction
function W1 takes integer x,integer y returns integer
local integer gz=OZ()
set Au[gz]=x
set Nu[gz]=y
return gz
endfunction
function z1 takes integer t returns integer
local integer gz=RZ()
set Cu[gz]=t
return gz
endfunction
function i2 takes integer gz,integer t returns nothing
local integer v2=z1(t)
if hu[gz]!=0 then
set Du[hu[gz]]=v2
set du[v2]=hu[gz]
elseif Hu[gz]==0 then
set Hu[gz]=v2
endif
set hu[gz]=v2
set Gu[gz]=Gu[gz]+1
endfunction
function n2 takes integer V2,string E2 returns integer
local integer gz=zZ()
set mu[gz]=V2
set Mu[gz]=E2
return gz
endfunction
function X2 takes integer O2 returns integer
local integer gz=yZ()
set pu[gz]=O2
return gz
endfunction
function R2 takes integer gz returns nothing
local real x
local real y
local integer v2
set v2=hu[su[gz]]
loop
exitwhen v2==0
set x=Au[Cu[v2]]
set y=Nu[Cu[v2]]
call wZ(gz,x,y)
call tZ(Su[gz],x,y)
set v2=du[v2]
endloop
endfunction
function A2 takes integer t returns integer
local integer gz=sZ()
set Uu[gz]=t
return gz
endfunction
function b2 takes integer gz,integer t returns nothing
local integer v2=A2(t)
if vU[gz]!=0 then
set Wu[vU[gz]]=v2
set wu[v2]=vU[gz]
elseif eU[gz]==0 then
set eU[gz]=v2
endif
set vU[gz]=v2
set Zu[gz]=Zu[gz]+1
endfunction
function B2 takes nothing returns nothing
local integer gz=(LoadInteger(Fe,0,GetHandleId(GetTriggeringTrigger())))
if EU[gz]==false and w1() then
call PZ(gz)
endif
endfunction
function c2 takes integer gz returns nothing
local integer v2
set v2=vU[nU[gz]]
loop
exitwhen v2==0
call R2(Uu[v2])
set v2=wu[v2]
endloop
set EU[gz]=true
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Items\\AIem\\AIemTarget.mdl",GetRectCenterX(iU[gz]),GetRectCenterY(iU[gz])))
call SetDoodadAnimationRect(iU[gz],aU[gz],"Death",false)
endfunction
function C2 takes integer gz,integer d2 returns nothing
if EU[gz]==false and aU[gz]==d2 then
call c2(gz)
endif
endfunction
function D2 takes integer gz returns nothing
local integer v2
set v2=vU[VU[gz]]
loop
exitwhen v2==0
call R2(Uu[v2])
set v2=wu[v2]
endloop
set EU[gz]=false
call SetDoodadAnimationRect(iU[gz],aU[gz],"Stand",false)
endfunction
function f2 takes rect r,integer d2,integer F2,integer g2 returns integer
local integer gz=qZ()
set iU[gz]=r
set aU[gz]=d2
set nU[gz]=F2
set VU[gz]=g2
return gz
endfunction
function G2 takes rect r,integer d2,integer F2,integer g2 returns integer
local integer S0=f2(r,d2,F2,g2)
local trigger t=kZ(S0,0,function B2)
call TriggerRegisterEnterRectSimple(t,r)
set t=null
return S0
endfunction
function H2 takes integer t returns integer
local integer gz=pZ()
set IU[gz]=t
return gz
endfunction
function J2 takes integer gz,integer t returns nothing
local integer v2=H2(t)
if dU[gz]!=0 then
set NU[dU[gz]]=v2
set AU[v2]=dU[gz]
elseif DU[gz]==0 then
set DU[gz]=v2
endif
set dU[gz]=v2
set CU[gz]=CU[gz]+1
endfunction
function k2 takes integer K2,integer l2 returns nothing
local integer L2=LoadInteger(GU,K2,l2)
local integer v2
set v2=dU[L2]
loop
exitwhen v2==0
call D2(IU[v2])
set v2=AU[v2]
endloop
endfunction
function m2 takes integer K2,integer l2,integer d2 returns nothing
local integer L2=LoadInteger(GU,K2,l2)
local integer v2
set v2=dU[L2]
loop
exitwhen v2==0
call C2(IU[v2],d2)
set v2=AU[v2]
endloop
endfunction
function M2 takes nothing returns nothing
set bv=n2('D00E',"death")
set Bv=n2('D00E',"stand")
set cv=n2('D00C',"death")
set Cv=n2('D00C',"stand")
set dv=n2('D00B',"death")
set Dv=n2('D00B',"stand")
set fv=n2('D00D',"death")
set Fv=n2('D00D',"stand")
endfunction
function s__Key__keyMapManager_SaveEvent takes nothing returns nothing
call J2(JU,G2(MU,mU,kU,KU))
endfunction
function p2 takes integer uZ,string P2 returns nothing
if P2=="Create" then
if mU=='IOic' then
call b2(kU,(v0((uZ),(Bv))))
call b2(KU,(e0((uZ),(bv))))
elseif mU=='LOtr' then
call b2(kU,(v0((uZ),(Cv))))
call b2(KU,(e0((uZ),(cv))))
elseif mU=='OOal' then
call b2(kU,(v0((uZ),(Dv))))
call b2(KU,(e0((uZ),(dv))))
elseif mU=='YOsa' then
call b2(kU,(v0((uZ),(Fv))))
call b2(KU,(e0((uZ),(fv))))
endif
elseif P2=="Remove" then
if mU=='IOic' then
call b2(kU,(e0((uZ),(bv))))
call b2(KU,(v0((uZ),(Bv))))
elseif mU=='LOtr' then
call b2(kU,(e0((uZ),(cv))))
call b2(KU,(v0((uZ),(Cv))))
elseif mU=='OOal' then
call b2(kU,(e0((uZ),(dv))))
call b2(KU,(v0((uZ),(Dv))))
elseif mU=='YOsa' then
call b2(kU,(e0((uZ),(fv))))
call b2(KU,(v0((uZ),(Fv))))
endif
endif
endfunction
function q2 takes integer d2,rect Q2 returns nothing
set mU=d2
set MU=Q2
set kU=QZ()
set KU=QZ()
endfunction
function S2 takes integer K2,integer l2 returns nothing
set JU=MZ()
set lU=K2
set LU=l2
endfunction
function s__Key__keyMapManager_Register takes nothing returns nothing
call SaveInteger(GU,(lU),(LU),(JU))
endfunction
function t2 takes nothing returns nothing
local integer j=0
local integer uZ
local integer T2
local integer u2
local integer L2
local integer F2
local integer g2
call DestroyTrigger(GetTriggeringTrigger())
set L2=MZ()
set F2=QZ()
set g2=QZ()
set uZ=SZ()
set j=0
loop
exitwhen j>$F
call i2(uZ,W1($5100+($80*j),-$2800))
set j=j+1
endloop
call b2(F2,(e0((uZ),(X2('Xsqd')))))
call b2(g2,(e0((uZ),(X2(av)))))
set uZ=SZ()
call i2(uZ,W1($427D,-$2C04))
call b2(F2,(e0((uZ),(bv))))
call b2(g2,(v0((uZ),(Bv))))
call J2(L2,G2(yc,'IOic',F2,g2))
set F2=QZ()
set g2=QZ()
set uZ=SZ()
call i2(uZ,W1($5080,-9600))
call b2(F2,(e0((uZ),(cv))))
call b2(g2,(v0((uZ),(Cv))))
set uZ=SZ()
call i2(uZ,W1($5900,-$2780))
set j=0
loop
exitwhen j>$F
call i2(uZ,W1($5100+($80*j),-$2800))
set j=j+1
endloop
call b2(F2,(v0((uZ),(Cv))))
call b2(g2,(e0((uZ),(cv))))
call J2(L2,G2(Yc,'LOtr',F2,g2))
set F2=QZ()
set g2=QZ()
set uZ=SZ()
call i2(uZ,W1($5080,-$2780))
call i2(uZ,W1($5080,-$2780+$80))
call b2(F2,(e0((uZ),(dv))))
call b2(g2,(v0((uZ),(Dv))))
set uZ=SZ()
set j=0
loop
exitwhen j>$F
if j!=3 and j!=7 and j!=$B then
call i2(uZ,W1($5100+($80*j),-9856))
endif
set j=j+1
endloop
call b2(F2,(v0((uZ),(Dv))))
call b2(g2,(e0((uZ),(dv))))
call J2(L2,G2(zc,'OOal',F2,g2))
set F2=QZ()
set g2=QZ()
set uZ=SZ()
call i2(uZ,W1($4380,-$2C80))
call i2(uZ,W1($5880,-$2D00))
call b2(F2,(e0((uZ),(fv))))
call b2(g2,(v0((uZ),(Fv))))
set uZ=SZ()
set T2=SZ()
set u2=SZ()
set j=0
loop
exitwhen j>23
call i2(uZ,W1($4D80+($80*j),-$2F80))
if j==2 or j==8 or j==$E then
call i2(T2,W1($4D80+($80*j),-$2F80+($80*2)))
call i2(uZ,W1($4D80+($80*j),-$2F80+$80))
elseif j==5 or j==$B or j==17 then
call i2(u2,W1($4D80+($80*j),-$2F80+($80*2)))
call i2(uZ,W1($4D80+($80*j),-$2F80+$80))
endif
set j=j+1
endloop
call b2(F2,(v0((uZ),(Fv))))
call b2(g2,(e0((uZ),(fv))))
call b2(F2,(e0((T2),(X2(iv)))))
call b2(g2,(e0((T2),(X2('Xsqd')))))
call b2(F2,(e0((u2),(X2(av)))))
call b2(g2,(e0((u2),(X2('Xsqd')))))
call J2(L2,G2(Zc,'YOsa',F2,g2))
call SaveInteger(GU,($A),(6),(L2))
call S2($A,7)
call q2('IOic',vC)
set uZ=SZ()
call i2(uZ,W1($5800,-$3400))
call i2(uZ,W1($5B80,-$3780))
call i2(uZ,W1($5B80,-$3780-$80))
call i2(uZ,W1($5B80,-$3780+$80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',eC)
set uZ=SZ()
set T2=SZ()
call i2(uZ,W1($5500,-$3580))
set j=0
loop
exitwhen j>4
call i2(T2,W1($5B00,-$3800+($80*j)))
call i2(T2,W1($5700,-$3780+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call p2(T2,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',xC)
set uZ=SZ()
set T2=SZ()
call i2(uZ,W1($6300,-$3700))
call i2(uZ,W1($6300,-$3700+$80))
call i2(T2,W1($5600,-$3900))
call i2(T2,W1($5600+$80,-$3900-$80))
call p2(uZ,"Remove")
call p2(T2,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
set L2=MZ()
set F2=QZ()
set g2=QZ()
set uZ=SZ()
call i2(uZ,W1($5900,-5760))
call i2(uZ,W1($5D00,-6272))
call i2(uZ,W1($5C80,-6528))
call i2(uZ,W1($5C80+$80,-6528))
call i2(uZ,W1($5C80+256,-6528))
call i2(uZ,W1($5D00,-6912))
call i2(uZ,W1($5D00+$80,-6912))
call i2(uZ,W1($6880,-8832))
call i2(uZ,W1($6880,-8832+$80))
call i2(uZ,W1($6880,-8832+256))
call b2(F2,(e0((uZ),(bv))))
call b2(g2,(v0((uZ),(Bv))))
set uZ=SZ()
set j=0
loop
exitwhen j>5
call i2(uZ,W1($6100+($80*j),-8320))
if j<3 then
call i2(uZ,W1($6480+($80*j),-8320))
endif
if j<4 then
call i2(uZ,W1($6680+($80*j),-8320))
endif
set j=j+1
endloop
call b2(F2,(e0((uZ),(dv))))
set uZ=SZ()
call i2(uZ,W1($5C80,-8448))
call i2(uZ,W1($5C80+$80,-8448))
call b2(F2,(v0((uZ),(Bv))))
call b2(g2,(e0((uZ),(bv))))
set uZ=SZ()
call i2(uZ,W1($6880,-8192))
call i2(uZ,W1($6880,-8192+$80))
call b2(F2,(v0((uZ),(Dv))))
call J2(L2,G2(oC,'IOic',F2,g2))
set F2=QZ()
set g2=QZ()
set uZ=SZ()
set j=0
loop
exitwhen j>6
call i2(uZ,W1($5980,-8576+($80*j)))
set j=j+1
endloop
call b2(F2,(e0((uZ),(cv))))
call b2(g2,(v0((uZ),(Cv))))
set uZ=SZ()
set j=0
loop
exitwhen j>3
call i2(uZ,W1($5A00+($80*j),-7552))
call i2(uZ,W1($5E00+($80*j),-7808))
set j=j+1
endloop
call i2(uZ,W1($5B00,-6272))
call i2(uZ,W1($5D80,-6016))
call i2(uZ,W1($5F80,-6400))
call i2(uZ,W1($5E80,-6144))
call i2(uZ,W1($5E80+$80,-6144))
call b2(F2,(v0((uZ),(Cv))))
call b2(g2,(e0((uZ),(cv))))
call J2(L2,G2(rC,'LOtr',F2,g2))
set F2=QZ()
set g2=QZ()
set uZ=SZ()
call i2(uZ,W1($6080,-8192))
call i2(uZ,W1($6880,-8192))
call i2(uZ,W1($6880,-8192+$80))
call b2(F2,(e0((uZ),(dv))))
call b2(g2,(v0((uZ),(Dv))))
set uZ=SZ()
set j=0
loop
exitwhen j>5
call i2(uZ,W1($6100+($80*j),-8320))
if j<3 then
call i2(uZ,W1($6480+($80*j),-8320))
endif
if j<4 then
call i2(uZ,W1($6680+($80*j),-8320))
endif
set j=j+1
endloop
call b2(F2,(v0((uZ),(Dv))))
call b2(g2,(e0((uZ),(dv))))
call J2(L2,G2(iC,'OOal',F2,g2))
set F2=QZ()
set g2=QZ()
set uZ=SZ()
call i2(uZ,W1($5C00,-8832))
call i2(uZ,W1($5C00,-8576))
call i2(uZ,W1($5B00,-8704))
call b2(F2,(e0((uZ),(fv))))
call b2(g2,(v0((uZ),(Fv))))
call J2(L2,G2(aC,'YOsa',F2,g2))
call SaveInteger(GU,($A),(8),(L2))
call S2($B,1)
call q2('IOic',nC)
set uZ=SZ()
call i2(uZ,W1($6480,-$3F80))
call i2(uZ,W1($5700,-$4500))
call i2(uZ,W1($5700+$80,-$4500))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($B,2)
call q2('IOic',VC)
set uZ=SZ()
call i2(uZ,W1($5500,-$4980))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',EC)
set uZ=SZ()
call i2(uZ,W1($6B00,-$4500))
call i2(uZ,W1($6B00,-$4500-$80))
call p2(uZ,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',XC)
set uZ=SZ()
call i2(uZ,W1($6980,-$4980))
call i2(uZ,W1($6980+$80,-$4980))
call p2(uZ,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',OC)
set uZ=SZ()
call i2(uZ,W1($6B00,-$4500))
call i2(uZ,W1($6B00,-$4500-$80))
call p2(uZ,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($B,3)
call q2('IOic',RC)
set uZ=SZ()
call i2(uZ,W1($6500,-$4D00))
call i2(uZ,W1($6500-$80,-$4D00))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',IC)
set uZ=SZ()
call i2(uZ,W1($6B00,-$4C80))
call i2(uZ,W1($6B00,-$4C80-$80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',AC)
set uZ=SZ()
call i2(uZ,W1($6A80,-$4D80))
call i2(uZ,W1($6A80+$80,-$4D80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',NC)
set uZ=SZ()
call i2(uZ,W1($5E00,-$6200))
call i2(uZ,W1($5E00-$80,-$6200))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($B,4)
call q2('IOic',bC)
set uZ=SZ()
call i2(uZ,W1($4700,-$5480))
call i2(uZ,W1($4700+$80,-$5480))
call i2(uZ,W1($5680,-$5600))
call i2(uZ,W1($5680+$80,-$5600))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',BC)
set uZ=SZ()
set j=0
loop
exitwhen j>3
call i2(uZ,W1($5580+($80*j),-$5A00))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',cC)
set uZ=SZ()
set T2=SZ()
call i2(T2,W1($4600,-$5680))
call i2(uZ,W1($5680,-$5580))
call i2(uZ,W1($5680+$80,-$5580))
call i2(uZ,W1($4500,-$5400))
call i2(uZ,W1($4500+$80,-$5400))
call p2(uZ,"Remove")
call p2(T2,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',CC)
set uZ=SZ()
call i2(uZ,W1($5700,-$5880))
call i2(uZ,W1($5700,-$5880-$80))
call p2(uZ,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($B,5)
call q2('IOic',dC)
set uZ=SZ()
call i2(uZ,W1($5580,-$5F00))
call i2(uZ,W1($5580+$80,-$5F00))
call i2(uZ,W1($5780,-$5F00))
call i2(uZ,W1($5780+$80,-$5F00))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',DC)
set uZ=SZ()
set j=0
loop
exitwhen j>6
call i2(uZ,W1($4E00,-$6680+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',fC)
set uZ=SZ()
call i2(uZ,W1($5380,-$6180))
call p2(uZ,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($C,1)
call q2('IOic',FC)
set uZ=SZ()
call i2(uZ,W1($5300,$3D80))
call i2(uZ,W1($5300,$3D80+$80))
call i2(uZ,W1($5300,$3D80+256))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',gC)
set uZ=SZ()
call i2(uZ,W1($5700,$3F80))
call i2(uZ,W1($5700,$3F80+$80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($C,2)
call q2('IOic',GC)
set uZ=SZ()
call i2(uZ,W1($5F80,$3600))
call i2(uZ,W1($5F80+$80,$3600))
call i2(uZ,W1($6100,$3600))
call i2(uZ,W1($6100+$80,$3600))
call p2(uZ,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',hC)
set uZ=SZ()
set j=0
loop
exitwhen j>3
call i2(uZ,W1($5900,$3700+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',HC)
set uZ=SZ()
set j=0
loop
exitwhen j>3
call i2(uZ,W1($5880,$3700+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',jC)
set uZ=SZ()
call i2(uZ,W1($5E00,$2D00))
call i2(uZ,W1($5E00,$2D00+$80))
call i2(uZ,W1($6300,$3800))
call i2(uZ,W1($6300,$3800+$80))
call i2(uZ,W1($5000,$2D80))
call i2(uZ,W1($5000,$2D80+$80))
call i2(uZ,W1($6280,$2C80))
call i2(uZ,W1($6280+$80,$2C80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($C,3)
call q2('IOic',JC)
set uZ=SZ()
set T2=SZ()
call i2(uZ,W1($3B80,$3B00))
call i2(uZ,W1($4700,$3E80))
call i2(uZ,W1($4580,$3F80))
call i2(uZ,W1($4580,$3F80+$80))
set j=0
loop
exitwhen j>2
call i2(T2,W1($4200+($80*j),$3E80))
set j=j+1
endloop
call p2(uZ,"Remove")
call p2(T2,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',kC)
set uZ=SZ()
set j=0
loop
exitwhen j>3
call i2(uZ,W1($4380,$3E00-($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',KC)
set uZ=SZ()
call i2(uZ,W1($4700,$3B80))
call p2(uZ,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($C,4)
call q2('IOic',lC)
set uZ=SZ()
call i2(uZ,W1($2A80,$3480))
call i2(uZ,W1($2A80,$3480-$80))
call i2(uZ,W1($2A80,$3480-256))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',LC)
set uZ=SZ()
call i2(uZ,W1($2A00,$3900))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',mC)
set uZ=SZ()
call i2(uZ,W1($2A00,$3A00))
call i2(uZ,W1(9088,$3680))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',MC)
set uZ=SZ()
call i2(uZ,W1(8704,$3A00))
call i2(uZ,W1(8704-$80,$3A00))
call i2(uZ,W1(8704,$3A00-$80))
call i2(uZ,W1(8704+$80,$3A00-$80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($C,5)
call q2('IOic',pC)
set uZ=SZ()
call i2(uZ,W1($4B00,$3F80))
call i2(uZ,W1($4B00,$3F80-$80))
call i2(uZ,W1($4B00,$3F80-256))
call i2(uZ,W1($4B00,$3F80+$80))
call i2(uZ,W1($4B00,$3F80+256))
call i2(uZ,W1($4A80,$3D80))
call i2(uZ,W1($4F00,$3C80))
call i2(uZ,W1($4F00,$3C80-$80))
call i2(uZ,W1($4D80,$4000))
call i2(uZ,W1($4D80,$4000+$80))
call i2(uZ,W1($4C00,9472))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',PC)
set uZ=SZ()
call i2(uZ,W1($4980,9984))
call i2(uZ,W1($4980,9984+$80))
call i2(uZ,W1($4C00,$3F00))
call i2(uZ,W1($4C00+$80,$3F00))
call p2(uZ,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($C,6)
call q2('IOic',qC)
set uZ=SZ()
set T2=SZ()
call i2(uZ,W1($2D80,$3C00))
call i2(uZ,W1($2D80-$80,$3C00))
call i2(uZ,W1($2D80,$3C00+$80))
call i2(uZ,W1($2C80,$3300))
call i2(T2,W1($2E80,$3A80))
call i2(T2,W1($2E80+$80,$3A80))
call p2(uZ,"Remove")
call p2(T2,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',QC)
set uZ=SZ()
call i2(uZ,W1($3880,$3A00))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($C,7)
call q2('IOic',sC)
set uZ=SZ()
call i2(uZ,W1($4400,$3280))
call i2(uZ,W1($4400,$3280-$80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',SC)
set uZ=SZ()
call i2(uZ,W1($4C00,$3400))
call i2(uZ,W1($4C00,$3400+256))
set j=0
loop
exitwhen j>5
call i2(uZ,W1($4B80,$3480-($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',tC)
set uZ=SZ()
call i2(uZ,W1($4980,$2E00))
call i2(uZ,W1($4980+$80,$2E00))
call i2(uZ,W1($4980+256,$2E00))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',TC)
set uZ=SZ()
call i2(uZ,W1($3A80,$2E00))
call i2(uZ,W1($3A80+$80,$2E00))
call i2(uZ,W1($3A80+$80,$2E00-$80))
call i2(uZ,W1($4380,$3600))
call i2(uZ,W1($4380,$3600+$80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($C,8)
call q2('IOic',uC)
set uZ=SZ()
call i2(uZ,W1($3C00,$2A00))
call i2(uZ,W1($3C80,$2A80))
call i2(uZ,W1($4380,$2A00))
call i2(uZ,W1($4300,$2A80))
call i2(uZ,W1($4480,9344))
call i2(uZ,W1($4480,9344-$80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($C,9)
call q2('YOsa',UC)
set uZ=SZ()
call i2(uZ,W1($5B80,-$7100))
call i2(uZ,W1($5B80,-$7100-$80))
call i2(uZ,W1($5B80+$80,-$7100))
call i2(uZ,W1($5B80+$80,-$7100-$80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($D,-1)
call q2('IOic',Os)
set uZ=SZ()
call i2(uZ,W1(-7296,$5A80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',Rs)
set uZ=SZ()
call i2(uZ,W1(-4480,$5580))
call i2(uZ,W1(-4480+384,$5580))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',Is)
set uZ=SZ()
call i2(uZ,W1(-$B80,$5880))
call i2(uZ,W1(-$B80+$80,$5880))
call i2(uZ,W1(-$B80+640,$5880))
call i2(uZ,W1(-$B80+768,$5880))
call p2(uZ,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',As)
set uZ=SZ()
call i2(uZ,W1(-$A00,$5900))
call p2(uZ,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($D,1)
call q2('IOic',wC)
set uZ=SZ()
call i2(uZ,W1(-5120,$4700))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',WC)
set uZ=SZ()
call i2(uZ,W1(-6528,$4600))
call i2(uZ,W1(-7424,$4E00))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($D,2)
call q2('IOic',yC)
set uZ=SZ()
call i2(uZ,W1(-$F00,$4980))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',YC)
set uZ=SZ()
call i2(uZ,W1(-4096,$4980))
set j=0
loop
exitwhen j>3
call i2(uZ,W1(-$D80+($80*j),$4700))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',zC)
set uZ=SZ()
call i2(uZ,W1(-4608,$4D80))
call i2(uZ,W1(-4608+$80,$4D80))
call i2(uZ,W1(-$700,$4D00))
call i2(uZ,W1(-$600,$4880))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($D,3)
call q2('IOic',ZC)
set uZ=SZ()
call i2(uZ,W1(896,$4780))
set j=0
loop
exitwhen j>3
call i2(uZ,W1(-512+($80*j),$4C00))
if j<=2 then
call i2(uZ,W1(512+($80*j),$4C00))
call i2(uZ,W1($500+($80*j),$4980))
endif
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',vd)
set uZ=SZ()
call i2(uZ,W1(256,$4D80))
set j=0
loop
exitwhen j>3
call i2(uZ,W1(384,$4E00-($80*j)))
if j<=2 then
call i2(uZ,W1($80+($80*j),$4C00))
endif
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',ed)
set uZ=SZ()
call i2(uZ,W1(512,$4900))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($D,4)
call q2('IOic',xd)
set uZ=SZ()
call i2(uZ,W1($A00,$4800))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',od)
set uZ=SZ()
call i2(uZ,W1($E80,$4C80))
call i2(uZ,W1(4224,$4600))
call i2(uZ,W1(5376,$4680))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',rd)
set uZ=SZ()
call i2(uZ,W1(5248,$4D00))
call i2(uZ,W1(5248+$80,$4D00))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($D,5)
call q2('IOic',ad)
set uZ=SZ()
call i2(uZ,W1(6400,$4300))
call i2(uZ,W1(8832,$4600))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',nd)
set uZ=SZ()
call i2(uZ,W1(6912,$4200))
call i2(uZ,W1(7168,$4280))
call i2(uZ,W1(7168,$4280+$80))
call i2(uZ,W1(7168,$4280+256))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',Vd)
set uZ=SZ()
call i2(uZ,W1(8704,$4780))
call i2(uZ,W1(6784,$4780))
call i2(uZ,W1(6784+$80,$4780))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($D,6)
call q2('IOic',Ed)
set uZ=SZ()
call i2(uZ,W1($3400,$4700))
call i2(uZ,W1(9984,$4980))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',Xd)
set uZ=SZ()
call i2(uZ,W1(9472,$4B80))
call i2(uZ,W1($3100,$4680))
call i2(uZ,W1($3180,$4880))
set j=0
loop
exitwhen not(j<3)
call i2(uZ,W1($3180,$4600+($80*j)))
if j<2 then
call i2(uZ,W1($2980+($80*j),$4900))
endif
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',Od)
set uZ=SZ()
set j=0
loop
exitwhen not(j<3)
call i2(uZ,W1(9600,$4600+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',Rd)
set uZ=SZ()
call i2(uZ,W1($2E00,$4300))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($D,7)
call q2('IOic',Id)
set uZ=SZ()
call i2(uZ,W1($3880,$4A00))
call i2(uZ,W1($4580,$4880))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',Ad)
set uZ=SZ()
call i2(uZ,W1($3A00,$4980))
call i2(uZ,W1($3B80,$4980))
call i2(uZ,W1($3E80,$4980))
call i2(uZ,W1($3E80+256,$4980))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',Nd)
set uZ=SZ()
call i2(uZ,W1($3780,$4680))
call i2(uZ,W1($3780+$80,$4680))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',bd)
set uZ=SZ()
set j=0
loop
exitwhen not(j<5)
call i2(uZ,W1($4200+($80*j),$4B00))
set j=j+1
endloop
call i2(uZ,W1($4180,$4A80))
call i2(uZ,W1($4180+$80,$4A80))
call i2(uZ,W1($4380,$4B80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($D,8)
call q2('IOic',dQ)
set uZ=SZ()
call i2(uZ,W1($4C00,$4B80))
call i2(uZ,W1($5900,$4F80))
call i2(uZ,W1($5900+$80,$4F80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',DQ)
set uZ=SZ()
set T2=SZ()
call i2(uZ,W1($5800,$4C00))
call i2(uZ,W1($5800,$4C00-$80))
call i2(uZ,W1($5800,$4C00-256))
call i2(uZ,W1($5A00,$4D80))
call i2(uZ,W1($5A00,$4D80-$80))
call i2(T2,W1($5700,$4880))
call i2(T2,W1($5700+$80,$4880+$80))
call p2(uZ,"Remove")
call p2(T2,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',fQ)
set uZ=SZ()
call i2(uZ,W1($5900,$4F00))
call i2(uZ,W1($5900+$80,$4F00))
call i2(uZ,W1($5700,$4C00+64))
call i2(uZ,W1($5700+$80,$4C00+64))
call p2(uZ,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
endfunction
function U2 takes nothing returns nothing
local integer j=0
local integer uZ
local integer T2
local trigger t=CreateTrigger()
call M2()
call S2(1,5)
call q2('IOic',gc)
set uZ=SZ()
call i2(uZ,W1(9984,-6528))
call i2(uZ,W1(9984,-6656))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(1,6)
call q2('IOic',Gc)
set uZ=SZ()
set j=0
loop
exitwhen j>5
call i2(uZ,W1($3200+($80*j),-5504))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',hc)
set uZ=SZ()
set j=0
loop
exitwhen j>6
call i2(uZ,W1($2E00+($80*j),-6016))
set j=j+1
endloop
set j=0
set j=0
loop
exitwhen j>6
call i2(uZ,W1($2D80+($80*j),-6528))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(1,3)
call q2('IOic',fc)
set uZ=SZ()
call i2(uZ,W1($880,-6272))
call i2(uZ,W1($880,-6400))
call i2(uZ,W1($880,-6528))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',Fc)
set uZ=SZ()
call i2(uZ,W1($A80,-7424))
call i2(uZ,W1($A80,-7552))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(1,7)
call q2('IOic',Hc)
set uZ=SZ()
call i2(uZ,W1($3800,-6912))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(1,8)
call q2('IOic',jc)
set uZ=SZ()
call i2(uZ,W1(-6272,-4480))
call i2(uZ,W1(-6272,-4608))
call i2(uZ,W1(-6272,-4736))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',Jc)
set uZ=SZ()
call i2(uZ,W1(-5120,-4480))
call i2(uZ,W1(-5120,-4608))
call i2(uZ,W1(-5120,-4736))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',kc)
set uZ=SZ()
call i2(uZ,W1(-4096,-4480))
call i2(uZ,W1(-4096,-4608))
call i2(uZ,W1(-4096,-4736))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(2,1)
call q2('IOic',Bd)
set uZ=SZ()
call i2(uZ,W1(-7424,-512))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(2,2)
call q2('IOic',cd)
set uZ=SZ()
call i2(uZ,W1(-4992,-384))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',Cd)
set uZ=SZ()
call i2(uZ,W1(-$980,-$500))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',dd)
set uZ=SZ()
call i2(uZ,W1(-$580,-256))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(2,3)
call q2('IOic',Dd)
set uZ=SZ()
call i2(uZ,W1(-$500,-$C00))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',fd)
set uZ=SZ()
set j=0
loop
exitwhen j>5
if j<2 or j>3 then
call i2(uZ,W1(896+($80*j),-$D00))
endif
set j=j+1
endloop
set j=0
set j=0
loop
exitwhen j>2
call i2(uZ,W1($A80,-$E80-($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',Fd)
set uZ=SZ()
call i2(uZ,W1(768,-$F00))
call i2(uZ,W1(4352,-4352))
call i2(uZ,W1(4352,-4480))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(2,4)
call q2('IOic',gd)
set uZ=SZ()
call i2(uZ,W1(-384,-$580))
call i2(uZ,W1(-384,-$600))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(2,5)
call q2('IOic',Gd)
set uZ=SZ()
call i2(uZ,W1(8448,-$680))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',hd)
set uZ=SZ()
call i2(uZ,W1(7552,-$800))
call i2(uZ,W1(7680,-$800))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(2,6)
call q2('IOic',Hd)
set uZ=SZ()
call i2(uZ,W1(9472,-$B80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',jd)
set uZ=SZ()
call i2(uZ,W1($2780,-$B80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',Jd)
set uZ=SZ()
call i2(uZ,W1($2A00,-$B80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',kd)
set uZ=SZ()
call i2(uZ,W1($2E00,-$B00))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(2,7)
call q2('IOic',Kd)
set uZ=SZ()
call i2(uZ,W1($3C00,-$B00))
call i2(uZ,W1($3C00,-$B80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(2,8)
call q2('IOic',ld)
set uZ=SZ()
call i2(uZ,W1(5760+$80,-$80))
call i2(uZ,W1(5760+$80,-256))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(3,1)
call q2('IOic',Ld)
set uZ=SZ()
call i2(uZ,W1(-5504,$C00))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(3,2)
call q2('IOic',md)
set uZ=SZ()
call i2(uZ,W1(-$A00,4352))
call i2(uZ,W1(-$A00,4480))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',Md)
set uZ=SZ()
call i2(uZ,W1(-$C80,$B80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(3,3)
call q2('IOic',pd)
set uZ=SZ()
call i2(uZ,W1($B00,4224))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(3,4)
call q2('IOic',Pd)
set uZ=SZ()
call i2(uZ,W1(-4224,4608))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',qd)
set uZ=SZ()
call i2(uZ,W1(-$D00,7168))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(3,6)
call q2('IOic',Qd)
set uZ=SZ()
call i2(uZ,W1(4480,5120))
set j=0
loop
exitwhen j>7
call i2(uZ,W1($B00+($80*j),6912))
if j<=2 then
call i2(uZ,W1($700,6144-($80*j)))
endif
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',sd)
set uZ=SZ()
set j=0
loop
exitwhen j>4
call i2(uZ,W1($D00+($80*j),4992))
call i2(uZ,W1($780+($80*j),6912))
set j=j+1
endloop
set j=0
set j=0
loop
exitwhen j>2
call i2(uZ,W1($F00,6400-($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',Sd)
set uZ=SZ()
set j=0
loop
exitwhen j>3
call i2(uZ,W1($C80,5632-($80*j)))
if j!=3 then
call i2(uZ,W1($E00,6272-($80*j)))
endif
set j=j+1
endloop
set j=0
set j=0
loop
exitwhen j>4
call i2(uZ,W1($F80+($80*j),6016))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',td)
set uZ=SZ()
set j=0
loop
exitwhen j>16
call i2(uZ,W1(-$500+($80*j),6400))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(3,8)
call q2('IOic',Ud)
set uZ=SZ()
call i2(uZ,W1(5504,$F00))
set j=0
loop
exitwhen j>2
call i2(uZ,W1(5376,$F00-($80*j)))
call i2(uZ,W1(5632,$F00-($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',wd)
set uZ=SZ()
set j=0
loop
exitwhen j>2
call i2(uZ,W1(6784+($80*j),5504))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(3,7)
call q2('IOic',Td)
set uZ=SZ()
set j=0
loop
exitwhen j>$E
call i2(uZ,W1(9600+($80*j),6528))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',ud)
set uZ=SZ()
set j=0
loop
exitwhen j>$D
call i2(uZ,W1($3080+($80*j),$680))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(4,1)
call q2('IOic',Wd)
set uZ=SZ()
call i2(uZ,W1(-7168,-$2A00))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',yd)
set uZ=SZ()
call i2(uZ,W1(-7552,-$3100))
set j=0
loop
exitwhen j>4
call i2(uZ,W1(-6656+($80*j),-$2F77))
if j<3 then
call i2(uZ,W1(-6144,-$2F00+($80*j)))
endif
if j<2 then
call i2(uZ,W1(-5376,-$2F00+($80*j)))
endif
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',Yd)
set uZ=SZ()
set j=0
loop
exitwhen j>2
call i2(uZ,W1(-5760+($80*j),-$2F77))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(4,2)
call q2('IOic',zd)
set uZ=SZ()
call i2(uZ,W1(-4096,-$2F80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',Zd)
set uZ=SZ()
set j=0
loop
exitwhen j>4
call i2(uZ,W1(-$E00+($80*j),-$2A00))
if j<4 then
call i2(uZ,W1(-$700,-$2B00+($80*j)))
endif
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(4,3)
call q2('IOic',vD)
set uZ=SZ()
set j=0
loop
exitwhen j>6
if j!=1 then
call i2(uZ,W1($500,-$2A00+($80*j)))
endif
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',eD)
set uZ=SZ()
call i2(uZ,W1(384,-$3080))
call i2(uZ,W1(256,-$2E00))
call i2(uZ,W1(384,-$2E00))
set j=0
loop
exitwhen j>$B
call i2(uZ,W1($680,-$3080+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',xD)
set uZ=SZ()
set j=0
loop
exitwhen j>2
call i2(uZ,W1($C00+($80*j),-$2E00))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(4,5)
call q2('IOic',oD)
set uZ=SZ()
set j=0
loop
exitwhen j>1
call i2(uZ,W1($2D00,-$3000+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',rD)
set uZ=SZ()
set j=0
loop
exitwhen j>1
call i2(uZ,W1($2E00,-$3000+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',iD)
set uZ=SZ()
set j=0
loop
exitwhen j>1
call i2(uZ,W1($2F00,-$3000+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',aD)
set uZ=SZ()
set j=0
loop
exitwhen j>5
call i2(uZ,W1(8320,-$3000+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(4,6)
call q2('IOic',nD)
set uZ=SZ()
call i2(uZ,W1($3B80,-$2D80))
call i2(uZ,W1($3900,-$2E00))
call i2(uZ,W1($3B80,-$2E80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',VD)
set uZ=SZ()
set j=0
loop
exitwhen j>2
call i2(uZ,W1($3880,-$3100+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',ED)
set uZ=SZ()
call i2(uZ,W1($3200,-$2C80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(4,7)
call q2('IOic',XD)
set uZ=SZ()
set j=0
loop
exitwhen j>2
call i2(uZ,W1($2B00+($80*j),-$2A00))
call i2(uZ,W1($2C80,-$2A00+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',OD)
set uZ=SZ()
set j=0
loop
exitwhen j>2
call i2(uZ,W1($2D00+($80*j),-$2A00))
call i2(uZ,W1($2E80,-$2A00+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',RD)
set uZ=SZ()
set j=0
loop
exitwhen j>2
call i2(uZ,W1($2F00+($80*j),-$2A00))
call i2(uZ,W1($3080,-$2A00+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(5,3)
call q2('OOal',CD)
set uZ=SZ()
set j=0
loop
exitwhen j>1
call i2(uZ,W1($80,-$3E80+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('IOic',BD)
set uZ=SZ()
set j=0
loop
exitwhen j>2
call i2(uZ,W1($C80,-$3980+($80*j)))
call i2(uZ,W1(256+($80*j),-$3880))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',cD)
set uZ=SZ()
call i2(uZ,W1($F00,-$3B00))
set j=0
loop
exitwhen j>1
call i2(uZ,W1(0,-$3E80+($80*j)))
call i2(uZ,W1($B00,-$3F00+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(5,1)
call q2('IOic',ID)
set uZ=SZ()
call i2(uZ,W1(-7424,-$3980))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',AD)
set uZ=SZ()
set j=0
loop
exitwhen j>2
call i2(uZ,W1(-4224+($80*j),-$3A00))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(5,2)
call q2('IOic',ND)
set uZ=SZ()
call i2(uZ,W1(-$D80,-$3880))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',bD)
set uZ=SZ()
set j=0
loop
exitwhen j>1
call i2(uZ,W1(-$580+($80*j),-$3D80))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(5,4)
call q2('IOic',dD)
set uZ=SZ()
set j=0
loop
exitwhen j>2
call i2(uZ,W1(5248,-$3B80+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',DD)
set uZ=SZ()
set j=0
loop
exitwhen j>2
call i2(uZ,W1(7168+($80*j),-$3D00))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',fD)
set uZ=SZ()
set j=0
loop
exitwhen j>2
call i2(uZ,W1(4480+($80*j),-$3880))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(5,5)
call q2('IOic',FD)
set uZ=SZ()
call i2(uZ,W1(8832,-$3980))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',gD)
set uZ=SZ()
call i2(uZ,W1(9728,-$3C80))
call i2(uZ,W1($2D00,-$3E00))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(5,6)
call q2('IOic',GD)
set uZ=SZ()
call i2(uZ,W1($3D80,-$3D80))
set j=0
loop
exitwhen j>2
call i2(uZ,W1($2F00,-$3D00+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(5,7)
call q2('IOic',hD)
set uZ=SZ()
set j=0
loop
exitwhen j>1
call i2(uZ,W1(-7552+($80*j),-$4780))
call i2(uZ,W1(-7552+($80*j),-$4480))
set j=j+1
endloop
call i2(uZ,W1(-6272,-$4680))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',HD)
set uZ=SZ()
call i2(uZ,W1(-6016,-$4400))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(5,8)
call q2('IOic',jD)
set uZ=SZ()
call i2(uZ,W1(-5376,-$4B80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',JD)
set uZ=SZ()
set j=0
loop
exitwhen j>6
call i2(uZ,W1(-4480+($80*j),-$4600))
call i2(uZ,W1(-4480+($80*j),-$4480))
set j=j+1
endloop
call i2(uZ,W1(-$D80,-$4480))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(6,1)
call q2('IOic',kD)
set uZ=SZ()
set j=0
loop
exitwhen j>1
call i2(uZ,W1(-6144,-$5B00+($80*j)))
set j=j+1
endloop
call i2(uZ,W1(-4608,-$5B80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(6,2)
call q2('IOic',KD)
set uZ=SZ()
call i2(uZ,W1(-$700,-$5700))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',lD)
set uZ=SZ()
set j=0
loop
exitwhen j>1
call i2(uZ,W1(-$780,-$5C00+($80*j)))
call i2(uZ,W1(-$600,-$5C00+($80*j)))
call i2(uZ,W1(-384,-$5C00+($80*j)))
call i2(uZ,W1(640,-$5C00+($80*j)))
set j=j+1
endloop
call i2(uZ,W1(-$D80,-$5300))
call i2(uZ,W1(-$B00,-$5980))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',LD)
set uZ=SZ()
call i2(uZ,W1(-$C80,-$5700))
call i2(uZ,W1($980,-$5800))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',mD)
set uZ=SZ()
set j=0
loop
exitwhen j>2
call i2(uZ,W1(-$F00+($80*j),-$5980))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(6,3)
call q2('IOic',MD)
set uZ=SZ()
call i2(uZ,W1(-$480,-$5180))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(6,4)
call q2('IOic',pD)
set uZ=SZ()
call i2(uZ,W1(4736,-$5700))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',PD)
set uZ=SZ()
set j=0
loop
exitwhen j>2
call i2(uZ,W1(8448+($80*j),-$5980))
if j!=2 then
call i2(uZ,W1(8192,-$5C00+($80*j)))
endif
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(6,5)
call q2('IOic',qD)
set uZ=SZ()
call i2(uZ,W1(9984,-$5B80))
set j=0
loop
exitwhen j>1
call i2(uZ,W1($2B80,-$5C00+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(6,6)
call q2('IOic',QD)
set uZ=SZ()
call i2(uZ,W1($3900,-$5500))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',sD)
set uZ=SZ()
set j=0
loop
exitwhen j>2
call i2(uZ,W1($3600,-$5600+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(6,7)
call q2('IOic',SD)
set uZ=SZ()
set j=0
loop
exitwhen j>1
call i2(uZ,W1(8192,-$4B80+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',tD)
set uZ=SZ()
set j=0
loop
exitwhen j>1
call i2(uZ,W1(8704,-$5100+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',TD)
set uZ=SZ()
set j=0
loop
exitwhen j>1
call i2(uZ,W1(7040,-$4900+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(6,8)
call q2('IOic',uD)
set uZ=SZ()
call i2(uZ,W1($2D00,-$4B00))
call i2(uZ,W1($2980,-$4F80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',UD)
set uZ=SZ()
call i2(uZ,W1($2900,-$4B00))
call i2(uZ,W1($2D00,-$4E80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',wD)
set uZ=SZ()
call i2(uZ,W1($2E00,-$4E80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',WD)
set uZ=SZ()
set j=0
loop
exitwhen j>1
call i2(uZ,W1($2E80+($80*j),-$4F00))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(7,1)
call q2('IOic',yD)
set uZ=SZ()
call i2(uZ,W1(-7424,-$6200))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',YD)
set uZ=SZ()
call i2(uZ,W1(-4992,-$6880))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',zD)
set uZ=SZ()
call i2(uZ,W1(-7424,-$6980))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(7,2)
call q2('IOic',ZD)
set uZ=SZ()
call i2(uZ,W1(-4480,-$6C80))
call i2(uZ,W1(-$B80,-$6B00))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',vf)
set uZ=SZ()
call i2(uZ,W1(-$E80,-$6980))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',ef)
set uZ=SZ()
call i2(uZ,W1(-4224,-$6380))
call i2(uZ,W1(-4224,-$6480))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(7,3)
call q2('IOic',xf)
set uZ=SZ()
call i2(uZ,W1(-512,-$6C80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',of)
set uZ=SZ()
set j=0
loop
exitwhen j>3
call i2(uZ,W1(-512,-$6880+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',rf)
set uZ=SZ()
call i2(uZ,W1(-256,-$6600))
call i2(uZ,W1(-384,-$6600))
call i2(uZ,W1(-256,-$6480))
set j=0
loop
exitwhen j>2
call i2(uZ,W1(-$700+($80*j),-$6700))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(7,4)
call q2('IOic',af)
set uZ=SZ()
call i2(uZ,W1(640,-$6780))
call i2(uZ,W1(896,-$6500))
call i2(uZ,W1($600,-$6500))
call i2(uZ,W1($880,-$6900))
call i2(uZ,W1($880,-$6980))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(7,5)
call q2('IOic',nf)
set uZ=SZ()
call i2(uZ,W1($F80,-$6380))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',Vf)
set uZ=SZ()
call i2(uZ,W1(4608,-$6580))
call i2(uZ,W1(4736,-$6580))
call i2(uZ,W1(4608,-$6300))
call i2(uZ,W1(4736,-$6300))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',Ef)
set uZ=SZ()
call i2(uZ,W1(5248,-$6800))
call i2(uZ,W1(5376,-$6B00))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',Xf)
set uZ=SZ()
call i2(uZ,W1(7808,-$6400))
call i2(uZ,W1(7936,-$6400))
call i2(uZ,W1(7808,-$6800))
call i2(uZ,W1(7936,-$6800))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(7,6)
call q2('IOic',Of)
set uZ=SZ()
set j=0
loop
exitwhen j>2
call i2(uZ,W1(7808+($80*j),-$6A80))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',Rf)
set uZ=SZ()
set j=0
loop
exitwhen j>3
if j<=1 then
call i2(uZ,W1($2900+($80*j),-$6300))
endif
call i2(uZ,W1(9856,-$6500+($80*j)))
set j=j+1
endloop
call i2(uZ,W1($2900,-$6500))
call i2(uZ,W1(9216,-$6700))
call i2(uZ,W1(7680,-$6B80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',If)
set uZ=SZ()
call i2(uZ,W1(9344,-$6300))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(7,8)
call q2('IOic',Bf)
set uZ=SZ()
call i2(uZ,W1(-6272,-$7780))
call i2(uZ,W1(-6144,-$7780))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',cf)
set uZ=SZ()
call i2(uZ,W1(-5888,-$7380))
call i2(uZ,W1(-5888,-$7300))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',Cf)
set uZ=SZ()
call i2(uZ,W1(-7552,-$7700))
set j=0
loop
exitwhen j>6
call i2(uZ,W1(-7424+($80*j),-$7500))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',df)
set uZ=SZ()
set j=0
loop
exitwhen j>6
call i2(uZ,W1(-7424+($80*j),-$7680))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(7,7)
call q2('IOic',Af)
set uZ=SZ()
call i2(uZ,W1(-$880,-$7580))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',Nf)
set uZ=SZ()
set j=0
loop
exitwhen j>2
call i2(uZ,W1(-$A80+($80*j),-$7080))
if j<=1 then
call i2(uZ,W1(-$880,-$7000+($80*j)))
call i2(uZ,W1(-$980,-$7000+($80*j)))
endif
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',bf)
set uZ=SZ()
set j=0
loop
exitwhen j>5
call i2(uZ,W1(-$900+($80*j),-$7080))
if j<=1 then
call i2(uZ,W1(-$680,-$7000+($80*j)))
call i2(uZ,W1(-$580,-$7000+($80*j)))
endif
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(8,1)
call q2('IOic',Df)
set uZ=SZ()
call i2(uZ,W1(-5504,9344))
call i2(uZ,W1(-4864,9344))
call i2(uZ,W1(-4480,9344))
call i2(uZ,W1(-$F00,9344))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',ff)
set uZ=SZ()
set j=0
loop
exitwhen j>3
call i2(uZ,W1(-5632+(512*j),9344))
set j=j+1
endloop
call i2(uZ,W1(-$E00,$2780))
call i2(uZ,W1(-4480,$2980))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',Ff)
set uZ=SZ()
set j=0
loop
exitwhen j>3
call i2(uZ,W1(-5632+(512*j),9216))
call i2(uZ,W1(-5632+(512*j),9472))
call i2(uZ,W1(-5632+(512*j),9600))
call i2(uZ,W1(-5632+(512*j),9728))
call i2(uZ,W1(-5632+(512*j),9984))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(8,2)
call q2('IOic',Gf)
set uZ=SZ()
call i2(uZ,W1(-896,9728))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',hf)
set uZ=SZ()
call i2(uZ,W1(384,9344))
call i2(uZ,W1(384,9216))
call i2(uZ,W1($A80,9984))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',Hf)
set uZ=SZ()
call i2(uZ,W1(512,$2980))
call i2(uZ,W1(512,$2900))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',jf)
set uZ=SZ()
call i2(uZ,W1($A80,$2900))
call i2(uZ,W1($A80,$2980))
call i2(uZ,W1($A80,$2A00))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(8,3)
call q2('IOic',Jf)
set uZ=SZ()
call i2(uZ,W1(6144,9472))
set j=0
loop
exitwhen j>3
call i2(uZ,W1(6528,9600+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',kf)
set uZ=SZ()
call i2(uZ,W1(7296,9472))
set j=0
loop
exitwhen j>3
call i2(uZ,W1(7680,9600+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',Kf)
set uZ=SZ()
call i2(uZ,W1(8192,9472))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(8,4)
call q2('IOic',lf)
set uZ=SZ()
set j=0
loop
exitwhen j>3
call i2(uZ,W1($2D80+($80*j),$2800))
call i2(uZ,W1($2F00,$2800+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',Lf)
set uZ=SZ()
set j=0
loop
exitwhen j>3
call i2(uZ,W1($2F80+($80*j),$2800))
call i2(uZ,W1($3280+($80*j),$2780))
call i2(uZ,W1($3280+($80*j),$2B00))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(8,5)
call q2('IOic',mf)
set uZ=SZ()
call i2(uZ,W1(-7296,$3280))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(8,6)
call q2('IOic',Mf)
set uZ=SZ()
call i2(uZ,W1(-$F00,$3A00))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',pf)
set uZ=SZ()
set j=0
loop
exitwhen j>3
call i2(uZ,W1(-$780,$3E00+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',Pf)
set uZ=SZ()
set j=0
loop
exitwhen j>3
call i2(uZ,W1(-$400,$3C00+($80*j)))
if j<=1 then
call i2(uZ,W1(-896,$3E00+($80*j)))
endif
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',qf)
set uZ=SZ()
set j=0
loop
exitwhen j>3
call i2(uZ,W1(-640,$3C00+($80*j)))
if j<=1 then
call i2(uZ,W1(-384,$3E00+($80*j)))
endif
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(8,7)
call q2('IOic',Qf)
set uZ=SZ()
call i2(uZ,W1($580,$3680))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',sf)
set uZ=SZ()
set j=0
loop
exitwhen j>1
call i2(uZ,W1(4096,$3600+($80*j)))
set j=j+1
endloop
call i2(uZ,W1($A80,$3900))
call i2(uZ,W1($980,$3800))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',Sf)
set uZ=SZ()
set j=0
loop
exitwhen j>2
call i2(uZ,W1(5760+($80*j),$3680))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(9,1)
call q2('IOic',tf)
set uZ=SZ()
call i2(uZ,W1($4A80,-$BFF))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',Tf)
set uZ=SZ()
call i2(uZ,W1($4301,-$87F))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(9,2)
call q2('IOic',uf)
set uZ=SZ()
call i2(uZ,W1($5901,4483))
call i2(uZ,W1($5A7C,4483))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(9,3)
call q2('IOic',Uf)
set uZ=SZ()
call i2(uZ,W1($6300,256))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',wf)
set uZ=SZ()
call i2(uZ,W1($6900,-256))
call i2(uZ,W1($6900,-256-$80))
call i2(uZ,W1($61FF,$4FF))
call i2(uZ,W1($63FF,$780))
call i2(uZ,W1($63FF,$7FC))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',Wf)
set uZ=SZ()
set j=0
loop
exitwhen j>6
call i2(uZ,W1($68FD+($80*j),$47C))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(9,4)
call q2('IOic',yf)
set uZ=SZ()
call i2(uZ,W1($4480,4224))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',Yf)
set uZ=SZ()
call i2(uZ,W1($4401,5761))
call i2(uZ,W1($5100,6528))
call i2(uZ,W1($5100,6528+$80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',zf)
set uZ=SZ()
set j=0
loop
exitwhen j>2
call i2(uZ,W1($4B00+($80*j),6784))
if j<2 then
call i2(uZ,W1($5180,6528+($80*j)))
endif
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(9,5)
call q2('IOic',Zf)
set uZ=SZ()
call i2(uZ,W1($6580,8064))
call i2(uZ,W1($6400,6912))
call i2(uZ,W1($6700,5888))
call i2(uZ,W1($6880,$F00))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',vF)
set uZ=SZ()
call i2(uZ,W1($6700,6912))
call i2(uZ,W1($6700+$80,6912))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',eF)
set uZ=SZ()
call i2(uZ,W1($6600,5506))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(9,6)
call q2('IOic',xF)
set uZ=SZ()
call i2(uZ,W1($5000,-5760))
call i2(uZ,W1($4E00,-5760))
call i2(uZ,W1($4400,-7040))
call i2(uZ,W1($5180,-4736))
call i2(uZ,W1($5000,-4736))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',oF)
set uZ=SZ()
call i2(uZ,W1($4B00,-8192))
call i2(uZ,W1($4B00+$80,-8192))
call i2(uZ,W1($4B00,-8192+$80))
call i2(uZ,W1($4B00+$80,-8192+$80))
call i2(uZ,W1($4600,-7168))
call i2(uZ,W1($4600+$80,-7168))
call i2(uZ,W1($4D01,-6526))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',rF)
set uZ=SZ()
call i2(uZ,W1($4780,-7808))
call i2(uZ,W1($4780+$80,-7808))
call i2(uZ,W1($5280,-5760))
call i2(uZ,W1($5680,-5760))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',iF)
set uZ=SZ()
call i2(uZ,W1($5000,-8192))
call i2(uZ,W1($5000,-8192+$80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(9,7)
call q2('IOic',aF)
set uZ=SZ()
call i2(uZ,W1($4980,$700))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',nF)
set uZ=SZ()
call i2(uZ,W1($4380,$800))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',VF)
set uZ=SZ()
call i2(uZ,W1($4380,256))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2(9,8)
call q2('IOic',EF)
set uZ=SZ()
call i2(uZ,W1($5900,256))
call i2(uZ,W1($5980,768))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',XF)
set uZ=SZ()
call i2(uZ,W1($587F,-$406))
call i2(uZ,W1($587F,-$406+$80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',OF)
set uZ=SZ()
set j=0
loop
exitwhen j>3
call i2(uZ,W1($5480+($80*j),$80))
if j<3 then
call i2(uZ,W1($5480,$80+($80*j)))
endif
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',RF)
set uZ=SZ()
call i2(uZ,W1($5900,$700))
call i2(uZ,W1($5900+$80,$700))
call i2(uZ,W1($5280,-768))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($A,1)
call q2('IOic',Kc)
set uZ=SZ()
call i2(uZ,W1($4800,-9344))
call i2(uZ,W1($4580,-9472))
call p2(uZ,"Remove")
set uZ=SZ()
set j=0
loop
exitwhen j>4
call i2(uZ,W1($4700+($80*j),-$2B80))
set j=j+1
endloop
call p2(uZ,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',lc)
set uZ=SZ()
set T2=SZ()
set j=0
loop
exitwhen j>4
if j<3 then
call i2(uZ,W1($4B00+($80*j),-9600))
endif
call i2(uZ,W1($4D80+($80*j),-9600))
call i2(T2,W1($4780+($80*j),-$2B00))
set j=j+1
endloop
call p2(uZ,"Remove")
call p2(T2,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($A,2)
call q2('IOic',Lc)
set uZ=SZ()
call i2(uZ,W1($4300,-$3400))
call i2(uZ,W1($4300,-$3400+$80))
call i2(uZ,W1($4300-$80,-$3400))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',mc)
set uZ=SZ()
call i2(uZ,W1($4300,-$3500))
call i2(uZ,W1($4300,-$3500+$80))
call i2(uZ,W1($4300-$80,-$3500))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',Mc)
set uZ=SZ()
call i2(uZ,W1($4D80,-$3480))
call i2(uZ,W1($4D80,-$3480+$80))
call i2(uZ,W1($4D80-$80,-$3480))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($A,3)
call q2('IOic',pc)
set uZ=SZ()
set T2=SZ()
call i2(uZ,W1($6480,-$2980))
set j=0
loop
exitwhen j>6
call i2(T2,W1($6380+($80*j),-9856))
set j=j+1
endloop
call p2(uZ,"Remove")
call p2(T2,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',Pc)
set T2=SZ()
set j=0
loop
exitwhen j>6
call i2(T2,W1($6380+($80*j),-9728))
if j<4 then
call i2(T2,W1($6400+($80*j),-$2C00))
endif
set j=j+1
endloop
call i2(T2,W1($6A80,-$2B80))
call i2(T2,W1($6A80+($80*2),-$2B80))
call p2(T2,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',qc)
set uZ=SZ()
set T2=SZ()
call i2(uZ,W1($6C80,-$2D00))
call i2(uZ,W1($6C80+$80,-$2D00))
call i2(uZ,W1($6C80,-$2D00+$80))
call i2(T2,W1($6300,-$2E00))
call i2(T2,W1($6300,-$2E00+$80))
call i2(T2,W1($6C80,-$2B80))
call i2(T2,W1($6C80+$80,-$2B80))
call p2(uZ,"Remove")
call p2(T2,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',Qc)
set uZ=SZ()
call i2(uZ,W1($6600,-$2F80))
call i2(uZ,W1($6800,-9216))
call i2(uZ,W1($6800,-9216+$80))
call i2(uZ,W1($6800-$80,-9216))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($A,4)
call q2('IOic',sc)
set uZ=SZ()
set T2=SZ()
call i2(uZ,W1($4700,-$3D80+$80))
set j=0
loop
exitwhen j>3
call i2(T2,W1($4B80+($80*j),-$4380))
call i2(uZ,W1($4700+($80*j),-$3D80))
set j=j+1
endloop
call p2(uZ,"Remove")
call p2(T2,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',Sc)
set T2=SZ()
call i2(T2,W1($4B80,-$4300))
call i2(T2,W1($4B80+$80,-$4300))
call p2(T2,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',tc)
set uZ=SZ()
set j=0
loop
exitwhen j>3
call i2(uZ,W1($4E80,-$4180+($80*j)))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',Tc)
set uZ=SZ()
set T2=SZ()
call i2(uZ,W1($4380,-$4000))
call i2(T2,W1($4B80,-$4280))
set j=0
loop
exitwhen j>5
call i2(uZ,W1($4A00+($80*j),-$3E00))
set j=j+1
endloop
call p2(uZ,"Remove")
call p2(T2,"Create")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call S2($A,5)
call q2('IOic',uc)
set uZ=SZ()
call i2(uZ,W1($5F00,-4480))
call i2(uZ,W1($5EFF,-4480-$80))
call i2(uZ,W1($5EFF,-4480-($80*2)))
call i2(uZ,W1($6000,-4352))
call i2(uZ,W1($6080,-4480))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('LOtr',Uc)
set uZ=SZ()
set j=0
loop
exitwhen j>6
call i2(uZ,W1($5680+($80*j),-$D00))
set j=j+1
endloop
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('OOal',wc)
set uZ=SZ()
call i2(uZ,W1($5500,-$700))
call i2(uZ,W1($6000,-$900))
call i2(uZ,W1($6000+$80,-$900+$80))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call q2('YOsa',Wc)
set uZ=SZ()
call i2(uZ,W1($6500,-$E00))
call i2(uZ,W1($6500+$80,-$E00))
call i2(uZ,W1($6500,-$C80))
call i2(uZ,W1($5F80,-$D00))
call i2(uZ,W1($5F80-$80,-$D00))
call i2(uZ,W1($5F80,-$D00+$80))
call i2(uZ,W1($5F80,-$D00+($80*2)))
call p2(uZ,"Remove")
call J2(JU,G2(MU,mU,kU,KU))
call SaveInteger(GU,(lU),(LU),(JU))
call U1()
call TriggerRegisterTimerEvent(t,.0,false)
call TriggerAddAction(t,function t2)
set t=null
endfunction
function w2 takes nothing returns nothing
local integer i=1
loop
exitwhen jv[i]==null
if Gv[i] then
set Gv[i]=false
call SetUnitVertexColor(hv[i],$FF,$FF,$FF,$96)
call SetDoodadAnimationRect(jv[i],'LOcb',"Stand",false)
call SetDoodadAnimationRect(jv[i],'LOss',"Stand",false)
endif
set i=i+1
endloop
endfunction
function W2 takes nothing returns nothing
local integer i=1
local integer j=GetPlayerId(GetOwningPlayer(GetTriggerUnit()))+1
local integer Y2
local real x
local real y
loop
exitwhen jv[i]==null
if GetTriggeringRegion()==Hv[i]and Gv[i]==false and j>=1 and j<=7 and Et[j]!=GetTriggerUnit()and nt[j]!=GetTriggerUnit()and Vt[j]!=GetTriggerUnit()and GetUnitTypeId(GetTriggerUnit())!=GetUnitTypeId(hv[i])then
set x=GetUnitX(at[j])
set y=GetUnitY(at[j])
if GetUnitTypeId(hv[i])=='hpea' then
if gv[j] then
if GetUnitTypeId(GetTriggerUnit())=='ohun' then
call PauseTimer(Xt[j])
endif
if GetUnitTypeId(GetTriggerUnit())=='ogru' or GetUnitTypeId(GetTriggerUnit())=='otau' then
set mv[j]=false
set Mv[j]=false
endif
call RemoveUnit(at[j])
set Y2=Rt[j]
set gv[j]=false
if i!=$F and i!=16 and i!=24 and i!=31 and i!=60 and i!=63 then
call SetDoodadAnimationRect(jv[i],'LOcb',"Death",false)
endif
else
return
endif
else
if(GetUnitTypeId(GetTriggerUnit())=='ogru' or GetUnitTypeId(GetTriggerUnit())=='otau')and GetUnitTypeId(hv[i])!='ogru' and GetUnitTypeId(hv[i])!='otau' then
set mv[j]=false
set Mv[j]=false
endif
if GetUnitTypeId(GetTriggerUnit())=='ohun' then
call PauseTimer(Xt[j])
endif
call RemoveUnit(at[j])
set Y2=GetUnitTypeId(hv[i])
set gv[j]=true
if i!=$F and i!=16 and i!=24 and i!=31 and i!=60 and i!=63 then
call SetDoodadAnimationRect(jv[i],'LOss',"Death",false)
endif
endif
if i!=$F and i!=16 and i!=24 and i!=31 and i!=60 and i!=63 then
set Gv[i]=true
call SetUnitVertexColor(hv[i],$FF,$FF,$FF,0)
endif
call DestroyEffect(AddSpecialEffect("war3mapImported\\Morph.mdl",x,y))
call StopSound(CS,false,false)
call StartSound(CS)
if Y2=='orai' or Y2=='o001' then
set Qv[j]=0
endif
if P==false then
set at[j]=CreateUnit(Player(j-1),Y2,x,y,270)
else
set at[j]=CreateUnit(Player(j-1),Y2,x,y,90)
endif
if GetUnitTypeId(hv[i])=='orai' then
if qv[j]=="Left" then
if P==false then
call SetUnitAnimation(at[j],"Stand First")
else
call SetUnitAnimation(at[j],"Stand Second")
endif
else
if P==false then
call SetUnitAnimation(at[j],"Stand Second")
else
call SetUnitAnimation(at[j],"Stand First")
endif
endif
elseif GetUnitTypeId(hv[i])=='ogru' or GetUnitTypeId(hv[i])=='otau' then
if qv[j]=="Left" then
if P==false then
set mv[j]=true
set Mv[j]=false
else
set mv[j]=false
set Mv[j]=true
endif
else
if P==false then
set mv[j]=false
set Mv[j]=true
else
set mv[j]=true
set Mv[j]=false
endif
endif
endif
if P==false then
call SetCameraTargetControllerNoZForPlayer(Player(j-1),at[j],0,$80,false)
else
call SetCameraTargetControllerNoZForPlayer(Player(j-1),at[j],0,-$80,false)
endif
call SetUnitBlendTime(at[j],.0)
set SS[j]=0
endif
set i=i+1
endloop
endfunction
function z2 takes trigger t,integer Y2,rect r returns nothing
set Jv=Jv+1
if Y2!=0 then
set hv[Jv]=CreateUnit(Player($B),Y2,GetRectCenterX(r),GetRectCenterY(r),270)
call SetUnitVertexColor(hv[Jv],$FF,$FF,$FF,$96)
else
set hv[Jv]=null
endif
set Hv[Jv]=CreateRegion()
call RegionAddRect(Hv[Jv],r)
set jv[Jv]=r
call TriggerRegisterEnterRegion(t,Hv[Jv],null)
endfunction
function Z2 takes nothing returns nothing
local trigger t=CreateTrigger()
call z2(t,'orai',ig)
call z2(t,'hpea',ag)
call z2(t,'orai',ng)
call z2(t,'hpea',Vg)
call z2(t,'ocat',Eg)
call z2(t,'hpea',Xg)
call z2(t,'otau',Og)
call z2(t,'ogru',Rg)
call z2(t,'otau',Ig)
call z2(t,'hpea',Ag)
call z2(t,'ohun',Ng)
call z2(t,'hpea',bg)
call z2(t,'ohun',Bg)
call z2(t,'hpea',cg)
call z2(t,'ohun',Cg)
call z2(t,'orai',dg)
call z2(t,'otau',Dg)
call z2(t,'ohun',fg)
call z2(t,'hpea',Fg)
call z2(t,'hpea',gg)
call z2(t,'hpea',Gg)
call z2(t,'hpea',hg)
call z2(t,'hpea',Hg)
call z2(t,'otau',jg)
call z2(t,'orai',Jg)
call z2(t,'hpea',kg)
call z2(t,'ogru',Kg)
call z2(t,'ogru',lg)
call z2(t,'hpea',Lg)
call z2(t,'hpea',mg)
call z2(t,'hpea',Mg)
call z2(t,'ogru',pg)
call z2(t,'ogru',Pg)
call z2(t,'otau',qg)
call z2(t,'otau',Qg)
call z2(t,'ogru',sg)
call z2(t,'ogru',Sg)
call z2(t,'orai',tg)
call z2(t,'hpea',Tg)
call z2(t,'hpea',ug)
call z2(t,'ohun',Ug)
call z2(t,'hpea',wg)
call z2(t,'otau',Wg)
call z2(t,'ogru',yg)
call z2(t,'hpea',Yg)
call z2(t,'orai',zg)
call z2(t,'otau',Zg)
call z2(t,'ocat',vG)
call z2(t,'hpea',eG)
call z2(t,'hpea',xG)
call z2(t,'hpea',oG)
call z2(t,'ocat',rG)
call z2(t,'otau',iG)
call z2(t,'otau',aG)
call z2(t,'ocat',nG)
call z2(t,'otau',VG)
call z2(t,'otau',EG)
call z2(t,'otau',XG)
call z2(t,'otau',OG)
call z2(t,'hpea',RG)
call z2(t,'otau',IG)
call z2(t,'ocat',AG)
call z2(t,'orai',NG)
call z2(t,'otau',bG)
call z2(t,'ogru',BG)
call z2(t,'ogru',cG)
call z2(t,'ogru',CG)
call TriggerAddAction(t,function W2)
set t=null
endfunction
function v3 takes integer e3 returns nothing
local integer i=1
local real x
local real y
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set x=GetUnitX(Et[i])
set y=GetUnitY(Et[i])
call RemoveUnit(Et[i])
set Et[i]=CreateUnit(Player(i-1),e3,x,y,270)
if SubString("|",-1,0)!="o" and GetUnitTypeId(Et[i])!='hspt' then
call SetUnitScale(Et[i],4,4,4)
endif
call SetUnitVertexColorBJ(Et[i],.0,.0,.0,'d')
if Player(i-1)==GetLocalPlayer()then
call SetUnitVertexColorBJ(Et[i],100.,100.,100.,0)
endif
endif
set i=i+1
endloop
endfunction
function x3 takes integer K2,integer l2 returns nothing
call StopSound(Ee,false,true)
if K2==1 or(K2==8 and l2==1)then
set Ee=oS
call ForForce(bj_FORCE_ALL_PLAYERS,function E0)
call v3('hfoo')
elseif K2==2 or(K2==8 and l2==2)then
set Ee=ts
call ForForce(bj_FORCE_ALL_PLAYERS,function E0)
call v3('hkni')
elseif K2==3 or(K2==8 and l2==3)then
set Ee=Ts
call ForForce(bj_FORCE_ALL_PLAYERS,function E0)
call v3('hmtm')
elseif K2==4 or(K2==8 and l2==4)then
set Ee=iS
call ForForce(bj_FORCE_ALL_PLAYERS,function E0)
call v3('hsor')
elseif K2==5 or(K2==8 and l2==5)then
set Ee=VS
call ForForce(bj_FORCE_ALL_PLAYERS,function E0)
call v3('hspt')
elseif K2==6 or(K2==8 and l2==6)then
set Ee=IS
call ForForce(bj_FORCE_ALL_PLAYERS,function E0)
call v3('hdhw')
elseif K2==7 or(K2==8 and l2==7)then
set Ee=BS
call ForForce(bj_FORCE_ALL_PLAYERS,function E0)
call v3('ebal')
elseif K2==9 then
set Ee=lS
call ForForce(bj_FORCE_ALL_PLAYERS,function E0)
call v3('hgyr')
elseif K2==$A then
set Ee=LS
call ForForce(bj_FORCE_ALL_PLAYERS,function E0)
call v3('h000')
elseif K2==$B then
set Ee=mS
call ForForce(bj_FORCE_ALL_PLAYERS,function E0)
call v3('h001')
elseif K2==$C then
set Ee=MS
call ForForce(bj_FORCE_ALL_PLAYERS,function E0)
call v3('h002')
elseif K2==$D then
set Ee=qS
call ForForce(bj_FORCE_ALL_PLAYERS,function E0)
call v3('h00D')
endif
endfunction
function o3 takes integer gz,integer r3 returns nothing
set tU[gz]=r3
call MultiboardSetItemValueBJ(QU[gz],2,1,I2S(tU[gz]))
endfunction
function i3 takes integer gz,integer a3,integer n3 returns nothing
set sU[gz]=a3
set SU[gz]=n3
if SU[gz]>8 then
set sU[gz]=sU[gz]+1
set SU[gz]=1
if Gx==false then
call x3(sU[gz],SU[gz])
endif
elseif sU[gz]==8 or Tv or it then
call x3(sU[gz],SU[gz])
endif
if sU[gz]>=3 then
if Gx then
call MultiboardSetItemValueBJ(QU[gz],2,2,"최종 레벨")
elseif Tv then
call MultiboardSetItemValueBJ(QU[gz],2,2,"3-"+I2S(tv))
elseif sU[gz]==8 then
call MultiboardSetItemValueBJ(QU[gz],2,2,"W-"+I2S(SU[gz]))
else
call MultiboardSetItemValueBJ(QU[gz],2,2,"3-"+I2S(SU[gz]))
endif
else
call MultiboardSetItemValueBJ(QU[gz],2,2,I2S(sU[gz])+"-"+I2S(SU[gz]))
endif
endfunction
function V3 takes integer gz,integer E3 returns nothing
local integer D1=0
set TU[gz]=E3
if Gx and wx==false then
set D1=D1-1
endif
if uU[gz] then
call MultiboardSetItemValueBJ(QU[gz],2,3,I2S(TU[gz])+"/"+I2S(B0()-1+D1))
else
call MultiboardSetItemValueBJ(QU[gz],2,3,I2S(TU[gz])+"/"+I2S(B0()+D1))
endif
set uU[gz]=false
endfunction
function X3 takes nothing returns nothing
set kv=mZ()
set QU[kv]=CreateMultiboardBJ(2,3,"메뉴(Menu)")
call MultiboardSetItemStyleBJ(QU[kv],0,0,true,false)
call MultiboardSetItemValueBJ(QU[kv],1,1,"컨티뉴(Continues):")
call o3(kv,20)
call MultiboardSetItemValueBJ(QU[kv],1,2,"레벨(Level):")
call i3(kv,1,0)
set Ee=oS
call MultiboardSetItemValueBJ(QU[kv],1,3,"탈출인원(Escapers):")
call V3(kv,0)
call MultiboardSetItemWidthBJ(QU[kv],1,0,8.)
call MultiboardMinimize(QU[kv],false)
endfunction
function O3 takes integer i,real x,real y returns integer
local integer j=1
local real R3
local real I3
loop
exitwhen j>7+Ae
if(GetPlayerSlotState(Player(j-1))==PLAYER_SLOT_STATE_PLAYING or j>7)and i!=j and lv[j]==0 and Ox[j]==false then
set R3=GetUnitX(at[j])
set I3=GetUnitY(at[j])
if R0(R3-64,I3-64,R3+64,I3+64,x,y) then
if GetUnitTypeId(at[i])!='orai' and GetUnitTypeId(at[j])!='orai' then
if mv[tS] and SS[tS]<=0 then
set lv[j]=-1
elseif Mv[tS] and SS[tS]>=0 then
set lv[j]=1
else
set lv[j]=0
endif
endif
return j
endif
endif
set j=j+1
endloop
return 0
endfunction
function A3 takes integer i,real x,real y returns boolean
local integer j=1
local real R3
local real I3
loop
exitwhen j>7+Ae
if(GetPlayerSlotState(Player(j-1))==PLAYER_SLOT_STATE_PLAYING or j>7)and i!=j and Ox[j]==false then
set R3=GetUnitX(at[j])
set I3=GetUnitY(at[j])
if R0(R3-64,I3-64,R3+64,I3+64,x,y) then
if ot then
if GetUnitTypeId(at[j])!='orai' then
set TS=j
return false
endif
else
set TS=j
return false
endif
endif
endif
set j=j+1
endloop
return true
endfunction
function N3 takes real x,real y returns boolean
return GetTerrainType(x,y)=='Xsqd' and IsPointInRegion(ie,x,y)==false
endfunction
function b3 takes integer i,real x,real y,real B3,string s returns boolean
local real c3=40
local boolean b
if s=="DownWidth" then
if P==false then
set c3=-40
endif
set b=N3(x,y+c3)and N3(x-B3,y+c3)and N3(x+B3,y+c3)
return b and A3(i,x,y+c3)and A3(i,x-B3,y+c3)and A3(i,x+B3,y+c3)
elseif s=="DownWidthJump" then
if P==false then
set c3=-40
endif
return N3(x,y+c3)and N3(x-B3,y+c3)and N3(x+B3,y+c3)
elseif s=="UpWidth" then
if P then
set c3=-40
endif
return N3(x,y+c3)and N3(x-B3,y+c3)and N3(x+B3,y+c3)
elseif s=="LeftHeight" then
return N3(x-48,y)and N3(x-48,y-B3)and N3(x-48,y+B3)
elseif s=="RightHeight" then
return N3(x+48,y)and N3(x+48,y-B3)and N3(x+48,y+B3)
elseif s=="DownWidthOM" then
if P==false then
set c3=-40
endif
return A3(i,x,y+c3)and A3(i,x-B3,y+c3)and A3(i,x+B3,y+c3)
elseif s=="UpWidthOM" then
if P then
set c3=-40
endif
return A3(i,x,y+c3)and A3(i,x-B3,y+c3)and A3(i,x+B3,y+c3)
elseif s=="LeftHeightOM" then
return A3(i,x-48,y)and A3(i,x-48,y-B3)and A3(i,x-48,y+B3)
elseif s=="RightHeightOM" then
return A3(i,x+48,y)and A3(i,x+48,y-B3)and A3(i,x+48,y+B3)
elseif s=="LeftHeightOM2" then
return A3(i,x-48,y)
elseif s=="RightHeightOM2" then
return A3(i,x+48,y)
endif
return false
endfunction
function C3 takes nothing returns nothing
local integer i=1
loop
exitwhen i>7
set Qv[i]=.0
set qv[i]="Right"
set i=i+1
endloop
endfunction
function d3 takes integer K2,integer l2,integer D3 returns integer
local integer gz=LZ()
set yU[gz]=K2
set YU[gz]=l2
set zU[gz]=D3
return gz
endfunction
function f3 takes integer gz returns nothing
set ow[gz]=0
set rw[gz]=0
set xw[gz]=0
endfunction
function F3 takes integer t returns integer
local integer gz=lZ()
set xw[gz]=t
return gz
endfunction
function g3 takes integer gz,integer v2 returns nothing
local integer e2=ow[v2]
local integer o2=rw[v2]
if Xw[gz]==v2 then
set Xw[gz]=o2
else
set rw[e2]=o2
endif
if Ew[gz]==v2 then
set Ew[gz]=e2
else
set ow[o2]=e2
endif
set Vw[gz]=Vw[gz]-1
call f3(v2)
endfunction
function G3 takes integer gz,integer t returns nothing
local integer v2=F3(t)
if Xw[gz]!=0 then
set ow[Xw[gz]]=v2
set rw[v2]=Xw[gz]
elseif Ew[gz]==0 then
set Ew[gz]=v2
endif
set Xw[gz]=v2
set Vw[gz]=Vw[gz]+1
endfunction
function h3 takes nothing returns nothing
local integer H3=0
local integer j3
local integer J3
local integer i
local integer v2
set v2=Ew[Uv]
loop
exitwhen v2==0
set H3=H3+zU[xw[v2]]
set v2=ow[v2]
endloop
set i=1
loop
exitwhen not(i<=$A)
set J3=GetRandomInt(1,H3)
set j3=0
set v2=Ew[Uv]
loop
exitwhen v2==0
set j3=j3+zU[xw[v2]]
if J3<=j3 then
set sv[i]=yU[xw[v2]]
set Sv[i]=YU[xw[v2]]
set H3=H3-zU[xw[v2]]
call g3(Uv,v2)
exitwhen true
endif
set v2=ow[v2]
endloop
set i=i+1
endloop
endfunction
function k3 takes player p returns nothing
local integer i=1
call DisplayTimedTextToPlayer(p,0,0,60," ")
loop
exitwhen i>$A
call DisplayTimedTextToPlayer(p,0,0,60,I2S(sv[i])+" - "+I2S(Sv[i]))
if i==8 then
call DisplayTimedTextToPlayer(p,0,0,60,"------------------------")
endif
set i=i+1
endloop
endfunction
function K3 takes nothing returns nothing
local integer i=GetPlayerId(GetTriggerPlayer())+1
if i!=It then
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 방장 권한을 가진 플레이어만 사용 가능한 명령어 입니다.")
return
endif
if Tv==false then
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 랜덤 월드에서만 사용할 수 있습니다.")
return
endif
if uv<=0 then
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 횟수가 소진되었습니다.")
return
endif
if Gx then
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 현재 스테이지에서는 재시작 할 수 없습니다.")
return
endif
if Re or M then
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 잠시뒤 다시 시도해주세요.")
return
endif
set sv[tv]=sv[8+uv]
set Sv[tv]=Sv[8+uv]
set tv=tv-1
call n0(1,1)
set uv=uv-1
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 스테이지가 변경 되었습니다.")
if uv>0 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 이제 "+I2S(uv)+"번 사용할 수 있습니다.")
else
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 이제 더이상 사용할 수 없습니다.")
endif
endfunction
function l3 takes nothing returns nothing
set Uv=KZ()
call G3(Uv,d3(3,1,'d'))
call G3(Uv,d3(3,2,'d'))
call G3(Uv,d3(3,3,'d'))
call G3(Uv,d3(3,4,'d'))
call G3(Uv,d3(3,5,'d'))
call G3(Uv,d3(3,6,'d'))
call G3(Uv,d3(3,7,'d'))
call G3(Uv,d3(3,8,'d'))
call G3(Uv,d3(4,1,'d'))
call G3(Uv,d3(4,2,'d'))
call G3(Uv,d3(4,3,'d'))
call G3(Uv,d3(4,4,'d'))
call G3(Uv,d3(4,5,'d'))
call G3(Uv,d3(4,6,'d'))
call G3(Uv,d3(4,7,'d'))
call G3(Uv,d3(4,8,'d'))
call G3(Uv,d3(5,1,'d'))
call G3(Uv,d3(5,2,'d'))
call G3(Uv,d3(5,3,'d'))
call G3(Uv,d3(5,4,'d'))
call G3(Uv,d3(5,5,'d'))
call G3(Uv,d3(5,6,'d'))
call G3(Uv,d3(5,7,'d'))
call G3(Uv,d3(5,8,'d'))
call G3(Uv,d3(6,1,'d'))
call G3(Uv,d3(6,2,'d'))
call G3(Uv,d3(6,3,'d'))
call G3(Uv,d3(6,4,'d'))
call G3(Uv,d3(6,5,75))
call G3(Uv,d3(6,6,'d'))
call G3(Uv,d3(6,7,75))
call G3(Uv,d3(6,8,'d'))
call G3(Uv,d3(7,1,'d'))
call G3(Uv,d3(7,2,'d'))
call G3(Uv,d3(7,3,'d'))
call G3(Uv,d3(7,4,'d'))
call G3(Uv,d3(7,5,'d'))
call G3(Uv,d3(7,6,'d'))
call G3(Uv,d3(7,7,'d'))
call G3(Uv,d3(7,8,'d'))
call G3(Uv,d3(8,1,25))
call G3(Uv,d3(8,2,75))
call G3(Uv,d3(8,3,75))
call G3(Uv,d3(8,4,50))
call G3(Uv,d3(8,5,50))
call G3(Uv,d3(8,6,50))
call G3(Uv,d3(8,7,25))
call G3(Uv,d3(9,1,75))
call G3(Uv,d3(9,2,75))
call G3(Uv,d3(9,3,75))
call G3(Uv,d3(9,4,75))
call G3(Uv,d3(9,5,50))
call G3(Uv,d3(9,6,25))
call G3(Uv,d3(9,7,25))
call G3(Uv,d3(9,8,50))
call G3(Uv,d3($A,1,50))
call G3(Uv,d3($A,2,75))
call G3(Uv,d3($A,3,75))
call G3(Uv,d3($A,4,75))
call G3(Uv,d3($A,5,50))
call G3(Uv,d3($A,6,25))
call G3(Uv,d3($A,7,25))
call G3(Uv,d3($A,8,25))
call G3(Uv,d3($B,1,75))
call G3(Uv,d3($B,2,50))
call G3(Uv,d3($B,3,50))
call G3(Uv,d3($B,4,25))
call G3(Uv,d3($B,5,25))
call G3(Uv,d3($C,1,75))
call G3(Uv,d3($C,2,50))
call G3(Uv,d3($C,3,50))
call G3(Uv,d3($C,4,25))
call G3(Uv,d3($C,5,25))
call G3(Uv,d3($C,6,25))
call G3(Uv,d3($C,7,25))
call G3(Uv,d3($C,8,25))
call G3(Uv,d3($D,-1,$F))
call G3(Uv,d3($D,1,75))
call G3(Uv,d3($D,2,75))
call G3(Uv,d3($D,3,75))
call G3(Uv,d3($D,4,50))
call G3(Uv,d3($D,5,50))
call G3(Uv,d3($D,6,25))
call G3(Uv,d3($D,7,25))
call G3(Uv,d3($D,8,25))
call h3()
endfunction
function L3 takes nothing returns nothing
call DestroyTrigger(GetTriggeringTrigger())
set wv=CreateRegion()
set Wv=CreateRegion()
set yv=CreateRegion()
set Yv=CreateRegion()
set zv=CreateRegion()
set Zv=CreateRegion()
set ve=CreateRegion()
set ee=CreateRegion()
set xe=CreateRegion()
set oe=CreateRegion()
set re=CreateRegion()
set ie=CreateRegion()
set ae=CreateRegion()
set ne=CreateRegion()
call RegionAddRect(ne,Aq)
call RegionAddRect(ne,Nq)
call RegionAddRect(Wv,Vl)
call RegionAddRect(yv,bQ)
call RegionAddRect(Yv,ln)
call RegionAddRect(zv,VR)
call RegionAddRect(Zv,qX)
call RegionAddRect(ve,gJ)
call RegionAddRect(ee,SR)
call RegionAddRect(xe,GJ)
call RegionAddRect(oe,hJ)
call RegionAddRect(re,QX)
call RegionAddRect(wv,wG)
call RegionAddRect(wv,WG)
call RegionAddRect(wv,yG)
call RegionAddRect(wv,YG)
call RegionAddRect(wv,zG)
call RegionAddRect(wv,ZG)
call RegionAddRect(wv,vh)
call RegionAddRect(wv,eh)
call RegionAddRect(wv,xh)
call RegionAddRect(wv,oh)
call RegionAddRect(wv,rh)
call RegionAddRect(wv,ih)
call RegionAddRect(wv,ah)
call RegionAddRect(wv,nh)
call RegionAddRect(wv,Vh)
call RegionAddRect(wv,Eh)
call RegionAddRect(wv,Xh)
call RegionAddRect(wv,Oh)
call RegionAddRect(wv,Rh)
call RegionAddRect(wv,Ih)
call RegionAddRect(wv,Ah)
call RegionAddRect(wv,Nh)
call RegionAddRect(wv,bh)
call RegionAddRect(wv,Bh)
call RegionAddRect(wv,ch)
call RegionAddRect(wv,Ch)
call RegionAddRect(wv,dh)
call RegionAddRect(wv,Dh)
call RegionAddRect(wv,fh)
call RegionAddRect(wv,Fh)
call RegionAddRect(wv,gh)
call RegionAddRect(wv,Gh)
call RegionAddRect(wv,hh)
call RegionAddRect(wv,Hh)
call RegionAddRect(wv,jh)
call RegionAddRect(wv,Jh)
call RegionAddRect(wv,kh)
call RegionAddRect(wv,Kh)
call RegionAddRect(wv,lh)
call RegionAddRect(wv,Lh)
call RegionAddRect(wv,mh)
call RegionAddRect(wv,Mh)
call RegionAddRect(wv,ph)
call RegionAddRect(wv,Ph)
call RegionAddRect(wv,qh)
call RegionAddRect(wv,Qh)
call RegionAddRect(wv,sh)
call RegionAddRect(wv,Sh)
call RegionAddRect(wv,th)
call RegionAddRect(wv,Th)
call RegionAddRect(wv,uh)
call RegionAddRect(wv,Uh)
call RegionAddRect(wv,wh)
call RegionAddRect(wv,Wh)
call RegionAddRect(wv,yh)
call RegionAddRect(wv,Yh)
call RegionAddRect(wv,zh)
call RegionAddRect(wv,Zh)
call RegionAddRect(wv,vH)
call RegionAddRect(wv,eH)
call RegionAddRect(wv,xH)
call RegionAddRect(wv,oH)
call RegionAddRect(wv,rH)
call RegionAddRect(wv,iH)
call RegionAddRect(wv,aH)
call RegionAddRect(wv,nH)
call RegionAddRect(wv,VH)
call RegionAddRect(wv,EH)
call RegionAddRect(wv,XH)
call RegionAddRect(wv,OH)
call RegionAddRect(wv,RH)
call RegionAddRect(wv,IH)
call RegionAddRect(wv,AH)
call RegionAddRect(wv,NH)
call RegionAddRect(wv,bH)
call RegionAddRect(wv,BH)
call RegionAddRect(wv,cH)
call RegionAddRect(wv,CH)
call RegionAddRect(wv,dH)
call RegionAddRect(wv,DH)
call RegionAddRect(wv,fH)
call RegionAddRect(wv,FH)
call RegionAddRect(wv,gH)
call RegionAddRect(wv,GH)
call RegionAddRect(wv,hH)
call RegionAddRect(wv,HH)
call RegionAddRect(wv,jH)
call RegionAddRect(wv,JH)
call RegionAddRect(wv,kH)
call RegionAddRect(wv,KH)
call RegionAddRect(wv,lH)
call RegionAddRect(wv,LH)
call RegionAddRect(wv,mH)
call RegionAddRect(wv,MH)
call RegionAddRect(wv,pH)
call RegionAddRect(wv,PH)
call RegionAddRect(wv,qH)
call RegionAddRect(wv,QH)
call RegionAddRect(wv,sH)
call RegionAddRect(wv,KQ)
call RegionAddRect(wv,Vs)
call RegionAddRect(wv,SH)
call RegionAddRect(wv,tH)
call RegionAddRect(wv,TH)
call RegionAddRect(wv,uH)
call RegionAddRect(wv,UH)
call RegionAddRect(wv,wH)
call RegionAddRect(wv,WH)
call RegionAddRect(wv,wR)
call RegionAddRect(wv,WR)
call RegionAddRect(wv,yR)
call RegionAddRect(wv,Vl)
call RegionAddRect(wv,bQ)
call RegionAddRect(wv,ln)
call RegionAddRect(wv,VR)
call RegionAddRect(wv,qX)
call RegionAddRect(wv,gJ)
call RegionAddRect(wv,SR)
call RegionAddRect(wv,GJ)
call RegionAddRect(wv,hJ)
call RegionAddRect(wv,QX)
endfunction
function m3 takes nothing returns nothing
local trigger t=CreateTrigger()
call TriggerRegisterTimerEvent(t,.0,false)
call TriggerAddAction(t,function L3)
set t=null
endfunction
function M3 takes nothing returns integer
local integer i=1
local integer j=1
local integer p3=0
local integer P3=$B
loop
exitwhen i>P3
if i!=j and Ne[i]>Ne[j]then
set j=i
endif
set p3=p3+Ne[i]
set i=i+1
endloop
if TU[kv]-p3>=Ne[j]then
return 0
endif
set i=1
loop
exitwhen i>P3
if(i!=j and Ne[i]==Ne[j])or Ne[j]==0 then
return 0
endif
set i=i+1
endloop
return j
endfunction
function q3 takes nothing returns nothing
local integer i=1
if Ae!=0 then
loop
exitwhen i>Ae
call RemoveUnit(at[7+i])
set i=i+1
endloop
endif
set Ae=0
endfunction
function Q3 takes integer i,rect r,string s3 returns nothing
local unit u
local real x=GetRectCenterX(r)
local real y=GetRectCenterY(r)
if SubString(s3,0,8)!="Sentinel" then
set Qv[7+i]=0
set mv[7+i]=false
set Mv[7+i]=false
set Le[7+i]=false
set Kv[7+i]=0
set SS[7+i]=0
endif
if s3=="Left" then
set mv[7+i]=true
set Mv[7+i]=false
set qv[7+i]="Left"
set at[7+i]=CreateUnit(Player($B),'ogru',x,y,270)
call SetUnitBlendTime(at[7+i],.0)
if Qv[7+i]<0 and b3(7+i,x,y,40,"DownWidth")==false then
call SetUnitAnimation(at[7+i],"Walk First")
else
call SetUnitAnimation(at[7+i],"Spell First")
endif
elseif s3=="Right" then
set mv[7+i]=false
set Mv[7+i]=true
set qv[7+i]="Right"
set at[7+i]=CreateUnit(Player($B),'ogru',x,y,270)
call SetUnitBlendTime(at[7+i],.0)
if(Qv[7+i]<0 and b3(7+i,x,y,40,"DownWidth")==false)then
call SetUnitAnimation(at[7+i],"Walk Second")
else
call SetUnitAnimation(at[7+i],"Spell Second")
endif
elseif s3=="FlyLeft" then
set at[7+i]=CreateUnit(Player($B),'orai',x,y,270)
call SetUnitBlendTime(at[7+i],.0)
call SetUnitAnimation(at[7+i],"Stand First")
elseif s3=="FlyRight" then
set at[7+i]=CreateUnit(Player($B),'orai',x,y,270)
call SetUnitBlendTime(at[7+i],.0)
call SetUnitAnimation(at[7+i],"Stand Second")
elseif s3=="AutoLeft" then
set mv[7+i]=true
set Mv[7+i]=false
set qv[7+i]="Left"
set at[7+i]=CreateUnit(Player($B),'otau',x,y,270)
call SetUnitBlendTime(at[7+i],.0)
if Qv[7+i]<0 and b3(7+i,x,y,40,"DownWidth")==false then
call SetUnitAnimation(at[7+i],"Walk First")
else
call SetUnitAnimation(at[7+i],"Spell First")
endif
elseif s3=="AutoRight" then
set mv[7+i]=false
set Mv[7+i]=true
set qv[7+i]="Right"
set at[7+i]=CreateUnit(Player($B),'otau',x,y,270)
call SetUnitBlendTime(at[7+i],.0)
if(Qv[7+i]<0 and b3(7+i,x,y,40,"DownWidth")==false)then
call SetUnitAnimation(at[7+i],"Walk Second")
else
call SetUnitAnimation(at[7+i],"Spell Second")
endif
elseif s3=="CokeMushroomLeft" then
set mv[7+i]=true
set Mv[7+i]=false
set qv[7+i]="Left"
set at[7+i]=CreateUnit(Player($B),'ocat',x,y,270)
call SetUnitBlendTime(at[7+i],.0)
if Qv[7+i]<0 and b3(7+i,x,y,40,"DownWidth")==false then
call SetUnitAnimation(at[7+i],"Walk First")
else
call SetUnitAnimation(at[7+i],"Spell First")
endif
elseif s3=="CokeMushroomRight" then
set mv[7+i]=false
set Mv[7+i]=true
set qv[7+i]="Right"
set at[7+i]=CreateUnit(Player($B),'ocat',x,y,270)
call SetUnitBlendTime(at[7+i],.0)
if(Qv[7+i]<0 and b3(7+i,x,y,40,"DownWidth")==false)then
call SetUnitAnimation(at[7+i],"Walk Second")
else
call SetUnitAnimation(at[7+i],"Spell Second")
endif
elseif s3=="BlinLeft" then
set mv[7+i]=true
set Mv[7+i]=false
set qv[7+i]="Left"
set at[7+i]=CreateUnit(Player($B),'o000',x,y,270)
call SetUnitBlendTime(at[7+i],.0)
if Qv[7+i]<0 and b3(7+i,x,y,40,"DownWidth")==false then
call SetUnitAnimation(at[7+i],"Walk First")
else
call SetUnitAnimation(at[7+i],"Spell First")
endif
elseif s3=="BlinRight" then
set mv[7+i]=false
set Mv[7+i]=true
set qv[7+i]="Right"
set at[7+i]=CreateUnit(Player($B),'o000',x,y,270)
call SetUnitBlendTime(at[7+i],.0)
if(Qv[7+i]<0 and b3(7+i,x,y,40,"DownWidth")==false)then
call SetUnitAnimation(at[7+i],"Walk Second")
else
call SetUnitAnimation(at[7+i],"Spell Second")
endif
elseif s3=="GhostLeft" then
set mv[7+i]=true
set Mv[7+i]=false
set qv[7+i]="Left"
set at[7+i]=CreateUnit(Player($B),'o001',x,y,270)
call SetUnitBlendTime(at[7+i],.0)
if Qv[7+i]<0 and b3(7+i,x,y,40,"DownWidth")==false then
call SetUnitAnimation(at[7+i],"Walk First")
else
call SetUnitAnimation(at[7+i],"Spell First")
endif
elseif s3=="GhostRight" then
set mv[7+i]=false
set Mv[7+i]=true
set qv[7+i]="Right"
set at[7+i]=CreateUnit(Player($B),'o001',x,y,270)
call SetUnitBlendTime(at[7+i],.0)
if(Qv[7+i]<0 and b3(7+i,x,y,40,"DownWidth")==false)then
call SetUnitAnimation(at[7+i],"Walk Second")
else
call SetUnitAnimation(at[7+i],"Spell Second")
endif
elseif s3=="SentinelLeft" then
call RegionAddRect(ie,r)
call RegionAddRect(ae,r)
set u=CreateUnit(Player($B),'ohun',x,y,270)
call SetUnitBlendTime(u,.0)
call SetUnitAnimation(u,"Stand First")
call GroupAddUnit(De,u)
call SetUnitUserData(u,0)
elseif s3=="SentinelRight" then
call RegionAddRect(ie,r)
call RegionAddRect(ae,r)
set u=CreateUnit(Player($B),'ohun',x,y,270)
call SetUnitBlendTime(u,.0)
call SetUnitAnimation(u,"Stand Second")
call GroupAddUnit(De,u)
call SetUnitUserData(u,1)
elseif s3=="SentinelUp" then
call RegionAddRect(ie,r)
call RegionAddRect(ae,r)
set u=CreateUnit(Player($B),'ohun',x,y,$B4)
call SetUnitBlendTime(u,.0)
call SetUnitAnimation(u,"Stand First")
call GroupAddUnit(De,u)
call SetUnitUserData(u,2)
elseif s3=="SentinelDown" then
call RegionAddRect(ie,r)
call RegionAddRect(ae,r)
set u=CreateUnit(Player($B),'ohun',x,y,$B4)
call SetUnitBlendTime(u,.0)
call SetUnitAnimation(u,"Stand Second")
call GroupAddUnit(De,u)
call SetUnitUserData(u,3)
else
set at[7+i]=CreateUnit(Player($B),'opeo',x,y,270)
endif
call SetUnitPosition(at[7+i],x,y)
set u=null
endfunction
function S3 takes integer i returns nothing
local integer j=0
if i==1 then
call SetTerrainType(5888,-$3000,'Xblm',-1,1,0)
call SetTerrainType(5248,-$3000,'Xblm',-1,1,0)
call SetTerrainType(4992,-$3000,'Xblm',-1,1,0)
call SetTerrainType(6784,-$2A80,'Xblm',-1,1,0)
call SetTerrainType(7552,-$2A80,'Xblm',-1,1,0)
call SetTerrainType(6144,-9984,'Xblm',-1,1,0)
elseif i==2 then
loop
exitwhen j>$C
if j==1 or j==2 or j==4 or j==5 or j==7 or j==8 or j==$B then
call SetTerrainType(9600+($80*j),-$2D80,'Xblm',-1,1,0)
endif
if j==3 or j==5 or j==6 or j==7 or j==9 or j==$B then
call SetTerrainType(9600+($80*j),-$2E00,'Xblm',-1,1,0)
endif
if j==0 or j==1 or j==7 or j==8 or j==$B or j==$C then
call SetTerrainType(9600+($80*j),-$2E80,'Xblm',-1,1,0)
endif
if j==0 or j==1 or j==2 or j==4 or j==$B or j==$C then
call SetTerrainType(9600+($80*j),-$2F00,'Xblm',-1,1,0)
endif
if j!=0 and j!=4 and j!=5 and j!=6 then
call SetTerrainType(9600+($80*j),-$2F80,'Xblm',-1,1,0)
endif
if j!=7 then
call SetTerrainType(9600+($80*j),-$3000,'Xblm',-1,1,0)
endif
set j=j+1
endloop
elseif i==3 then
call SetTerrainType($3A00,-$2D80,'Xblm',-1,1,0)
call SetTerrainType($3B00,-$2E00,'Xblm',-1,1,0)
call SetTerrainType($3A80,-$2E80,'Xblm',-1,1,0)
elseif i==4 then
loop
exitwhen j>3
call SetTerrainType(8320+(256*j),-9728,'Xblm',-1,1,0)
set j=j+1
endloop
call SetTerrainType($2A00,-9728,'Xblm',-1,1,0)
elseif i==5 then
loop
exitwhen j>3
call SetTerrainType(-6784+(256*j),-9856,'Xblm',-1,1,0)
set j=j+1
endloop
elseif i==6 then
loop
exitwhen j>2
call SetTerrainType($3B00-($80*j),-$3D00+($80*j),'Xblm',-1,1,0)
set j=j+1
endloop
call SetTerrainType($3A00,-$3D00,'Xblm',-1,1,0)
elseif i==7 then
loop
exitwhen j>2
call SetTerrainType($3500-($80*j),-$5600+($80*j),'Xblm',-1,1,0)
set j=j+1
endloop
elseif i==8 then
loop
exitwhen j>1
call SetTerrainType($2A80+($80*j),-$4F80,'Xblm',-1,1,0)
set j=j+1
endloop
elseif i==9 then
loop
exitwhen j>6
call SetTerrainType(-6272,-$7700+($80*j),'Xblm',-1,1,0)
call SetTerrainType(-6144,-$7700+($80*j),'Xblm',-1,1,0)
if j<=2 then
call SetTerrainType(-4480,-$7500+($80*j),'Xblm',-1,1,0)
endif
set j=j+1
endloop
call SetTerrainType(-6272,-$7A00,'Xblm',-1,1,0)
call SetTerrainType(-7552,-$7600,'Xblm',-1,1,0)
call SetTerrainType(-6144,-$7200,'Xblm',-1,1,0)
elseif i==$A then
loop
exitwhen j>1
call SetTerrainType(-$B00+($80*j),-$7880,'Xblm',-1,1,0)
call SetTerrainType(-4096+($80*j),-$7580,'Xblm',-1,1,0)
set j=j+1
endloop
call SetTerrainType(-$900,-$7000,'Xblm',-1,1,0)
call SetTerrainType(-$600,-$7000,'Xblm',-1,1,0)
elseif i==$B then
call SetTerrainType(9856,9472,'Xblm',-1,1,0)
loop
exitwhen j>6
call SetTerrainType(9984+($80*j),9216,'Xblm',-1,1,0)
call SetTerrainType(9984+($80*j),9472,'Xblm',-1,1,0)
call SetTerrainType(9984+($80*j),$2900,'Xblm',-1,1,0)
set j=j+1
endloop
elseif i==$C then
loop
exitwhen j>1
call SetTerrainType(4096+($80*j),$3A80,'Xblm',-1,1,0)
call SetTerrainType(4608+($80*j),$3A80,'Xblm',-1,1,0)
set j=j+1
endloop
call SetTerrainType(4352,$3B80,'Xblm',-1,1,0)
call SetTerrainType(4864,$3B94,'Xblm',-1,1,0)
elseif i==$D then
call SetTerrainType($5C00+$80,-$3780,'Xblm',-1,1,0)
call SetTerrainType($5C00+$80+$80,-$3780,'Xblm',-1,1,0)
call SetTerrainType($5C00,-$3780,'Xblm',-1,1,0)
endif
endfunction
function t3 takes nothing returns nothing
if sU[kv]==1 then
if SU[kv]==2 then
call Q3(1,UV,"null")
call Q3(2,wV,"null")
set Ae=2
elseif SU[kv]==4 then
call Q3(1,WV,"null")
call Q3(2,yV,"null")
call Q3(3,YV,"null")
call Q3(4,zV,"null")
set Ae=4
elseif SU[kv]==5 then
call Q3(1,ZV,"null")
call Q3(2,vE,"null")
call Q3(3,eE,"null")
set Ae=3
elseif SU[kv]==6 then
call Q3(1,xE,"null")
call Q3(2,oE,"null")
set Ae=2
elseif SU[kv]==7 then
call Q3(1,rE,"null")
set Ae=1
elseif SU[kv]==8 then
call Q3(1,iE,"null")
set Ae=1
endif
elseif sU[kv]==2 then
if SU[kv]==1 then
call Q3(1,aV,"Right")
set Ae=1
elseif SU[kv]==2 then
call Q3(1,nV,"Right")
call Q3(2,kE,"null")
call Q3(3,KE,"null")
set Ae=3
elseif SU[kv]==3 then
call Q3(1,VV,"Right")
set Ae=1
elseif SU[kv]==4 then
call Q3(1,lE,"null")
call Q3(2,vj,"FlyRight")
call Q3(3,ej,"FlyLeft")
set Ae=3
elseif SU[kv]==5 then
call Q3(1,LE,"null")
call Q3(2,xj,"FlyRight")
call Q3(3,oj,"FlyLeft")
call Q3(4,EV,"Left")
set Ae=4
elseif SU[kv]==6 then
call Q3(1,XV,"Right")
call Q3(2,OV,"Right")
call Q3(3,RV,"Right")
call Q3(4,rj,"FlyLeft")
call Q3(5,mE,"null")
set Ae=5
elseif SU[kv]==7 then
call Q3(1,ij,"FlyRight")
call Q3(2,aj,"FlyRight")
call Q3(3,ME,"null")
call Q3(4,pE,"null")
set Ae=4
elseif SU[kv]==8 then
call Q3(1,nj,"FlyLeft")
call Q3(2,Vj,"FlyLeft")
call Q3(3,Ej,"FlyLeft")
set Ae=3
endif
elseif sU[kv]==3 then
if SU[kv]==1 then
call Q3(1,PE,"null")
set Ae=1
elseif SU[kv]==2 then
call Q3(1,IV,"Right")
call Q3(2,qE,"null")
call Q3(3,QE,"null")
call Q3(4,sE,"null")
set Ae=4
elseif SU[kv]==3 then
call Q3(1,SE,"null")
call Q3(2,tE,"null")
call Q3(3,Xj,"FlyRight")
set Ae=3
elseif SU[kv]==4 then
call Q3(1,AV,"Left")
call Q3(2,NV,"Left")
call Q3(3,TE,"null")
call Q3(4,Oj,"FlyRight")
set Ae=4
elseif SU[kv]==5 then
call Q3(1,uE,"null")
set Ae=1
elseif SU[kv]==6 then
call Q3(1,bV,"Left")
set Ae=1
elseif SU[kv]==8 then
call Q3(1,UE,"null")
call Q3(2,wE,"null")
call Q3(3,WE,"null")
call Q3(4,yE,"null")
call Q3(5,Rj,"FlyRight")
set Ae=5
endif
elseif sU[kv]==4 then
if SU[kv]==1 then
call Q3(1,JF,"AutoRight")
set Ae=1
elseif SU[kv]==2 then
call Q3(1,kF,"AutoRight")
set Ae=1
elseif SU[kv]==3 then
call Q3(1,KF,"AutoRight")
set Ae=1
elseif SU[kv]==4 then
call S3(1)
call Q3(0,HJ,"SentinelLeft")
call Q3(0,jJ,"SentinelRight")
call Q3(0,JJ,"SentinelRight")
call Q3(1,YE,"null")
call Q3(2,lF,"AutoLeft")
set Ae=2
elseif SU[kv]==5 then
call S3(2)
call Q3(0,kJ,"SentinelRight")
call Q3(0,KJ,"SentinelRight")
call Q3(0,lJ,"SentinelRight")
call Q3(0,LJ,"SentinelRight")
call Q3(0,mJ,"SentinelRight")
call Q3(0,MJ,"SentinelRight")
call Q3(1,zE,"null")
call Q3(2,BV,"Right")
set Ae=2
elseif SU[kv]==6 then
call S3(3)
call Q3(0,pJ,"SentinelRight")
call Q3(0,PJ,"SentinelLeft")
call Q3(0,qJ,"SentinelLeft")
call Q3(1,ZE,"null")
call Q3(2,cV,"Right")
call Q3(3,LF,"AutoRight")
set Ae=3
elseif SU[kv]==7 then
call S3(4)
call Q3(0,QJ,"SentinelRight")
call Q3(1,vX,"null")
call Q3(2,Ij,"FlyRight")
call Q3(3,mF,"AutoRight")
set Ae=3
elseif SU[kv]==8 then
call S3(5)
call Q3(0,sJ,"SentinelLeft")
endif
elseif sU[kv]==5 then
if SU[kv]==1 then
call Q3(1,eX,"null")
call Q3(2,xX,"null")
set Ae=2
elseif SU[kv]==2 then
call Q3(1,MF,"AutoRight")
call Q3(2,oX,"null")
set Ae=2
elseif SU[kv]==3 then
call Q3(1,rX,"null")
call Q3(2,iX,"null")
call Q3(3,aX,"null")
set Ae=3
elseif SU[kv]==4 then
call Q3(1,nX,"null")
call Q3(2,VX,"null")
set Ae=2
elseif SU[kv]==5 then
call Q3(1,CV,"Right")
call Q3(2,EX,"null")
call Q3(3,XX,"null")
set Ae=3
elseif SU[kv]==6 then
call S3(6)
call Q3(0,SJ,"SentinelRight")
call Q3(0,tJ,"SentinelRight")
call Q3(0,TJ,"SentinelRight")
call Q3(1,Aj,"FlyRight")
call Q3(2,OX,"null")
set Ae=2
elseif SU[kv]==7 then
call Q3(1,RX,"null")
call Q3(2,dV,"Left")
set Ae=2
elseif SU[kv]==8 then
call Q3(1,pF,"AutoRight")
call Q3(2,IX,"null")
set Ae=2
endif
elseif sU[kv]==6 then
if SU[kv]==1 then
call Q3(1,AX,"null")
call Q3(2,PF,"AutoLeft")
set Ae=2
elseif SU[kv]==2 then
call Q3(1,DV,"Right")
call Q3(2,NX,"null")
call Q3(3,bX,"null")
call Q3(4,BX,"null")
set Ae=4
elseif SU[kv]==3 then
call Q3(1,fV,"Right")
set Ae=1
elseif SU[kv]==4 then
call Q3(1,FV,"Right")
call Q3(2,gV,"Right")
set Ae=2
elseif SU[kv]==5 then
call Q3(1,qF,"AutoRight")
call Q3(2,cX,"null")
set Ae=2
elseif SU[kv]==6 then
call S3(7)
call Q3(0,uJ,"SentinelLeft")
call Q3(0,UJ,"SentinelLeft")
call Q3(0,wJ,"SentinelLeft")
call Q3(1,GV,"Left")
call Q3(2,hV,"Left")
set Ae=2
elseif SU[kv]==7 then
call Q3(1,Nj,"FlyRight")
call Q3(2,bj,"FlyRight")
set Ae=2
elseif SU[kv]==8 then
call S3(8)
call Q3(0,WJ,"SentinelRight")
call Q3(1,CX,"null")
call Q3(2,dX,"null")
call Q3(3,HV,"Left")
set Ae=3
endif
elseif sU[kv]==7 then
if SU[kv]==1 then
call Q3(1,GR,"CokeMushroomRight")
call Q3(2,hR,"CokeMushroomLeft")
call Q3(3,HR,"CokeMushroomRight")
call Q3(4,DX,"null")
set Ae=4
elseif SU[kv]==2 then
call Q3(1,jR,"CokeMushroomRight")
call Q3(2,JR,"CokeMushroomRight")
call Q3(3,kR,"CokeMushroomRight")
call Q3(4,KR,"CokeMushroomRight")
call Q3(5,QF,"AutoLeft")
set Ae=5
elseif SU[kv]==3 then
call Q3(1,fX,"null")
call Q3(2,lR,"CokeMushroomLeft")
call Q3(3,LR,"CokeMushroomLeft")
set Ae=3
elseif SU[kv]==4 then
call Q3(1,FX,"null")
call Q3(2,gX,"null")
call Q3(3,GX,"null")
call Q3(4,hX,"null")
set Ae=4
elseif SU[kv]==5 then
call Q3(1,mR,"CokeMushroomRight")
call Q3(2,Bj,"FlyRight")
call Q3(3,cj,"FlyRight")
call Q3(4,HX,"null")
set Ae=4
elseif SU[kv]==6 then
call Q3(1,MR,"CokeMushroomLeft")
call Q3(2,pR,"CokeMushroomRight")
set Ae=2
elseif SU[kv]==7 then
call S3($A)
call Q3(1,jV,"Left")
call Q3(2,PR,"CokeMushroomLeft")
set Ae=2
elseif SU[kv]==8 then
call S3(9)
call Q3(0,yJ,"SentinelUp")
call Q3(0,YJ,"SentinelUp")
call Q3(1,Cj,"FlyRight")
call Q3(2,jX,"null")
call Q3(3,JV,"Right")
call Q3(4,kV,"Left")
call Q3(5,qR,"CokeMushroomRight")
set Ae=5
endif
elseif sU[kv]==8 then
if SU[kv]==1 then
call Q3(1,JX,"null")
set Ae=1
elseif SU[kv]==2 then
call Q3(1,KV,"Right")
call Q3(2,lV,"Left")
call Q3(3,dj,"FlyRight")
call Q3(4,Dj,"FlyLeft")
call Q3(5,fj,"FlyLeft")
set Ae=5
elseif SU[kv]==3 then
call Q3(1,kX,"null")
call Q3(2,KX,"null")
call Q3(3,lX,"null")
set Ae=3
elseif SU[kv]==4 then
call S3($B)
call Q3(0,zJ,"SentinelLeft")
call Q3(0,ZJ,"SentinelLeft")
call Q3(0,vk,"SentinelRight")
call Q3(1,sF,"AutoRight")
call Q3(2,SF,"AutoRight")
set Ae=2
elseif SU[kv]==5 then
call Q3(1,LX,"null")
call Q3(2,mX,"null")
call Q3(3,Fj,"FlyRight")
set Ae=3
elseif SU[kv]==6 then
call Q3(1,MX,"null")
call Q3(2,tF,"AutoRight")
set Ae=2
elseif SU[kv]==7 then
call S3($C)
call Q3(1,QR,"CokeMushroomRight")
call Q3(2,sR,"CokeMushroomRight")
set Ae=2
endif
elseif sU[kv]==9 then
if SU[kv]==1 then
call Q3(1,LV,"Right")
call Q3(2,pX,"null")
set Ae=2
elseif SU[kv]==2 then
call Q3(1,TF,"AutoRight")
set Ae=1
elseif SU[kv]==3 then
call Q3(1,mV,"Right")
call Q3(2,MV,"Right")
set Ae=2
elseif SU[kv]==4 then
call Q3(1,uF,"AutoRight")
call Q3(2,UF,"AutoRight")
set Ae=2
elseif SU[kv]==5 then
call Q3(1,wF,"AutoRight")
call Q3(2,pV,"Left")
call Q3(3,PX,"null")
set Ae=3
elseif SU[kv]==6 then
call Q3(1,WF,"AutoRight")
call Q3(2,PV,"Left")
call Q3(3,gj,"FlyRight")
set Ae=3
elseif SU[kv]==7 then
call Q3(1,qV,"Right")
set Ae=1
elseif SU[kv]==8 then
call Q3(1,QV,"Left")
call Q3(2,sV,"Left")
call Q3(3,SV,"Right")
set Ae=3
endif
elseif sU[kv]==$A then
if SU[kv]==1 then
call Q3(1,aE,"null")
call Q3(2,ER,"CokeMushroomLeft")
set Ae=2
elseif SU[kv]==2 then
call Q3(1,nE,"null")
call Q3(2,XR,"CokeMushroomRight")
call Q3(3,OR,"CokeMushroomRight")
call Q3(4,dF,"AutoRight")
set Ae=4
elseif SU[kv]==3 then
call Q3(1,VE,"null")
call Q3(2,Sn,"Left")
call Q3(3,RR,"CokeMushroomLeft")
call Q3(4,IR,"CokeMushroomRight")
set Ae=4
elseif SU[kv]==4 then
call Q3(1,EE,"null")
call Q3(2,XE,"null")
call Q3(3,tn,"Right")
set Ae=3
elseif SU[kv]==5 then
call Q3(1,Tn,"Right")
call Q3(2,AR,"CokeMushroomRight")
call Q3(3,NR,"CokeMushroomLeft")
call Q3(4,OE,"null")
call Q3(5,RE,"null")
call Q3(6,IE,"null")
set Ae=6
elseif SU[kv]==6 then
call Q3(1,bR,"CokeMushroomRight")
call Q3(2,BR,"CokeMushroomRight")
call Q3(3,AE,"null")
call Q3(4,NE,"null")
call Q3(5,DF,"AutoRight")
set Ae=5
elseif SU[kv]==7 then
call S3($D)
call Q3(1,bE,"null")
call Q3(2,BE,"null")
call Q3(3,cR,"CokeMushroomLeft")
set Ae=3
elseif SU[kv]==8 then
call Q3(1,un,"Left")
call Q3(2,Un,"Left")
call Q3(3,CR,"CokeMushroomLeft")
call Q3(4,yH,"FlyRight")
call Q3(5,cE,"null")
call Q3(6,wn,"Left")
set Ae=6
endif
elseif sU[kv]==$B then
if SU[kv]==1 then
call Q3(1,CE,"null")
set Ae=1
elseif SU[kv]==2 then
call Q3(1,Wn,"Right")
call Q3(2,dE,"null")
set Ae=2
elseif SU[kv]==3 then
call Q3(1,DE,"null")
set Ae=1
elseif SU[kv]==4 then
call Q3(1,fF,"AutoRight")
call Q3(2,YH,"FlyRight")
set Ae=2
elseif SU[kv]==5 then
call Q3(1,FF,"AutoRight")
call Q3(2,fE,"null")
call Q3(3,dR,"CokeMushroomRight")
call Q3(4,yn,"Right")
set Ae=4
endif
elseif sU[kv]==$C then
if SU[kv]==1 then
call Q3(1,FE,"null")
call Q3(2,gE,"null")
call Q3(3,DR,"CokeMushroomLeft")
set Ae=3
elseif SU[kv]==3 then
call Q3(1,gF,"AutoRight")
set Ae=1
elseif SU[kv]==4 then
call Q3(1,fR,"CokeMushroomLeft")
call Q3(2,FR,"CokeMushroomLeft")
set Ae=2
elseif SU[kv]==5 then
call Q3(1,Yn,"Left")
call Q3(2,GF,"AutoRight")
set Ae=2
elseif SU[kv]==6 then
call Q3(1,zH,"FlyRight")
call Q3(2,ZH,"FlyRight")
call Q3(3,hF,"AutoRight")
call Q3(4,zn,"Right")
set Ae=4
elseif SU[kv]==7 then
call Q3(1,Zn,"Right")
call Q3(2,vV,"Left")
set Ae=2
elseif SU[kv]==8 then
call Q3(1,GE,"null")
call Q3(2,hE,"null")
set Ae=2
endif
elseif sU[kv]==$D then
if SU[kv]==-1 then
call Q3(1,ZQ,"BlinRight")
call Q3(2,YQ,"BlinLeft")
call Q3(3,zQ,"BlinLeft")
call Q3(4,bs,"FlyLeft")
call Q3(5,Bs,"FlyLeft")
set Ae=5
elseif SU[kv]==1 then
call Q3(1,HE,"null")
call Q3(2,HF,"AutoRight")
set Ae=2
elseif SU[kv]==2 then
call Q3(1,jE,"null")
call Q3(2,jF,"AutoRight")
set Ae=2
elseif SU[kv]==3 then
call Q3(1,JE,"null")
call Q3(2,eV,"Right")
call Q3(3,xV,"Left")
set Ae=3
elseif SU[kv]==4 then
call Q3(1,Ln,"BlinRight")
call Q3(2,mn,"BlinLeft")
set Ae=2
elseif SU[kv]==5 then
call Q3(1,Mn,"BlinRight")
call Q3(2,pn,"BlinLeft")
call Q3(3,Pn,"BlinLeft")
set Ae=3
elseif SU[kv]==6 then
call Q3(1,qn,"BlinRight")
call Q3(2,Qn,"BlinLeft")
call Q3(3,gR,"CokeMushroomRight")
set Ae=3
elseif SU[kv]==7 then
call Q3(1,sn,"BlinLeft")
call Q3(2,oV,"Right")
call Q3(3,rV,"Right")
call Q3(4,iV,"Left")
set Ae=4
elseif SU[kv]==8 then
call Q3(1,FQ,"BlinRight")
call Q3(2,gQ,"null")
call Q3(3,GQ,"FlyRight")
set Ae=3
endif
endif
endfunction
function T3 takes nothing returns nothing
local real x=GetUnitX(GetEnumUnit())
local real y=GetUnitY(GetEnumUnit())
local unit u
if GetUnitUserData(GetEnumUnit())<=1 then
set u=CreateUnit(Player($B),'hmtt',x,y,270)
else
set u=CreateUnit(Player($B),'hmtt',x,y,$B4)
endif
call GroupAddUnit(sS,u)
call SetUnitUserData(u,GetUnitUserData(GetEnumUnit()))
set u=null
endfunction
function u3 takes nothing returns nothing
local integer i=GetPlayerId(GetOwningPlayer(GetEnumUnit()))+1
if i<=7 then
if qv[i]=="Left" then
call SetUnitUserData(GetEnumUnit(),0)
else
call SetUnitUserData(GetEnumUnit(),1)
endif
endif
if GetUnitUserData(GetEnumUnit())==0 or GetUnitUserData(GetEnumUnit())==2 then
call SetUnitAnimation(GetEnumUnit(),"Stand Ready First")
else
call SetUnitAnimation(GetEnumUnit(),"Stand Ready Second")
endif
endfunction
function U3 takes nothing returns nothing
call ForGroup(De,function T3)
endfunction
function w3 takes nothing returns nothing
if w!=0 then
call TimerStart(ce,w,false,function U3)
set w=0
endif
if U!=0 then
call TimerStart(Be,U,false,function w3)
set U=0
else
call ForGroup(De,function u3)
call TimerStart(Be,5.,false,function w3)
call TimerStart(ce,1.5,false,function U3)
set U=0
set w=0
endif
endfunction
function W3 takes nothing returns nothing
local real x=GetUnitX(GetEnumUnit())
local real y=GetUnitY(GetEnumUnit())
call SetTerrainType(x,y,'Xsqd',-1,1,0)
call RemoveUnit(GetEnumUnit())
endfunction
function y3 takes nothing returns nothing
call RemoveUnit(GetEnumUnit())
endfunction
function Y3 takes nothing returns nothing
local boolean b=Ne[1]==1 and Ne[2]==0 and Ne[3]==1 and Ne[4]==3
set b=b and Ne[5]==0 and Ne[6]==0 and Ne[7]==0 and Ne[8]==0 and Ne[9]==0 and Ne[$B]==0
if b then
call A1()
endif
endfunction
function z3 takes nothing returns nothing
local integer i=1
local integer Z3=0
set Re=false
if Bw[de]>0 then
if M3()==1 then
call i3(kv,3,9)
elseif M3()==2 then
call i3(kv,4,9)
elseif M3()==3 then
call i3(kv,5,9)
elseif M3()==4 then
call i3(kv,6,9)
elseif M3()==5 then
call i3(kv,7,9)
elseif M3()==6 then
call i3(kv,8,9)
elseif M3()==7 then
call i3(kv,9,9)
elseif M3()==8 then
call i3(kv,$A,9)
elseif M3()==9 then
set Tv=true
call i3(kv,sv[tv],Sv[tv])
elseif M3()==$A then
call i3(kv,$B,9)
elseif M3()==$B then
call i3(kv,$C,9)
else
if Ie then
call i3(kv,2,8)
call v3('hkni')
call CinematicModeBJ(false,bj_FORCE_ALL_PLAYERS)
set Ee=ts
call ForForce(bj_FORCE_ALL_PLAYERS,function E0)
set Ie=false
elseif Tv then
set tv=tv+Bw[de]
call i3(kv,sv[tv],Sv[tv])
else
call i3(kv,sU[kv],SU[kv]+Bw[de])
endif
endif
endif
set Ne[1]=0
set Ne[2]=0
set Ne[3]=0
set Ne[4]=0
set Ne[5]=0
set Ne[6]=0
set Ne[7]=0
set Ne[8]=0
set Ne[9]=0
set Ne[$A]=0
set Ne[$B]=0
set U=0
set w=0
call PauseTimer(Be)
call PauseTimer(ce)
if Bw[de]>0 then
if Tv and tv==1 then
call CinematicModeBJ(false,bj_FORCE_ALL_PLAYERS)
elseif Tv==false then
if sU[kv]>=8 and SU[kv]>1 then
call o3(kv,tU[kv]+1)
endif
if SU[kv]==1 then
call CinematicModeBJ(false,bj_FORCE_ALL_PLAYERS)
if sU[kv]>=8 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 해당 월드는 클리어마다 컨티뉴가 1씩 추가됩니다.")
endif
endif
if sU[kv]==1 and SU[kv]==1 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,Ge[It]+GetPlayerName(Player(It-1))+"|r 님이 ESC를 누르면 게임을 재시작 할 수 있습니다. (컨티뉴 소모)")
set Ee=oS
call ForForce(bj_FORCE_ALL_PLAYERS,function E0)
if SubString("|",-1,0)!="o" then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 워크래프트3 1.28기준으로 만든 맵이기 때문에, 다른 버전으로 이용하면 약간의 버그가 있을 수 있습니다.")
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 리포지드로 플레이할 경우 클래식 그래픽으로 설정하셔야 원할한 플레이가 가능합니다.")
endif
elseif(sU[kv]==3 and SU[kv]==3)or(sU[kv]==4 and SU[kv]==2)or(sU[kv]==7 and SU[kv]==3)then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 텔레포트 스톤에 대해 자세히 알고 싶다면 F9를 참고해주세요.")
elseif sU[kv]==5 and SU[kv]==1 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 텔레포트 스톤에 대해 자세히 알고 싶다면 F9를 참고해주세요.")
elseif sU[kv]==5 and SU[kv]==2 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 포탈은 땅 또는 오브젝트(버섯, 상자, 문어 블럭)위에 올라탄 상태에서만 이용할 수 있습니다.")
elseif sU[kv]==6 and SU[kv]==1 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 물 속에서 방향키(↑)를 누르면 수영할 수 있습니다.")
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 또한 방향키(↓)를 누르고 있으면 빠르게 하강합니다.")
elseif sU[kv]==7 and SU[kv]==7 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 스톤볼로 변신한 상태에서 방향키(↓)를 누르고 있으면 빔을 발사합니다.")
elseif sU[kv]==$B and SU[kv]==1 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 이동하면서 아래키를 눌러보세요!")
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"|cffeeff55※ 해당 월드는 3-5 까지 있습니다.|r")
elseif sU[kv]==$C and SU[kv]==1 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 블랙홀에 대해 자세히 알고 싶다면 F9를 참고해주세요.")
elseif sU[kv]==$C and SU[kv]==3 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 석상에 대해 자세히 알고 싶다면 F9를 참고해주세요.")
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 진동을 끌수 있습니다. 자세한건 F9를 참고해주세요.")
elseif sU[kv]==$D and SU[kv]==1 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 보름달에 대해 자세히 알고 싶다면 F9를 참고해주세요.")
endif
endif
endif
if sU[kv]==3 and SU[kv]==5 then
call TimerStart(be,'x',false,null)
set Ce=CreateTimerDialogBJ(be,"제한 시간")
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 이번 스테이지는 제한시간이 주어집니다.")
elseif sU[kv]==4 and SU[kv]==8 then
if B0()==5 or B0()==6 then
call TimerStart(be,60,false,null)
elseif B0()==7 then
call TimerStart(be,$B4,false,null)
else
call TimerStart(be,30,false,null)
endif
set Ce=CreateTimerDialogBJ(be,"제한 시간")
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 이번 스테이지는 제한시간이 주어집니다.")
elseif sU[kv]==9 and SU[kv]==3 then
call TimerStart(be,90,false,null)
set Ce=CreateTimerDialogBJ(be,"제한 시간")
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 이번 스테이지는 제한시간이 주어집니다.")
elseif sU[kv]==$A and SU[kv]==7 then
if B0()==6 then
call TimerStart(be,300,false,null)
elseif B0()==7 then
call TimerStart(be,420,false,null)
else
call TimerStart(be,$B4,false,null)
endif
set Ce=CreateTimerDialogBJ(be,"제한 시간")
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 이번 스테이지는 제한시간이 주어집니다.")
elseif sU[kv]==$C and SU[kv]==8 then
call TimerStart(be,'x',false,null)
set Ce=CreateTimerDialogBJ(be,"제한 시간")
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 이번 스테이지는 제한시간이 주어집니다.")
elseif sU[kv]==$D and SU[kv]==8 then
call TimerStart(be,$F0,false,null)
set Ce=CreateTimerDialogBJ(be,"제한 시간")
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 이번 스테이지는 제한시간이 주어집니다.")
endif
call HZ(de)
call V3(kv,0)
call q3()
call ForGroup(De,function W3)
call ForGroup(sS,function y3)
call GroupClear(De)
call GroupClear(sS)
call t3()
call k2(sU[kv],SU[kv])
call J1()
call w2()
call a0(1,sU[kv],SU[kv])
call a0(2,sU[kv],SU[kv])
set Ot=LoadRectHandle(Ve,sU[kv],SU[kv])
if CountUnitsInGroup(De)>0 then
call TimerStart(Be,1.5,false,function w3)
endif
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,'d')
call TriggerExecute(pe)
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set Z3=Z3+1
set mv[i]=false
set Mv[i]=false
set Qv[i]=0
set Kv[i]=0
set SS[i]=0
if GetUnitTypeId(at[i])!=Rt[i]then
set gv[i]=false
endif
if GetUnitTypeId(at[i])=='ohun' then
call PauseTimer(Xt[i])
endif
if P or GetUnitTypeId(at[i])!=Rt[i]then
call RemoveUnit(at[i])
set at[i]=CreateUnit(Player(i-1),Rt[i],GetRectMinX(Ot)+($80*(i-1)),GetRectCenterY(Ot),270)
call SetUnitBlendTime(at[i],.0)
call SetUnitFacing(Vt[i],270)
endif
if sU[kv]==6 and SU[kv]==8 then
call SetUnitPosition(at[i],GetRectCenterX(Ot),GetRectMinY(Ot)+('d'*(i-1)))
call SetUnitPosition(Et[i],GetRectCenterX(Ot),GetRectMinY(Ot)+('d'*(i-1)))
elseif sU[kv]==$D then
if ModuloInteger(Z3,2)==1 then
call SetUnitPosition(at[i],GetRectMinX(Ot)+($80*((Z3-1)/ 2)),GetRectCenterY(Ot))
call SetUnitPosition(Et[i],GetRectMinX(Ot)+($80*((Z3-1)/ 2)),GetRectCenterY(Ot))
else
call SetUnitPosition(at[i],GetRectMinX(LoadRectHandle(Ve,sU[kv]*-1,SU[kv]))+($80*((Z3-2)/ 2)),GetRectCenterY(LoadRectHandle(Ve,sU[kv]*-1,SU[kv])))
call SetUnitPosition(Et[i],GetRectMinX(LoadRectHandle(Ve,sU[kv]*-1,SU[kv]))+($80*((Z3-2)/ 2)),GetRectCenterY(LoadRectHandle(Ve,sU[kv]*-1,SU[kv])))
endif
else
call SetUnitPosition(at[i],GetRectMinX(Ot)+($80*(i-1)),GetRectCenterY(Ot))
call SetUnitPosition(Et[i],GetRectMinX(Ot)+($80*(i-1)),GetRectCenterY(Ot))
endif
call SetUnitFacing(at[i],270)
call SetUnitVertexColorBJ(Et[i],.0,.0,.0,'d')
if Player(i-1)==GetLocalPlayer()then
call SetUnitVertexColorBJ(Et[i],100.,100.,100.,0)
endif
set Rx[i]=false
set Ox[i]=false
set Ix[i]=0
call UnitRemoveAbility(at[i],'Aloc')
call UnitRemoveAbility(nt[i],'Aloc')
call UnitRemoveAbility(Vt[i],'Aloc')
call ShowUnitShow(at[i])
call ShowUnitShow(nt[i])
call ShowUnitShow(Vt[i])
call UnitAddAbility(at[i],'Aloc')
call UnitAddAbility(nt[i],'Aloc')
call UnitAddAbility(Vt[i],'Aloc')
call SetTextTagVisibility(he[i],true)
set Le[i]=IsUnitInRegion(Me,at[i])
endif
set i=i+1
endloop
set P=false
endfunction
function v4 takes nothing returns nothing
call o3(kv,20)
if M3()==6 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"Secret World: 카페")
elseif sU[kv]==1 and SU[kv]+Bw[de]>8 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"World 2: 옥스포드")
elseif sU[kv]==2 and SU[kv]+Bw[de]>8 then
if M3()==1 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"Final World(Part 2): 도시")
elseif M3()==2 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"Final World(Part 3): 발렌타인 데이")
elseif M3()==3 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"Final World(Part 4): 해변")
elseif M3()==4 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"Final World(Part 5): 펩시")
elseif M3()==5 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"Secret World: 월드 첼린지")
elseif M3()==7 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"Final World(Part 6): 사막")
elseif M3()==8 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"Secret World: 엘린 숲")
elseif M3()==9 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"Random World: ???")
elseif M3()==$B then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"Secret World: 깊은 산속")
else
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"Final World: 핑크 핑크")
endif
elseif M3()==$A then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"Secret World: 얼음 동굴")
elseif false==false then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"World 1: 집 앞마당")
endif
call Y3()
if false then
call TimerStart(bw[(de)],((0)*1.),(false),(function z3))
else
call TimerStart(bw[(de)],((3.)*1.),(false),(function z3))
endif
endfunction
function e4 takes integer i returns nothing
if Re==false then
set Re=true
set de=GZ(i)
if(sU[kv]==3 and SU[kv]==5)or(sU[kv]==4 and SU[kv]==8)or(sU[kv]==9 and SU[kv]==3)or(sU[kv]==$A and SU[kv]==7)or(sU[kv]==$C and SU[kv]==8)or(sU[kv]==$D and SU[kv]==8)then
call PauseTimer(be)
call DestroyTimerDialog(Ce)
endif
call k0(1.,0,0,0,'d',0,0,0,0)
if Tv==false then
if(SU[kv]+i>8 or(sU[kv]==1 and SU[kv]==0))then
call CinematicModeBJ(true,bj_FORCE_ALL_PLAYERS)
if sU[kv]==1 and SU[kv]==0 then
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,0)
if false then
call i3(kv,$C,8)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"Secret World: 깊은 산속")
call TimerStart(bw[(de)],((3.)*1.),(false),(function v4))
else
call TimerStart(bw[(de)],((1.)*1.),(false),(function v4))
endif
elseif sU[kv]==3 or sU[kv]==4 or sU[kv]==9 or sU[kv]==$D then
call k0(2.,0,0,0,'d','d','d','d',0)
call TriggerExecute(rx)
elseif sU[kv]==5 then
call k0(2.,0,0,0,'d','d','d','d',0)
call TriggerExecute(gx)
elseif sU[kv]==6 then
call k0(2.,0,0,0,'d','d','d','d',0)
call TriggerExecute(mx)
elseif sU[kv]==7 then
call k0(2.,0,0,0,'d','d','d','d',0)
call TriggerExecute(Wx)
elseif sU[kv]==$A then
call k0(2.,0,0,0,'d','d','d','d',0)
set ux=true
call TriggerExecute(Wx)
elseif sU[kv]==$C then
call k0(2.,0,0,0,'d','d','d','d',0)
set Ux=true
call TriggerExecute(Wx)
else
call StopSound(Ee,false,true)
if Ie then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 방장이 월드를 스킵하였습니다.")
endif
if false then
call TimerStart(bw[(de)],((0)*1.),(false),(function v4))
else
call TimerStart(bw[(de)],((2.)*1.),(false),(function v4))
endif
endif
elseif M3()==$A and i>0 then
call CinematicModeBJ(true,bj_FORCE_ALL_PLAYERS)
call StopSound(Ee,false,true)
call TimerStart(bw[(de)],((2.)*1.),(false),(function v4))
elseif SU[kv]+i>7 and sU[kv]==8 and it==false then
set Tx=true
call CinematicModeBJ(true,bj_FORCE_ALL_PLAYERS)
call k0(2.,0,0,0,'d','d','d','d',0)
call TriggerExecute(Wx)
elseif sU[kv]==$B and SU[kv]+i>5 and it==false then
set ro=true
call CinematicModeBJ(true,bj_FORCE_ALL_PLAYERS)
call k0(2.,0,0,0,'d','d','d','d',0)
call TriggerExecute(Wx)
else
call TimerStart(bw[(de)],((1.5)*1.),(false),(function z3))
endif
elseif tv+i>8 then
call CinematicModeBJ(true,bj_FORCE_ALL_PLAYERS)
call k0(2.,0,0,0,'d','d','d','d',0)
call TriggerExecute(rx)
else
call TimerStart(bw[(de)],((1.5)*1.),(false),(function z3))
endif
endif
endfunction
function x4 takes nothing returns nothing
local integer i=1
local string o4
if Bw[de]>70 then
call SetSoundPitch(Ee,Bw[de]*.01)
set Bw[de]=Bw[de]-1
else
call StopSound(Ee,false,true)
call HZ(de)
if sU[kv]==1 then
set o4="협동을 하랬더니 조별 과제 하고 있냐"
elseif sU[kv]==2 then
if SU[kv]<5 then
set o4="소개팅은 물 건너갔어."
else
set o4="절반은 갔는데!"
endif
elseif sU[kv]==3 then
if SU[kv]<5 then
set o4="이럴 순 없어!"
else
set o4="안 돼... 소개팅이 코앞인데!"
endif
elseif sU[kv]==4 then
if SU[kv]<5 then
set o4="젠장... 괜히 어려운 길로 갔어!"
else
set o4="으흑... 내 소개팅!"
endif
elseif sU[kv]>=5 then
if SU[kv]<5 then
set o4="거 길 한번 험난하네 진짜."
else
set o4="아... 이번엔 제대로 된 소개팅을 할 수 있었는데!"
endif
else
set o4="졌어"
endif
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call CustomDefeatBJ(Player(i-1),o4)
endif
set i=i+1
endloop
endif
endfunction
function r4 takes nothing returns nothing
if tU[kv]>0 then
call o3(kv,tU[kv]-1)
call e4(0)
else
set Re=true
set de=GZ('d')
call k0(2.5,0,0,0,'d',0,0,0,0)
call TimerStart(bw[(de)],((.1)*1.),(true),(function x4))
endif
endfunction
function i4 takes nothing returns nothing
call SaveRectHandle(Ve,1,1,ek)
call SaveRectHandle(Ve,1,2,xk)
call SaveRectHandle(Ve,1,3,ok)
call SaveRectHandle(Ve,1,4,rk)
call SaveRectHandle(Ve,1,5,ik)
call SaveRectHandle(Ve,1,6,ak)
call SaveRectHandle(Ve,1,7,nk)
call SaveRectHandle(Ve,1,8,Vk)
call SaveRectHandle(Ve,2,1,Ek)
call SaveRectHandle(Ve,2,2,Xk)
call SaveRectHandle(Ve,2,3,Ok)
call SaveRectHandle(Ve,2,4,Rk)
call SaveRectHandle(Ve,2,5,Ik)
call SaveRectHandle(Ve,2,6,Ak)
call SaveRectHandle(Ve,2,7,Nk)
call SaveRectHandle(Ve,2,8,bk)
call SaveRectHandle(Ve,3,1,Bk)
call SaveRectHandle(Ve,3,2,ck)
call SaveRectHandle(Ve,3,3,Ck)
call SaveRectHandle(Ve,3,4,dk)
call SaveRectHandle(Ve,3,5,Dk)
call SaveRectHandle(Ve,3,6,fk)
call SaveRectHandle(Ve,3,7,Fk)
call SaveRectHandle(Ve,3,8,gk)
call SaveRectHandle(Ve,4,1,Gk)
call SaveRectHandle(Ve,4,2,hk)
call SaveRectHandle(Ve,4,3,Hk)
call SaveRectHandle(Ve,4,4,jk)
call SaveRectHandle(Ve,4,5,Jk)
call SaveRectHandle(Ve,4,6,kk)
call SaveRectHandle(Ve,4,7,Kk)
call SaveRectHandle(Ve,4,8,lk)
call SaveRectHandle(Ve,5,1,Lk)
call SaveRectHandle(Ve,5,2,mk)
call SaveRectHandle(Ve,5,3,Mk)
call SaveRectHandle(Ve,5,4,pk)
call SaveRectHandle(Ve,5,5,Pk)
call SaveRectHandle(Ve,5,6,qk)
call SaveRectHandle(Ve,5,7,Qk)
call SaveRectHandle(Ve,5,8,sk)
call SaveRectHandle(Ve,6,1,Sk)
call SaveRectHandle(Ve,6,2,Tk)
call SaveRectHandle(Ve,6,3,uk)
call SaveRectHandle(Ve,6,4,Uk)
call SaveRectHandle(Ve,6,5,wk)
call SaveRectHandle(Ve,6,6,Wk)
call SaveRectHandle(Ve,6,7,yk)
call SaveRectHandle(Ve,6,8,Yk)
call SaveRectHandle(Ve,7,1,zk)
call SaveRectHandle(Ve,7,2,Zk)
call SaveRectHandle(Ve,7,3,vK)
call SaveRectHandle(Ve,7,4,eK)
call SaveRectHandle(Ve,7,5,xK)
call SaveRectHandle(Ve,7,6,oK)
call SaveRectHandle(Ve,7,7,rK)
call SaveRectHandle(Ve,7,8,iK)
call SaveRectHandle(Ve,8,1,aK)
call SaveRectHandle(Ve,8,2,nK)
call SaveRectHandle(Ve,8,3,VK)
call SaveRectHandle(Ve,8,4,EK)
call SaveRectHandle(Ve,8,5,XK)
call SaveRectHandle(Ve,8,6,OK)
call SaveRectHandle(Ve,8,7,RK)
call SaveRectHandle(Ve,9,1,IK)
call SaveRectHandle(Ve,9,2,AK)
call SaveRectHandle(Ve,9,3,NK)
call SaveRectHandle(Ve,9,4,bK)
call SaveRectHandle(Ve,9,5,BK)
call SaveRectHandle(Ve,9,6,cK)
call SaveRectHandle(Ve,9,7,CK)
call SaveRectHandle(Ve,9,8,dK)
call SaveRectHandle(Ve,$A,1,DK)
call SaveRectHandle(Ve,$A,2,fK)
call SaveRectHandle(Ve,$A,3,FK)
call SaveRectHandle(Ve,$A,4,gK)
call SaveRectHandle(Ve,$A,5,GK)
call SaveRectHandle(Ve,$A,6,hK)
call SaveRectHandle(Ve,$A,7,HK)
call SaveRectHandle(Ve,$A,8,jK)
call SaveRectHandle(Ve,$B,1,JK)
call SaveRectHandle(Ve,$B,2,kK)
call SaveRectHandle(Ve,$B,3,KK)
call SaveRectHandle(Ve,$B,4,lK)
call SaveRectHandle(Ve,$B,5,LK)
call SaveRectHandle(Ve,$C,1,mK)
call SaveRectHandle(Ve,$C,2,MK)
call SaveRectHandle(Ve,$C,3,pK)
call SaveRectHandle(Ve,$C,4,PK)
call SaveRectHandle(Ve,$C,5,qK)
call SaveRectHandle(Ve,$C,6,QK)
call SaveRectHandle(Ve,$C,7,sK)
call SaveRectHandle(Ve,$C,8,SK)
call SaveRectHandle(Ve,$D,-1,Es)
call SaveRectHandle(Ve,$D,1,tK)
call SaveRectHandle(Ve,$D,2,TK)
call SaveRectHandle(Ve,$D,3,uK)
call SaveRectHandle(Ve,$D,4,UK)
call SaveRectHandle(Ve,$D,5,wK)
call SaveRectHandle(Ve,$D,6,WK)
call SaveRectHandle(Ve,$D,7,yK)
call SaveRectHandle(Ve,$D,8,cQ)
call SaveRectHandle(Ve,-$D,-1,Xs)
call SaveRectHandle(Ve,-$D,1,YK)
call SaveRectHandle(Ve,-$D,2,zK)
call SaveRectHandle(Ve,-$D,3,ZK)
call SaveRectHandle(Ve,-$D,4,vl)
call SaveRectHandle(Ve,-$D,5,el)
call SaveRectHandle(Ve,-$D,6,xl)
call SaveRectHandle(Ve,-$D,7,ol)
call SaveRectHandle(Ve,-$D,8,CQ)
set Ot=LoadRectHandle(Ve,1,1)
call TriggerRegisterTimerExpireEvent(Xe,be)
call TriggerAddAction(Xe,function r4)
call TriggerAddAction(Oe,function w3)
endfunction
function s__eventStruct__get_e takes nothing returns integer
return LoadInteger(Fe,0,GetHandleId(GetTriggeringTrigger()))
endfunction
function a4 takes integer id,integer ev,code c returns trigger
local destructable d=LoadDestructableHandle(fe,0,ev)
set ge=CreateTrigger()
if d==null then
set d=CreateDestructable('OTis',0,0,0,0,0)
call KillDestructable(d)
call SaveDestructableHandle(fe,0,ev,d)
endif
call TriggerRegisterDeathEvent(ge,d)
call SaveInteger(Fe,0,GetHandleId(ge),id)
call TriggerAddCondition(ge,Filter(c))
set d=null
return ge
endfunction
function n4 takes nothing returns nothing
set Ge[1]="|cffFF0202"
set Ge[2]="|cff0041FF"
set Ge[3]="|cff1BE5B8"
set Ge[4]="|cff530080"
set Ge[5]="|cffFFFC00"
set Ge[6]="|cffFE890D"
set Ge[7]="|cff1FBF00"
set Ge[8]="|cffE45AAF"
set Ge[9]="|cff949596"
endfunction
function s__tick__get_count takes nothing returns integer
return Aw
endfunction
function s__tick_getExpired takes nothing returns integer
return LoadInteger(Nw,0,GetHandleId(GetExpiredTimer()))
endfunction
function V4 takes integer hZ returns integer
local integer gz=jZ()
local integer i=gz
if i>Aw then
set Aw=gz
endif
if bw[gz]==null then
set bw[gz]=CreateTimer()
call SaveInteger(Nw,0,GetHandleId(bw[gz]),gz)
endif
set Bw[gz]=hZ
return gz
endfunction
function E4 takes integer gz returns nothing
call PauseTimer(bw[gz])
call JZ(gz)
endfunction
function X4 takes integer c3 returns timer
if(Je==0)then
if(not Ke)then
call TriggerEvaluate(MY[(1)])
set Je=Je-1
else
set iY[0]=CreateTimer()
endif
else
set Je=Je-1
endif
call SaveInteger(je,0,GetHandleId((iY[Je])),(c3))
return iY[Je]
endfunction
function NewTimer takes nothing returns timer
return X4(0)
endfunction
function O4 takes timer t returns nothing
if(t==null)then
return
endif
if(Je==8190)then
call DestroyTimer(t)
else
call PauseTimer(t)
if((LoadInteger(je,0,GetHandleId((t))))==ke)then
return
endif
call SaveInteger(je,0,GetHandleId((t)),(ke))
set iY[Je]=t
set Je=Je+1
endif
endfunction
function R4 takes nothing returns nothing
local integer i=0
local integer o=-1
local boolean oops=false
if(Ke)then
return
else
set Ke=true
endif
set je=InitHashtable()
loop
exitwhen(i==256)
set iY[i]=CreateTimer()
call SaveInteger(je,0,GetHandleId((iY[i])),(ke))
set i=i+1
endloop
set Je=256
endfunction
function I4 takes nothing returns nothing
local timer t=GetExpiredTimer()
local integer id=GetHandleId(t)
local integer i=LoadInteger(le,id,0)
call DestroyTimer(t)
call FlushChildHashtable(le,GetHandleId(t))
set me[i]=false
set t=null
endfunction
function A4 takes integer i returns nothing
local timer t=CreateTimer()
local integer id=GetHandleId(t)
set me[i]=true
call SaveInteger(le,id,0,i)
call TimerStart(t,.2,false,function I4)
set t=null
endfunction
function N4 takes integer i returns nothing
local real x=GetUnitX(at[i])
local real y=GetUnitY(at[i])+70
if me[i]==false then
if Player(i-1)==GetLocalPlayer()then
call StopSound(AS,false,false)
call StartSound(AS)
endif
call DestroyEffect(AddSpecialEffect("war3mapImported\\Splash.mdx",x,y))
call A4(i)
endif
endfunction
function b4 takes nothing returns nothing
local integer i=1
local real x=GetUnitX(at[i])
local real y=GetUnitY(at[i])+90
loop
exitwhen i>7
call A4(i)
set i=i+1
endloop
endfunction
function B4 takes nothing returns nothing
local integer i=GetPlayerId(GetOwningPlayer(GetTriggerUnit()))+1
local integer j=7+1
local integer O0=GetUnitTypeId(GetTriggerUnit())
if(X0(O0)or O0=='opeo' or O0=='ogru' or O0=='otau' or O0=='ohun' or O0=='ocat')then
if i>7 then
loop
exitwhen at[j]==GetTriggerUnit()or Ae<j-7
set j=j+1
endloop
set i=j
endif
if Le[i]==false then
set Le[i]=true
call N4(i)
endif
endif
endfunction
function c4 takes nothing returns nothing
local integer i=GetPlayerId(GetOwningPlayer(GetTriggerUnit()))+1
local integer j=7+1
local integer O0=GetUnitTypeId(GetTriggerUnit())
if(X0(O0)or O0=='opeo' or O0=='ogru' or O0=='otau')then
if i>7 then
loop
exitwhen at[j]==GetTriggerUnit()or Ae<j-7
set j=j+1
endloop
set i=j
endif
if Le[i] then
set Le[i]=false
call N4(i)
endif
endif
endfunction
function C4 takes nothing returns nothing
local integer i=1
local trigger t=CreateTrigger()
set Me=CreateRegion()
call RegionAddRect(Me,bq)
call RegionAddRect(Me,Bq)
call RegionAddRect(Me,cq)
call RegionAddRect(Me,Cq)
call RegionAddRect(Me,dq)
call RegionAddRect(Me,Dq)
call RegionAddRect(Me,fq)
call RegionAddRect(Me,Fq)
call RegionAddRect(Me,gq)
call RegionAddRect(Me,Gq)
call RegionAddRect(Me,hq)
call RegionAddRect(Me,Hq)
call RegionAddRect(Me,jq)
call RegionAddRect(Me,Jq)
call RegionAddRect(Me,kq)
call RegionAddRect(Me,Kq)
call RegionAddRect(Me,lq)
call RegionAddRect(Me,Lq)
call RegionAddRect(Me,mq)
call RegionAddRect(Me,Mq)
call RegionAddRect(Me,pq)
call RegionAddRect(Me,Pq)
call RegionAddRect(Me,qq)
call RegionAddRect(Me,Qq)
call RegionAddRect(Me,sq)
call RegionAddRect(Me,Sq)
call RegionAddRect(Me,tq)
call RegionAddRect(Me,Tq)
call RegionAddRect(Me,uq)
call RegionAddRect(Me,Uq)
call RegionAddRect(Me,wq)
call RegionAddRect(Me,Wq)
call RegionAddRect(Me,yq)
call RegionAddRect(Me,Yq)
call RegionAddRect(Me,zq)
call RegionAddRect(Me,Zq)
call RegionAddRect(Me,vQ)
call RegionAddRect(Me,eQ)
call RegionAddRect(Me,xQ)
call RegionAddRect(Me,oQ)
call RegionAddRect(Me,rQ)
call RegionAddRect(Me,iQ)
call RegionAddRect(Me,aQ)
call RegionAddRect(Me,nQ)
call RegionAddRect(Me,VQ)
call RegionAddRect(Me,EQ)
call RegionAddRect(Me,XQ)
call RegionAddRect(Me,OQ)
call RegionAddRect(Me,RQ)
call RegionAddRect(Me,IQ)
call RegionAddRect(Me,AQ)
call RegionAddRect(Me,NQ)
call TriggerRegisterEnterRegion(t,Me,null)
call TriggerAddAction(t,function B4)
set t=CreateTrigger()
call TriggerRegisterLeaveRegion(t,Me,null)
call TriggerAddAction(t,function c4)
set pe=CreateTrigger()
call TriggerAddAction(pe,function b4)
set t=null
endfunction
function d4 takes nothing returns nothing
local integer i=GetPlayerId(GetOwningPlayer(GetTriggerUnit()))+1
if X0(GetUnitTypeId(GetTriggerUnit()))and yt[0]==false then
if GetLocalPlayer()==GetOwningPlayer(GetTriggerUnit())then
call ClearTextMessages()
endif
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"|cff92e3de※ 방장(재시작 권한을 가진 사람)이 여기서 첫 번째 비밀 코드를 입력하면 이용하실 수 있습니다!|r")
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"|cff92e3de※ 첫 번째 비밀 코드는 기존 스테이지를 클리어하면 얻을 수 있습니다.|r")
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"|cff92e3de※ 예: \"-???\"|r")
endif
endfunction
function D4 takes nothing returns nothing
local integer i=GetPlayerId(GetOwningPlayer(GetTriggerUnit()))+1
if X0(GetUnitTypeId(GetTriggerUnit()))and yt[1]==false then
if GetLocalPlayer()==GetOwningPlayer(GetTriggerUnit())then
call ClearTextMessages()
endif
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"|cffdfee59※ 방장(재시작 권한을 가진 사람)이 여기서 두 번째 비밀 코드를 입력하면 이용하실 수 있습니다!|r")
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"|cffdfee59※ 두 번째 비밀 코드는 지하철 루트를 클리어하면 얻을 수 있습니다.|r")
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"|cffdfee59※ 예: \"-???\"|r")
endif
endfunction
function f4 takes nothing returns nothing
local integer i=GetPlayerId(GetOwningPlayer(GetTriggerUnit()))+1
if X0(GetUnitTypeId(GetTriggerUnit()))and yt[2]==false then
if GetLocalPlayer()==GetOwningPlayer(GetTriggerUnit())then
call ClearTextMessages()
endif
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"|cff24f3ff※ 방장(재시작 권한을 가진 사람)이 여기서 두 번째 비밀 코드를 입력하면 이용하실 수 있습니다!|r")
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"|cff24f3ff※ 두 번째 비밀 코드는 지하철 루트를 클리어하면 얻을 수 있습니다.|r")
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"|cff24f3ff※ 예: \"-???\"|r")
endif
endfunction
function F4 takes nothing returns nothing
local integer i=GetPlayerId(GetOwningPlayer(GetTriggerUnit()))+1
if X0(GetUnitTypeId(GetTriggerUnit()))and yt[3]==false then
if GetLocalPlayer()==GetOwningPlayer(GetTriggerUnit())then
call ClearTextMessages()
endif
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"|cffff5555※ 방장(재시작 권한을 가진 사람)이 여기서 두 번째 비밀 코드를 입력하면 이용하실 수 있습니다!|r")
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"|cffff5555※ 두 번째 비밀 코드는 지하철 루트를 클리어하면 얻을 수 있습니다.|r")
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"|cffff5555※ 예: \"-???\"|r")
endif
endfunction
function g4 takes nothing returns nothing
local integer i=GetPlayerId(GetOwningPlayer(GetTriggerUnit()))+1
if X0(GetUnitTypeId(GetTriggerUnit()))and yt[5]==false then
if GetLocalPlayer()==GetOwningPlayer(GetTriggerUnit())then
call ClearTextMessages()
endif
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"|cffff5555※ 방장(재시작 권한을 가진 사람)이 여기서 두 번째 비밀 코드를 입력하면 이용하실 수 있습니다!|r")
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"|cffff5555※ 두 번째 비밀 코드는 지하철 루트를 클리어하면 얻을 수 있습니다.|r")
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"|cffff5555※ 예: \"-???\"|r")
endif
endfunction
function G4 takes nothing returns nothing
local integer i=GetPlayerId(GetOwningPlayer(GetTriggerUnit()))+1
if X0(GetUnitTypeId(GetTriggerUnit()))and yt[6]==false then
if GetLocalPlayer()==GetOwningPlayer(GetTriggerUnit())then
call ClearTextMessages()
endif
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"|cffc3eb13※ 방장(재시작 권한을 가진 사람)이 여기서 두 번째 비밀 코드를 입력하면 이용하실 수 있습니다!|r")
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"|cffc3eb13※ 두 번째 비밀 코드는 지하철 루트를 클리어하면 얻을 수 있습니다.|r")
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"|cffc3eb13※ 예: \"-???\"|r")
endif
endfunction
function h4 takes nothing returns nothing
local integer i=GetPlayerId(GetOwningPlayer(GetTriggerUnit()))+1
if X0(GetUnitTypeId(GetTriggerUnit()))and yt[8]==false then
if GetLocalPlayer()==GetOwningPlayer(GetTriggerUnit())then
call ClearTextMessages()
endif
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"|cff325de9※ 암호를 입력하세요!|r")
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"|cff325de9※ 암호는 방장(재시작 권한을 가진 사람)만 입력할 수 있습니다.|r")
endif
endfunction
function H4 takes nothing returns nothing
local trigger array t
local integer i=0
local integer D1=6
loop
exitwhen i>D1
set t[i]=CreateTrigger()
set i=i+1
endloop
call TriggerRegisterEnterRectSimple(t[0],Vl)
call TriggerRegisterEnterRectSimple(t[1],bQ)
call TriggerRegisterEnterRectSimple(t[2],ln)
call TriggerRegisterEnterRectSimple(t[3],VR)
call TriggerRegisterEnterRectSimple(t[4],qX)
call TriggerRegisterEnterRectSimple(t[5],gJ)
call TriggerRegisterEnterRectSimple(t[6],QX)
call TriggerAddAction(t[0],function d4)
call TriggerAddAction(t[1],function D4)
call TriggerAddAction(t[2],function f4)
call TriggerAddAction(t[3],function F4)
call TriggerAddAction(t[4],function g4)
call TriggerAddAction(t[5],function G4)
call TriggerAddAction(t[6],function h4)
set i=0
loop
exitwhen i>D1
set t[i]=null
set i=i+1
endloop
endfunction
function j4 takes nothing returns nothing
local integer i=1
local integer J4
local integer array k4
local string s="ABCDEFGHIJKLMNOPQRSTUVWXYZ"
local string Message="혹시 비밀 코드 얻을려고 코드 트리거를 찾다가 이 글을 보고 계신다면... 다른 의미로 노력이 가상하니 가져가세요♥"
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set Pe[i]=StringCase(GetPlayerName(Player(i-1)),false)
set J4=StringHash(Pe[i])
if J4<0 then
set J4=J4*-1
endif
if J4<$186A0 then
set J4=J4+$186A0
endif
set k4[1]=ModuloInteger(S2I(SubString(I2S(J4),0,2)),26)
set k4[2]=ModuloInteger(S2I(SubString(I2S(J4),2,4)),26)
set k4[3]=ModuloInteger(S2I(SubString(I2S(J4),4,6)),26)
set qe[i]=SubString(s,k4[1],k4[1]+1)
set qe[i]=qe[i]+SubString(s,k4[2],k4[2]+1)
set qe[i]=qe[i]+SubString(s,k4[3],k4[3]+1)
set J4=StringHash(qe[i])
if J4<0 then
set J4=J4*-1
endif
if J4<$186A0 then
set J4=J4+$186A0
endif
set k4[1]=ModuloInteger(S2I(SubString(I2S(J4),0,2)),26)
set k4[2]=ModuloInteger(S2I(SubString(I2S(J4),2,4)),26)
set k4[3]=ModuloInteger(S2I(SubString(I2S(J4),4,6)),26)
set Qe[i]=SubString(s,k4[1],k4[1]+1)
set Qe[i]=Qe[i]+SubString(s,k4[2],k4[2]+1)
set Qe[i]=Qe[i]+SubString(s,k4[3],k4[3]+1)
set J4=StringHash(Qe[i])
if J4<0 then
set J4=J4*-1
endif
if J4<$186A0 then
set J4=J4+$186A0
endif
set k4[1]=ModuloInteger(S2I(SubString(I2S(J4),0,2)),26)
set k4[2]=ModuloInteger(S2I(SubString(I2S(J4),2,4)),26)
set k4[3]=ModuloInteger(S2I(SubString(I2S(J4),4,6)),26)
set se[i]=SubString(s,k4[1],k4[1]+1)
set se[i]=se[i]+SubString(s,k4[2],k4[2]+1)
set se[i]=se[i]+SubString(s,k4[3],k4[3]+1)
set J4=StringHash(se[i])
if J4<0 then
set J4=J4*-1
endif
if J4<$186A0 then
set J4=J4+$186A0
endif
set k4[1]=ModuloInteger(S2I(SubString(I2S(J4),0,2)),26)
set k4[2]=ModuloInteger(S2I(SubString(I2S(J4),2,4)),26)
set k4[3]=ModuloInteger(S2I(SubString(I2S(J4),4,6)),26)
set Se[i]=SubString(s,k4[1],k4[1]+1)
set Se[i]=Se[i]+SubString(s,k4[2],k4[2]+1)
set Se[i]=Se[i]+SubString(s,k4[3],k4[3]+1)
set J4=StringHash(I2S(StringHash(Pe[i])))
if J4<0 then
set J4=J4*-1
endif
if J4<$186A0 then
set J4=J4+$186A0
endif
set k4[1]=ModuloInteger(S2I(SubString(I2S(J4),0,2)),26)
set k4[2]=ModuloInteger(S2I(SubString(I2S(J4),2,4)),26)
set k4[3]=ModuloInteger(S2I(SubString(I2S(J4),4,6)),26)
set te[i]=SubString(s,k4[1],k4[1]+1)
set te[i]=te[i]+SubString(s,k4[2],k4[2]+1)
set te[i]=te[i]+SubString(s,k4[3],k4[3]+1)
set J4=StringHash(te[i])
if J4<0 then
set J4=J4*-1
endif
if J4<$186A0 then
set J4=J4+$186A0
endif
set k4[1]=ModuloInteger(S2I(SubString(I2S(J4),0,2)),26)
set k4[2]=ModuloInteger(S2I(SubString(I2S(J4),2,4)),26)
set k4[3]=ModuloInteger(S2I(SubString(I2S(J4),4,6)),26)
set Te[i]=SubString(s,k4[1],k4[1]+1)
set Te[i]=Te[i]+SubString(s,k4[2],k4[2]+1)
set Te[i]=Te[i]+SubString(s,k4[3],k4[3]+1)
set J4=StringHash(Te[i])
set J4=StringHash(I2S(J4))
if J4<0 then
set J4=J4*-1
endif
if J4<$186A0 then
set J4=J4+$186A0
endif
set k4[1]=ModuloInteger(S2I(SubString(I2S(J4),0,2)),26)
set k4[2]=ModuloInteger(S2I(SubString(I2S(J4),2,4)),26)
set k4[3]=ModuloInteger(S2I(SubString(I2S(J4),4,6)),26)
set ue[i]=SubString(s,k4[1],k4[1]+1)
set ue[i]=ue[i]+SubString(s,k4[2],k4[2]+1)
set ue[i]=ue[i]+SubString(s,k4[3],k4[3]+1)
set J4=StringHash(te[i])
set J4=StringHash(I2S(J4))
if J4<0 then
set J4=J4*-1
endif
if J4<$186A0 then
set J4=J4+$186A0
endif
set k4[1]=ModuloInteger(S2I(SubString(I2S(J4),0,2)),26)
set k4[2]=ModuloInteger(S2I(SubString(I2S(J4),2,4)),26)
set k4[3]=ModuloInteger(S2I(SubString(I2S(J4),4,6)),26)
set Ue[i]=SubString(s,k4[1],k4[1]+1)
set Ue[i]=Ue[i]+SubString(s,k4[2],k4[2]+1)
set Ue[i]=Ue[i]+SubString(s,k4[3],k4[3]+1)
set J4=StringHash(Ue[i])
set J4=StringHash(I2S(J4))
set J4=StringHash(I2S(J4))
if J4<0 then
set J4=J4*-1
endif
if J4<$186A0 then
set J4=J4+$186A0
endif
set k4[1]=ModuloInteger(S2I(SubString(I2S(J4),0,2)),26)
set k4[2]=ModuloInteger(S2I(SubString(I2S(J4),2,4)),26)
set k4[3]=ModuloInteger(S2I(SubString(I2S(J4),4,6)),26)
set We[i]=SubString(s,k4[1],k4[1]+1)
set We[i]=We[i]+SubString(s,k4[2],k4[2]+1)
set We[i]=We[i]+SubString(s,k4[3],k4[3]+1)
set J4=StringHash(ue[i])
if J4<0 then
set J4=J4*-1
endif
if J4<$186A0 then
set J4=J4+$186A0
endif
set k4[1]=ModuloInteger(S2I(SubString(I2S(J4),0,2)),26)
set k4[2]=ModuloInteger(S2I(SubString(I2S(J4),2,4)),26)
set k4[3]=ModuloInteger(S2I(SubString(I2S(J4),4,6)),26)
set ye[i]=SubString(s,k4[1],k4[1]+1)
set ye[i]=ye[i]+SubString(s,k4[2],k4[2]+1)
set ye[i]=ye[i]+SubString(s,k4[3],k4[3]+1)
set J4=StringHash(ye[i])
if J4<0 then
set J4=J4*-1
endif
if J4<$186A0 then
set J4=J4+$186A0
endif
set k4[1]=ModuloInteger(S2I(SubString(I2S(J4),0,2)),26)
set k4[2]=ModuloInteger(S2I(SubString(I2S(J4),2,4)),26)
set k4[3]=ModuloInteger(S2I(SubString(I2S(J4),4,6)),26)
set Ye[i]=SubString(s,k4[1],k4[1]+1)
set Ye[i]=Ye[i]+SubString(s,k4[2],k4[2]+1)
set Ye[i]=Ye[i]+SubString(s,k4[3],k4[3]+1)
set J4=StringHash(Ye[i])
if J4<0 then
set J4=J4*-1
endif
if J4<$186A0 then
set J4=J4+$186A0
endif
set k4[1]=ModuloInteger(S2I(SubString(I2S(J4),0,2)),26)
set k4[2]=ModuloInteger(S2I(SubString(I2S(J4),2,4)),26)
set k4[3]=ModuloInteger(S2I(SubString(I2S(J4),4,6)),26)
set ze[i]=SubString(s,k4[1],k4[1]+1)
set ze[i]=ze[i]+SubString(s,k4[2],k4[2]+1)
set ze[i]=ze[i]+SubString(s,k4[3],k4[3]+1)
endif
set i=i+1
endloop
endfunction
function K4 takes nothing returns nothing
local trigger t=CreateTrigger()
call TriggerRegisterTimerEvent(t,.0,false)
call TriggerAddAction(t,function j4)
set t=null
endfunction
function l4 takes integer i returns nothing
local real x=GetUnitX(at[i])
local real y=GetUnitY(at[i])
local real L4=(((x)*1.)+((70)*1.)*Cos(((ox[i])*1.)*bj_DEGTORAD))
local real m4=(((y)*1.)+((70)*1.)*Sin(((ox[i])*1.)*bj_DEGTORAD))
set Qv[i]=m4-y
set SS[i]=L4-x
if Qv[i]>50 then
set Qv[i]=50
elseif Qv[i]<-50 then
set Qv[i]=-50
endif
if SS[i]>40 then
set SS[i]=40
elseif SS[i]<-40 then
set SS[i]=-40
endif
endfunction
function M4 takes integer i returns nothing
local integer j=1
local real x
local real y
local real L4
local real m4
loop
exitwhen vx[j]==null
if GetTriggeringRegion()==vx[j]then
set x=GetUnitX(at[i])
set y=GetUnitY(at[i])
set L4=(((x)*1.)+((70)*1.)*Cos(((xx[j])*1.)*bj_DEGTORAD))
set m4=(((y)*1.)+((70)*1.)*Sin(((xx[j])*1.)*bj_DEGTORAD))
call CreateUnit(Player($B),'ewsp',x,y,xx[j])
set ox[i]=xx[j]
set Qv[i]=m4-y
set SS[i]=L4-x
if Qv[i]>50 then
set Qv[i]=50
elseif Qv[i]<-50 then
set Qv[i]=-50
endif
if SS[i]>40 then
set SS[i]=40
elseif SS[i]<-40 then
set SS[i]=-40
endif
if GetLocalPlayer()==Player(i-1)then
call StartSound(NS)
call CinematicFilterGenericBJ(.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',100.,.0,.0,100.,'d',0,100.)
endif
return
endif
set j=j+1
endloop
endfunction
function p4 takes nothing returns nothing
local integer i=GetPlayerId(GetOwningPlayer(GetTriggerUnit()))+1
local integer j=7+1
local integer O0=GetUnitTypeId(GetTriggerUnit())
if Re==false and M==false and(X0(O0)or O0=='opeo' or O0=='ogru' or O0=='otau' or O0=='ocat' or O0=='ohun' or O0=='o000')then
if i>7 then
loop
exitwhen at[j]==GetTriggerUnit()or Ae<j-7
set j=j+1
endloop
set i=j
endif
call M4(i)
endif
endfunction
function P4 takes trigger t,rect r,real a returns nothing
set Ze=Ze+1
set vx[Ze]=CreateRegion()
call RegionAddRect(vx[Ze],r)
call RegionAddRect(ex,r)
set xx[Ze]=a
call TriggerRegisterEnterRegion(t,vx[Ze],null)
endfunction
function q4 takes nothing returns nothing
local trigger t=CreateTrigger()
set ex=CreateRegion()
call P4(t,ho,0)
call P4(t,Ho,70)
call P4(t,jo,$B4)
call P4(t,Jo,$B4)
call P4(t,ko,$B4)
call P4(t,Ko,30)
call P4(t,lo,30)
call P4(t,Lo,0)
call P4(t,mo,'s')
call P4(t,Mo,0)
call P4(t,po,35)
call P4(t,Po,$91)
call P4(t,qo,$B4)
call P4(t,Qo,0)
call P4(t,so,0)
call P4(t,So,$87)
call P4(t,to,0)
call P4(t,To,0)
call P4(t,uo,0)
call P4(t,Uo,0)
call P4(t,wo,$B4)
call P4(t,Wo,$B4)
call P4(t,yo,$87)
call P4(t,Yo,45)
call P4(t,zo,$B4)
call P4(t,Zo,0)
call P4(t,vr,$B4)
call P4(t,er,0)
call P4(t,xr,$96)
call P4(t,rr,30)
call P4(t,ir,$96)
call P4(t,ar,$B4)
call P4(t,nr,$B4)
call P4(t,Vr,$87)
call P4(t,Er,45)
call P4(t,Xr,0)
call P4(t,Rr,0)
call P4(t,Ir,0)
call P4(t,Ar,25)
call P4(t,Nr,0)
call P4(t,br,0)
call P4(t,Br,$B4)
call P4(t,cr,$B4)
call P4(t,Cr,0)
call P4(t,dr,20)
call P4(t,Dr,$B4)
call P4(t,fr,0)
call P4(t,Fr,0)
call P4(t,gr,$87)
call P4(t,Gr,0)
call P4(t,hr,$B4)
call P4(t,Hr,$B4)
call P4(t,jr,0)
call P4(t,Jr,$91)
call P4(t,kr,35)
call P4(t,Kr,35)
call P4(t,lr,35)
call P4(t,Lr,0)
call P4(t,mr,'x')
call P4(t,Mr,0)
call P4(t,pr,0)
call P4(t,Pr,0)
call P4(t,qr,0)
call P4(t,Qr,0)
call P4(t,sr,$B4)
call P4(t,Sr,$B4)
call P4(t,tr,$B4)
call P4(t,Tr,$B4)
call P4(t,ur,$B4)
call P4(t,Ur,$B4)
call P4(t,wr,$B4)
call P4(t,Wr,$B4)
call P4(t,yr,$B4)
call P4(t,Yr,$B4)
call P4(t,zr,$B4)
call P4(t,Zr,$B4)
call P4(t,vi,$B4)
call P4(t,ei,0)
call P4(t,xi,0)
call P4(t,oi,0)
call P4(t,ri,0)
call P4(t,ii,0)
call P4(t,ai,0)
call P4(t,ni,0)
call P4(t,Vi,0)
call P4(t,Ei,0)
call P4(t,Xi,0)
call P4(t,Oi,0)
call P4(t,Ri,0)
call P4(t,Ii,0)
call P4(t,Ai,0)
call P4(t,Ni,0)
call P4(t,bi,0)
call P4(t,Bi,0)
call P4(t,ci,0)
call P4(t,Ci,0)
call P4(t,di,0)
call P4(t,Di,0)
call P4(t,fi,90)
call P4(t,Fi,$B4)
call P4(t,gi,$B4)
call P4(t,Gi,0)
call P4(t,hi,0)
call P4(t,Hi,0)
call P4(t,ji,0)
call P4(t,Ji,0)
call P4(t,ki,0)
call P4(t,Ki,$B4)
call P4(t,li,$B4)
call P4(t,Li,$B4)
call P4(t,mi,$B4)
call P4(t,Mi,$B4)
call P4(t,pi,$B4)
call P4(t,Pi,$B4)
call P4(t,qi,$B4)
call P4(t,Qi,$B4)
call P4(t,si,$B4)
call P4(t,Si,$B4)
call P4(t,ti,$B4)
call P4(t,Ti,$91)
call P4(t,ui,35)
call P4(t,Ui,0)
call P4(t,wi,0)
call P4(t,Wi,0)
call P4(t,yi,0)
call P4(t,Yi,0)
call P4(t,zi,0)
call P4(t,Zi,0)
call P4(t,va,0)
call P4(t,ea,0)
call P4(t,xa,0)
call P4(t,oa,0)
call P4(t,ra,0)
call P4(t,ia,0)
call P4(t,aa,0)
call P4(t,na,0)
call P4(t,Va,0)
call P4(t,Ea,0)
call P4(t,Xa,$B4)
call P4(t,Oa,$B4)
call P4(t,Ra,0)
call P4(t,Ia,$B4)
call P4(t,Aa,$B4)
call P4(t,Na,$B4)
call P4(t,ba,$B4)
call P4(t,Ba,$B4)
call P4(t,ca,$B4)
call P4(t,Ca,$B4)
call P4(t,da,$B4)
call P4(t,Da,$B4)
call P4(t,fa,$B4)
call P4(t,Fa,$B4)
call P4(t,ga,$B4)
call P4(t,Ga,$B4)
call P4(t,ha,$B4)
call P4(t,Ha,90)
call P4(t,ja,90)
call P4(t,Ja,90)
call P4(t,ka,90)
call P4(t,Ka,90)
call P4(t,la,0)
call P4(t,La,0)
call P4(t,ma,30)
call P4(t,Ma,60)
call P4(t,pa,$87)
call P4(t,Pa,45)
call P4(t,qa,30)
call P4(t,Qa,$E6)
call P4(t,sa,270)
call P4(t,Sa,$B4)
call P4(t,ta,0)
call P4(t,Ta,$B4)
call P4(t,ua,340)
call P4(t,Ua,$B4)
call P4(t,wa,$B4)
call P4(t,Wa,'n')
call P4(t,ya,30)
call P4(t,Ya,30)
call P4(t,za,30)
call P4(t,Za,270)
call P4(t,vn,270)
call P4(t,en,270)
call P4(t,xn,0)
call P4(t,on,270)
call P4(t,rn,0)
call P4(t,in,0)
call P4(t,an,0)
call P4(t,nn,$E6)
call P4(t,Vn,270)
call P4(t,En,0)
call P4(t,Xn,0)
call P4(t,On,0)
call P4(t,Rn,0)
call P4(t,In,$B4)
call P4(t,An,$B4)
call P4(t,Nn,0)
call P4(t,bn,270)
call P4(t,Bn,0)
call P4(t,cn,$A)
call P4(t,Cn,20)
call P4(t,dn,270)
call P4(t,Dn,$E6)
call P4(t,fn,$B4)
call P4(t,Fn,0)
call P4(t,gn,325)
call P4(t,Gn,$D6)
call P4(t,hn,$D6)
call P4(t,Hn,$D6)
call P4(t,jn,0)
call P4(t,Jn,$B4)
call P4(t,kn,$B4)
call P4(t,Kn,$91)
call P4(t,vs,75)
call P4(t,es,90)
call P4(t,xs,$B4)
call P4(t,os,$B4)
call TriggerAddAction(t,function p4)
set t=null
endfunction
function Q4 takes string s returns nothing
call ClearTextMessages()
call BJDebugMsg("　　　　　　"+s)
endfunction
function s4 takes string s returns nothing
call ClearTextMessages()
call BJDebugMsg("　　　　　　　　　　　　　"+s)
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
endfunction
function S4 takes nothing returns nothing
local integer i=1
local real px=$3A00
local real py=6790
local string t4
call TimerStart(bw[(ix)],((4.)*1.),(false),(function S4))
if Bw[ix]==0 then
call CinematicFilterGenericBJ(1.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",100.,100.,100.,.0,0,0,0,0)
call TimerStart(bw[(ix)],((2.)*1.),(false),(function S4))
elseif Bw[ix]==1 then
call StartSound(us)
call PanCameraToTimed(px,py,0)
call v3('hgyr')
call TimerStart(bw[(ix)],((5.5)*1.),(false),(function S4))
elseif Bw[ix]==2 then
call StartSound(Ws)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2500.,0)
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set mv[i]=false
set Mv[i]=false
set Qv[i]=0
set Kv[i]=0
call SetUnitPosition(at[i],GetRectMinX(ax)+($80*(i-1)),GetRectCenterY(ax))
call SetUnitPosition(Et[i],px,py)
call SetUnitVertexColorBJ(Et[i],.0,.0,.0,'d')
set Rx[i]=false
set Ox[i]=false
set Ix[i]=0
call UnitRemoveAbility(at[i],'Aloc')
call ShowUnitShow(at[i])
call UnitAddAbility(at[i],'Aloc')
call SetTextTagVisibility(he[i],true)
call SetUnitAnimation(at[i],"Stand Second")
endif
set i=i+1
endloop
call CinematicFilterGenericBJ(5.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,'d')
call TimerStart(bw[(ix)],((5.)*1.),(false),(function S4))
elseif Bw[ix]==3 then
if sU[kv]==4 then
call Q4("|cffff7f27주황버섯|r"+": ...? 예전과 같은 장소인 것 같은데 기분 탓인가?")
else
call Q4("|cffff7f27주황버섯|r"+": 드디어 도착한건가?")
endif
elseif Bw[ix]==4 then
if sU[kv]==4 then
call Q4("|cffff7f27주황버섯|r"+": 뭐... 아무튼 먼저 와 있겠다고 했는데")
else
call Q4("|cffff7f27주황버섯|r"+": 흠... 먼저 와 있겠다고 했는데")
endif
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand First")
endif
set i=i+1
endloop
elseif Bw[ix]==5 then
call Q4("|cffff7f27주황버섯|r"+": 왜 아무도 없는...")
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand Second")
endif
set i=i+1
endloop
call TimerStart(bw[(ix)],((.8)*1.),(false),(function S4))
elseif Bw[ix]==6 then
call Q4("|cffff7f27주황버섯|r"+": ?!")
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,0)
call StartSound(Us)
call StopSound(Ws,false,false)
call TimerStart(bw[(ix)],((3.)*1.),(false),(function S4))
elseif Bw[ix]==7 then
call Q4("|cffff7f27주황버섯|r"+": 뭐야? 아무것도 안 보여!")
elseif Bw[ix]==8 then
call Q4("|cffff7f27주황버섯|r"+": 이게 도대체 무슨 일...")
call TimerStart(bw[(ix)],((.8)*1.),(false),(function S4))
elseif Bw[ix]==9 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand First")
endif
set i=i+1
endloop
call CreateUnit(Player($B),'hgry',$3600,6784,270)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",'d','d','d',0,0,0,0,'d')
call StartSound(Us)
call TimerStart(bw[(ix)],((1.5)*1.),(false),(function S4))
elseif Bw[ix]==$A then
call PanCameraToTimed($3600,6784,3)
call TimerStart(bw[(ix)],((3.)*1.),(false),(function S4))
elseif Bw[ix]==$B then
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2000.,.2)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,100.,.0,0,0,70.)
call StartSound(ws)
call Q4("|cff282828블랙|r"+": Deep ♂")
call TimerStart(bw[(ix)],((.4)*1.),(false),(function S4))
elseif Bw[ix]==$C then
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1500.,.2)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,70.,.0,0,0,30.)
call Q4("|cff282828블랙|r"+": Dark ♂")
call TimerStart(bw[(ix)],((.5)*1.),(false),(function S4))
elseif Bw[ix]==$D then
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1000.,.2)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,30.,.0,0,0,.0)
call Q4("|cff282828블랙|r"+": ♂ FANTASY ♂")
call TimerStart(bw[(ix)],((1.5)*1.),(false),(function S4))
elseif Bw[ix]==$E then
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2500.,.5)
call CinematicFilterGenericBJ(.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,.0,.0,0,0,100.)
call StartSound(ys)
call Q4("|cffff7f27주황버섯|r"+": 뭐... 뭐?!!야!!잠깐만!!!")
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set Mv[i]=true
call SetUnitAnimation(at[i],"Stand First")
endif
set i=i+1
endloop
call PanCameraToTimed(px,py,.5)
call TimerStart(bw[(ix)],((.8)*1.),(false),(function S4))
elseif Bw[ix]==$F then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set Mv[i]=false
call SetUnitAnimation(at[i],"Stand First")
endif
set i=i+1
endloop
call TimerStart(bw[(ix)],((3.2)*1.),(false),(function S4))
elseif Bw[ix]==16 then
call Q4("|cffff7f27주황버섯|r"+": 우린 임자가 있는 몸이야... 소개팅 약속이 있단 말이야!")
elseif Bw[ix]==17 then
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,100.,.0,0,0,.0)
call PanCameraToTimed($3600,6784,1)
call Q4("|cff282828블랙|r"+": 그런 것쯤은 알고 있어♥ 왜냐하면 소개팅 상대가 바로 나라구♂")
elseif Bw[ix]==18 then
call Q4("|cff282828블랙|r"+": 그건 그렇고... 방금 네 입으로 임자가 나♂라는걸 증명하는 꼴이 됐군?")
elseif Bw[ix]==19 then
call CinematicFilterGenericBJ(.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,.0,.0,0,0,100.)
call PanCameraToTimed(px,py,.5)
call Q4("|cffff7f27주황버섯|r"+": ...시발")
elseif Bw[ix]==20 then
if sU[kv]==4 then
call Q4("|cffff7f27주황버섯|r"+": 아니 시발 전보다 훨씬 고생에서 도착했는데")
else
call Q4("|cffff7f27주황버섯|r"+": 아니 시발. 우리가 바란 건 이게 아니었다고!")
endif
elseif Bw[ix]==21 then
if sU[kv]==4 then
call Q4("|cffff7f27주황버섯|r"+": 왜 같은 결말이 나오는 거냐고!")
else
call Q4("|cffff7f27주황버섯|r"+": 우리가 널 위해 그 지랄을 한 줄 알아?")
endif
elseif Bw[ix]==22 then
call PanCameraToTimed($3600,6784,1)
if sU[kv]==4 then
call Q4("|cff282828블랙|r"+": 이봐 이봐♂ 가는 길만 달라졌지 결국 목적지는 같다구?♥")
else
call Q4("|cff282828블랙|r"+": 그러니까 만나기 전에 나에 대해 자세히 물어봤어야지♥")
endif
elseif Bw[ix]==23 then
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1000.,3.)
call CinematicFilterGenericBJ(3.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,100.,.0,0,0,.0)
if sU[kv]==4 then
call Q4("|cff282828블랙|r"+": 자 그럼... 다시 깊고 어두운 소개팅을 시작하지...")
else
call Q4("|cff282828블랙|r"+": 자 그럼... 깊고 어두운 소개팅을 시작하지...")
endif
if B0()<=1 then
set Bw[ix]=38
endif
elseif Bw[ix]==24 then
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2500.,.5)
call PanCameraToTimed(px,py,.5)
call CinematicFilterGenericBJ(.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,.0,.0,0,0,100.)
call Q4("|cffff7f27주황버섯|r"+": ...우리가 순순히 당할 것 같아?")
elseif Bw[ix]==25 then
call Q4("|cffff7f27주황버섯|r"+": 바로 도망가야...")
call TimerStart(bw[(ix)],((.5)*1.),(false),(function S4))
elseif Bw[ix]==26 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set Mv[i]=true
call F0(at[i],"Walk Second")
endif
set i=i+1
endloop
call TimerStart(bw[(ix)],((.5)*1.),(false),(function S4))
elseif Bw[ix]==27 then
call StartSound(ws)
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set Mv[i]=false
set mv[i]=true
call SetUnitAnimation(at[i],"Stand Second")
endif
set i=i+1
endloop
call CreateUnit(Player($B),'hmpr',$3E00,6784,270)
call PanCameraToTimed($3E00,6784,1)
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,100.,.0,0,0,.0)
call Q4("|cff282828또 다른 블랙|r"+": 이봐 친구! 가죽클럽은 두 블럭 아래야!")
call TimerStart(bw[(ix)],((1.)*1.),(false),(function S4))
elseif Bw[ix]==28 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set mv[i]=false
call SetUnitAnimation(at[i],"Stand Second")
endif
set i=i+1
endloop
call TimerStart(bw[(ix)],((3.)*1.),(false),(function S4))
elseif Bw[ix]==29 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand First")
endif
set i=i+1
endloop
call PanCameraToTimed(px,py,.5)
if sU[kv]==4 then
call Q4("|cffff7f27주황버섯|r"+": 아 잠깐만!!! 또 당하고 싶진 않단 말이야!")
else
call Q4("|cffff7f27주황버섯|r"+": 어??! 뭐야 혼자가 아니었어?")
endif
call CinematicFilterGenericBJ(.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,.0,.0,0,0,100.)
elseif Bw[ix]==30 then
if sU[kv]==4 then
call Q4("|cff282828블랙|r"+": 그 부분에 대해선 걱정할 필요 없다구♂?")
else
call Q4("|cff282828블랙|r"+": 이봐 이봐♥ 소개팅은 단둘이서 하는 거라구♂?")
endif
elseif Bw[ix]==31 then
call StartSound(Ys)
if sU[kv]==4 then
call Q4("|cff282828블랙|r"+": 이전과 전혀 다른 플레이를 할 거니까 말이야...")
else
call Q4("|cff282828블랙|r"+": 당연히 우리도 인원 수를 맞춰야 하지 않겠어?")
endif
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,0)
call TimerStart(bw[(ix)],((.2)*1.),(false),(function S4))
elseif Bw[ix]==32 then
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,'d',0,0,0,'d')
call TimerStart(bw[(ix)],((.2)*1.),(false),(function S4))
elseif Bw[ix]==33 then
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,0)
call TimerStart(bw[(ix)],((.1)*1.),(false),(function S4))
elseif Bw[ix]==34 then
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,'d',0,0,0,'d')
call TimerStart(bw[(ix)],((.1)*1.),(false),(function S4))
elseif Bw[ix]==35 then
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,0)
call TimerStart(bw[(ix)],((.15)*1.),(false),(function S4))
elseif Bw[ix]==36 then
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,'d',0,0,0,'d')
call TimerStart(bw[(ix)],((.05)*1.),(false),(function S4))
elseif Bw[ix]==37 then
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,0)
call TimerStart(bw[(ix)],((.1)*1.),(false),(function S4))
elseif Bw[ix]==38 then
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,'d',0,0,0,'d')
loop
exitwhen i>B0()-2
if i==1 then
call CreateUnit(Player($B),'hgry',$3800,7168,270)
elseif i==2 then
call CreateUnit(Player($B),'hmpr',$3C00,7168,270)
elseif i==3 then
call SetUnitFlyHeight(CreateUnit(Player($B),'hgry',$3900,6336,270),$A,0)
elseif i==4 then
call SetUnitFlyHeight(CreateUnit(Player($B),'hmpr',$3B00,6336,270),$A,0)
elseif i==5 then
call CreateUnit(Player($B),'hgry',$3A00,7424,270)
endif
set i=i+1
endloop
call TimerStart(bw[(ix)],((3.)*1.),(false),(function S4))
elseif Bw[ix]==39 then
call CinematicFilterGenericBJ(2.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,'d',0,0,0,0)
call Q4("|cff282828블랙|r"+": B.O.Y♂?")
elseif Bw[ix]==40 then
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",'d',50.19,50.19,0,0,0,0,0)
if sU[kv]==4 then
call StartSound(aS)
else
call StartSound(zs)
endif
call Q4("|cffff7f27주황버섯|r"+": 으악 잠깐만!!!!")
call TimerStart(bw[(ix)],((1.)*1.),(false),(function S4))
elseif Bw[ix]==41 then
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",'d',50.19,50.19,0,0,0,0,0)
if sU[kv]==4 then
call StartSound(aS)
else
call StopSound(zs,false,false)
call StartSound(zs)
endif
call Q4("|cffff7f27주황버섯|r"+": 뭐하는 거야!!!!")
call TimerStart(bw[(ix)],((1.)*1.),(false),(function S4))
elseif Bw[ix]==42 then
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",'d',50.19,50.19,0,0,0,0,0)
if sU[kv]==4 then
call StartSound(aS)
else
call StopSound(zs,false,false)
call StartSound(zs)
endif
call Q4("|cffff7f27주황버섯|r"+": 안...돼")
call StartSound(Zs)
call TimerStart(bw[(ix)],((1.)*1.),(false),(function S4))
elseif Bw[ix]==43 then
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",'d',50.19,50.19,0,0,0,0,0)
if sU[kv]==4 then
call StartSound(aS)
else
call StopSound(zs,false,false)
call StartSound(zs)
endif
call Q4("|cffff7f27주황버섯|r"+": 안 돼...")
call TimerStart(bw[(ix)],((.7)*1.),(false),(function S4))
elseif Bw[ix]==44 then
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",'d',50.19,50.19,0,0,0,0,0)
if sU[kv]==4 then
call StartSound(aS)
else
call StopSound(zs,false,false)
call StartSound(zs)
endif
call Q4("|cffff7f27주황버섯|r"+": ...안 돼")
call TimerStart(bw[(ix)],((.5)*1.),(false),(function S4))
elseif Bw[ix]>=45 and Bw[ix]<=85 then
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",80-((Bw[ix]-45)*2),40.-(Bw[ix]-45),40.-(Bw[ix]-45),0,0,0,0,0)
if sU[kv]==4 then
call StopSound(aS,false,false)
call StartSound(aS)
call SetSoundVolumeBJ(aS,'d'-((Bw[ix]-45)*2))
else
call StopSound(zs,false,false)
call StartSound(zs)
call SetSoundOffsetBJ(.05,zs)
call SetSoundVolumeBJ(zs,'d'-((Bw[ix]-45)*2))
endif
call Q4("|cffff7f27주황버섯|r"+": 안 돼!!!!!!!!!!!!!!!!!!!!!!!!!!")
call SetSoundVolumeBJ(ys,'d'-((Bw[ix]-45)*2))
call TimerStart(bw[(ix)],((.15)*1.),(false),(function S4))
elseif Bw[ix]==86 then
call StopSound(ys,false,false)
call TimerStart(bw[(ix)],((5.)*1.),(false),(function S4))
elseif Bw[ix]==87 then
call StartSound(vS)
call s4("제작: z1z1z1")
elseif Bw[ix]==88 then
call s4("엔딩중 사용된 BGM: 동물의 숲 - TheRoost")
elseif Bw[ix]==89 then
call s4("엔딩중 사용된 BGM: Electric Six - Gay Bar")
elseif Bw[ix]==90 then
call s4("스프라이트 출처: https://www.spriters-resource.com/")
elseif Bw[ix]==91 then
if sU[kv]==4 then
call s4("PS: 피할 수 없으면 즐겨라 - 로버트 엘리엇")
else
call s4("PS: 여러분의 눈 보호를 위해 몸체를 곰인형으로 만들었습니다!")
endif
elseif Bw[ix]==92 then
call s4("Thank You")
call TimerStart(bw[(ix)],((6.)*1.),(false),(function S4))
elseif Bw[ix]==93 then
call ClearTextMessages()
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set t4=StringCase(GetPlayerName(Player(i-1)),false)
if Tv then
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 일곱 번째 비밀 코드: "+ye[i])
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"　　　　　　다음 게임부터 \"-code5 "+ye[i]+"\"를 입력하시면 캐릭터 외형을 바꿀 수 있습니다.")
call JNObjectCharacterSetInt(t4,"Random",Uy[Yy[(xY[oY[(ET)]+(i-1)])]]+1)
elseif sU[kv]==4 then
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 두 번째 비밀 코드: "+Qe[i])
call JNObjectCharacterSetInt(t4,"Subway",my[Yy[(xY[oY[(ET)]+(i-1)])]]+1)
elseif sU[kv]==3 then
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 첫 번째 비밀 코드: "+qe[i])
call JNObjectCharacterSetInt(t4,"CaptainJack",Ly[Yy[(xY[oY[(ET)]+(i-1)])]]+1)
elseif sU[kv]==9 then
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 두 번째 특수 코드: "+Te[i])
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"　　　　　　다음 게임부터 \"-scode2 "+Te[i]+"\"를 입력하시면 캐릭터 외형을 바꿀 수 있습니다. (F9에 사용법이 명시되어 있지 않으니 주의)")
call JNObjectCharacterSetInt(t4,"Cafe",sy[Yy[(xY[oY[(ET)]+(i-1)])]]+1)
elseif sU[kv]==$D then
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 다섯 번째 특수 코드: "+ze[i])
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"　　　　　　다음 게임부터 \"-scode5 "+ze[i]+"\"를 입력하시면 캐릭터 외형을 바꿀 수 있습니다. (F9에 사용법이 명시되어 있지 않으니 주의)")
call JNObjectCharacterSetInt(t4,"DownTown",uy[Yy[(xY[oY[(ET)]+(i-1)])]]+1)
endif
if GetLocalPlayer()==Player(i-1)then
if JNObjectCharacterServerConnectCheck()then
call JNObjectCharacterSave("OM150",t4,"3b1e2c80-db90-462a-9835-a0ddb80752b1","ClearList")
call BJDebugMsg("　　　　　　|cffFFFC00※ 서버에 코드가 저장되었습니다! ※|r")
else
call BJDebugMsg("　　　　　　|cffFF0202※ 서버에 저장하는데 실패하였습니다. ※|r")
call BJDebugMsg("　　　　　　|cffFF0202※ 현재 버전이 최신버전인지 확인해 주십시오.|r")
endif
endif
endif
set i=i+1
endloop
call TimerStart(bw[(ix)],((6.)*1.),(false),(function S4))
else
call E4(ix)
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call CustomVictoryBJ(Player(i-1),true,true)
endif
set i=i+1
endloop
set i=1
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING and GetLocalPlayer()==Player(i-1)then
if Tv then
call BJDebugMsg("　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 일곱 번째 비밀 코드: "+ye[i])
call BJDebugMsg("　　　　　　다음 게임부터 \"-code5 "+ye[i]+"\"를 입력하시면 캐릭터 외형을 바꿀 수 있습니다.")
elseif sU[kv]==4 then
call BJDebugMsg("　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 두 번째 비밀 코드: "+Qe[i])
elseif sU[kv]==3 then
call BJDebugMsg("　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 첫 번째 비밀 코드: "+qe[i])
elseif sU[kv]==9 then
call BJDebugMsg("　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 두 번째 특수 코드: "+Te[i])
call BJDebugMsg("　　　　　　다음 게임부터 \"-scode2 "+Te[i]+"\"를 입력하시면 캐릭터 외형을 바꿀 수 있습니다. (F9에 사용법이 명시되어 있지 않으니 주의)")
elseif sU[kv]==$D then
call BJDebugMsg("　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 다섯 번째 특수 코드: "+ze[i])
call BJDebugMsg("　　　　　　다음 게임부터 \"-scode5 "+ze[i]+"\"를 입력하시면 캐릭터 외형을 바꿀 수 있습니다. (F9에 사용법이 명시되어 있지 않으니 주의)")
endif
endif
set i=i+1
endloop
return
endif
set Bw[ix]=Bw[ix]+1
endfunction
function T4 takes nothing returns nothing
call DestroyTrigger(GetTriggeringTrigger())
call StopSound(Ee,false,true)
set ix=V4(0)
call d1(1)
call TimerStart(bw[(ix)],((3.)*1.),(false),(function S4))
endfunction
function u4 takes nothing returns nothing
set ax=tR
set rx=CreateTrigger()
call TriggerAddAction(rx,function T4)
endfunction
function U4 takes nothing returns nothing
set Vx=JNGetModuleHandle("Game.dll")
endfunction
function w4 takes rect r returns integer
local integer i=1
local integer gz=fZ()
set pw[gz]=CreateRegion()
set Pw[gz]=r
call RegionAddRect(pw[gz],Pw[gz])
loop
exitwhen i>=$F
set qw[Qw[gz]+i]=true
set i=i+1
endloop
return gz
endfunction
function W4 takes nothing returns nothing
local integer tk=(LoadInteger(Nw,0,GetHandleId(GetExpiredTimer())))
local integer gz=Bw[tk]
local integer id=cw[tk]
set qw[Qw[gz]+id]=true
endfunction
function y4 takes nothing returns nothing
local integer gz=(LoadInteger(Fe,0,GetHandleId(GetTriggeringTrigger())))
local unit u=GetTriggerUnit()
local integer id=GetPlayerId(GetOwningPlayer(GetTriggerUnit()))+1
local integer i=1
if id!=$C and qw[Qw[gz]+id]==false and at[id]==u then
set Bw[(jw[Jw[(Ex)]+(id)])]=gz
set cw[(jw[Jw[(Ex)]+(id)])]=id
call TimerStart(bw[((jw[Jw[(Ex)]+(id)]))],((.1)*1.),(false),(function W4))
else
loop
exitwhen i>Ae
set id=7+i
if qw[Qw[gz]+id]==false and at[id]==u then
set Bw[(jw[Jw[(Ex)]+(id)])]=gz
set cw[(jw[Jw[(Ex)]+(id)])]=id
call TimerStart(bw[((jw[Jw[(Ex)]+(id)]))],((.1)*1.),(false),(function W4))
exitwhen true
endif
set i=i+1
endloop
endif
set u=null
endfunction
function Y4 takes nothing returns nothing
local integer gz=(LoadInteger(Fe,0,GetHandleId(GetTriggeringTrigger())))
local unit u=GetTriggerUnit()
local integer id=GetPlayerId(GetOwningPlayer(u))+1
local integer i=1
if Re then
set u=null
return
endif
if id!=$C and qw[Qw[gz]+id]and at[id]==u then
set qw[Qw[sw[gz]]+id]=false
call DZ(gz,id)
else
loop
exitwhen i>Ae
set id=7+i
if qw[Qw[gz]+id]and at[id]==u then
set qw[Qw[sw[gz]]+id]=false
call DZ(gz,id)
exitwhen true
endif
set i=i+1
endloop
endif
set u=null
endfunction
function z4 takes integer K2,integer l2 returns integer
local integer gz=dZ()
set uw[gz]=K2
set Uw[gz]=l2
return gz
endfunction
function Z4 takes integer gz,integer S0 returns nothing
set Ww[yw[gz]+ww[gz]]=S0
set ww[gz]=ww[gz]+1
endfunction
function v5 takes integer gz returns nothing
local integer i=0
local integer j=0
loop
exitwhen i>=6
if Ww[yw[gz]+i]!=0 then
loop
exitwhen j>=$F
set qw[Qw[Ww[yw[gz]+i]]+j]=true
set j=j+1
endloop
endif
set i=i+1
endloop
endfunction
function x5 takes integer t returns integer
local integer gz=CZ()
set vW[gz]=t
return gz
endfunction
function r5 takes integer gz,integer t returns nothing
local integer v2=x5(t)
if nW[gz]!=0 then
set xW[nW[gz]]=v2
set eW[v2]=nW[gz]
elseif VW[gz]==0 then
set VW[gz]=v2
endif
set nW[gz]=v2
set aW[gz]=aW[gz]+1
endfunction
function i5 takes nothing returns nothing
local integer i=1
set Ex=FZ()
loop
exitwhen i>=kw[Ex]
set jw[Jw[(Ex)]+(i)]=(V4(0))
set i=i+1
endloop
endfunction
function a5 takes integer o returns nothing
set mw[o]=a4(o,0,function Y4)
call TriggerRegisterEnterRegion(mw[o],pw[o],null)
set Mw[o]=a4(o,0,function y4)
call TriggerRegisterLeaveRegion(Mw[o],pw[o],null)
endfunction
function n5 takes rect r1,rect r2 returns nothing
local integer V5=w4(r1)
local integer E5=w4(r2)
local integer X5=vW[nW[Xx]]
set sw[V5]=E5
set sw[E5]=V5
call a5(V5)
call a5(E5)
call Z4(X5,V5)
call Z4(X5,E5)
endfunction
function O5 takes nothing returns nothing
set Xx=cZ()
call i5()
call r5(Xx,z4(($C),(1)))
call n5(dG,DG)
call r5(Xx,z4(($C),(2)))
call n5(fG,FG)
call n5(gG,GG)
call r5(Xx,z4(($C),(3)))
call n5(hG,HG)
call r5(Xx,z4(($C),(4)))
call n5(jG,JG)
call n5(kG,KG)
call r5(Xx,z4(($C),(5)))
call n5(lG,LG)
call r5(Xx,z4(($C),(6)))
call n5(mG,MG)
call n5(pG,PG)
call r5(Xx,z4(($C),(7)))
call n5(qG,QG)
call n5(sG,SG)
call r5(Xx,z4(($C),(8)))
call n5(tG,TG)
call r5(Xx,z4(($D),(-1)))
call n5(UQ,wQ)
call n5(WQ,yQ)
call r5(Xx,z4(($D),(6)))
call n5(uG,UG)
call r5(Xx,z4(($D),(8)))
call n5(pQ,PQ)
call n5(qQ,QQ)
call n5(sQ,SQ)
endfunction
function R5 takes integer i,boolean I5 returns nothing
local integer j=Ix[i]
local integer k=0
if I5 then
loop
if j<=1 then
set j=7
else
set j=j-1
endif
set k=k+1
if k>7 then
return
endif
exitwhen GetPlayerSlotState(Player(j-1))==PLAYER_SLOT_STATE_PLAYING and Ox[j]==false and i!=j
endloop
else
loop
if j>=7 then
set j=1
else
set j=j+1
endif
set k=k+1
if k>7 then
return
endif
exitwhen GetPlayerSlotState(Player(j-1))==PLAYER_SLOT_STATE_PLAYING and Ox[j]==false and i!=j
endloop
endif
if Player(i-1)==GetLocalPlayer()then
call SetUnitVertexColorBJ(Et[Ix[i]],.0,.0,.0,'d')
endif
set Ix[i]=j
if Player(i-1)==GetLocalPlayer()then
call SetUnitVertexColorBJ(Et[i],.0,.0,.0,'d')
call SetUnitVertexColorBJ(Et[j],100.,100.,100.,0)
endif
call DisplayTimedTextToPlayer(Player(i-1),0,0,1,Ge[j]+GetPlayerName(Player(j-1))+"|r님을 관전합니다.")
endfunction
function A5 takes integer i returns nothing
local real x
local real y
set Ox[i]=true
set Rx[i]=true
set Kv[i]=0
call V3(kv,TU[kv]+1)
if P then
set x=GetUnitX(at[i])
set y=GetUnitY(at[i])
call RemoveUnit(at[i])
set at[i]=CreateUnit(Player(i-1),Rt[i],x,y,270)
call SetUnitBlendTime(at[i],.0)
endif
call ShowUnit(at[i],false)
call ShowUnit(nt[i],false)
call ShowUnit(Vt[i],false)
call SetTextTagVisibility(he[i],false)
if Gx then
if Gx and wx then
if TU[kv]>=B0()then
call o3(kv,0)
call TriggerExecute(Xe)
endif
else
if TU[kv]>=B0()-1 then
if sU[kv]==6 then
call TriggerExecute(gx)
elseif sU[kv]==7 then
call TriggerExecute(mx)
elseif Ux then
call TriggerExecute(No)
endif
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,$A,"※ 좌우 방향키로 다른 플레이어를 관전할 수 있습니다.")
endif
call DisplayTimedTextToPlayer(Player(i-1),0,0,$A,"※ 좌우 방향키로 다른 플레이어를 관전할 수 있습니다.")
endif
else
if TU[kv]>=B0()then
if it then
call BJDebugMsg("|cffFFFC00※ 연습모드는 클리어를 할 수 없습니다!|r")
else
call e4(1)
endif
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,$A,"※ 좌우 방향키로 다른 플레이어를 관전할 수 있습니다.")
endif
endif
endfunction
function N5 takes real x,real y returns boolean
return GetTerrainType(x,y)=='Xsqd' and IsPointInRegion(ie,x,y)==false
endfunction
function b5 takes integer i,real x,real y returns nothing
local real py=y
set TS=0
call b3(i,x,y,40,"DownWidthOM")
if mv[i] then
if N5(x-350,y)and N5(x-$FA,y)and N5(x,y-$A)and N5(x,y+$A)then
call SetUnitPosition(at[i],x-300,y)
call c0(i,x,py)
if TS!=0 and X0(GetUnitTypeId(at[TS]))==false and TS>7 then
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\NightElf\\Blink\\BlinkCaster.mdl",GetUnitX(at[TS]),GetUnitY(at[TS])))
call A4(TS)
if P==false and GetTerrainType(x,y-'d')=='Xsqd' and i<8 then
call SetUnitPosition(at[TS],x-300,y-90)
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\NightElf\\Blink\\BlinkTarget.mdl",x-300,y-90))
elseif P and GetTerrainType(x,y+'d')=='Xsqd' and i<8 then
call SetUnitPosition(at[TS],x-300,y+90)
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\NightElf\\Blink\\BlinkTarget.mdl",x-300,y+90))
endif
endif
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\NightElf\\Blink\\BlinkTarget.mdl",x-300,y))
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 빈 공간이 없어 이동할 수 없습니다!")
endif
elseif Mv[i] and mv[i]==false then
if N5(x+350,y)and N5(x+$FA,y)and N5(x,y-$A)and N5(x,y+$A)then
call SetUnitPosition(at[i],x+300,y)
call c0(i,x,py)
if TS!=0 and X0(GetUnitTypeId(at[TS]))==false and TS>7 then
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\NightElf\\Blink\\BlinkCaster.mdl",GetUnitX(at[TS]),GetUnitY(at[TS])))
call A4(TS)
if P==false and GetTerrainType(x,y-'d')=='Xsqd' and i<8 then
call SetUnitPosition(at[TS],x+300,y-90)
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\NightElf\\Blink\\BlinkTarget.mdl",x+300,y-90))
elseif P and GetTerrainType(x,y+'d')=='Xsqd' and i<8 then
call SetUnitPosition(at[TS],x+300,y+90)
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\NightElf\\Blink\\BlinkTarget.mdl",x+300,y+90))
endif
endif
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\NightElf\\Blink\\BlinkTarget.mdl",x+300,y))
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 빈 공간이 없어 이동할 수 없습니다!")
endif
endif
endfunction
function B5 takes integer i returns nothing
set IW[i]=false
call DisplayTimedTextToPlayer(Player(i),0,0,5,"※ 진동을 켰습니다.")
endfunction
function c5 takes integer i returns nothing
set IW[i]=true
call DisplayTimedTextToPlayer(Player(i),0,0,5,"※ 진동을 껏습니다.")
endfunction
function C5 takes nothing returns nothing
local integer i=0
loop
exitwhen i>7
call CameraClearNoiseForPlayer(Player(i))
set i=i+1
endloop
endfunction
function d5 takes real K0 returns nothing
local integer i=0
loop
exitwhen i>7
if IW[i]==false then
call CameraSetTargetNoiseForPlayer(Player(i),$A,$FA)
endif
set i=i+1
endloop
call TimerStart(RW,K0,false,function C5)
endfunction
function D5 takes integer gz,integer nZ returns nothing
call SetTerrainType(BW[gz],cW[gz],nZ,-1,1,0)
endfunction
function F5 takes integer t returns integer
local integer gz=XZ()
set FW[gz]=t
return gz
endfunction
function G5 takes integer gz,integer t returns nothing
local integer v2=F5(t)
if kW[gz]!=0 then
set GW[kW[gz]]=v2
set gW[v2]=kW[gz]
elseif KW[gz]==0 then
set KW[gz]=v2
endif
set kW[gz]=v2
set JW[gz]=JW[gz]+1
endfunction
function h5 takes nothing returns integer
local integer gz=VZ()
set MW[gz]=EZ()
return gz
endfunction
function H5 takes unit u returns boolean
local integer H1=GetUnitTypeId(u)
return X0(H1)or H1=='opeo' or H1=='ogru' or H1=='otau' or H1=='ocat' or H1=='ohun' or H1=='o000' or H1=='o001'
endfunction
function j5 takes integer gz returns nothing
call SetDoodadAnimation(GetRectCenterX(sW[gz]),GetRectCenterY(sW[gz]),128.,'D008',false,"stand ready",false)
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Items\\StaffOfPurification\\PurificationCaster.mdl",GetRectCenterX(sW[gz]),GetRectCenterY(sW[gz])))
call aZ((uW[gz]),"Action")
endfunction
function J5 takes integer gz returns nothing
call SetDoodadAnimation(GetRectCenterX(sW[gz]),GetRectCenterY(sW[gz]),128.,'D008',false,"stand",false)
call aZ((uW[gz]),"Reset")
endfunction
function k5 takes integer gz returns nothing
set TW[gz]=false
call J5(gz)
endfunction
function K5 takes integer gz returns boolean
local integer i=1
loop
exitwhen i>7+Ae
if RectContainsUnit(sW[gz],at[i])and GetUnitTypeId(at[i])!='orai' then
return true
endif
set i=i+1
endloop
return false
endfunction
function l5 takes nothing returns nothing
local integer gz=(LoadInteger(Fe,0,GetHandleId(GetTriggeringTrigger())))
local unit u=GetTriggerUnit()
if H5(u)and TW[gz]==false then
set TW[gz]=true
call StartSound(PS)
call d5(1.)
call j5(gz)
endif
set u=null
endfunction
function L5 takes nothing returns nothing
local integer gz=(LoadInteger(Fe,0,GetHandleId(GetTriggeringTrigger())))
local unit u=GetTriggerUnit()
if H5(u)and K5(gz)==false then
set TW[gz]=false
call StartSound(PS)
call d5(1.)
call J5(gz)
endif
set u=null
endfunction
function M5 takes integer t returns integer
local integer gz=rZ()
set zW[gz]=t
return gz
endfunction
function P5 takes integer gz,integer t returns nothing
local integer v2=M5(t)
if iy[gz]!=0 then
set vy[iy[gz]]=v2
set ZW[v2]=iy[gz]
elseif ay[gz]==0 then
set ay[gz]=v2
endif
set iy[gz]=v2
set ry[gz]=ry[gz]+1
endfunction
function q5 takes nothing returns nothing
local integer v2=iy[Ax]
loop
exitwhen v2==0
call k5(zW[v2])
set v2=ZW[v2]
endloop
endfunction
function Q5 takes rect r,integer K2,integer l2 returns integer
local integer st=iZ()
set QW[st]=CreateRegion()
set sW[st]=r
call RegionAddRect(QW[st],sW[st])
set UW[st]=K2
set wW[st]=l2
set TW[st]=false
set SW[st]=a4(st,0,function l5)
call TriggerRegisterEnterRegion(SW[st],QW[st],null)
set tW[st]=a4(st,0,function L5)
call TriggerRegisterLeaveRegion(tW[st],QW[st],null)
set uW[st]=h5()
return st
endfunction
function s5 takes nothing returns nothing
local integer i
local integer st
set st=Q5(rl,$C,3)
set i=0
loop
exitwhen i>3
call G5(MW[(uW[(st)])],(((x0((($3F00)*1.),(($3A7F-($80*i)+896)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($4180)*1.),(($3A7F-($80*i)+896)*1.),(Iv))))))
set i=i+1
endloop
call G5(MW[(uW[(st)])],(((x0((($4500)*1.),(($3B80+896)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((x0((($4700+$80)*1.),(($3C7F+896)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((x0((($4700+$80)*1.),(($3C7F-$80+896)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($3B80)*1.),(($3AFF+896)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($3B80)*1.),(($3AFF-$80+896)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($3C80)*1.),(($3AFF+896)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($3C80)*1.),(($3AFF-$80+896)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($4600+$80)*1.),(($3C80+896)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($4600+$80)*1.),(($3C80-$80+896)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($487F)*1.),(($3C80+896)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($487F)*1.),(($3C80-$80+896)*1.),(Iv))))))
call P5(Ax,st)
set st=Q5(nl,$C,5)
set i=0
loop
exitwhen i>2
call G5(MW[(uW[(st)])],(((x0((($467F+($80*i))*1.),((9856)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((x0((($4D80+($80*i))*1.),(($3B80)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($4B7F+($80*i))*1.),(($3F7F)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($4B7F+($80*i))*1.),(($3B80)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($4DFF+$80+($80*i))*1.),(($3E00)*1.),(Iv))))))
set i=i+1
endloop
set i=0
loop
exitwhen i>4
call G5(MW[(uW[(st)])],(((o0((($4800)*1.),((9984+($80*i))*1.),(Iv))))))
set i=i+1
endloop
call G5(MW[(uW[(st)])],(((x0((($4D00)*1.),(($3F80)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((x0((($4D00+$80)*1.),(($3F80)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($4F80)*1.),(($3B80)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($4A7F)*1.),(($3C7F)*1.),(Iv))))))
call P5(Ax,st)
set st=Q5(al,$C,7)
set i=0
loop
exitwhen i>5
if i<=2 then
call G5(MW[(uW[(st)])],(((x0((($4100+($80*i))*1.),(($3200)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((x0((($4180)*1.),(($3700-($80*i))*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((x0((($4400+($80*i))*1.),(($3180)*1.),(Iv))))))
elseif i>=4 then
call G5(MW[(uW[(st)])],(((o0((($4100+($80*i))*1.),(($3200)*1.),(Iv))))))
endif
set i=i+1
endloop
set i=0
loop
exitwhen i>4
call G5(MW[(uW[(st)])],(((o0((($4400+($80*i))*1.),(($2E00)*1.),(Iv))))))
set i=i+1
endloop
set i=0
loop
exitwhen i>6
call G5(MW[(uW[(st)])],(((o0((($3F7F-256-($80*i))*1.),(($3200)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($4300+($80*i))*1.),(($337F)*1.),(Iv))))))
set i=i+1
endloop
set i=0
loop
exitwhen i>5
call G5(MW[(uW[(st)])],(((o0((($3B80+384+($80*i))*1.),(($3700)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($4680+($80*i))*1.),(($3000)*1.),(Iv))))))
if i<=2 then
call G5(MW[(uW[(st)])],(((x0((($3B80+($80*i))*1.),(($3700)*1.),(Iv))))))
endif
set i=i+1
endloop
set i=0
loop
exitwhen i>7
call G5(MW[(uW[(st)])],(((o0((($4680+($80*i))*1.),(($3180)*1.),(Iv))))))
set i=i+1
endloop
call G5(MW[(uW[(st)])],(((o0((($3F7F)*1.),(($3200)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($3F7F)*1.),(($3200-$80)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($4080)*1.),(($3780)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($4080+$80)*1.),(($3780)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((x0((($467F+$80)*1.),(($2E80)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((x0((($467F+$80)*1.),(($2E80-$80)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((x0((($467F)*1.),(($2E80)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((x0((($467F)*1.),(($2E80-$80)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((x0((($467F)*1.),(($2E80+$80)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((x0((($467F+$80)*1.),(($2E80+$80)*1.),(Iv))))))
call P5(Ax,st)
set st=Q5(il,$C,8)
set i=0
loop
exitwhen i>4
call G5(MW[(uW[(st)])],(((o0((($3F00+($80*i))*1.),((9727)*1.),(Iv))))))
if i<=1 then
call G5(MW[(uW[(st)])],(((x0((($4200+($80*i))*1.),((9343)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((x0((($3D7F+($80*i))*1.),((9855)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((x0((($3A7F+($80*i))*1.),(($2780)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($4080+($80*i))*1.),((9215)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($4380+($80*i))*1.),((9471)*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($3C00+($80*i))*1.),((9983)*1.),(Iv))))))
endif
set i=i+1
endloop
call G5(MW[(uW[(st)])],(((x0((($4200)*1.),((9343+($80*2))*1.),(Iv))))))
call G5(MW[(uW[(st)])],(((o0((($3C80)*1.),(($2800)*1.),(Iv))))))
call P5(Ax,st)
endfunction
function S5 takes nothing returns nothing
set Ax=oZ()
call s5()
call q5()
endfunction
function t5 takes integer i,integer T5 returns integer
local real x
local real y
local integer j=1
local integer k=1
local integer D1=0
local integer array u5
local real U5
loop
exitwhen j>7+Ae
set x=GetUnitX(at[j])
set y=GetUnitY(at[j])
if i!=j and RectContainsUnit(bx[Bx[T5]],at[j]) then
set D1=D1+1
set u5[D1]=j
endif
set j=j+1
endloop
if D1!=0 then
set k=u5[1]
set j=1
loop
exitwhen j>D1
set y=GetUnitY(at[u5[j]])
if j==1 then
set U5=y
else
if y>U5 then
set k=u5[j]
set U5=y
endif
endif
set j=j+1
endloop
return k
else
return 0
endif
endfunction
function w5 takes integer i returns nothing
local integer j=1
local integer k=1
local integer tempy
local real C0=GetUnitX(at[i])
local real d0=GetUnitY(at[i])
local real x
local real y
loop
exitwhen bx[j]==null
if RectContainsUnit(bx[j],at[i]) then
set k=t5(i,j)
if k!=0 then
set x=GetUnitX(at[k])
set y=GetUnitY(at[k])
call DestroyEffect(AddSpecialEffect("war3mapImported\\Teleport.mdl",C0,d0))
call DestroyEffect(AddSpecialEffect("war3mapImported\\Teleport.mdl",x,y))
if cx[j]=="Red" then
if GetLocalPlayer()==Player(i-1)or GetLocalPlayer()==Player(k-1)then
call CinematicFilterGenericBJ(.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',.0,.0,50.,100.,0,0,100.)
endif
elseif cx[j]=="Blue" then
if GetLocalPlayer()==Player(i-1)or GetLocalPlayer()==Player(k-1)then
call CinematicFilterGenericBJ(.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,100.,50.,.0,0,'d',100.)
endif
elseif cx[j]=="Yellow" then
if GetLocalPlayer()==Player(i-1)or GetLocalPlayer()==Player(k-1)then
call CinematicFilterGenericBJ(.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',100.,.0,50.,100.,'d',0,100.)
endif
endif
call A4(i)
call A4(k)
call SetUnitPosition(at[i],x,y)
call SetUnitPosition(at[k],C0,d0)
if i<=7 then
call c0(i,C0,d0)
endif
if k<=7 then
call c0(k,x,y)
endif
set Kv[i]=0
set Kv[k]=0
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 출구에 오브젝트가 있어야 이용할 수 있습니다.")
endif
return
endif
set j=j+1
endloop
endfunction
function W5 takes rect r,integer i,integer y5,string s returns nothing
call RegionAddRect(Nx,r)
set bx[i]=r
set Bx[i]=y5
set cx[i]=s
endfunction
function Y5 takes nothing returns nothing
set Nx=CreateRegion()
call W5(El,1,2,"Red")
call W5(Xl,2,1,"Red")
call W5(Ol,3,4,"Yellow")
call W5(Rl,4,3,"Yellow")
call W5(Il,5,6,"Red")
call W5(Al,6,5,"Red")
call W5(Nl,7,8,"Yellow")
call W5(bl,8,7,"Yellow")
call W5(Bl,9,$A,"Blue")
call W5(cl,$A,9,"Blue")
call W5(Cl,$B,$C,"Red")
call W5(dl,$C,$B,"Red")
call W5(Dl,$D,$E,"Yellow")
call W5(fl,$E,$D,"Yellow")
call W5(Fl,$F,16,"Red")
call W5(gl,16,$F,"Red")
call W5(Gl,17,18,"Red")
call W5(hl,18,17,"Red")
call W5(Hl,19,20,"Yellow")
call W5(jl,20,19,"Yellow")
call W5(Jl,21,22,"Red")
call W5(kl,22,21,"Red")
call W5(Kl,23,24,"Yellow")
call W5(ll,24,23,"Yellow")
call W5(Ll,25,26,"Blue")
call W5(ml,26,25,"Blue")
call W5(Ml,27,28,"Red")
call W5(pl,28,27,"Red")
call W5(Pl,29,30,"Yellow")
call W5(ql,30,29,"Yellow")
call W5(Ql,31,32,"Blue")
call W5(sl,32,31,"Blue")
call W5(hQ,33,34,"Red")
call W5(HQ,34,33,"Red")
call W5(TQ,35,36,"Red")
call W5(uQ,36,35,"Red")
endfunction
function z5 takes integer i returns boolean
local integer j=1
local real C0=GetUnitX(at[i])
local real d0=GetUnitY(at[i])
local real x
local real y
local rect r
loop
exitwhen Dx[j]==null
if RectContainsUnit(Dx[j],at[i]) then
if Dx[j]==sX and D==false then
return false
endif
if b3(i,C0,d0,40,"DownWidth")==false and Qv[i]<=0 then
set x=GetRectCenterX(Dx[fx[j]])
set y=GetRectCenterY(Dx[fx[j]])
loop
set r=Rect(x-64,y-64,x+64,y+64)
exitwhen CountUnitsInGroup(iz(r))==0
if P==false then
set y=y+32
else
set y=y-32
endif
call RemoveRect(r)
endloop
call RemoveRect(r)
set TS=0
call b3(i,C0,d0,40,"DownWidthOM")
if TS!=0 and X0(GetUnitTypeId(at[TS]))==false then
if P==false then
set y=y+90
else
set y=y-90
endif
endif
if GetTerrainType(x,y)=='Xsqd' and((P==false and GetTerrainType(x,y+40)=='Xsqd')or(P and GetTerrainType(x,y-40)=='Xsqd'))then
call DestroyEffect(AddSpecialEffect("war3mapImported\\Teleport.mdl",C0,d0))
call DestroyEffect(AddSpecialEffect("war3mapImported\\Teleport.mdl",x,y))
if Fx[j]=="Red" and GetLocalPlayer()==Player(i-1)then
call CinematicFilterGenericBJ(.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',.0,.0,50.,100.,0,0,100.)
elseif Fx[j]=="Blue" and GetLocalPlayer()==Player(i-1)then
call CinematicFilterGenericBJ(.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,100.,50.,.0,0,'d',100.)
elseif Fx[j]=="Yellow" and GetLocalPlayer()==Player(i-1)then
call CinematicFilterGenericBJ(.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',100.,.0,50.,100.,'d',0,100.)
endif
call A4(i)
call SetUnitPosition(at[i],x,y)
if TS!=0 and X0(GetUnitTypeId(at[TS]))==false and TS>7 then
call DestroyEffect(AddSpecialEffect("war3mapImported\\Teleport.mdl",GetUnitX(at[TS]),GetUnitY(at[TS])))
call A4(TS)
if P==false then
call SetUnitPosition(at[TS],x,y-90)
call DestroyEffect(AddSpecialEffect("war3mapImported\\Teleport.mdl",x,y-90))
else
call SetUnitPosition(at[TS],x,y+90)
call DestroyEffect(AddSpecialEffect("war3mapImported\\Teleport.mdl",x,y+90))
endif
endif
if(j>=$E8 and j<=$F5)or j==264 or j==265 then
call SetUnitPosition(Et[i],GetRectMinX(Dx[fx[j]]),GetRectCenterY(Dx[fx[j]]))
else
call c0(i,C0,d0)
endif
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 출구에 빈 공간이 없어 이동할 수 없습니다!")
endif
set r=null
return true
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 땅 또는 오브젝트(버섯, 상자, 문어 블럭)위에 올라탄 상태에서만 이용할 수 있습니다.")
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 상자, 문어 블럭 등을 밟고 이동하면 같이 이동됩니다.")
endif
endif
set j=j+1
endloop
set r=null
return false
endfunction
function Z5 takes rect r,integer i,integer y5,string s returns nothing
call RegionAddRect(Cx,r)
set Dx[i]=r
set fx[i]=y5
set Fx[i]=s
endfunction
function v6 takes nothing returns nothing
set Cx=CreateRegion()
call Z5(Sl,1,2,"Red")
call Z5(tl,2,1,"Red")
call Z5(Tl,3,4,"Yellow")
call Z5(ul,4,3,"Yellow")
call Z5(Ul,5,6,"Blue")
call Z5(wl,6,5,"Blue")
call Z5(Wl,7,8,"Red")
call Z5(yl,8,7,"Red")
call Z5(Yl,9,$A,"Yellow")
call Z5(zl,$A,9,"Yellow")
call Z5(Zl,$B,$C,"Red")
call Z5(vL,$C,$B,"Red")
call Z5(eL,$D,$E,"Yellow")
call Z5(xL,$E,$D,"Yellow")
call Z5(oL,$F,16,"Red")
call Z5(rL,16,$F,"Red")
call Z5(iL,17,18,"Yellow")
call Z5(aL,18,17,"Yellow")
call Z5(nL,19,20,"Blue")
call Z5(VL,20,19,"Blue")
call Z5(EL,21,22,"Red")
call Z5(XL,22,21,"Red")
call Z5(OL,23,24,"Yellow")
call Z5(RL,24,23,"Yellow")
call Z5(IL,25,26,"Blue")
call Z5(AL,26,25,"Blue")
call Z5(NL,27,28,"Red")
call Z5(bL,28,27,"Red")
call Z5(BL,29,30,"Yellow")
call Z5(cL,30,29,"Yellow")
call Z5(CL,31,32,"Red")
call Z5(dL,32,31,"Red")
call Z5(DL,33,34,"Yellow")
call Z5(fL,34,33,"Yellow")
call Z5(FL,35,36,"Red")
call Z5(gL,36,35,"Red")
call Z5(GL,37,38,"Red")
call Z5(hL,38,37,"Red")
call Z5(HL,39,40,"Red")
call Z5(jL,40,39,"Red")
call Z5(JL,41,42,"Yellow")
call Z5(kL,42,41,"Yellow")
call Z5(KL,43,44,"Blue")
call Z5(lL,44,43,"Blue")
call Z5(LL,45,46,"Red")
call Z5(mL,46,45,"Red")
call Z5(ML,47,48,"Yellow")
call Z5(pL,48,47,"Yellow")
call Z5(PL,49,50,"Red")
call Z5(qL,50,49,"Red")
call Z5(QL,51,52,"Yellow")
call Z5(sL,52,51,"Yellow")
call Z5(SL,53,54,"Red")
call Z5(tL,54,53,"Red")
call Z5(TL,55,56,"Red")
call Z5(uL,56,55,"Red")
call Z5(UL,57,58,"Red")
call Z5(wL,58,57,"Red")
call Z5(WL,59,60,"Yellow")
call Z5(yL,60,59,"Yellow")
call Z5(YL,61,62,"Blue")
call Z5(zL,62,61,"Blue")
call Z5(ZL,63,64,"Red")
call Z5(vm,64,63,"Red")
call Z5(em,65,66,"Yellow")
call Z5(xm,66,65,"Yellow")
call Z5(om,67,68,"Blue")
call Z5(rm,68,67,"Blue")
call Z5(im,69,70,"Red")
call Z5(am,70,69,"Red")
call Z5(nm,71,72,"Red")
call Z5(Vm,72,71,"Red")
call Z5(Em,73,74,"Red")
call Z5(Xm,74,73,"Red")
call Z5(Om,75,76,"Yellow")
call Z5(Rm,76,75,"Yellow")
call Z5(Im,77,78,"Blue")
call Z5(Am,78,77,"Blue")
call Z5(Nm,79,80,"Red")
call Z5(bm,80,79,"Red")
call Z5(Bm,81,82,"Red")
call Z5(cm,82,81,"Red")
call Z5(Cm,83,84,"Yellow")
call Z5(dm,84,83,"Yellow")
call Z5(Dm,85,86,"Red")
call Z5(fm,86,85,"Red")
call Z5(Fm,87,88,"Red")
call Z5(gm,88,87,"Red")
call Z5(Gm,89,90,"Yellow")
call Z5(hm,90,89,"Yellow")
call Z5(Hm,91,92,"Red")
call Z5(jm,92,91,"Red")
call Z5(Jm,93,94,"Red")
call Z5(km,94,93,"Red")
call Z5(Km,95,96,"Yellow")
call Z5(lm,96,95,"Yellow")
call Z5(Lm,97,98,"Blue")
call Z5(mm,98,97,"Blue")
call Z5(Mm,99,'d',"Red")
call Z5(pm,'d',99,"Red")
call Z5(Pm,'e','f',"Red")
call Z5(qm,'f','e',"Red")
call Z5(Qm,'g','h',"Yellow")
call Z5(sm,'h','g',"Yellow")
call Z5(Sm,'i','j',"Red")
call Z5(tm,'j','i',"Red")
call Z5(Tm,'k','l',"Yellow")
call Z5(um,'l','k',"Yellow")
call Z5(Um,'m','n',"Blue")
call Z5(wm,'n','m',"Blue")
call Z5(Wm,'o','p',"Red")
call Z5(ym,'p','o',"Red")
call Z5(Ym,'q','r',"Yellow")
call Z5(zm,'r','q',"Yellow")
call Z5(Zm,'s','t',"Blue")
call Z5(vM,'t','s',"Blue")
call Z5(eM,'u','v',"Red")
call Z5(xM,'v','u',"Red")
call Z5(oM,'w','x',"Yellow")
call Z5(rM,'x','w',"Yellow")
call Z5(iM,'y','z',"Red")
call Z5(aM,'z','y',"Red")
call Z5(nM,'{','|',"Yellow")
call Z5(VM,'|','{',"Yellow")
call Z5(EM,'}',$7E,"Blue")
call Z5(XM,$7E,'}',"Blue")
call Z5(OM,$7F,$80,"Red")
call Z5(RM,$80,$7F,"Red")
call Z5(IM,$81,$82,"Yellow")
call Z5(AM,$82,$81,"Yellow")
call Z5(NM,$83,$84,"Red")
call Z5(bM,$84,$83,"Red")
call Z5(BM,$85,$86,"Yellow")
call Z5(cM,$86,$85,"Yellow")
call Z5(CM,$87,$88,"Red")
call Z5(dM,$88,$87,"Red")
call Z5(DM,$89,$8A,"Yellow")
call Z5(fM,$8A,$89,"Yellow")
call Z5(FM,$8B,$8C,"Blue")
call Z5(gM,$8C,$8B,"Blue")
call Z5(GM,$8D,$8E,"Red")
call Z5(hM,$8E,$8D,"Red")
call Z5(HM,$8F,$90,"Red")
call Z5(jM,$90,$8F,"Red")
call Z5(JM,$91,$92,"Yellow")
call Z5(kM,$92,$91,"Yellow")
call Z5(KM,$93,$94,"Blue")
call Z5(lM,$94,$93,"Blue")
call Z5(LM,$95,$96,"Red")
call Z5(mM,$96,$95,"Red")
call Z5(MM,$97,$98,"Yellow")
call Z5(pM,$98,$99,"Yellow")
call Z5(PM,$99,$97,"Yellow")
call Z5(qM,$9A,$9B,"Blue")
call Z5(QM,$9B,$9A,"Blue")
call Z5(sM,$9C,$9D,"Yellow")
call Z5(SM,$9D,$9C,"Yellow")
call Z5(tM,$9E,$9F,"Red")
call Z5(TM,$9F,$9E,"Red")
call Z5(uM,$A0,$A1,"Red")
call Z5(UM,$A1,$A0,"Red")
call Z5(wM,$A2,$A3,"Yellow")
call Z5(WM,$A3,$A2,"Yellow")
call Z5(yM,$A4,$A5,"Blue")
call Z5(YM,$A5,$A4,"Blue")
call Z5(zM,$A6,$A7,"Red")
call Z5(ZM,$A7,$A6,"Red")
call Z5(vp,$A8,$A9,"Yellow")
call Z5(ep,$A9,$A8,"Yellow")
call Z5(xp,$AA,$AB,"Red")
call Z5(op,$AB,$AA,"Red")
call Z5(rp,$AC,$AD,"Yellow")
call Z5(ip,$AD,$AC,"Yellow")
call Z5(ap,$AE,$AF,"Blue")
call Z5(np,$AF,$AE,"Blue")
call Z5(Vp,$B0,$B1,"Red")
call Z5(Ep,$B1,$B0,"Red")
call Z5(Xp,$B2,$B3,"Yellow")
call Z5(Op,$B3,$B2,"Yellow")
call Z5(Rp,$B4,$B5,"Blue")
call Z5(Ip,$B5,$B4,"Blue")
call Z5(Ap,$B6,$B7,"Red")
call Z5(Np,$B7,$B6,"Red")
call Z5(bp,$B8,$B9,"Yellow")
call Z5(Bp,$B9,$B8,"Yellow")
call Z5(cp,$BA,$BB,"Red")
call Z5(Cp,$BB,$BA,"Red")
call Z5(dp,$BC,$BD,"Yellow")
call Z5(Dp,$BD,$BC,"Yellow")
call Z5(fp,$BE,$BF,"Blue")
call Z5(Fp,$BF,$BE,"Blue")
call Z5(gp,$C0,$C1,"Red")
call Z5(Gp,$C1,$C0,"Red")
call Z5(hp,$C2,$C3,"Yellow")
call Z5(Hp,$C3,$C2,"Yellow")
call Z5(jp,$C4,$C5,"Blue")
call Z5(Jp,$C5,$C4,"Blue")
call Z5(kp,$C6,$C7,"Red")
call Z5(Kp,$C7,$C6,"Red")
call Z5(lp,$C8,$C9,"Red")
call Z5(Lp,$C9,$C8,"Red")
call Z5(mp,$CA,$CB,"Red")
call Z5(Mp,$CB,$CA,"Red")
call Z5(pp,$CC,$CD,"Blue")
call Z5(Pp,$CD,$CC,"Blue")
call Z5(qp,$CE,$CF,"Yellow")
call Z5(Qp,$CF,$CE,"Yellow")
call Z5(sp,$D0,$D1,"Red")
call Z5(Sp,$D1,$D0,"Red")
call Z5(Tp,$D2,$D3,"Red")
call Z5(up,$D3,$D2,"Red")
call Z5(Up,$D4,$D5,"Yellow")
call Z5(wp,$D5,$D4,"Yellow")
call Z5(Wp,$D6,$D7,"Red")
call Z5(yp,$D7,$D6,"Red")
call Z5(Yp,$D8,$D9,"Yellow")
call Z5(zp,$D9,$D8,"Yellow")
call Z5(Zp,$DA,$DB,"Blue")
call Z5(vP,$DB,$DA,"Blue")
call Z5(eP,$DC,$DD,"Red")
call Z5(xP,$DD,$DC,"Red")
call Z5(oP,$DE,$DF,"Yellow")
call Z5(rP,$DF,$DE,"Yellow")
call Z5(iP,$E0,$E1,"Blue")
call Z5(aP,$E1,$E0,"Blue")
call Z5(nP,$E2,$E3,"Red")
call Z5(VP,$E3,$E2,"Red")
call Z5(EP,$E4,$E5,"Yellow")
call Z5(XP,$E5,$E4,"Yellow")
call Z5(OP,$E6,$E7,"Red")
call Z5(RP,$E7,$E6,"Red")
call Z5(wO,$E8,$E9,"Red")
call Z5(WO,$E9,$E8,"Red")
call Z5(yO,$EA,$EB,"Red")
call Z5(YO,$EB,$EA,"Red")
call Z5(zO,$EC,$ED,"Red")
call Z5(ZO,$ED,$EC,"Red")
call Z5(vR,$EE,$EF,"Red")
call Z5(eR,$EF,$EE,"Red")
call Z5(xR,$F0,$F1,"Red")
call Z5(oR,$F1,$F0,"Red")
call Z5(rR,$F2,$F3,"Red")
call Z5(iR,$F3,$F2,"Red")
call Z5(aR,$F4,$F5,"Red")
call Z5(nR,$F5,$F4,"Red")
call Z5(sX,$F6,$F7,"Red")
call Z5(SX,$F7,$F6,"Red")
call Z5(IP,$F8,$F9,"Red")
call Z5(AP,$F9,$F8,"Red")
call Z5(NP,$FA,$FB,"Red")
call Z5(bP,$FB,$FA,"Red")
call Z5(BP,$FC,$FD,"Yellow")
call Z5(cP,$FD,$FC,"Yellow")
call Z5(CP,$FE,$FF,"Red")
call Z5(dP,$FF,$FE,"Red")
call Z5(DP,256,257,"Yellow")
call Z5(fP,257,256,"Yellow")
call Z5(FP,258,259,"Blue")
call Z5(gP,259,258,"Blue")
call Z5(GP,260,261,"Red")
call Z5(hP,261,260,"Red")
call Z5(HP,262,263,"Blue")
call Z5(jP,263,262,"Blue")
call Z5(JP,264,265,"Blue")
call Z5(kP,265,264,"Blue")
call Z5(KP,266,267,"Red")
call Z5(lP,267,266,"Red")
call Z5(LP,268,269,"Yellow")
call Z5(MP,269,268,"Yellow")
call Z5(pP,270,271,"Red")
call Z5(PP,271,270,"Red")
call Z5(qP,272,273,"Red")
call Z5(QP,273,272,"Red")
call Z5(sP,274,275,"Red")
call Z5(SP,275,274,"Red")
call Z5(tP,276,277,"Red")
call Z5(TP,277,276,"Red")
call Z5(uP,278,279,"Yellow")
call Z5(UP,279,278,"Yellow")
call Z5(wP,280,281,"Blue")
call Z5(WP,281,280,"Blue")
call Z5(yP,282,283,"Red")
call Z5(YP,283,282,"Red")
call Z5(zP,284,285,"Red")
call Z5(ZP,285,284,"Red")
call Z5(vq,286,287,"Yellow")
call Z5(eq,287,286,"Yellow")
call Z5(xq,288,289,"Blue")
call Z5(oq,289,288,"Blue")
call Z5(rq,290,291,"Red")
call Z5(iq,291,290,"Red")
call Z5(aq,292,293,"Yellow")
call Z5(nq,293,292,"Yellow")
call Z5(lQ,294,295,"Red")
call Z5(LQ,295,294,"Red")
call Z5(mQ,296,297,"Yellow")
call Z5(MQ,297,296,"Yellow")
call Z5(rs,298,299,"Red")
call Z5(is,299,298,"Red")
call Z5(as,300,301,"Yellow")
call Z5(ns,301,300,"Yellow")
endfunction
function e6 takes string s returns nothing
call ClearTextMessages()
call BJDebugMsg("　　　　　　"+s)
endfunction
function x6 takes nothing returns string
local string s=""
local integer i=1
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING and Ox[i]==false then
set s=s+Ge[i]+GetPlayerName(Player(i-1))+"|r, "
endif
set i=i+1
endloop
if s!="" then
set s=SubString(s,0,StringLength(s)-2)
else
set s="|cffff7f27주황버섯|r"
endif
return s
endfunction
function o6 takes nothing returns string
local string s=""
local integer i=1
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING and Ox[i] then
set s=s+Ge[i]+GetPlayerName(Player(i-1))+"|r, "
endif
set i=i+1
endloop
set s=SubString(s,0,StringLength(s)-2)
return s
endfunction
function r6 takes string s returns nothing
call ClearTextMessages()
call BJDebugMsg("　　　　　　　　　　　　　"+s)
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
endfunction
function i6 takes nothing returns nothing
local integer i=1
local real px=$3440
local real py=-$4B96
call TimerStart(bw[(Hx)],((4.)*1.),(false),(function i6))
if Bw[Hx]==0 then
call CinematicFilterGenericBJ(3.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",100.,100.,100.,.0,0,0,0,0)
call TimerStart(bw[(Hx)],((4.)*1.),(false),(function i6))
elseif Bw[Hx]==1 then
call StartSound(ES)
call PanCameraToTimed($3640,py,0)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2500.,0)
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set mv[i]=false
set Mv[i]=false
set Qv[i]=0
set Kv[i]=0
if P then
call RemoveUnit(at[i])
set at[i]=CreateUnit(Player(i-1),Rt[i],GetRectMinX(Lx)+($80*(i-1)),GetRectCenterY(Lx),270)
call SetUnitBlendTime(at[i],.0)
else
call SetUnitPosition(at[i],GetRectMinX(Lx)+($80*(i-1)),GetRectCenterY(Lx))
endif
call SetUnitPosition(Et[i],$3840,py)
call SetUnitVertexColorBJ(Et[i],.0,.0,.0,'d')
if Player(i-1)==GetLocalPlayer()then
call SetUnitVertexColorBJ(Et[i],100.,100.,100.,0)
endif
set Rx[i]=false
set Ox[i]=false
set Ix[i]=0
call UnitRemoveAbility(at[i],'Aloc')
call ShowUnitShow(at[i])
call UnitAddAbility(at[i],'Aloc')
call SetTextTagVisibility(he[i],true)
call SetUnitAnimation(at[i],"Stand First")
endif
set i=i+1
endloop
set P=false
call CinematicFilterGenericBJ(5.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,'d')
call TimerStart(bw[(Hx)],((5.)*1.),(false),(function i6))
elseif Bw[Hx]==2 then
call e6("|cffff7f27주황버섯|r"+": 후... 이전 소개팅들은 최악이였어.")
elseif Bw[Hx]==3 then
call e6("|cffff7f27주황버섯|r"+": 그래서 이번엔 상대방이나 약속 장소도 전부 다르게 했지!")
elseif Bw[Hx]==4 then
call e6("|cffE45AAF분홍버섯|r"+": 저기요?")
call TimerStart(bw[(Hx)],((.5)*1.),(false),(function i6))
elseif Bw[Hx]==5 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand Second")
endif
set i=i+1
endloop
call PanCameraToTimed($3B80,py,3)
set Kx=CreateUnit(Player($B),'ucry',$3B80,-$4CA0,270)
elseif Bw[Hx]==6 then
call e6("|cffE45AAF분홍버섯|r"+": 혹시 주황버섯씨 맞으신가요?")
elseif Bw[Hx]==7 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set Mv[i]=true
call F0(at[i],"Walk Second")
endif
set i=i+1
endloop
call PanCameraToTimed($3900,py,1)
call TimerStart(bw[(Hx)],((1.5)*1.),(false),(function i6))
call e6("|cffff7f27주황버섯|r"+": 네! 맞아요! 그런데 오시는 길이 힘들지 않으셨어요?")
elseif Bw[Hx]==8 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set Mv[i]=false
call SetUnitAnimation(at[i],"Stand Second")
endif
set i=i+1
endloop
call TimerStart(bw[(Hx)],((2.5)*1.),(false),(function i6))
elseif Bw[Hx]==9 then
call PanCameraToTimed($3B80,py,1)
call e6("|cffE45AAF분홍버섯|r"+": 맞아요. 혼자선 도저히 도착할 수 없는 길이더군요.")
elseif Bw[Hx]==$A then
call e6("|cffE45AAF분홍버섯|r"+": 그래도 다행히 일행분들의 도움으로 도착할 수 있었답니다.")
elseif Bw[Hx]==$B then
call PanCameraToTimed($3900,py,.5)
call e6("|cffff7f27주황버섯|r"+": 그런데 같이 온 일행분들은 어디계시...")
call TimerStart(bw[(Hx)],((2.)*1.),(false),(function i6))
elseif Bw[Hx]==$C then
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,0)
call StartSound(Us)
call StopSound(ES,false,false)
call e6("|cffff7f27주황버섯|r"+": ..?")
call TimerStart(bw[(Hx)],((1.)*1.),(false),(function i6))
elseif Bw[Hx]==$D then
call e6("|cffff7f27주황버섯|r"+": 잠깐만! 불이 또 꺼졌어!")
elseif Bw[Hx]==$E then
call e6("|cffff7f27주황버섯|r"+": 설마 또 그런 일이...")
call TimerStart(bw[(Hx)],((.8)*1.),(false),(function i6))
elseif Bw[Hx]==$F then
set lx[1]=CreateUnit(Player($B),'hgry',$34C0,-$4B80,270)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",'d','d','d',0,0,0,0,'d')
call StartSound(Us)
call TimerStart(bw[(Hx)],((1.)*1.),(false),(function i6))
elseif Bw[Hx]==16 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand First")
endif
set i=i+1
endloop
call PanCameraToTimed($3540,-$4B80,3)
call TimerStart(bw[(Hx)],((3.)*1.),(false),(function i6))
elseif Bw[Hx]==17 then
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2000.,.2)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,100.,.0,0,0,70.)
call StartSound(ws)
call e6("|cff282828블랙|r"+": Deep ♂")
call TimerStart(bw[(Hx)],((.4)*1.),(false),(function i6))
elseif Bw[Hx]==18 then
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1500.,.2)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,70.,.0,0,0,30.)
call e6("|cff282828블랙|r"+": Dark ♂")
call TimerStart(bw[(Hx)],((.5)*1.),(false),(function i6))
elseif Bw[Hx]==19 then
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1000.,.2)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,30.,.0,0,0,.0)
call e6("|cff282828블랙|r"+": ♂ FANTASY ♂")
call TimerStart(bw[(Hx)],((1.5)*1.),(false),(function i6))
elseif Bw[Hx]==20 then
loop
exitwhen i>B0()-2
if i==1 then
set lx[i+1]=CreateUnit(Player($B),'hgry',$3280,-$4B80,270)
elseif i==2 then
set lx[i+1]=CreateUnit(Player($B),'hgry',$33C0,-$4900,270)
elseif i==3 then
set lx[i+1]=CreateUnit(Player($B),'hgry',$3700,-$4900,270)
elseif i==4 then
set lx[i+1]=CreateUnit(Player($B),'hgry',$3400,-$4E40,270)
elseif i==5 then
set lx[i+1]=CreateUnit(Player($B),'hgry',$3680,-$4E40,270)
endif
set i=i+1
endloop
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2500.,.5)
call CinematicFilterGenericBJ(.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,.0,.0,0,0,100.)
call StartSound(ys)
call PanCameraToTimed($35C0,py,.5)
call e6("|cffff7f27주황버섯|r"+": 젠장! 저 녀석들 또 왔잖아?")
elseif Bw[Hx]==21 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand Second")
endif
set i=i+1
endloop
call e6("|cffff7f27주황버섯|r"+": 분홍버섯씨 도망가세요! 이분들은 위험한...")
call TimerStart(bw[(Hx)],((1.5)*1.),(false),(function i6))
elseif Bw[Hx]==22 then
call PanCameraToTimed($3B80,-$4CA0,1)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1500.,1.)
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',50.19,50.19,100.,'d',50.19,50.19,.0)
call SetUnitAnimation(Kx,"Stand Upgrade First")
call e6("|cffE45AAF분홍버섯|r"+": 무슨 소리하시는거에요? 주황버섯씨♥")
elseif Bw[Hx]==23 then
call e6("|cffE45AAF분홍버섯|r"+": 이분들이 제 일행이에요. 전혀 위험하지 않답니다^^")
elseif Bw[Hx]==24 then
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',50.19,50.19,.0,.0,0,0,.0)
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand First")
endif
set i=i+1
endloop
call PanCameraToTimed($34C0,-$4B80,1.5)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2500.,1.5)
call e6("|cff282828블랙|r"+": 이봐 이봐♂ 이번에는 같이 온 일행에 대해서 확인하지 않았다구?♂")
elseif Bw[Hx]==25 then
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1000.,3.)
call e6("|cff282828블랙|r"+": 그러니... 이번에도 절륜한 소개팅을 시작해보자구.B.O.Y♂")
elseif Bw[Hx]==26 then
call PanCameraToTimed($3900,py,1)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2500.,1.)
call CinematicFilterGenericBJ(.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,0,0,.0,.0,0,0,100.)
call e6("|cffff7f27주황버섯|r"+": 야이... 너희 변태 행위를 소개팅으로 미화하지 말라고 미친놈들아!")
elseif Bw[Hx]==27 then
call e6("|cffff7f27주황버섯|r"+": 우린 그저 여자친구를 사귀고 싶을 뿐인데")
elseif Bw[Hx]==28 then
call e6("|cffff7f27주황버섯|r"+": 그게 그렇게 어려운거야?")
elseif Bw[Hx]==29 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand Second")
endif
set i=i+1
endloop
call PanCameraToTimed($3B80,-$4CA0,1)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2000.,1.)
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',50.19,50.19,100.,'d',50.19,50.19,.0)
call e6("|cffE45AAF분홍버섯|r"+": 네 어려워요. 그러니까 현실을 받아들이세요♥")
elseif Bw[Hx]==30 then
call e6("|cffff7f27주황버섯|r"+": 시발.")
call TimerStart(bw[(Hx)],((.8)*1.),(false),(function i6))
elseif Bw[Hx]==31 then
call e6("|cffE45AAF분홍버섯|r"+": 아무튼 주황버섯씨?")
elseif Bw[Hx]==32 then
call CameraSetSourceNoise(20,$186A0)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1850.,.2)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',50.19,50.19,.0,'d',40.19,40.19,.0)
call e6("|cffE45AAF분홍버섯|r"+": 사")
call TimerStart(bw[(Hx)],((.8)*1.),(false),(function i6))
elseif Bw[Hx]==33 then
call CameraSetSourceNoise(40,$186A0)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',40.19,40.19,.0,'d',30.19,30.19,.0)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1600.,.2)
call e6("|cffE45AAF분홍버섯|r"+": 사.랑")
call TimerStart(bw[(Hx)],((.8)*1.),(false),(function i6))
elseif Bw[Hx]==34 then
call CameraSetSourceNoise(60,$186A0)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',30.19,30.19,.0,'d',20.19,20.19,.0)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1450.,.2)
call e6("|cffE45AAF분홍버섯|r"+": 사.랑.해")
call TimerStart(bw[(Hx)],((.8)*1.),(false),(function i6))
elseif Bw[Hx]==35 then
call CameraSetSourceNoise(80,$186A0)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',20.19,20.19,.0,'d',10.19,10.19,.0)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1300.,.2)
call e6("|cffE45AAF분홍버섯|r"+": 사.랑.해.요♥♥♥♥♥♥♥♥♥♥")
call TimerStart(bw[(Hx)],((1.5)*1.),(false),(function i6))
elseif Bw[Hx]==36 then
call CameraSetSourceNoise(0,0)
call CinematicFilterGenericBJ(.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',10.19,10.19,.0,'d',10.19,10.19,100.)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2500.,.5)
call PanCameraToTimed($3B80,py,.5)
call e6("|cffff7f27주황버섯|r"+": (젠장... 이제 어떻해야 하지?)")
elseif Bw[Hx]==37 then
call e6("|cffff7f27주황버섯|r"+": (그래! 저기로 탈출하는거야!)")
call PanCameraToTimed($3F00,-$4BE0,1)
elseif Bw[Hx]==38 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set Mv[i]=true
call F0(at[i],"Walk Second")
endif
set i=i+1
endloop
call CinematicFilterGenericBJ(2.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,'d',0,0,0,0)
call TimerStart(bw[(Hx)],((2.)*1.),(false),(function i6))
elseif Bw[Hx]==39 then
call ClearTextMessages()
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set Mv[i]=false
call SetUnitAnimation(at[i],"Stand First")
endif
set i=i+1
endloop
call StopSound(ys,false,true)
elseif Bw[Hx]==40 then
call RemoveUnit(Kx)
loop
exitwhen lx[i]==null
call RemoveUnit(lx[i])
set i=i+1
endloop
call StartSound(us)
call TimerStart(bw[(Hx)],((5.5)*1.),(false),(function i6))
elseif Bw[Hx]==41 then
call CameraSetSourceNoise(80,$186A0)
call SetDoodadAnimation(64,-$4B80,128.,'IOpr',false,"Spell",false)
call StartSound(XS)
call CinematicFilterGenericBJ(4.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,'d')
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitPosition(at[i],GetRectMinX(TR)+($80*(i-1)),GetRectCenterY(TR))
call SetUnitPosition(Et[i],GetRectMinX(TR)+($80*(i-1)),GetRectCenterY(TR))
endif
set i=i+1
endloop
call PanCameraToTimed(384,-$4B80,0)
call StopSound(ys,false,true)
call TimerStart(bw[(Hx)],((1.8)*1.),(false),(function i6))
elseif Bw[Hx]==42 then
call CameraSetSourceNoise(0,0)
call TimerStart(bw[(Hx)],((2.2)*1.),(false),(function i6))
elseif Bw[Hx]==43 then
call CameraSetSourceNoise(80,$186A0)
call SetDoodadAnimation(64,-$4B80,128.,'IOpr',false,"Spell",false)
call StartSound(XS)
call e6("|cffff7f27주황버섯|r"+": 정신나간 새끼들... 저렇게까지 끈질길 줄이야.")
call TimerStart(bw[(Hx)],((1.8)*1.),(false),(function i6))
elseif Bw[Hx]==44 then
call CameraSetSourceNoise(0,0)
call TimerStart(bw[(Hx)],((2.2)*1.),(false),(function i6))
elseif Bw[Hx]==45 then
call CameraSetSourceNoise(80,$186A0)
call SetDoodadAnimation(64,-$4B80,128.,'IOpr',false,"Spell",false)
call StartSound(XS)
call e6("|cffff7f27주황버섯|r"+": 일단 빨리 여기서 벗어나야 겠어.")
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand Second")
endif
set i=i+1
endloop
call TimerStart(bw[(Hx)],((1.8)*1.),(false),(function i6))
elseif Bw[Hx]==46 then
call CameraSetSourceNoise(0,0)
call TimerStart(bw[(Hx)],((2.2)*1.),(false),(function i6))
elseif Bw[Hx]==47 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING and GetLocalPlayer()==Player(i-1)then
call PanCameraToTimed(GetUnitX(at[i]),GetUnitY(at[i])+$80,1)
endif
set i=i+1
endloop
call TimerStart(bw[(Hx)],((1.)*1.),(false),(function i6))
elseif Bw[Hx]==48 then
call ClearTextMessages()
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"　　　　　　※ 제한 시간안에 탈출하세요!")
call TimerStart(bw[(Hx)],((1.5)*1.),(false),(function i6))
elseif Bw[Hx]==49 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"　　　　　　※ 시간 안에 탈출하지 못하거나 최후의 1인은 순결을 잃게 됩니다!")
call TimerStart(bw[(Hx)],((1.5)*1.),(false),(function i6))
elseif Bw[Hx]==50 then
set Gx=true
call CinematicModeBJ(false,bj_FORCE_ALL_PLAYERS)
set Re=false
call f1()
set Ee=OS
call ForForce(bj_FORCE_ALL_PLAYERS,function E0)
call i3(kv,5,9)
call V3(kv,0)
call TimerStart(jx,180.,false,null)
set kx=CreateTimerDialogBJ(jx,"제한 시간")
call E4(Hx)
return
endif
set Bw[Hx]=Bw[Hx]+1
endfunction
function a6 takes nothing returns nothing
local integer i=1
local real px=$3440
local real py=-$4B00
call TimerStart(bw[(Hx)],((4.)*1.),(false),(function a6))
if Bw[Hx]==0 then
call CinematicFilterGenericBJ(1.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,'d',0,0,0,0)
elseif Bw[Hx]==1 then
set Re=true
call CinematicFilterGenericBJ(2.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,'d')
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set mv[i]=false
set Mv[i]=false
set Qv[i]=0
call SetUnitPosition(at[i],GetRectMinX(TR)+($80*(i-1)),GetRectCenterY(TR))
call SetUnitPosition(Et[i],GetRectMinX(TR)+($80*(i-1)),GetRectCenterY(TR))
call SetUnitVertexColorBJ(Et[i],.0,.0,.0,'d')
if Player(i-1)==GetLocalPlayer()then
call SetUnitVertexColorBJ(Et[i],100.,100.,100.,0)
endif
call SetUnitAnimation(at[i],"Stand Second")
endif
set i=i+1
endloop
call PanCameraToTimed(384,-$4B80,0)
elseif Bw[Hx]==2 then
if TU[kv]==0 then
call e6("|cffff7f27주황버섯|r"+": 아니... 아무도 탈출하지 못했단 말이야?")
elseif TU[kv]==1 then
call e6(x6()+": 야이 배신자 새끼야!")
else
call e6(x6()+": 야이 배신자 새끼들아!")
endif
elseif Bw[Hx]==3 then
if TU[kv]==0 then
call e6("|cffff7f27주황버섯|r"+": 젠장... 이러다가 당하는거 아냐?")
else
call e6(x6()+": 여태까지 협동해놓고 이렇게 버리기야?")
endif
elseif Bw[Hx]==4 then
call SetSoundVolume(Ee,30)
call CameraSetSourceNoise(80,$186A0)
call SetDoodadAnimation(64,-$4B80,128.,'IOpr',false,"Spell",false)
call StartSound(XS)
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand First")
endif
set i=i+1
endloop
if TU[kv]==0 then
call e6("|cffff7f27주황버섯|r"+": 아 안 돼...")
else
call e6(x6()+": 아 안 돼...")
endif
call TimerStart(bw[(Hx)],((1.5)*1.),(false),(function a6))
elseif Bw[Hx]==5 then
call SetDoodadAnimation(64,-$4B80,128.,'IOpr',false,"Death",false)
call CameraSetSourceNoise(0,0)
call StopSound(XS,false,false)
call StopSound(Ee,false,false)
call StartSound(RS)
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,0)
elseif Bw[Hx]==6 then
call e6("|cffE45AAF분홍버섯|r"+": 주황버섯씨?")
elseif Bw[Hx]==7 then
set Kx=CreateUnit(Player($B),'ucry',$C0,-$4CC0,270)
call SetUnitBlendTime(Kx,.0)
call SetUnitAnimation(Kx,"Stand Upgrade Second")
loop
exitwhen i>B0()-1
if i==1 then
set lx[i]=CreateUnit(Player($B),'hgry',-320,-$4C00,270)
elseif i==2 then
set lx[i]=CreateUnit(Player($B),'hgry',$80,-$4A00,270)
elseif i==3 then
set lx[i]=CreateUnit(Player($B),'hgry',256,-$4F00,270)
elseif i==4 then
set lx[i]=CreateUnit(Player($B),'hmpr',$400,-$4A00,270)
elseif i==5 then
set lx[i]=CreateUnit(Player($B),'hmpr',$400,-$4F00,270)
elseif i==6 then
set lx[i]=CreateUnit(Player($B),'hmpr',$600,-$4C00,270)
endif
set i=i+1
endloop
call StartSound(ys)
call e6("|cffE45AAF분홍버섯|r"+": 찾.았.다♥")
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",'d','d','d',0,0,0,0,'d')
call StartSound(Us)
elseif Bw[Hx]==8 then
if TU[kv]==0 then
call e6("|cffff7f27주황버섯|r"+": 으아아아아아 시발!! 제발 살려줘 부탁이야!!!")
elseif B0()-TU[kv]==1 then
call e6(x6()+": 으아아아아아 시발!! 나 말고 도망간 애들이나 노리란 말이야!")
elseif TU[kv]==1 then
call e6(x6()+": 으아아아아아 시발!! 우리 말고 도망간 놈이나 노리란 말이야!")
else
call e6(x6()+": 으아아아아아 시발!! 우리 말고 도망간 애들이나 노리란 말이야!")
endif
elseif Bw[Hx]==9 then
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,0,0,100.,.0,0,0,.0)
call PanCameraToTimed(-320,-$4C00,1)
call e6("|cff282828블랙|r"+": No no... 눈 앞에 애피타이저를 그냥 지나칠 순 없잖아?♂")
if TU[kv]==0 then
set Bw[Hx]=$C
endif
elseif Bw[Hx]==$A then
call PanCameraToTimed(384,-$4B80,1)
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,0,0,.0,.0,0,0,100.)
call e6("|cffE45AAF분홍버섯|r"+": 흠... 일단 소개팅을 시작하기전에")
elseif Bw[Hx]==$B then
call e6("|cffE45AAF분홍버섯|r"+": 도망친 동료분들에게 현 상황의 소감을 전달할 기회를 드릴게요.")
elseif Bw[Hx]==$C then
set hx=true
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING and Ox[i]==false then
call CinematicModeBJ(false,bj_FORCE_PLAYER[i-1])
endif
set i=i+1
endloop
call ClearTextMessages()
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"　　　　　　"+x6()+" 님의 최후의 발언을 들어봅시다.")
call TimerStart(Jx,15.,false,null)
set kx=CreateTimerDialogBJ(Jx,"최후의 발언 시간")
call TimerStart(bw[(Hx)],((15.)*1.),(false),(function a6))
call SetCameraBounds(384,-$4B80,384,-$4B80,384,-$4B80,384,-$4B80)
elseif Bw[Hx]==$D then
if hx then
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2500.,0)
set hx=false
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING and Ox[i]==false then
call CinematicModeBJ(true,bj_FORCE_PLAYER[i-1])
endif
set i=i+1
endloop
call DestroyTimerDialog(kx)
else
call PanCameraToTimed(384,-$4B80,1)
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,0,0,.0,.0,0,0,100.)
endif
call e6("|cffE45AAF분홍버섯|r"+": |cffff0000자... 그럼 "+I2S(B0()-TU[kv])+"대"+I2S(B0())+"의 소개팅을 시작해볼까요?|r")
elseif Bw[Hx]==$E then
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,'d',0,0,0,0)
call e6("|cffE45AAF분홍버섯|r"+": |cffff0000순식간에 홍콩으로 보내드리죠♥|r")
elseif Bw[Hx]==$F then
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",'d',50.19,50.19,0,0,0,0,0)
call StartSound(zs)
if TU[kv]==0 then
call e6("|cffff7f27주황버섯|r"+": 으악...")
else
call e6(x6()+": 으악...")
endif
call StartSound(Zs)
call TimerStart(bw[(Hx)],((1.)*1.),(false),(function a6))
elseif Bw[Hx]==16 then
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",'d',50.19,50.19,0,0,0,0,0)
call StartSound(aS)
if TU[kv]==0 then
call e6("|cffff7f27주황버섯|r"+": 안 돼...")
else
call e6(x6()+": 안 돼...")
endif
call TimerStart(bw[(Hx)],((.7)*1.),(false),(function a6))
elseif Bw[Hx]==17 then
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",'d',50.19,50.19,0,0,0,0,0)
call StopSound(zs,false,false)
call StartSound(zs)
if TU[kv]==0 then
call e6("|cffff7f27주황버섯|r"+": ...안 돼")
else
call e6(x6()+": ...안 돼")
endif
call TimerStart(bw[(Hx)],((.5)*1.),(false),(function a6))
elseif Bw[Hx]>=18 and Bw[Hx]<=58 then
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",80-((Bw[Hx]-18)*2),40.-(Bw[Hx]-18),40.-(Bw[Hx]-18),0,0,0,0,0)
if ModuloInteger(Bw[Hx],2)==0 then
call StopSound(aS,false,false)
call StartSound(aS)
call SetSoundVolumeBJ(aS,'d'-((Bw[Hx]-18)*2))
else
call StopSound(zs,false,false)
call StartSound(zs)
call SetSoundOffsetBJ(.05,zs)
call SetSoundVolumeBJ(zs,'d'-((Bw[Hx]-18)*2))
endif
if TU[kv]==0 then
call e6("|cffff7f27주황버섯|r"+": 안 돼!!!!!!!!!!!!!!!!!!!!!!!!!!")
else
call e6(x6()+": 안 돼!!!!!!!!!!!!!!!!!!!!!!!!!!")
endif
call SetSoundVolumeBJ(ys,'d'-((Bw[Hx]-18)*2))
call TimerStart(bw[(Hx)],((.15)*1.),(false),(function a6))
elseif Bw[Hx]==59 then
call StopSound(ys,false,false)
call TimerStart(bw[(Hx)],((5.)*1.),(false),(function a6))
elseif Bw[Hx]==60 then
call StartSound(eS)
call r6("제작: z1z1z1")
elseif Bw[Hx]==61 then
call r6("엔딩중 사용된 BGM: Kirby's Epic Yarn - Rainbow Falls")
elseif Bw[Hx]==62 then
call r6("엔딩중 사용된 BGM: Electric Six - Gay Bar")
elseif Bw[Hx]==63 then
call r6("스프라이트 출처: https://www.spriters-resource.com/")
elseif Bw[Hx]==64 then
if TU[kv]==0 then
call r6("PS: 다 같이 불행해지는 길을 택하다니... 엄청난 단결력이네요!")
else
call r6("PS: 동료를 배신한 졸렬한 플레이어: "+o6())
endif
elseif Bw[Hx]==65 then
call r6("Thank You")
call TimerStart(bw[(Hx)],((6.)*1.),(false),(function a6))
elseif Bw[Hx]==66 then
call ClearTextMessages()
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 세 번째 비밀 코드: "+se[i])
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"　　　　　　다음 게임부터 \"-code "+se[i]+"\"를 입력하시면 캐릭터 외형을 바꿀 수 있습니다.")
call JNObjectCharacterSetInt(StringCase(GetPlayerName(Player(i-1)),false),"Valentine",My[Yy[(xY[oY[(ET)]+(i-1)])]]+1)
if GetLocalPlayer()==Player(i-1)then
if JNObjectCharacterServerConnectCheck()then
call JNObjectCharacterSave("OM150",StringCase(GetPlayerName(Player(i-1)),false),"3b1e2c80-db90-462a-9835-a0ddb80752b1","ClearList")
call BJDebugMsg("　　　　　　|cffFFFC00※ 서버에 코드가 저장되었습니다! ※|r")
else
call BJDebugMsg("　　　　　　|cffFF0202※ 서버에 저장하는데 실패하였습니다. ※|r")
call BJDebugMsg("　　　　　　|cffFF0202※ 현재 버전이 최신버전인지 확인해 주십시오.|r")
endif
endif
endif
set i=i+1
endloop
call TimerStart(bw[(Hx)],((6.)*1.),(false),(function a6))
else
call E4(Hx)
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call CustomVictoryBJ(Player(i-1),true,true)
endif
set i=i+1
endloop
set i=1
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING and GetLocalPlayer()==Player(i-1)then
call BJDebugMsg("　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 세 번째 비밀 코드: "+se[i])
call BJDebugMsg("　　　　　　다음 게임부터 \"-code "+se[i]+"\"를 입력하시면 캐릭터 외형을 바꿀 수 있습니다.")
endif
set i=i+1
endloop
return
endif
set Bw[Hx]=Bw[Hx]+1
endfunction
function n6 takes nothing returns nothing
if Gx==false then
call StopSound(Ee,false,true)
set Hx=V4(0)
call d1(2)
call TimerStart(bw[(Hx)],((3.)*1.),(false),(function i6))
else
call PauseTimer(jx)
call CinematicModeBJ(true,bj_FORCE_ALL_PLAYERS)
call DestroyTimerDialog(kx)
set Hx=V4(0)
call d1(3)
call TimerStart(bw[(Hx)],((.0)*1.),(false),(function a6))
call DestroyTrigger(GetTriggeringTrigger())
endif
endfunction
function V6 takes nothing returns nothing
set Lx=Eq
set gx=CreateTrigger()
call TriggerRegisterTimerExpireEvent(gx,jx)
call TriggerAddAction(gx,function n6)
endfunction
function E6 takes string s returns nothing
call ClearTextMessages()
call BJDebugMsg("　　　　　　"+s)
endfunction
function X6 takes nothing returns string
local string s=""
local integer i=1
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING and Ox[i]==false then
set s=s+Ge[i]+GetPlayerName(Player(i-1))+"|r, "
endif
set i=i+1
endloop
if s!="" then
set s=SubString(s,0,StringLength(s)-2)
else
set s="|cffff7f27주황버섯|r"
endif
return s
endfunction
function TrueEnding2___EscapersName takes nothing returns string
local string s=""
local integer i=1
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING and Ox[i] then
set s=s+Ge[i]+GetPlayerName(Player(i-1))+"|r, "
endif
set i=i+1
endloop
set s=SubString(s,0,StringLength(s)-2)
return s
endfunction
function O6 takes string s returns nothing
call ClearTextMessages()
call BJDebugMsg("　　　　　　　　　　　　　"+s)
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
endfunction
function R6 takes nothing returns nothing
local integer i=1
local real px=$3440
local real py=-$60E4
call TimerStart(bw[(Mx)],((4.)*1.),(false),(function R6))
if Bw[Mx]==0 then
call CinematicFilterGenericBJ(3.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",100.,100.,100.,.0,0,0,0,0)
call TimerStart(bw[(Mx)],((4.)*1.),(false),(function R6))
elseif Bw[Mx]==1 then
call StartSound(ES)
call PanCameraToTimed($3640,py,0)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2500.,0)
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set mv[i]=false
set Mv[i]=false
set Qv[i]=0
set Kv[i]=0
if P then
call RemoveUnit(at[i])
set at[i]=CreateUnit(Player(i-1),Rt[i],GetRectMinX(tx)+($80*(i-1)),GetRectCenterY(tx),270)
call SetUnitBlendTime(at[i],.0)
else
call SetUnitPosition(at[i],GetRectMinX(tx)+($80*(i-1)),GetRectCenterY(tx))
endif
call SetUnitPosition(Et[i],$3840,py)
call SetUnitVertexColorBJ(Et[i],.0,.0,.0,'d')
if Player(i-1)==GetLocalPlayer()then
call SetUnitVertexColorBJ(Et[i],100.,100.,100.,0)
endif
set Rx[i]=false
set Ox[i]=false
set Ix[i]=0
call UnitRemoveAbility(at[i],'Aloc')
call ShowUnitShow(at[i])
call UnitAddAbility(at[i],'Aloc')
call SetTextTagVisibility(he[i],true)
call SetUnitAnimation(at[i],"Stand First")
endif
set i=i+1
endloop
set P=false
call CinematicFilterGenericBJ(5.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,'d')
call TimerStart(bw[(Mx)],((5.)*1.),(false),(function R6))
elseif Bw[Mx]==2 then
call E6("|cffff7f27주황버섯|r"+": 후... 이전 소개팅들은 최악이였어.")
elseif Bw[Mx]==3 then
call E6("|cffff7f27주황버섯|r"+": 그래서 이번엔 상대방이나 약속 장소도 전부 다르게 했지!")
elseif Bw[Mx]==4 then
call E6("|cffE45AAF분홍버섯|r"+": 저기요?")
call TimerStart(bw[(Mx)],((.5)*1.),(false),(function R6))
elseif Bw[Mx]==5 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand Second")
endif
set i=i+1
endloop
call PanCameraToTimed($3B80,py,3)
set sx=CreateUnit(Player($B),'ucry',$3B80,-$6220,270)
elseif Bw[Mx]==6 then
call E6("|cffE45AAF분홍버섯|r"+": 혹시 주황버섯씨 맞으신가요?")
elseif Bw[Mx]==7 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set Mv[i]=true
call F0(at[i],"Walk Second")
endif
set i=i+1
endloop
call PanCameraToTimed($3900,py,1)
call TimerStart(bw[(Mx)],((1.5)*1.),(false),(function R6))
call E6("|cffff7f27주황버섯|r"+": 네! 맞아요! 그런데 오시는 길이 힘들지 않으셨어요?")
elseif Bw[Mx]==8 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set Mv[i]=false
call SetUnitAnimation(at[i],"Stand Second")
endif
set i=i+1
endloop
call TimerStart(bw[(Mx)],((2.5)*1.),(false),(function R6))
elseif Bw[Mx]==9 then
call PanCameraToTimed($3B80,py,1)
call E6("|cffE45AAF분홍버섯|r"+": 맞아요. 혼자선 도저히 도착할 수 없는 길이더군요.")
elseif Bw[Mx]==$A then
call E6("|cffE45AAF분홍버섯|r"+": 그래도 다행히 일행분들의 도움으로 도착할 수 있었답니다.")
elseif Bw[Mx]==$B then
call PanCameraToTimed($3900,py,.5)
call E6("|cffff7f27주황버섯|r"+": 그런데 같이 온 일행분들은 어디계시...")
call TimerStart(bw[(Mx)],((2.)*1.),(false),(function R6))
elseif Bw[Mx]==$C then
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,0)
call StartSound(Us)
call StopSound(ES,false,false)
call E6("|cffff7f27주황버섯|r"+": ..?")
call TimerStart(bw[(Mx)],((1.)*1.),(false),(function R6))
elseif Bw[Mx]==$D then
call E6("|cffff7f27주황버섯|r"+": 잠깐만! 불이 또 꺼졌어!")
elseif Bw[Mx]==$E then
call E6("|cffff7f27주황버섯|r"+": 설마 또 그런 일이...")
call TimerStart(bw[(Mx)],((.8)*1.),(false),(function R6))
elseif Bw[Mx]==$F then
set Sx[1]=CreateUnit(Player($B),'hgry',$34C0,-$6100,270)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",'d','d','d',0,0,0,0,'d')
call StartSound(Us)
call TimerStart(bw[(Mx)],((1.)*1.),(false),(function R6))
elseif Bw[Mx]==16 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand First")
endif
set i=i+1
endloop
call PanCameraToTimed($3540,-$6100,3)
call TimerStart(bw[(Mx)],((3.)*1.),(false),(function R6))
elseif Bw[Mx]==17 then
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2000.,.2)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,100.,.0,0,0,70.)
call StartSound(ws)
call E6("|cff282828블랙|r"+": Deep ♂")
call TimerStart(bw[(Mx)],((.4)*1.),(false),(function R6))
elseif Bw[Mx]==18 then
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1500.,.2)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,70.,.0,0,0,30.)
call E6("|cff282828블랙|r"+": Dark ♂")
call TimerStart(bw[(Mx)],((.5)*1.),(false),(function R6))
elseif Bw[Mx]==19 then
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1000.,.2)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,30.,.0,0,0,.0)
call E6("|cff282828블랙|r"+": ♂ FANTASY ♂")
call TimerStart(bw[(Mx)],((1.5)*1.),(false),(function R6))
elseif Bw[Mx]==20 then
loop
exitwhen i>B0()-2
if i==1 then
set Sx[i+1]=CreateUnit(Player($B),'hgry',$3280,-$6100,270)
elseif i==2 then
set Sx[i+1]=CreateUnit(Player($B),'hgry',$33C0,-$5E80,270)
elseif i==3 then
set Sx[i+1]=CreateUnit(Player($B),'hgry',$3700,-$5E80,270)
elseif i==4 then
set Sx[i+1]=CreateUnit(Player($B),'hgry',$3400,-$63C0,270)
elseif i==5 then
set Sx[i+1]=CreateUnit(Player($B),'hgry',$3680,-$63C0,270)
endif
set i=i+1
endloop
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2500.,.5)
call CinematicFilterGenericBJ(.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,.0,.0,0,0,100.)
call StartSound(ys)
call PanCameraToTimed($35C0,py,.5)
call E6("|cffff7f27주황버섯|r"+": 젠장! 저 녀석들 또 왔잖아?")
elseif Bw[Mx]==21 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand Second")
endif
set i=i+1
endloop
call E6("|cffff7f27주황버섯|r"+": 분홍버섯씨 도망가세요! 이분들은 위험한...")
call TimerStart(bw[(Mx)],((1.5)*1.),(false),(function R6))
elseif Bw[Mx]==22 then
call PanCameraToTimed($3B80,-$6220,1)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1500.,1.)
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',50.19,50.19,100.,'d',50.19,50.19,.0)
call SetUnitAnimation(sx,"Stand Upgrade First")
call E6("|cffE45AAF분홍버섯|r"+": 무슨 소리하시는거에요? 주황버섯씨♥")
elseif Bw[Mx]==23 then
call E6("|cffE45AAF분홍버섯|r"+": 이분들이 제 일행이에요. 전혀 위험하지 않답니다^^")
elseif Bw[Mx]==24 then
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',50.19,50.19,.0,.0,0,0,.0)
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand First")
endif
set i=i+1
endloop
call PanCameraToTimed($34C0,-$6100,1.5)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2500.,1.5)
call E6("|cff282828블랙|r"+": 이봐 이봐♂ 이번에는 같이 온 일행에 대해서 확인하지 않았다구?♂")
elseif Bw[Mx]==25 then
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1000.,3.)
call E6("|cff282828블랙|r"+": 그러니... 이번에도 절륜한 소개팅을 시작해보자구.B.O.Y♂")
elseif Bw[Mx]==26 then
call PanCameraToTimed($3900,py,1)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2500.,1.)
call CinematicFilterGenericBJ(.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,0,0,.0,.0,0,0,100.)
call E6("|cffff7f27주황버섯|r"+": 야이... 너희 변태 행위를 소개팅으로 미화하지 말라고 미친놈들아!")
elseif Bw[Mx]==27 then
call E6("|cffff7f27주황버섯|r"+": 우린 그저 여자친구를 사귀고 싶을 뿐인데")
elseif Bw[Mx]==28 then
call E6("|cffff7f27주황버섯|r"+": 그게 그렇게 어려운거야?")
elseif Bw[Mx]==29 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand Second")
endif
set i=i+1
endloop
call PanCameraToTimed($3B80,-$6220,1)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2000.,1.)
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',50.19,50.19,100.,'d',50.19,50.19,.0)
call E6("|cffE45AAF분홍버섯|r"+": 네 어려워요. 그러니까 현실을 받아들이세요♥")
elseif Bw[Mx]==30 then
call E6("|cffff7f27주황버섯|r"+": 시발.")
call TimerStart(bw[(Mx)],((.8)*1.),(false),(function R6))
elseif Bw[Mx]==31 then
call E6("|cffE45AAF분홍버섯|r"+": 아무튼 주황버섯씨?")
elseif Bw[Mx]==32 then
call CameraSetSourceNoise(20,$186A0)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1850.,.2)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',50.19,50.19,.0,'d',40.19,40.19,.0)
call E6("|cffE45AAF분홍버섯|r"+": 사")
call TimerStart(bw[(Mx)],((.8)*1.),(false),(function R6))
elseif Bw[Mx]==33 then
call CameraSetSourceNoise(40,$186A0)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',40.19,40.19,.0,'d',30.19,30.19,.0)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1600.,.2)
call E6("|cffE45AAF분홍버섯|r"+": 사.랑")
call TimerStart(bw[(Mx)],((.8)*1.),(false),(function R6))
elseif Bw[Mx]==34 then
call CameraSetSourceNoise(60,$186A0)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',30.19,30.19,.0,'d',20.19,20.19,.0)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1450.,.2)
call E6("|cffE45AAF분홍버섯|r"+": 사.랑.해")
call TimerStart(bw[(Mx)],((.8)*1.),(false),(function R6))
elseif Bw[Mx]==35 then
call CameraSetSourceNoise(80,$186A0)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',20.19,20.19,.0,'d',10.19,10.19,.0)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1300.,.2)
call E6("|cffE45AAF분홍버섯|r"+": 사.랑.해.요♥♥♥♥♥♥♥♥♥♥")
call TimerStart(bw[(Mx)],((1.5)*1.),(false),(function R6))
elseif Bw[Mx]==36 then
call CameraSetSourceNoise(0,0)
call CinematicFilterGenericBJ(.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',10.19,10.19,.0,'d',10.19,10.19,100.)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2500.,.5)
call PanCameraToTimed($3B80,py,.5)
call E6("|cffff7f27주황버섯|r"+": (젠장... 이제 어떻해야 하지?)")
elseif Bw[Mx]==37 then
call E6("|cffff7f27주황버섯|r"+": (그래! 저기로 탈출하는거야!)")
call PanCameraToTimed($3F00,-$6160,1)
elseif Bw[Mx]==38 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set Mv[i]=true
call F0(at[i],"Walk Second")
endif
set i=i+1
endloop
call CinematicFilterGenericBJ(2.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,'d',0,0,0,0)
call TimerStart(bw[(Mx)],((2.)*1.),(false),(function R6))
elseif Bw[Mx]==39 then
call ClearTextMessages()
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set Mv[i]=false
call SetUnitAnimation(at[i],"Stand First")
endif
set i=i+1
endloop
call StopSound(ys,false,true)
elseif Bw[Mx]==40 then
call RemoveUnit(sx)
loop
exitwhen Sx[i]==null
call RemoveUnit(Sx[i])
set i=i+1
endloop
call StartSound(us)
call TimerStart(bw[(Mx)],((5.5)*1.),(false),(function R6))
elseif Bw[Mx]==41 then
call CameraSetSourceNoise(80,$186A0)
call SetDoodadAnimation($3000,-$6BC0,128.,'IOpr',false,"Spell",false)
call StartSound(XS)
call CinematicFilterGenericBJ(4.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,'d')
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitPosition(at[i],GetRectMinX(uR)+($80*(i-1)),GetRectCenterY(uR))
call SetUnitPosition(Et[i],GetRectMinX(uR)+($80*(i-1)),GetRectCenterY(uR))
endif
set i=i+1
endloop
call PanCameraToTimed($3100,-$6C00,0)
call StopSound(ys,false,true)
call TimerStart(bw[(Mx)],((1.8)*1.),(false),(function R6))
elseif Bw[Mx]==42 then
call CameraSetSourceNoise(0,0)
call TimerStart(bw[(Mx)],((2.2)*1.),(false),(function R6))
elseif Bw[Mx]==43 then
call CameraSetSourceNoise(80,$186A0)
call SetDoodadAnimation($3000,-$6BC0,128.,'IOpr',false,"Spell",false)
call StartSound(XS)
call E6("|cffff7f27주황버섯|r"+": 정신나간 새끼들... 저렇게까지 끈질길 줄이야.")
call TimerStart(bw[(Mx)],((1.8)*1.),(false),(function R6))
elseif Bw[Mx]==44 then
call CameraSetSourceNoise(0,0)
call TimerStart(bw[(Mx)],((2.2)*1.),(false),(function R6))
elseif Bw[Mx]==45 then
call CameraSetSourceNoise(80,$186A0)
call SetDoodadAnimation($3000,-$6BC0,128.,'IOpr',false,"Spell",false)
call StartSound(XS)
call E6("|cffff7f27주황버섯|r"+": 일단 빨리 여기서 벗어나야 겠어.")
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand Second")
endif
set i=i+1
endloop
call TimerStart(bw[(Mx)],((1.8)*1.),(false),(function R6))
elseif Bw[Mx]==46 then
call CameraSetSourceNoise(0,0)
call TimerStart(bw[(Mx)],((2.2)*1.),(false),(function R6))
elseif Bw[Mx]==47 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING and GetLocalPlayer()==Player(i-1)then
call PanCameraToTimed(GetUnitX(at[i]),GetUnitY(at[i])+$80,1)
endif
set i=i+1
endloop
call TimerStart(bw[(Mx)],((1.)*1.),(false),(function R6))
elseif Bw[Mx]==48 then
call ClearTextMessages()
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"　　　　　　※ 제한 시간안에 탈출하세요!")
call TimerStart(bw[(Mx)],((1.5)*1.),(false),(function R6))
elseif Bw[Mx]==49 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"　　　　　　※ 시간 안에 탈출하지 못하거나 최후의 1인은 순결을 잃게 됩니다!")
call TimerStart(bw[(Mx)],((1.5)*1.),(false),(function R6))
elseif Bw[Mx]==50 then
set Gx=true
call CinematicModeBJ(false,bj_FORCE_ALL_PLAYERS)
set Re=false
call f1()
set Ee=bS
call ForForce(bj_FORCE_ALL_PLAYERS,function E0)
call i3(kv,6,9)
call V3(kv,0)
call TimerStart(Px,150.,false,null)
set Qx=CreateTimerDialogBJ(Px,"제한 시간")
call E4(Mx)
return
endif
set Bw[Mx]=Bw[Mx]+1
endfunction
function I6 takes nothing returns nothing
local integer i=1
local real px=$3440
local real py=-$4B00
call TimerStart(bw[(Mx)],((4.)*1.),(false),(function I6))
if Bw[Mx]==0 then
call CinematicFilterGenericBJ(1.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,'d',0,0,0,0)
elseif Bw[Mx]==1 then
set Re=true
call CinematicFilterGenericBJ(2.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,'d')
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set mv[i]=false
set Mv[i]=false
set Qv[i]=0
call SetUnitPosition(at[i],GetRectMinX(uR)+($80*(i-1)),GetRectCenterY(uR))
call SetUnitPosition(Et[i],GetRectMinX(uR)+($80*(i-1)),GetRectCenterY(uR))
call SetUnitVertexColorBJ(Et[i],.0,.0,.0,'d')
if Player(i-1)==GetLocalPlayer()then
call SetUnitVertexColorBJ(Et[i],100.,100.,100.,0)
endif
call SetUnitAnimation(at[i],"Stand Second")
endif
set i=i+1
endloop
call PanCameraToTimed($3100,-$6C00,0)
elseif Bw[Mx]==2 then
if TU[kv]==0 then
call E6("|cffff7f27주황버섯|r"+": 아니... 아무도 탈출하지 못했단 말이야?")
elseif TU[kv]==1 then
call E6(X6()+": 야이 배신자 새끼야!")
else
call E6(X6()+": 야이 배신자 새끼들아!")
endif
elseif Bw[Mx]==3 then
if TU[kv]==0 then
call E6("|cffff7f27주황버섯|r"+": 젠장... 이러다가 당하는거 아냐?")
else
call E6(X6()+": 여태까지 협동해놓고 이렇게 버리기야?")
endif
elseif Bw[Mx]==4 then
call SetSoundVolume(Ee,30)
call CameraSetSourceNoise(80,$186A0)
call SetDoodadAnimation($3000,-$6BC0,128.,'IOpr',false,"Spell",false)
call StartSound(XS)
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand First")
endif
set i=i+1
endloop
if TU[kv]==0 then
call E6("|cffff7f27주황버섯|r"+": 아 안 돼...")
else
call E6(X6()+": 아 안 돼...")
endif
call TimerStart(bw[(Mx)],((1.5)*1.),(false),(function I6))
elseif Bw[Mx]==5 then
call SetDoodadAnimation(64,-$4B80,128.,'IOpr',false,"Death",false)
call CameraSetSourceNoise(0,0)
call StopSound(XS,false,false)
call StopSound(Ee,false,false)
call StartSound(RS)
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,0)
elseif Bw[Mx]==6 then
call E6("|cffE45AAF분홍버섯|r"+": 주황버섯씨?")
elseif Bw[Mx]==7 then
set sx=CreateUnit(Player($B),'ucry',$30E0,-$6CA0,270)
call SetUnitBlendTime(sx,.0)
call SetUnitAnimation(sx,"Stand Upgrade Second")
loop
exitwhen i>B0()-1
if i==1 then
set Sx[i]=CreateUnit(Player($B),'hgry',$2F00,-$6B80,270)
elseif i==2 then
set Sx[i]=CreateUnit(Player($B),'hgry',$3000,-$6980,270)
elseif i==3 then
set Sx[i]=CreateUnit(Player($B),'hgry',$3000,-$6E00,270)
elseif i==4 then
set Sx[i]=CreateUnit(Player($B),'hmpr',$3600,-$6B80,270)
elseif i==5 then
set Sx[i]=CreateUnit(Player($B),'hmpr',$3480,-$6980,270)
elseif i==6 then
set Sx[i]=CreateUnit(Player($B),'hmpr',$3480,-$6E00,270)
endif
set i=i+1
endloop
call StartSound(ys)
call E6("|cffE45AAF분홍버섯|r"+": 찾.았.다♥")
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",'d','d','d',0,0,0,0,'d')
call StartSound(Us)
elseif Bw[Mx]==8 then
if TU[kv]==0 then
call E6("|cffff7f27주황버섯|r"+": 으아아아아아 시발!! 제발 살려줘 부탁이야!!!")
elseif B0()-TU[kv]==1 then
call E6(X6()+": 으아아아아아 시발!! 나 말고 도망간 애들이나 노리란 말이야!")
elseif TU[kv]==1 then
call E6(X6()+": 으아아아아아 시발!! 우리 말고 도망간 놈이나 노리란 말이야!")
else
call E6(X6()+": 으아아아아아 시발!! 우리 말고 도망간 애들이나 노리란 말이야!")
endif
elseif Bw[Mx]==9 then
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,0,0,100.,.0,0,0,.0)
call PanCameraToTimed($2F00,-$6B80,1)
call E6("|cff282828블랙|r"+": No no... 눈 앞에 애피타이저를 그냥 지나칠 순 없잖아?♂")
if TU[kv]==0 then
set Bw[Mx]=$C
endif
elseif Bw[Mx]==$A then
call PanCameraToTimed($3100,-$6C00,1)
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,0,0,.0,.0,0,0,100.)
call E6("|cffE45AAF분홍버섯|r"+": 흠... 일단 소개팅을 시작하기전에")
elseif Bw[Mx]==$B then
call E6("|cffE45AAF분홍버섯|r"+": 도망친 동료분들에게 현 상황의 소감을 전달할 기회를 드릴게요.")
elseif Bw[Mx]==$C then
set hx=true
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING and Ox[i]==false then
call CinematicModeBJ(false,bj_FORCE_PLAYER[i-1])
endif
set i=i+1
endloop
call ClearTextMessages()
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"　　　　　　"+X6()+" 님의 최후의 발언을 들어봅시다.")
call TimerStart(qx,15.,false,null)
set Qx=CreateTimerDialogBJ(qx,"최후의 발언 시간")
call TimerStart(bw[(Mx)],((15.)*1.),(false),(function I6))
call SetCameraBounds($3100,-$6C00,$3100,-$6C00,$3100,-$6C00,$3100,-$6C00)
elseif Bw[Mx]==$D then
if hx then
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2500.,0)
set hx=false
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING and Ox[i]==false then
call CinematicModeBJ(true,bj_FORCE_PLAYER[i-1])
endif
set i=i+1
endloop
call DestroyTimerDialog(Qx)
else
call PanCameraToTimed($3100,-$6C00,1)
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,0,0,.0,.0,0,0,100.)
endif
call E6("|cffE45AAF분홍버섯|r"+": |cffff0000자... 그럼 "+I2S(B0()-TU[kv])+"대"+I2S(B0())+"의 소개팅을 시작해볼까요?|r")
elseif Bw[Mx]==$E then
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,'d',0,0,0,0)
call E6("|cffE45AAF분홍버섯|r"+": |cffff0000순식간에 홍콩으로 보내드리죠♥|r")
elseif Bw[Mx]==$F then
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",'d',50.19,50.19,0,0,0,0,0)
call StartSound(zs)
if TU[kv]==0 then
call E6("|cffff7f27주황버섯|r"+": 으악...")
else
call E6(X6()+": 으악...")
endif
call StartSound(Zs)
call TimerStart(bw[(Mx)],((1.)*1.),(false),(function I6))
elseif Bw[Mx]==16 then
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",'d',50.19,50.19,0,0,0,0,0)
call StartSound(aS)
if TU[kv]==0 then
call E6("|cffff7f27주황버섯|r"+": 안 돼...")
else
call E6(X6()+": 안 돼...")
endif
call TimerStart(bw[(Mx)],((.7)*1.),(false),(function I6))
elseif Bw[Mx]==17 then
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",'d',50.19,50.19,0,0,0,0,0)
call StopSound(zs,false,false)
call StartSound(zs)
if TU[kv]==0 then
call E6("|cffff7f27주황버섯|r"+": ...안 돼")
else
call E6(X6()+": ...안 돼")
endif
call TimerStart(bw[(Mx)],((.5)*1.),(false),(function I6))
elseif Bw[Mx]>=18 and Bw[Mx]<=58 then
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",80-((Bw[Mx]-18)*2),40.-(Bw[Mx]-18),40.-(Bw[Mx]-18),0,0,0,0,0)
if ModuloInteger(Bw[Mx],2)==0 then
call StopSound(aS,false,false)
call StartSound(aS)
call SetSoundVolumeBJ(aS,'d'-((Bw[Mx]-18)*2))
else
call StopSound(zs,false,false)
call StartSound(zs)
call SetSoundOffsetBJ(.05,zs)
call SetSoundVolumeBJ(zs,'d'-((Bw[Mx]-18)*2))
endif
if TU[kv]==0 then
call E6("|cffff7f27주황버섯|r"+": 안 돼!!!!!!!!!!!!!!!!!!!!!!!!!!")
else
call E6(X6()+": 안 돼!!!!!!!!!!!!!!!!!!!!!!!!!!")
endif
call SetSoundVolumeBJ(ys,'d'-((Bw[Mx]-18)*2))
call TimerStart(bw[(Mx)],((.15)*1.),(false),(function I6))
elseif Bw[Mx]==59 then
call StopSound(ys,false,false)
call TimerStart(bw[(Mx)],((5.)*1.),(false),(function I6))
elseif Bw[Mx]==60 then
call StartSound(xS)
call O6("제작: z1z1z1")
elseif Bw[Mx]==61 then
call O6("엔딩중 사용된 BGM: Kirby's Epic Yarn - Rainbow Falls")
elseif Bw[Mx]==62 then
call O6("엔딩중 사용된 BGM: Electric Six - Gay Bar")
elseif Bw[Mx]==63 then
call O6("스프라이트 출처: https://www.spriters-resource.com/")
elseif Bw[Mx]==64 then
call O6("PS: 결말이 똑같아서 실망이라고요? 어차피 달라져도 결과는 같아요...")
elseif Bw[Mx]==65 then
call O6("Thank You")
call TimerStart(bw[(Mx)],((6.)*1.),(false),(function I6))
elseif Bw[Mx]==66 then
call ClearTextMessages()
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 네 번째 비밀 코드: "+Se[i])
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"　　　　　　다음 게임부터 \"-code2 "+Se[i]+"\"를 입력하시면 캐릭터 외형을 바꿀 수 있습니다.")
call JNObjectCharacterSetInt(StringCase(GetPlayerName(Player(i-1)),false),"Beach",Py[Yy[(xY[oY[(ET)]+(i-1)])]]+1)
if GetLocalPlayer()==Player(i-1)then
if JNObjectCharacterServerConnectCheck()then
call JNObjectCharacterSave("OM150",StringCase(GetPlayerName(Player(i-1)),false),"3b1e2c80-db90-462a-9835-a0ddb80752b1","ClearList")
call BJDebugMsg("　　　　　　|cffFFFC00※ 서버에 코드가 저장되었습니다! ※|r")
else
call BJDebugMsg("　　　　　　|cffFF0202※ 서버에 저장하는데 실패하였습니다. ※|r")
call BJDebugMsg("　　　　　　|cffFF0202※ 현재 버전이 최신버전인지 확인해 주십시오.|r")
endif
endif
endif
set i=i+1
endloop
call TimerStart(bw[(Mx)],((6.)*1.),(false),(function I6))
else
call E4(Mx)
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call CustomVictoryBJ(Player(i-1),true,true)
endif
set i=i+1
endloop
set i=1
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING and GetLocalPlayer()==Player(i-1)then
call BJDebugMsg("　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 네 번째 비밀 코드: "+Se[i])
call BJDebugMsg("　　　　　　다음 게임부터 \"-code2 "+Se[i]+"\"를 입력하시면 캐릭터 외형을 바꿀 수 있습니다.")
endif
set i=i+1
endloop
return
endif
set Bw[Mx]=Bw[Mx]+1
endfunction
function A6 takes nothing returns nothing
if Gx==false then
call StopSound(Ee,false,true)
set Mx=V4(0)
call d1(2)
call TimerStart(bw[(Mx)],((3.)*1.),(false),(function R6))
else
call PauseTimer(Px)
call CinematicModeBJ(true,bj_FORCE_ALL_PLAYERS)
call DestroyTimerDialog(Qx)
set Mx=V4(0)
call d1(3)
call TimerStart(bw[(Mx)],((.0)*1.),(false),(function I6))
call DestroyTrigger(GetTriggeringTrigger())
endif
endfunction
function N6 takes nothing returns nothing
set tx=Xq
set mx=CreateTrigger()
call TriggerRegisterTimerExpireEvent(mx,Px)
call TriggerAddAction(mx,function A6)
endfunction
function b6 takes string s returns nothing
call ClearTextMessages()
call BJDebugMsg("　　　　　　"+s)
endfunction
function TrueEnding3___NotEscapersName takes nothing returns string
local string s=""
local integer i=1
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING and Ox[i]==false then
set s=s+Ge[i]+GetPlayerName(Player(i-1))+"|r, "
endif
set i=i+1
endloop
if s!="" then
set s=SubString(s,0,StringLength(s)-2)
else
set s="|cffff7f27주황버섯|r"
endif
return s
endfunction
function TrueEnding3___EscapersName takes nothing returns string
local string s=""
local integer i=1
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING and Ox[i] then
set s=s+Ge[i]+GetPlayerName(Player(i-1))+"|r, "
endif
set i=i+1
endloop
set s=SubString(s,0,StringLength(s)-2)
return s
endfunction
function B6 takes nothing returns nothing
local integer i=1
local real px=$3440
local real py=-$7900
call TimerStart(bw[(yx)],((4.)*1.),(false),(function B6))
if Bw[yx]==0 then
call CinematicFilterGenericBJ(3.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",100.,100.,100.,.0,0,0,0,0)
call TimerStart(bw[(yx)],((4.)*1.),(false),(function B6))
elseif Bw[yx]==1 then
call v3('ebal')
if Ux then
call v3('h002')
endif
set Yx=CreateUnit(Player($B),'ehip',$480,-$79C0,270)
call PanCameraToTimed(-$C0,py,0)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2500.,0)
call StartSound(ES)
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set mv[i]=false
set Mv[i]=false
set Qv[i]=0
set Kv[i]=0
if GetUnitTypeId(at[i])!=Rt[i]then
set gv[i]=false
call RemoveUnit(at[i])
set at[i]=CreateUnit(Player(i-1),Rt[i],GetRectMinX(Zx)+($80*(i-1)),GetRectCenterY(Zx),270)
call SetUnitBlendTime(at[i],.0)
elseif P then
call RemoveUnit(at[i])
set at[i]=CreateUnit(Player(i-1),Rt[i],GetRectMinX(Zx)+($80*(i-1)),GetRectCenterY(Zx),270)
call SetUnitBlendTime(at[i],.0)
else
call SetUnitPosition(at[i],GetRectMinX(Zx)+($80*(i-1)),GetRectCenterY(Zx))
endif
call SetUnitPosition(Et[i],$C0,py)
call SetUnitVertexColorBJ(Et[i],.0,.0,.0,'d')
if Player(i-1)==GetLocalPlayer()then
call SetUnitVertexColorBJ(Et[i],100.,100.,100.,0)
endif
set Rx[i]=false
set Ox[i]=false
set Ix[i]=0
call UnitRemoveAbility(at[i],'Aloc')
call ShowUnitShow(at[i])
call UnitAddAbility(at[i],'Aloc')
call SetTextTagVisibility(he[i],true)
call SetUnitAnimation(at[i],"Stand First")
endif
set i=i+1
endloop
set P=false
call CinematicFilterGenericBJ(5.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,'d')
call TimerStart(bw[(yx)],((5.)*1.),(false),(function B6))
elseif Bw[yx]==2 then
call b6("|cffff7f27주황버섯|r"+": 후... 이전 소개팅들은 최악이였어.")
elseif Bw[yx]==3 then
call b6("|cffff7f27주황버섯|r"+": 그래서 이번엔 상대방이나 약속 장소도 전부 다르게 했지!")
elseif Bw[yx]==4 then
call b6("|cff006bf5눈사람|r"+": 저기요?")
call TimerStart(bw[(yx)],((.5)*1.),(false),(function B6))
elseif Bw[yx]==5 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand Second")
endif
set i=i+1
endloop
call PanCameraToTimed(640,py,3)
call SetUnitBlendTime(Yx,.0)
elseif Bw[yx]==6 then
call b6("|cff006bf5눈사람|r"+": 혹시 주황버섯씨 맞으신가요?")
elseif Bw[yx]==7 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set Mv[i]=true
call F0(at[i],"Walk Second")
endif
set i=i+1
endloop
call PanCameraToTimed($C0,py,1)
call TimerStart(bw[(yx)],((1.5)*1.),(false),(function B6))
call b6("|cffff7f27주황버섯|r"+": 네! 맞아요! 그런데 오시는 길이 힘들지 않으셨어요?")
elseif Bw[yx]==8 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set Mv[i]=false
call SetUnitAnimation(at[i],"Stand Second")
endif
set i=i+1
endloop
call TimerStart(bw[(yx)],((2.5)*1.),(false),(function B6))
elseif Bw[yx]==9 then
call PanCameraToTimed(640,py,1)
call b6("|cff006bf5눈사람|r"+": 맞아요. 혼자선 도저히 도착할 수 없는 길이더군요.")
elseif Bw[yx]==$A then
call b6("|cff006bf5눈사람|r"+": 그래도 다행히 일행분들의 도움으로 도착할 수 있었답니다.")
elseif Bw[yx]==$B then
call PanCameraToTimed($C0,py,.5)
call b6("|cffff7f27주황버섯|r"+": 그런데 같이 온 일행분들은 어디계시...")
call TimerStart(bw[(yx)],((2.)*1.),(false),(function B6))
elseif Bw[yx]==$C then
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,0)
call StartSound(Us)
call StopSound(ES,false,false)
call b6("|cffff7f27주황버섯|r"+": ..?")
call TimerStart(bw[(yx)],((1.)*1.),(false),(function B6))
elseif Bw[yx]==$D then
call b6("|cffff7f27주황버섯|r"+": 잠깐만! 불이 또 꺼졌어!")
elseif Bw[yx]==$E then
call b6("|cffff7f27주황버섯|r"+": 설마 또 그런 일이...")
call TimerStart(bw[(yx)],((.8)*1.),(false),(function B6))
elseif Bw[yx]==$F then
set zx=CreateUnit(Player($B),'hgry',-512,-$7880,270)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",'d','d','d',0,0,0,0,'d')
call StartSound(Us)
call TimerStart(bw[(yx)],((1.)*1.),(false),(function B6))
elseif Bw[yx]==16 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand First")
endif
set i=i+1
endloop
call PanCameraToTimed(-512,-$7880,3)
call TimerStart(bw[(yx)],((3.)*1.),(false),(function B6))
elseif Bw[yx]==17 then
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2000.,.2)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,100.,.0,0,0,70.)
call StartSound(ws)
call b6("|cff282828블랙|r"+": Deep ♂")
call TimerStart(bw[(yx)],((.4)*1.),(false),(function B6))
elseif Bw[yx]==18 then
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1500.,.2)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,70.,.0,0,0,30.)
call b6("|cff282828블랙|r"+": Dark ♂")
call TimerStart(bw[(yx)],((.5)*1.),(false),(function B6))
elseif Bw[yx]==19 then
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1000.,.2)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,30.,.0,0,0,.0)
call b6("|cff282828블랙|r"+": ♂ FANTASY ♂")
call TimerStart(bw[(yx)],((1.5)*1.),(false),(function B6))
elseif Bw[yx]==20 then
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2500.,.5)
call CinematicFilterGenericBJ(.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,.0,.0,0,0,100.)
call StartSound(ys)
call PanCameraToTimed($C0,py,.5)
call b6("|cffff7f27주황버섯|r"+": 젠장! 저 녀석들 또 왔잖아?")
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set Mv[i]=true
call SetUnitAnimation(at[i],"Stand First")
endif
set i=i+1
endloop
call TimerStart(bw[(yx)],((.5)*1.),(false),(function B6))
elseif Bw[yx]==21 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set Mv[i]=false
call SetUnitAnimation(at[i],"Stand First")
endif
set i=i+1
endloop
elseif Bw[yx]==22 then
call b6("|cff006bf5눈사람|r"+": 주황버섯씨... 저게 도데체 뭐죠? 제 일행은 아닌데...")
elseif Bw[yx]==23 then
call b6("|cffff7f27주황버섯|r"+": 저 녀석이야! 매번 내 소개팅을 붕탁물로 바꿔버린다고!")
elseif Bw[yx]==24 then
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,0,0,100.,.0,0,0,.0)
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand First")
endif
set i=i+1
endloop
call PanCameraToTimed(-512,-$7880,1.5)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2500.,1.5)
call b6("|cff282828블랙|r"+": 매번 이렇게 될걸 알고서도 찾아오는걸 보면 너도... 즐기는거 아냐♂?")
elseif Bw[yx]==25 then
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1000.,3.)
call b6("|cff282828블랙|r"+": 아무튼 펩시처럼 달콤하고♂ 어두운♂ 소개팅을 시작해보자구.B.O.Y♂")
elseif Bw[yx]==26 then
call PanCameraToTimed(640,py,1)
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2500.,1.)
call CinematicFilterGenericBJ(.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,0,0,.0,.0,0,0,100.)
call b6("|cff006bf5눈사람|r"+": ...잠깐 주황버섯씨! 왜 저런 펩시충한테 당해주러 갈려는거에요!")
elseif Bw[yx]==27 then
call b6("|cffff7f27주황버섯|r"+": 틀렸어... 매번 저 녀석에게서 벗어날 수 없었다고!")
elseif Bw[yx]==28 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand Second")
endif
set i=i+1
endloop
call b6("|cff006bf5눈사람|r"+": 걱정마요. 제게 생각이 있으니까요!")
elseif Bw[yx]==29 then
call PanCameraToTimed(768,-$7880,1.5)
call SetUnitAnimation(Yx,"Stand Second")
call b6("|cff006bf5눈사람|r"+": 오른편에 비석 보이시죠?")
elseif Bw[yx]==30 then
call b6("|cff006bf5눈사람|r"+": 저 힘을 이용하면 이번엔 결과가 다를지도 몰라요.")
elseif Bw[yx]==31 then
call PanCameraToTimed($C0,py,1)
call SetUnitAnimation(Yx,"Stand First")
call b6("|cffff7f27주황버섯|r"+": 그러니까 저걸 이용해서 슈팅게임을 하란거지?")
elseif Bw[yx]==32 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand First")
endif
set i=i+1
endloop
call b6("|cffff7f27주황버섯|r"+": 좋아 한 번 해보자고!")
elseif Bw[yx]==33 then
call StopSound(ys,false,true)
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,'d',0,0,0,0)
elseif Bw[yx]==34 then
call ClearTextMessages()
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 블랙의 공격을 피하면서 스톤볼 빔으로 공격하세요!")
call MultiboardSetItemValueBJ(QU[kv],1,1,"보스 체력(Boss HP):")
call MultiboardSetItemValueBJ(QU[kv],2,1,I2S(R2I(GetUnitState(zx,UNIT_STATE_LIFE)))+" / "+I2S(R2I(GetUnitState(zx,UNIT_STATE_MAX_LIFE))))
call RemoveUnit(Yx)
call SetUnitUserData(zx,0)
call SetUnitPosition(zx,-768,-$7580)
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,'d')
set Gx=true
call CinematicModeBJ(false,bj_FORCE_ALL_PLAYERS)
set Re=false
call f1()
set Ee=DS
call ForForce(bj_FORCE_ALL_PLAYERS,function E0)
call i3(kv,7,9)
call V3(kv,0)
call MultiboardSetItemValueBJ(QU[kv],1,3,"당한 인원(Gays):")
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitPosition(Et[i],GetUnitX(at[i]),GetUnitY(at[i]))
endif
set i=i+1
endloop
endif
set Bw[yx]=Bw[yx]+1
endfunction
function c6 takes nothing returns nothing
if Gx==false then
set wx=true
call StopSound(Ee,false,true)
set yx=V4(0)
call d1(4)
call TimerStart(bw[(yx)],((3.)*1.),(false),(function B6))
endif
endfunction
function C6 takes nothing returns nothing
set Zx=Oq
set Wx=CreateTrigger()
call TriggerAddAction(Wx,function c6)
endfunction
function d6 takes string s returns nothing
call ClearTextMessages()
call BJDebugMsg("　　　　　　"+s)
endfunction
function D6 takes string s returns nothing
call ClearTextMessages()
call BJDebugMsg("　　　　　　※ ESC키를 누르면 화면을 가릴 수 있습니다.")
call BJDebugMsg("　　　　　　"+s)
endfunction
function f6 takes string s returns nothing
call ClearTextMessages()
call BJDebugMsg("　　　　　　　　　　　　　"+s)
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
endfunction
function F6 takes nothing returns nothing
local integer i=1
loop
exitwhen i>7
if xo[i]==false and GetLocalPlayer()==Player(i-1)then
call DisplayCineFilter(true)
endif
set i=i+1
endloop
endfunction
function g6 takes nothing returns nothing
call GroupRemoveUnit(Do,GetEnumUnit())
call RemoveUnit(GetEnumUnit())
endfunction
function G6 takes nothing returns nothing
local integer i=1
local string t4
call TimerStart(bw[(ao)],((4.)*1.),(false),(function G6))
if Bw[ao]==0 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set mv[i]=false
set Mv[i]=false
endif
set i=i+1
endloop
call CinematicModeBJ(true,bj_FORCE_ALL_PLAYERS)
call CinematicFilterGenericBJ(1.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",100.,100.,100.,100.,'d','d','d',0)
elseif Bw[ao]==1 then
call d1(5)
set vo=true
call CinematicFilterGenericBJ(1.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",100.,100.,100.,.0,0,0,0,0)
elseif Bw[ao]==2 then
call PanCameraToTimed($E80,-$71AC,0)
call StartSound(ES)
call CinematicFilterGenericBJ(2.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",.0,.0,.0,.0,0,0,0,'d')
set Vo=CreateUnit(Player($B),'ehip',$F00,-$7240,270)
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set mv[i]=false
set Mv[i]=false
set Qv[i]=0
set Kv[i]=0
if GetUnitTypeId(at[i])!=Rt[i]then
set gv[i]=false
call RemoveUnit(at[i])
set at[i]=CreateUnit(Player(i-1),Rt[i],GetRectMinX(Eo)+($80*(i-1)),GetRectCenterY(Eo),270)
call SetUnitBlendTime(at[i],.0)
elseif P then
call RemoveUnit(at[i])
set at[i]=CreateUnit(Player(i-1),Rt[i],GetRectMinX(Eo)+($80*(i-1)),GetRectCenterY(Eo),270)
call SetUnitBlendTime(at[i],.0)
else
call SetUnitPosition(at[i],GetRectMinX(Eo)+($80*(i-1)),GetRectCenterY(Eo))
endif
call SetUnitPosition(Et[i],$E80,-$7080)
call SetUnitVertexColorBJ(Et[i],.0,.0,.0,'d')
if Player(i-1)==GetLocalPlayer()then
call SetUnitVertexColorBJ(Et[i],100.,100.,100.,0)
endif
set Rx[i]=false
set Ox[i]=false
set Ix[i]=0
call UnitRemoveAbility(at[i],'Aloc')
call ShowUnitShow(at[i])
call UnitAddAbility(at[i],'Aloc')
call SetTextTagVisibility(he[i],true)
call SetUnitAnimation(at[i],"Stand Second")
if i>1 then
call CreateUnit(Player($B),'ehip',$F00+($A0*(i-1)),-$7240,270)
endif
endif
set i=i+1
endloop
call TimerStart(bw[(ao)],((5.)*1.),(false),(function G6))
elseif Bw[ao]==3 then
call d6("|cffff7f27주황버섯|r"+": 휴... 덕분에 영고라인에서 벗어났어.")
elseif Bw[ao]==4 then
call d6("|cff006bf5눈사람|r"+": 이제 정리됐으니 소개팅을 시작해볼까요?")
elseif Bw[ao]==5 then
call d6("|cffff7f27주황버섯|r"+": 좋아! 모두 이쪽으로와!")
elseif Bw[ao]>=6 and Bw[ao]<=25 then
call TimerStart(bw[(ao)],((.02)*1.),(false),(function G6))
call SetUnitX(Vo,GetUnitX(Vo)-$A)
elseif Bw[ao]==26 then
call CinematicFilterGenericBJ(.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",100.,100.,100.,.0,'d','d','d','d')
call StopSound(ES,false,false)
call SetDoodadAnimationRect(yF,'LOcb',"Death",false)
call StopSound(CS,false,false)
call StartSound(CS)
call RemoveUnit(Vo)
set Vo=CreateUnit(Player($B),'nsnp',$E40,-$7240,270)
call TimerStart(bw[(ao)],((2.)*1.),(false),(function G6))
elseif Bw[ao]==27 then
call d6("|cffff7f27주황버섯|r"+": ......어?")
elseif Bw[ao]==28 then
call d6("|cff006bf5눈사람|r"+": ......")
elseif Bw[ao]==29 then
call StartSound(hS)
call d6("|cffE45AAF눈사람|r"+": 이런♥ 들켰네요.")
elseif Bw[ao]==30 then
call d6("|cffff7f27주황버섯|r"+": 으아아아아아아아악 이런 개 X발!!!")
call TimerStart(bw[(ao)],((.6)*1.),(false),(function G6))
elseif Bw[ao]==31 then
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",.0,.0,.0,.0,0,0,0,0)
call StartSound(HS)
call TimerStart(bw[(ao)],((2.5)*1.),(false),(function G6))
elseif Bw[ao]==32 then
call ClearTextMessages()
set oo=true
call d6("※ ESC키를 누르면 화면을 가릴 수 있습니다.")
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"war3mapImported\\DL.blp",100.,100.,100.,.0,'d','d','d',0)
call TimerStart(bw[(ao)],((1.)*1.),(false),(function G6))
elseif Bw[ao]==33 then
call D6("|cffE45AAF눈사람|r"+": 자기야 속여서 미안해.")
elseif Bw[ao]==34 then
call SetCineFilterStartUV(0,0,1,1)
call SetCineFilterEndUV(.05,.05,.95,.95)
call SetCineFilterDuration(.5)
call F6()
call D6("|cffE45AAF눈사람|r"+": 그치만... 이러지 않으면 내게 관심도 없는 걸♥")
elseif Bw[ao]==35 then
call SetCineFilterStartUV(.05,.05,.95,.95)
call SetCineFilterEndUV(.1,.1,.9,.9)
call SetCineFilterDuration(.5)
call F6()
call D6("|cffE45AAF눈사람|r"+": 그래도 내 본 모습을 보기 전까진 좋았잖아?")
elseif Bw[ao]==36 then
call SetCineFilterStartUV(.1,.1,.9,.9)
call SetCineFilterEndUV(.15,.2,.85,.9)
call SetCineFilterDuration(.5)
call F6()
call D6("|cffE45AAF눈사람|r"+": 그래! 사람은 마음이 중요하다구!")
elseif Bw[ao]==37 then
call SetCineFilterStartUV(.15,.2,.85,.9)
call SetCineFilterEndUV(.2,.3,.8,.9)
call SetCineFilterDuration(.5)
call F6()
call D6("|cffE45AAF눈사람|r"+": ...주황버섯씨?")
elseif Bw[ao]==38 then
call SetCineFilterStartUV(.2,.3,.8,.9)
call SetCineFilterEndUV(.3,.5,.7,.9)
call SetCineFilterDuration(.3)
call F6()
call D6("|cffE45AAF눈사람|r"+": |cffff0000사랑해|r")
call TimerStart(bw[(ao)],((1.)*1.),(false),(function G6))
elseif Bw[ao]==39 then
set oo=false
call SetCineFilterStartColor($FF,$FF,$FF,$FF)
call SetCineFilterEndColor(0,0,0,$FF)
call SetCineFilterStartUV(.3,.5,.7,.9)
call SetCineFilterEndUV(.5,.8,.5,.8)
call SetCineFilterDuration(.3)
call F6()
call StartSound(jS)
call StartSound(HS)
elseif Bw[ao]==40 then
call f6("제작: z1z1z1")
elseif Bw[ao]==41 then
call f6("엔딩중 사용된 BGM: Kirby's Epic Yarn - Rainbow Falls")
call TimerStart(bw[(ao)],((2.)*1.),(false),(function G6))
elseif Bw[ao]==42 then
call f6("엔딩중 사용된 BGM: Electric Six - Gay Bar")
call TimerStart(bw[(ao)],((2.)*1.),(false),(function G6))
elseif Bw[ao]==43 then
call f6("엔딩중 사용된 BGM: Naruto - Sexiness")
call TimerStart(bw[(ao)],((2.)*1.),(false),(function G6))
elseif Bw[ao]==44 then
call f6("스프라이트 출처: https://www.spriters-resource.com/")
call TimerStart(bw[(ao)],((2.)*1.),(false),(function G6))
elseif Bw[ao]==45 then
call ClearTextMessages()
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set t4=StringCase(GetPlayerName(Player(i-1)),false)
if Tx then
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 특수 코드: "+Ue[i])
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"　　　　　　다음 게임부터 \"-Scode "+Ue[i]+"\"를 입력하시면 캐릭터 외형을 바꿀 수 있습니다. (F9에 사용법이 명시되어 있지 않으니 주의)")
call JNObjectCharacterSetInt(t4,"WorldChallenge",Qy[Yy[(xY[oY[(ET)]+(i-1)])]]+1)
elseif ux then
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 여섯 번째 비밀 코드: "+ue[i])
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"　　　　　　다음 게임부터 \"-code4 "+ue[i]+"\"를 입력하시면 캐릭터 외형을 바꿀 수 있습니다.")
call JNObjectCharacterSetInt(t4,"Desert",Sy[Yy[(xY[oY[(ET)]+(i-1)])]]+1)
elseif ro then
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 세번째 특수 코드: "+We[i])
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"　　　　　　다음 게임부터 \"-scode3 "+We[i]+"\"를 입력하시면 캐릭터 외형을 바꿀 수 있습니다.")
call JNObjectCharacterSetInt(t4,"Forest",ty[Yy[(xY[oY[(ET)]+(i-1)])]]+1)
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 다섯 번째 비밀 코드: "+te[i])
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"　　　　　　다음 게임부터 \"-code3 "+te[i]+"\"를 입력하시면 캐릭터 외형을 바꿀 수 있습니다.")
call JNObjectCharacterSetInt(t4,"Coke",qy[Yy[(xY[oY[(ET)]+(i-1)])]]+1)
endif
if GetLocalPlayer()==Player(i-1)then
if JNObjectCharacterServerConnectCheck()then
call JNObjectCharacterSave("OM150",t4,"3b1e2c80-db90-462a-9835-a0ddb80752b1","ClearList")
call BJDebugMsg("　　　　　　|cffFFFC00※ 서버에 코드가 저장되었습니다! ※|r")
else
call BJDebugMsg("　　　　　　|cffFF0202※ 서버에 저장하는데 실패하였습니다. ※|r")
call BJDebugMsg("　　　　　　|cffFF0202※ 현재 버전이 최신버전인지 확인해 주십시오.|r")
endif
endif
endif
set i=i+1
endloop
call TimerStart(bw[(ao)],((6.)*1.),(false),(function G6))
else
call E4(ao)
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call CustomVictoryBJ(Player(i-1),true,true)
endif
set i=i+1
endloop
set i=1
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING and GetLocalPlayer()==Player(i-1)then
if Tx then
call BJDebugMsg("　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 특수 코드: "+Ue[i])
call BJDebugMsg("　　　　　　다음 게임부터 \"-Scode "+Ue[i]+"\"를 입력하시면 캐릭터 외형을 바꿀 수 있습니다. (F9에 사용법이 명시되어 있지 않으니 주의)")
elseif ux then
call BJDebugMsg("　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 여섯 번째 비밀 코드: "+ue[i])
call BJDebugMsg("　　　　　　다음 게임부터 \"-code4 "+ue[i]+"\"를 입력하시면 캐릭터 외형을 바꿀 수 있습니다.")
elseif ro then
call BJDebugMsg("　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 세번째 특수 코드: "+We[i])
call BJDebugMsg("　　　　　　다음 게임부터 \"-scode3 "+We[i]+"\"를 입력하시면 캐릭터 외형을 바꿀 수 있습니다.")
else
call BJDebugMsg("　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 다섯 번째 비밀 코드: "+te[i])
call BJDebugMsg("　　　　　　다음 게임부터 \"-code3 "+te[i]+"\"를 입력하시면 캐릭터 외형을 바꿀 수 있습니다.")
endif
endif
set i=i+1
endloop
return
endif
set Bw[ao]=Bw[ao]+1
endfunction
function h6 takes nothing returns nothing
local integer i=1
set eo=true
call ForGroup(Do,function g6)
call KillUnit(zx)
call StartSound(GS)
call CameraSetSourceNoise(0,0)
call StopSound(Ee,false,true)
set ao=V4(0)
call TimerStart(bw[(ao)],((3.)*1.),(false),(function G6))
endfunction
function H6 takes nothing returns nothing
set Eo=Rq
set io=CreateTrigger()
call TriggerAddAction(io,function h6)
endfunction
function j6 takes string s returns nothing
call ClearTextMessages()
call BJDebugMsg("　　　　　　"+s)
endfunction
function TrueEnding4END___ViewFilter takes nothing returns nothing
local integer i=1
loop
exitwhen i>7
if xo[i]==false and GetLocalPlayer()==Player(i-1)then
call DisplayCineFilter(true)
endif
set i=i+1
endloop
endfunction
function J6 takes nothing returns nothing
call GroupRemoveUnit(Do,GetEnumUnit())
call RemoveUnit(GetEnumUnit())
endfunction
function k6 takes nothing returns nothing
local integer i=1
local string t4
call TimerStart(bw[(Oo)],((4.)*1.),(false),(function k6))
if Bw[Oo]==0 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set mv[i]=false
set Mv[i]=false
endif
set i=i+1
endloop
call CinematicModeBJ(true,bj_FORCE_ALL_PLAYERS)
call CinematicFilterGenericBJ(1.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",100.,100.,100.,100.,'d','d','d',0)
elseif Bw[Oo]==1 then
call d1(5)
set vo=true
call CinematicFilterGenericBJ(1.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",100.,100.,100.,.0,0,0,0,0)
elseif Bw[Oo]==2 then
call PanCameraToTimed($E80,-$71AC,0)
call StartSound(ES)
call CinematicFilterGenericBJ(2.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",.0,.0,.0,.0,0,0,0,'d')
set Ro=CreateUnit(Player($B),'ehip',$F00,-$7240,270)
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set mv[i]=false
set Mv[i]=false
set Qv[i]=0
set Kv[i]=0
if GetUnitTypeId(at[i])!=Rt[i]then
set gv[i]=false
call RemoveUnit(at[i])
set at[i]=CreateUnit(Player(i-1),Rt[i],GetRectMinX(Io)+($80*(i-1)),GetRectCenterY(Io),270)
call SetUnitBlendTime(at[i],.0)
elseif P then
call RemoveUnit(at[i])
set at[i]=CreateUnit(Player(i-1),Rt[i],GetRectMinX(Io)+($80*(i-1)),GetRectCenterY(Io),270)
call SetUnitBlendTime(at[i],.0)
else
call SetUnitPosition(at[i],GetRectMinX(Io)+($80*(i-1)),GetRectCenterY(Io))
endif
call SetUnitPosition(Et[i],$E80,-$7080)
call SetUnitVertexColorBJ(Et[i],.0,.0,.0,'d')
if Player(i-1)==GetLocalPlayer()then
call SetUnitVertexColorBJ(Et[i],100.,100.,100.,0)
endif
set Rx[i]=false
set Ox[i]=false
set Ix[i]=0
call UnitRemoveAbility(at[i],'Aloc')
call ShowUnitShow(at[i])
call UnitAddAbility(at[i],'Aloc')
call SetTextTagVisibility(he[i],true)
call SetUnitAnimation(at[i],"Stand Second")
if i>1 then
call CreateUnit(Player($B),'ehip',$F00+($A0*(i-1)),-$7240,270)
endif
endif
set i=i+1
endloop
call TimerStart(bw[(Oo)],((5.)*1.),(false),(function k6))
elseif Bw[Oo]==3 then
call j6("|cffff7f27주황버섯|r"+": 휴... 덕분에 영고라인에서 벗어났어.")
elseif Bw[Oo]==4 then
call j6("|cff006bf5눈사람|r"+": 이제 정리됐으니 소개팅을 시작해볼까요?")
elseif Bw[Oo]==5 then
call j6("|cffff7f27주황버섯|r"+": 좋아! 모두 이쪽으로....")
call TimerStart(bw[(Oo)],((1)*1.),(false),(function k6))
elseif Bw[Oo]==6 then
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,0)
call StartSound(Us)
call StopSound(ES,false,false)
call j6("|cffff7f27주황버섯|r"+": ..?")
elseif Bw[Oo]==7 then
call j6("|cffff7f27주황버섯|r"+": 뭐야!! 불이 또 꺼졌다고?")
call TimerStart(bw[(Oo)],((2)*1.),(false),(function k6))
elseif Bw[Oo]==8 then
call j6("|cffff7f27주황버섯|r"+": 도대체 이게 무슨..")
call TimerStart(bw[(Oo)],((1)*1.),(false),(function k6))
elseif Bw[Oo]==9 then
call StartSound(Us)
call j6("|cff00ff22???|r"+" : ..어나!!")
call TimerStart(bw[(Oo)],((1)*1.),(false),(function k6))
elseif Bw[Oo]==$A then
call j6("|cffff7f27주황버섯|r"+": ??")
elseif Bw[Oo]==$B then
call StartSound(Us)
call j6("|cff00ff22???|r"+" : 야!! 일어나!!")
call TimerStart(bw[(Oo)],((2)*1.),(false),(function k6))
elseif Bw[Oo]==$C then
call j6("|cffff7f27주황버섯|r"+" : 이게 무슨 소리야??")
call TimerStart(bw[(Oo)],((2)*1.),(false),(function k6))
elseif Bw[Oo]==$D then
call StartSound(Us)
call j6("|cff00ff22???|r"+" : 소개팅 하러 가야지!!!")
set Gx=false
call TimerStart(bw[(Oo)],((2)*1.),(false),(function k6))
elseif Bw[Oo]==$E then
call StopSound(Ee,false,true)
call TriggerExecute(No)
endif
set Bw[Oo]=Bw[Oo]+1
endfunction
function K6 takes nothing returns nothing
local integer i=1
set eo=true
call ForGroup(Do,function J6)
call KillUnit(zx)
call StartSound(GS)
call CameraSetSourceNoise(0,0)
call StopSound(Ee,false,true)
set Oo=V4(0)
call TimerStart(bw[(Oo)],((3.)*1.),(false),(function k6))
endfunction
function l6 takes nothing returns nothing
call DestroyTrigger(GetTriggeringTrigger())
call k0(1.,'d','d','d',0,'d','d','d','d')
call SetTerrainType($6B80,-$72E0,Nv,-1,1,0)
call SetTerrainType($6B80+$80,-$72E0,Nv,-1,1,0)
call SetTerrainType($6B80,-$72E0-$80,Nv,-1,1,0)
call SetTerrainType($6B80+$80,-$72E0-$80,Nv,-1,1,0)
call SetDoodadAnimation($6BC0,-$7340,128.,'D00A',false,"stand",false)
endfunction
function L6 takes nothing returns nothing
local trigger t=CreateTrigger()
set Io=Rq
set Xo=CreateTrigger()
call TriggerAddAction(Xo,function K6)
call TriggerRegisterEnterRectSimple(t,Vq)
call TriggerAddAction(t,function l6)
set t=null
endfunction
function m6 takes nothing returns string
local string s=""
local integer i=1
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING and Ox[i]==false then
set s=s+Ge[i]+GetPlayerName(Player(i-1))+"|r, "
endif
set i=i+1
endloop
if s!="" then
set s=SubString(s,0,StringLength(s)-2)
else
set s="|cffff7f27주황버섯|r"
endif
return s
endfunction
function M6 takes string s returns nothing
call ClearTextMessages()
call BJDebugMsg("　　　　　　"+s)
endfunction
function p6 takes string s returns nothing
call ClearTextMessages()
call BJDebugMsg("　　　　　　　　　　　　　"+s)
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
call BJDebugMsg("|cffffffff")
endfunction
function TrueEnding4ENDPart2___ViewFilter takes nothing returns nothing
local integer i=1
loop
exitwhen i>7
if xo[i]==false and GetLocalPlayer()==Player(i-1)then
call DisplayCineFilter(true)
endif
set i=i+1
endloop
endfunction
function TrueEnding4ENDPart2___RemoveMissile takes nothing returns nothing
call GroupRemoveUnit(Do,GetEnumUnit())
call RemoveUnit(GetEnumUnit())
endfunction
function P6 takes nothing returns nothing
local integer i=1
local string t4
call TimerStart(bw[(bo)],((4.)*1.),(false),(function P6))
if Bw[bo]==0 then
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitPosition(at[i],GetRectMinX(Iq)+($80*(i-1)),GetRectCenterY(Iq))
call SetUnitPosition(Et[i],GetRectMinX(Iq)+($80*(i-1)),GetRectCenterY(Iq))
set mv[i]=false
set Mv[i]=false
endif
set i=i+1
endloop
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitPosition(at[i],GetRectMinX(Iq)+($80*(i-1)),GetRectCenterY(Iq))
call SetUnitPosition(Et[i],GetRectMinX(Iq)+($80*(i-1)),GetRectCenterY(Iq))
endif
set i=i+1
endloop
call CinematicModeBJ(true,bj_FORCE_ALL_PLAYERS)
call CinematicFilterGenericBJ(1.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",100.,100.,100.,100.,'d','d','d',0)
elseif Bw[bo]==1 then
call d1(5)
call TimerStart(bw[(bo)],((1)*1.),(false),(function P6))
elseif Bw[bo]==2 then
call PanCameraToTimed($5DC0,-$73F0,0)
call v3('h001')
set Ee=QS
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,0)
call TimerStart(bw[(bo)],((1)*1.),(false),(function P6))
elseif Bw[bo]==3 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,1.6,"　　　　　　"+"|cffff7f27주황버섯|r"+": 여긴 1-1?? 처음이잖아??")
call CinematicFilterGenericBJ(2.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",.0,.0,.0,.0,0,0,0,'d')
elseif Bw[bo]==4 then
set i=2
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call SetUnitAnimation(at[i],"Stand First")
endif
set i=i+1
endloop
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,1.6,"　　　　　　"+"|cffff7f27다른 주황버섯|r"+": 야, 시작하자마자 자버리면 어떡해? 빠져가지고")
elseif Bw[bo]==5 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,1.6,"　　　　　　"+"|cffff7f27주황버섯|r"+": (시발 뭐지? 꿈이였나?)")
elseif Bw[bo]==6 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,1.6,"　　　　　　"+"|cffff7f27주황버섯|r"+": (좋지 않은 꿈이었어..)")
elseif Bw[bo]==7 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,1.6,"　　　　　　"+"|cffff7f27주황버섯|r"+": 미안, 지금 바로 출발하자!!")
elseif Bw[bo]==8 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,4.,"　　　　　　※ 숨겨진 열쇠를 찾아 포탈에 들어가세요!")
call TimerStart(bw[(bo)],((3)*1.),(false),(function P6))
elseif Bw[bo]==9 then
set Gx=true
set wx=false
call MultiboardSetItemValueBJ(QU[kv],1,1,"컨티뉴(Continues):")
call o3(kv,0)
call MultiboardSetItemValueBJ(QU[kv],1,3,"탈출인원(Escapers):")
call CinematicModeBJ(false,bj_FORCE_ALL_PLAYERS)
set Re=false
call f1()
call ForForce(bj_FORCE_ALL_PLAYERS,function E0)
call i3(kv,$C,9)
call o3(kv,1)
call V3(kv,0)
call k2($C,9)
call E4(bo)
return
endif
set Bw[bo]=Bw[bo]+1
endfunction
function q6 takes nothing returns nothing
local integer i=1
local real px=$6338
local real py=-$7328
local string t4
call TimerStart(bw[(bo)],((4.)*1.),(false),(function q6))
if Bw[bo]==0 then
elseif Bw[bo]==1 then
set Re=true
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set mv[i]=false
set Mv[i]=false
set Qv[i]=0
call SetUnitPosition(at[i],GetRectMinX(UR)+($80*(i-1)),GetRectCenterY(UR))
call SetUnitPosition(Et[i],GetRectMinX(UR)+($80*(i-1)),GetRectCenterY(UR))
call SetUnitVertexColorBJ(Et[i],.0,.0,.0,'d')
if Player(i-1)==GetLocalPlayer()then
call SetUnitVertexColorBJ(Et[i],100.,100.,100.,0)
endif
call SetUnitAnimation(at[i],"Stand Second")
endif
set i=i+1
endloop
call PanCameraToTimed($5840,9216,0)
elseif Bw[bo]==2 then
call CinematicFilterGenericBJ(2.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",.0,.0,.0,.0,0,0,0,'d')
call M6(m6()+": 야 이 배신자 새끼들아!!")
elseif Bw[bo]==3 then
call M6(m6()+": 나만 빼고 소개팅 가는거야?")
elseif Bw[bo]==4 then
call M6(m6()+": ...")
elseif Bw[bo]==5 then
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,0)
call StartSound(Us)
call M6(m6()+": ...")
call TimerStart(bw[(bo)],((1.)*1.),(false),(function q6))
elseif Bw[bo]==6 then
loop
exitwhen i>7
call DzSetUnitModel(at[i],"war3mapImported\\PinkMushroom.mdx")
set i=i+1
endloop
call StartSound(CS)
elseif Bw[bo]==7 then
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",'d','d','d',0,0,0,0,'d')
call StartSound(Us)
call StopSound(QS,false,false)
elseif Bw[bo]==8 then
call StartSound(ys)
call M6(m6()+": 정체를 들킨건가..")
call TimerStart(bw[(bo)],((2)*1.),(false),(function q6))
elseif Bw[bo]==9 then
call M6(m6()+": ...")
call TimerStart(bw[(bo)],((2)*1.),(false),(function q6))
call StartSound(Us)
elseif Bw[bo]==$A then
call M6(m6()+": 반드시...")
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2000.,.2)
call StartSound(Us)
call TimerStart(bw[(bo)],((2)*1.),(false),(function q6))
elseif Bw[bo]==$B then
call M6(m6()+": 반드시!!!")
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1800.,.2)
call StartSound(Us)
call TimerStart(bw[(bo)],((2)*1.),(false),(function q6))
elseif Bw[bo]==$C then
call M6(m6()+": 따먹고 말겠다!!!!!!!")
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1700.,.2)
call StartSound(Us)
call TimerStart(bw[(bo)],((2)*1.),(false),(function q6))
elseif Bw[bo]==$D then
call M6(m6()+": 주!!")
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1500.,.2)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',30.19,30.19,.0,'d',20.19,20.19,.0)
call TimerStart(bw[(bo)],((.5)*1.),(false),(function q6))
elseif Bw[bo]==$E then
call M6(m6()+": 황!!")
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1400.,.2)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',30.19,30.19,.0,'d',20.19,20.19,.0)
call TimerStart(bw[(bo)],((.5)*1.),(false),(function q6))
elseif Bw[bo]==$F then
call M6(m6()+": 버!!")
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1300.,.2)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',30.19,30.19,.0,'d',20.19,20.19,.0)
call TimerStart(bw[(bo)],((.5)*1.),(false),(function q6))
elseif Bw[bo]==16 then
call M6(m6()+": 섯!!")
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,1200.,.2)
call CinematicFilterGenericBJ(.2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",'d',30.19,30.19,.0,'d',20.19,20.19,.0)
call TimerStart(bw[(bo)],((.5)*1.),(false),(function q6))
elseif Bw[bo]==16 then
call StopSound(Ee,false,true)
call TimerStart(bw[(bo)],((.5)*1.),(false),(function q6))
elseif Bw[bo]==17 then
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,0)
call M6(m6()+": AAAAANGG♥♥♥!!")
call StartSound(GS)
call TimerStart(bw[(bo)],((4.)*1.),(false),(function q6))
elseif Bw[bo]==18 then
call StopSound(ys,false,false)
call StartSound(xS)
call p6("제작: 2p4p, JungHun 원작자: z1z1z1")
elseif Bw[bo]==19 then
call p6("엔딩중 사용된 BGM: Rainy Ellin Forest")
elseif Bw[bo]==20 then
call p6("엔딩중 사용된 BGM: Electric Six - Gay Bar")
elseif Bw[bo]==21 then
call p6("스프라이트 출처: https://www.spriters-resource.com/")
elseif Bw[bo]==22 then
call p6("PS: 이제 시작되는 주황버섯의 소개팅.. 과연 어떻게 될까요?")
elseif Bw[bo]==23 then
call p6("Thank You")
call TimerStart(bw[(bo)],((6.)*1.),(false),(function q6))
elseif Bw[bo]==24 then
call ClearTextMessages()
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set t4=StringCase(GetPlayerName(Player(i-1)),false)
if Ux then
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 네번째 특수 코드: "+Ye[i])
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"　　　　　　다음 게임부터 \"-scode4 "+Ye[i]+"\"를 입력하시면 캐릭터 외형을 바꿀 수 있습니다.")
call JNObjectCharacterSetInt(t4,"IceCave",Ty[Yy[(xY[oY[(ET)]+(i-1)])]]+1)
endif
if GetLocalPlayer()==Player(i-1)then
if JNObjectCharacterServerConnectCheck()then
call JNObjectCharacterSave("OM150",t4,"3b1e2c80-db90-462a-9835-a0ddb80752b1","ClearList")
call BJDebugMsg("　　　　　　|cffFFFC00※ 서버에 코드가 저장되었습니다! ※|r")
else
call BJDebugMsg("　　　　　　|cffFF0202※ 서버에 저장하는데 실패하였습니다. ※|r")
call BJDebugMsg("　　　　　　|cffFF0202※ 현재 버전이 최신버전인지 확인해 주십시오.|r")
endif
endif
endif
set i=i+1
endloop
call TimerStart(bw[(bo)],((6.)*1.),(false),(function q6))
else
call E4(bo)
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
call CustomVictoryBJ(Player(i-1),true,true)
endif
set i=i+1
endloop
set i=1
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING and GetLocalPlayer()==Player(i-1)then
if Ux then
call BJDebugMsg("　　　　　　"+Ge[i]+GetPlayerName(Player(i-1))+"|r 님의 네번째 특수 코드: "+Ye[i])
call BJDebugMsg("　　　　　　다음 게임부터 \"-scode4 "+Ye[i]+"\"를 입력하시면 캐릭터 외형을 바꿀 수 있습니다.")
endif
endif
set i=i+1
endloop
return
endif
set Bw[bo]=Bw[bo]+1
endfunction
function Q6 takes nothing returns nothing
if Gx==false then
call StopSound(Ee,false,true)
set bo=V4(0)
call d1(2)
call TimerStart(bw[(bo)],((3.)*1.),(false),(function P6))
else
call CinematicFilterGenericBJ(1.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",100.,100.,100.,100.,'d','d','d',0)
call CinematicModeBJ(true,bj_FORCE_ALL_PLAYERS)
set bo=V4(0)
call d1(3)
call TimerStart(bw[(bo)],((.0)*1.),(false),(function q6))
call DestroyTrigger(GetTriggeringTrigger())
endif
endfunction
function s6 takes nothing returns nothing
set Bo=Iq
set No=CreateTrigger()
call TriggerRegisterTimerExpireEvent(No,Ao)
call TriggerAddAction(No,function Q6)
endfunction
function S6 takes nothing returns nothing
local integer i=1
local real x=GetUnitX(GetEnumUnit())
local real y=GetUnitY(GetEnumUnit())
local real px
local real py
set x=(((x)*1.)+((GetUnitUserData(GetEnumUnit()))*1.)*Cos(((GetUnitFacing(GetEnumUnit()))*1.)*bj_DEGTORAD))
set y=(((y)*1.)+((GetUnitUserData(GetEnumUnit()))*1.)*Sin(((GetUnitFacing(GetEnumUnit()))*1.)*bj_DEGTORAD))
call SetUnitX(GetEnumUnit(),x)
call SetUnitY(GetEnumUnit(),y)
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING and Ox[i]==false then
set px=GetUnitX(at[i])
set py=GetUnitY(at[i])
if V0(x,y,px,py)<=80 then
call GroupRemoveUnit(Do,GetEnumUnit())
call RemoveUnit(GetEnumUnit())
call DestroyEffect(AddSpecialEffect("war3mapImported\\Purple99999.mdx",px,py+$80))
call StopSound(FS,false,false)
call StartSound(FS)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,Ge[i]+GetPlayerName(Player(i-1))+"|r 님이 쓰러졌습니다!")
call A5(i)
endif
endif
set i=i+1
endloop
endfunction
function t6 takes real x,real y,real s3,real T6 returns nothing
local unit u=CreateUnit(Player($B),'okod',x,y,s3)
call GroupAddUnit(Do,u)
call SetUnitUserData(u,R2I(T6))
set u=null
endfunction
function u6 takes nothing returns nothing
local integer i=1
local real x
local real y
local real U6
local real px
local real py
local real T6
local real w6
if Gx and zx!=null and J==false and Re==false and eo==false then
set x=GetUnitX(zx)
set y=GetUnitY(zx)
if y>-$7580 then
call SetUnitUserData(zx,0)
elseif y<-$7900 then
call SetUnitUserData(zx,1)
endif
set T6=(55-GetUnitState(zx,UNIT_STATE_LIFE))*.5
if co<600 then
if GetUnitState(zx,UNIT_STATE_LIFE)<=$A then
set T6=8
endif
if GetUnitUserData(zx)==0 then
set y=y-T6
else
set y=y+T6
endif
endif
call SetUnitY(zx,y)
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING and Ox[i]==false then
set px=GetUnitX(at[i])
set py=GetUnitY(at[i])
if V0(x,y,px,py)<=386 then
call DestroyEffect(AddSpecialEffect("war3mapImported\\Purple99999.mdx",px,py+$80))
call StopSound(FS,false,false)
call StartSound(FS)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,Ge[i]+GetPlayerName(Player(i-1))+"|r 님이 쓰러졌습니다!")
call A5(i)
endif
endif
set i=i+1
endloop
set w6=GetUnitState(zx,UNIT_STATE_LIFE)+5
if w6<=$F then
set w6=5
endif
if GetUnitState(zx,UNIT_STATE_LIFE)>40 then
if co>=50 then
call t6(x+GetRandomReal(-$AA,$AA),y+GetRandomReal(-$AA,$AA),GetRandomReal(-70,70),GetRandomInt(5,$F))
set co=0
endif
elseif GetUnitState(zx,UNIT_STATE_LIFE)>30 and co>=$A then
call t6(x,y,Co,45-GetUnitState(zx,UNIT_STATE_LIFE))
if do==false then
set Co=Co+20
else
set Co=Co-20
endif
if Co<-70 then
set do=false
elseif Co>70 then
set do=true
endif
set co=0
elseif GetUnitState(zx,UNIT_STATE_LIFE)<=30 and co<600 then
if GetUnitState(zx,UNIT_STATE_LIFE)>20 then
if ModuloInteger(co,25)==0 then
call t6(x+GetRandomReal(-$AA,$AA),y+GetRandomReal(-$AA,$AA),GetRandomReal(-70,70),GetRandomInt($A,20))
endif
elseif GetUnitState(zx,UNIT_STATE_LIFE)>$A then
if ModuloInteger(co,50)==0 then
set U6=GetRandomReal(-$80,$80)
call t6(x,y+U6,0,$F)
call t6(x,y+U6-512,0,$F)
call t6(x,y+U6+512,0,$F)
call t6(x+GetRandomReal(-$AA,$AA),y+GetRandomReal(-$AA,$AA),GetRandomReal(-70,70),GetRandomInt(5,$F))
endif
elseif GetUnitState(zx,UNIT_STATE_LIFE)<=$A then
if ModuloInteger(co,5)==0 then
call t6(x,y-386,0,$A)
call t6(x,y+386,0,$A)
endif
if ModuloInteger(co,50)==0 then
call t6(x+GetRandomReal(-$AA,$AA),y+GetRandomReal(-$AA,$AA),GetRandomReal(-70,70),GetRandomInt(5,$F))
endif
endif
endif
if co==600 then
set i=0
loop
exitwhen i>315
call CreateUnit(Player($B),'nwgs',x,y,i)
set i=i+45
endloop
call StartSound(ws)
call StartSound(gS)
call CinematicFilterGenericBJ(2.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,100.,.0,0,0,.0)
elseif co==720 then
call CreateUnit(Player($B),'nnmg',512,y,0)
elseif co>=735 and co<=800 then
call CameraSetSourceNoise($3E8,$F4240)
if ModuloInteger(co,2)==0 then
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",$A,10.,10.,.0,10.,$A,$A,.0)
else
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,.0,.0,0,0,.0)
endif
set i=1
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING and Ox[i]==false then
set py=GetUnitY(at[i])
if y-$C0<=py and y+$C0>=py then
call DestroyEffect(AddSpecialEffect("war3mapImported\\Purple99999.mdx",px,py+$80))
call StopSound(FS,false,false)
call StartSound(FS)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,Ge[i]+GetPlayerName(Player(i-1))+"|r 님이 쓰러졌습니다!")
call A5(i)
endif
endif
set i=i+1
endloop
elseif co>=800 then
call CameraSetSourceNoise(0,0)
call CinematicFilterGenericBJ(.5,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0,.0,.0,100.,.0,0,0,100.)
set co=0
endif
set co=co+1
call ForGroup(Do,function S6)
endif
endfunction
function W6 takes nothing returns nothing
if GetUnitTypeId(GetTriggerUnit())=='okod' then
call GroupRemoveUnit(Do,GetTriggerUnit())
call RemoveUnit(GetTriggerUnit())
endif
endfunction
function y6 takes nothing returns nothing
local trigger t=CreateTrigger()
call TriggerRegisterLeaveRectSimple(t,tV)
call TriggerAddAction(t,function W6)
endfunction
function s__GameUI_getInstance takes nothing returns integer
return(JNMemoryGetInteger((Vx+$D0F600)))
endfunction
function Y6 takes integer gz,integer a2 returns nothing
local integer z6=Vx+$2CB880
call SaveStr(xv,ov,0,"(II)V")
call SaveInteger(xv,ov,1,gz)
call SaveInteger(xv,ov,2,a2)
call JNProcCall(4,z6,xv)
endfunction
function TriggerSleepAction___GetGameWar3 takes nothing returns integer
return(JNMemoryGetInteger((Vx+$D305E0)))
endfunction
function Z6 takes nothing returns integer
local integer v7=(JNMemoryGetInteger((fo+16)))
local integer e7=(JNMemoryGetInteger((fo+20)))
if(v7<=0)then
return 0
endif
return(JNMemoryGetInteger((e7)+((v7-1)*4)))
endfunction
function x7 takes integer o7 returns nothing
call Y6(o7,(JNMemoryGetInteger((o7+$90))))
endfunction
function r7 takes nothing returns nothing
local timer t=GetExpiredTimer()
local integer o7=(LoadInteger(je,0,GetHandleId((t))))
call O4(t)
set t=null
call x7(o7)
endfunction
function i7 takes real a7 returns nothing
local integer o7=Z6()
local timer t
if(o7!=0)then
set t=(X4(0))
call SaveInteger(je,0,GetHandleId((t)),(o7))
call TimerStart(t,a7,false,function r7)
set t=null
endif
call TriggerSleepAction(1000000000.)
endfunction
function n7 takes nothing returns nothing
set fo=(JNMemoryGetInteger((Vx+$D305E0)))
endfunction
function V7 takes nothing returns nothing
local integer i
set i=0
loop
exitwhen not(i<go)
call ResetTrigger(Fo[i])
call DestroyTrigger(Fo[i])
set i=i+1
endloop
call DzDestroyFrame(DzFrameFindByName("QuitButton",0))
call DzDestroyFrame(DzFrameFindByName("GameResultQuitButton",0))
call DzDestroyFrame(DzFrameFindByName("UnresponsiveDisconnectButton",0))
endfunction
function E7 takes trigger t returns nothing
set Fo[go]=t
set go=go+1
endfunction
function X7 takes nothing returns nothing
call i7(.0)
call DzFrameSetScriptByCode(DzFrameFindByName("QuitButton",0),1,function V7,false)
call DzFrameSetScriptByCode(DzFrameFindByName("GameResultQuitButton",0),1,function V7,false)
call DzFrameSetScriptByCode(DzFrameFindByName("UnresponsiveDisconnectButton",0),1,function V7,false)
endfunction
function O7 takes code c returns nothing
if Go==null then
set Go=CreateTrigger()
call DzTriggerRegisterMouseEventByCode(Go,1,1,true,null)
call E7(Go)
endif
call TriggerAddAction(Go,c)
endfunction
function R7 takes integer i,real x,real y,real I7,real B3 returns boolean
local boolean b=false
if Gx then
set b=IsPointInRegion(ne,x-I7+SS[i],y)and IsPointInRegion(ne,x-I7+SS[i],y-B3)and IsPointInRegion(ne,x-I7+SS[i],y+B3)
endif
return b or(GetTerrainType(x-I7+SS[i],y)=='Xsqd' and IsPointInRegion(ie,x-I7+SS[i],y)==false and(GetTerrainType(x-I7+SS[i],y-B3)=='Xsqd' or GetTerrainType(x-I7+SS[i],y+B3)=='Xsqd'))
endfunction
function A7 takes integer i,real x,real y,real I7,real B3 returns boolean
local boolean b=false
if Gx then
set b=IsPointInRegion(ne,x+I7+SS[i],y)and IsPointInRegion(ne,x+I7+SS[i],y-B3)and IsPointInRegion(ne,x+I7+SS[i],y+B3)
endif
return b or(GetTerrainType(x+I7+SS[i],y)=='Xsqd' and IsPointInRegion(ie,x+I7+SS[i],y)==false and(GetTerrainType(x+I7+SS[i],y-B3)=='Xsqd' or GetTerrainType(x+I7+SS[i],y+B3)=='Xsqd'))
endfunction
function N7 takes integer i,real x,real y returns nothing
local real b7=Qv[i]
local integer B7
local boolean c7
local boolean C7
local boolean d7=(mv[i] and SS[i]-yS<=0)or lv[i]==-1 or SS[i]<0
local boolean D7=(Mv[i] and SS[i]+yS>=0)or lv[i]==1 or SS[i]>0
if b7<-25 then
set b7=-25
elseif b7>25 then
set b7=25
endif
if SS[i]<0 and(SS[i]+yS>0 and mv[i]==false and Mv[i])then
set c7=A7(i,x,y,48,Qv[i])
set C7=A7(i,x,y,48,Qv[i])
elseif SS[i]>0 and(SS[i]-yS<0 and mv[i])then
set c7=R7(i,x,y,48,Qv[i])
set C7=R7(i,x,y,48,Qv[i])
else
set c7=R7(i,x,y,48,Qv[i])
set C7=A7(i,x,y,48,Qv[i])
endif
if d7 and(c7 or(i>7 and GetUnitTypeId(at[i])=='orai'))then
set B7=O3(i,x-64+SS[i],y)
if GetUnitTypeId(at[i])!='orai' and GetUnitTypeId(at[B7])!='orai' then
if(lv[i]==-1 and Mv[i])or b3(i,x,y,b7,"LeftHeightOM2")==false then
set yS=0
elseif B7!=0 then
if SS[i]!=0 then
if SS[B7]>0 then
set SS[B7]=-(SS[B7]/ 2)
set SS[i]=-(SS[i]/ 2)
else
set SS[B7]=SS[i]
set SS[i]=0
endif
set xt[B7]=true
endif
set yS=yS/ 2
call N7(B7,GetUnitX(at[B7]),GetUnitY(at[B7]))
endif
endif
if mv[i]==false and Mv[i] and SS[i]!=0 then
set x=x+yS+SS[i]
else
set x=x-yS+SS[i]
endif
elseif d7 and c7==false and GetUnitTypeId(at[i])=='otau' then
set mv[i]=false
set Mv[i]=true
set qv[i]="Right"
elseif D7 and(C7 or(i>7 and GetUnitTypeId(at[i])=='orai'))then
set B7=O3(i,x+64+SS[i],y)
if GetUnitTypeId(at[i])!='orai' and GetUnitTypeId(at[B7])!='orai' then
if(lv[i]==1 and mv[i])or b3(i,x,y,b7,"RightHeightOM2")==false then
set yS=0
elseif B7!=0 then
if SS[i]!=0 then
if SS[B7]<0 then
set SS[B7]=-(SS[B7]/ 2)
set SS[i]=-(SS[i]/ 2)
else
set SS[B7]=SS[i]
set SS[i]=0
endif
set xt[B7]=true
endif
set yS=yS/ 2
call N7(B7,GetUnitX(at[B7]),GetUnitY(at[B7]))
endif
endif
if mv[i] and Mv[i]==false and SS[i]!=0 then
set x=x-yS+SS[i]
else
set x=x+yS+SS[i]
endif
elseif D7 and C7==false and GetUnitTypeId(at[i])=='otau' then
set mv[i]=true
set Mv[i]=false
set qv[i]="Left"
else
set yS=0
endif
set lv[i]=0
call SetUnitX(at[i],x)
call SetUnitY(at[i],y)
endfunction
function f7 takes nothing returns nothing
local integer i=1
loop
exitwhen i>7+Ae
if zS[i] then
set zS[i]=false
endif
set i=i+1
endloop
endfunction
function F7 takes real x,real y returns string
local real B3=40
local real g7=-40
local integer G7=0
local integer h7=0
if P then
set g7=40
endif
if GetTerrainType(x,y+g7)=='Jrtl' then
set G7=G7+1
elseif GetTerrainType(x,y+g7)=='Jblm' then
set h7=h7+1
endif
if GetTerrainType(x-B3,y+g7)=='Jrtl' then
set G7=G7+1
elseif GetTerrainType(x-B3,y+g7)=='Jblm' then
set h7=h7+1
endif
if GetTerrainType(x+B3,y+g7)=='Jrtl' then
set G7=G7+1
elseif GetTerrainType(x+B3,y+g7)=='Jblm' then
set h7=h7+1
endif
if G7>h7 then
return"Left"
elseif G7<h7 then
return"Right"
else
return"Normal"
endif
endfunction
function H7 takes integer i,integer j returns nothing
local integer k=1
loop
exitwhen k>7+Ae
if b3(k,GetUnitX(at[k]),GetUnitY(at[k]),40,"DownWidthJump") and(GetUnitTypeId(at[k])=='orai' and k>7)and Kv[k]==j and Qv[k]<0 then
set Qv[i]=0
elseif(GetPlayerSlotState(Player(k-1))==PLAYER_SLOT_STATE_PLAYING or k>7)and j!=k and Kv[k]==j and(b3(k,GetUnitX(at[k]),GetUnitY(at[k]),40,"DownWidthJump")or Qv[i]>0)then
call H7(i,k)
set ot=true
if P==false then
if ZS[k]==false and not(b3(k,GetUnitX(at[k]),GetUnitY(at[k])+Qv[k],40,"DownWidthOM")==false and GetUnitTypeId(at[j])=='orai')then
call SetUnitY(at[k],GetUnitY(at[k])+Qv[i])
set ZS[k]=true
endif
else
if ZS[k]==false and not(b3(k,GetUnitX(at[k]),GetUnitY(at[k])-Qv[k],40,"DownWidthOM")==false and GetUnitTypeId(at[j])=='orai')then
call SetUnitY(at[k],GetUnitY(at[k])-Qv[i])
set ZS[k]=true
endif
endif
set ot=false
if P==false then
if GetUnitY(at[k])-GetUnitY(at[j])<50 then
call SetUnitY(at[k],GetUnitY(at[k])+32)
set zS[k]=true
endif
else
if GetUnitY(at[j])-GetUnitY(at[k])<50 then
call SetUnitY(at[k],GetUnitY(at[k])-32)
set zS[k]=true
endif
endif
set ot=true
if vt[k]==false and GetUnitTypeId(at[i])=='orai' then
if i>7 then
if mv[i] and b3(k,GetUnitX(at[k]),GetUnitY(at[k]),Qv[k],"LeftHeight")and b3(k,GetUnitX(at[k]),GetUnitY(at[k]),Qv[k],"LeftHeightOM")then
call SetUnitX(at[k],GetUnitX(at[k])-8)
set vt[k]=true
elseif Mv[i] and b3(k,GetUnitX(at[k]),GetUnitY(at[k]),Qv[k],"RightHeight")and b3(k,GetUnitX(at[k]),GetUnitY(at[k]),Qv[k],"RightHeightOM")then
call SetUnitX(at[k],GetUnitX(at[k])+8)
set vt[k]=true
endif
else
if mv[i] and b3(i,GetUnitX(at[i]),GetUnitY(at[i]),Qv[i],"LeftHeight")and b3(k,GetUnitX(at[k]),GetUnitY(at[k]),Qv[k],"LeftHeight")and b3(k,GetUnitX(at[k]),GetUnitY(at[k]),Qv[k],"LeftHeightOM")then
call SetUnitX(at[k],GetUnitX(at[k])-8)
set vt[k]=true
elseif Mv[i] and b3(i,GetUnitX(at[i]),GetUnitY(at[i]),Qv[i],"RightHeight")and b3(k,GetUnitX(at[k]),GetUnitY(at[k]),Qv[k],"RightHeight")and b3(k,GetUnitX(at[k]),GetUnitY(at[k]),Qv[k],"RightHeightOM")then
call SetUnitX(at[k],GetUnitX(at[k])+8)
set vt[k]=true
endif
endif
elseif GetUnitTypeId(at[i])=='ocat' and Qv[k]<=0 and GetUnitTypeId(at[k])!='orai' and GetUnitTypeId(at[k])!='o001' then
if Player(k-1)==GetLocalPlayer()then
call StartSound(cS)
endif
if P==false then
call DestroyEffect(AddSpecialEffect("war3mapImported\\JumperEffect.mdl",GetUnitX(at[k]),GetUnitY(at[k])-80))
else
call DestroyEffect(AddSpecialEffect("war3mapImported\\JumperEffect.mdl",GetUnitX(at[k]),GetUnitY(at[k])+80))
endif
set Qv[k]=35.
endif
set ot=false
elseif b3(k,GetUnitX(at[k]),GetUnitY(at[k]),40,"DownWidthJump")==false and Qv[i]<0 then
set Kv[k]=0
endif
set k=k+1
endloop
if Qv[i]>0 and b3(j,GetUnitX(at[j]),GetUnitY(at[j]),40,"UpWidth")==false then
if GetUnitTypeId(at[i])!='orai' or i<=7 then
set Qv[i]=0
endif
endif
if i==j and Qv[i]>0 and zS[k]==false then
if P==false then
call SetUnitY(at[j],GetUnitY(at[j])+Qv[i])
if GetUnitY(at[i])-GetUnitY(at[j])<50 then
call SetUnitY(at[j],GetUnitY(at[j])+32)
endif
else
call SetUnitY(at[j],GetUnitY(at[j])-Qv[i])
if GetUnitY(at[j])-GetUnitY(at[i])<50 then
call SetUnitY(at[j],GetUnitY(at[j])-32)
endif
endif
endif
endfunction
function j7 takes integer i,real x,real y returns boolean
local boolean b
set TS=0
set b=b3(i,x,y,40,"DownWidth")==false
if TS==0 then
set et=false
return false
endif
loop
exitwhen Kv[TS]==0
set TS=Kv[TS]
endloop
if Qv[TS]>27. then
set et=true
else
set et=false
endif
return b and Qv[TS]>27. and Qv[i]>.0
endfunction
function J7 takes integer i,real x,real y,string s,integer mP returns boolean
local real k7
local real K7
local boolean b=(b3(i,x,y,Qv[i],s+"Height")and b3(i,x,y,Qv[i],s+"HeightOM"))
if mP!=0 then
set k7=GetUnitX(at[mP])
set K7=GetUnitY(at[mP])
endif
if s=="Left" then
if mP!=0 then
set b=b and b3(mP,k7,K7,Qv[mP],s+"Height")and b3(mP,k7,K7,Qv[mP],s+"HeightOM")
return b and uS[mP]==1 and Mv[mP]==false
else
return b and F7(x,y)==s
endif
else
if mP!=0 then
set b=b and b3(mP,k7,K7,Qv[mP],s+"Height")and b3(mP,k7,K7,Qv[mP],s+"HeightOM")
return b and uS[mP]==2 and mv[mP]==false
else
return b and F7(x,y)==s
endif
endif
endfunction
function l7 takes integer i returns nothing
if(Rt[i]=='nanw' or Rt[i]=='n007' or Rt[i]=='n008')and gv[i]==false and Qv[i]<-$F then
if P==false then
call DestroyEffect(AddSpecialEffect("war3mapImported\\MushmomEffectDown.mdl",GetUnitX(at[i]),GetUnitY(at[i])-32))
else
call DestroyEffect(AddSpecialEffect("war3mapImported\\MushmomEffectUp.mdl",GetUnitX(at[i]),GetUnitY(at[i])+32))
endif
if Player(i-1)==GetLocalPlayer()then
call StopSound(kS,false,false)
call StartSound(kS)
endif
endif
endfunction
function L7 takes nothing returns boolean
local boolean b=sU[kv]==5 or(sU[kv]==8 and SU[kv]==5)or Gx
set b=b or(sU[kv]==$A and(SU[kv]==4 or SU[kv]==6 or SU[kv]==7))
return b
endfunction
function m7 takes integer i,real x,real y returns nothing
local integer M7
local boolean b=false
if GetUnitTypeId(at[i])=='orai' or GetUnitTypeId(at[i])=='o001' then
if i>7 then
set b=true
else
set b=((Qv[i]<=0 and b3(i,x,y,40,"DownWidth"))or(Qv[i]>0 and b3(i,x,y,40,"UpWidth")))
endif
else
set b=(not(j7(i,x,y))and((Qv[i]<0 and b3(i,x,y,40,"DownWidth"))or(Qv[i]>0 and b3(i,x,y,40,"UpWidth"))))
endif
if b then
set uS[i]=0
if b3(i,x,y,40,"DownWidthOM") then
set Kv[i]=0
endif
if P==false then
if b3(i,x,y+Qv[i],40,"UpWidthOM")==false and GetUnitTypeId(at[TS])!='orai' then
set Kv[TS]=i
if GetUnitTypeId(at[TS])=='o001' and Qv[Kv[TS]]<=0 then
set Kv[TS]=0
endif
endif
else
if b3(i,x,y-Qv[i],40,"UpWidthOM")==false and GetUnitTypeId(at[TS])!='orai' then
set Kv[TS]=i
if GetUnitTypeId(at[TS])=='o001' and Qv[Kv[TS]]<=0 then
set Kv[TS]=0
endif
endif
endif
call f7()
if GetUnitTypeId(at[i])=='orai' and i<=7 then
if Pv[i] then
set Qv[i]=-8
elseif pv[i] then
set Qv[i]=8
endif
endif
call H7(i,i)
if P==false then
set y=y+Qv[i]
else
set y=y-Qv[i]
endif
set Lv[i]=true
if YS==false or GetUnitTypeId(at[i])=='ogru' or GetUnitTypeId(at[i])=='otau' or GetUnitTypeId(at[i])=='ocat' or GetUnitTypeId(at[i])=='o001' or GetUnitTypeId(at[i])=='o000' then
if GetUnitTypeId(at[i])=='o001' then
if qv[i]=="Left" then
if P==false then
call F0(at[i],"Walk First")
else
call F0(at[i],"Walk Second")
endif
elseif qv[i]=="Right" then
if P==false then
call F0(at[i],"Walk Second")
else
call F0(at[i],"Walk First")
endif
endif
else
if qv[i]=="Left" then
if P==false then
call SetUnitAnimation(at[i],"Spell First")
else
call SetUnitAnimation(at[i],"Spell Second")
endif
elseif qv[i]=="Right" then
if P==false then
call SetUnitAnimation(at[i],"Spell Second")
else
call SetUnitAnimation(at[i],"Spell First")
endif
endif
endif
call j0(i)
endif
else
if L7() then
set M7=TS
if J7(i,x,y,"Left",M7)then
set x=x-8
set uS[i]=1
elseif J7(i,x,y,"Right",M7)then
set x=x+8
set uS[i]=2
else
set uS[i]=0
endif
endif
set TS=0
if b3(i,x,y,40,"DownWidthOM")==false and b3(i,x,y,40,"UpWidth")then
set Kv[i]=TS
if P==false then
if GetUnitY(at[i])-GetUnitY(at[Kv[i]])<80 then
set y=y+(80-(GetUnitY(at[i])-GetUnitY(at[Kv[i]])))
endif
else
if GetUnitY(at[Kv[i]])-GetUnitY(at[i])<80 then
set y=y-(80-(GetUnitY(at[Kv[i]])-GetUnitY(at[i])))
endif
endif
endif
if P==false then
if b3(i,x,y+Qv[i],40,"UpWidthOM")==false and GetUnitTypeId(at[TS])!='orai' then
set Kv[TS]=i
endif
else
if b3(i,x,y-Qv[i],40,"UpWidthOM")==false and GetUnitTypeId(at[TS])!='orai' then
set Kv[TS]=i
endif
endif
if GetUnitTypeId(at[i])=='ocat' and Kv[TS]==i and Qv[TS]<=0 and GetUnitTypeId(at[TS])!='orai' and GetUnitTypeId(at[TS])!='o001' then
if Player(TS-1)==GetLocalPlayer()then
call StartSound(cS)
endif
set Qv[TS]=35.
if P==false then
call DestroyEffect(AddSpecialEffect("war3mapImported\\JumperEffect.mdl",GetUnitX(at[TS]),GetUnitY(at[TS])-80))
else
call DestroyEffect(AddSpecialEffect("war3mapImported\\JumperEffect.mdl",GetUnitX(at[TS]),GetUnitY(at[TS])+80))
endif
elseif GetUnitTypeId(at[TS])=='ocat' and Kv[i]==TS and Qv[i]<=0 and GetUnitTypeId(at[i])!='orai' and GetUnitTypeId(at[i])!='o001' then
if Player(i-1)==GetLocalPlayer()then
call StartSound(cS)
endif
set Qv[i]=35.
if P==false then
call DestroyEffect(AddSpecialEffect("war3mapImported\\JumperEffect.mdl",GetUnitX(at[i]),GetUnitY(at[i])-80))
else
call DestroyEffect(AddSpecialEffect("war3mapImported\\JumperEffect.mdl",GetUnitX(at[i]),GetUnitY(at[i])+80))
endif
set et=true
endif
if b3(i,x,y,40,"DownWidth")==false and(YS==false or GetUnitTypeId(at[i])=='ogru' or GetUnitTypeId(at[i])=='otau' or GetUnitTypeId(at[i])=='ocat' or GetUnitTypeId(at[i])=='o001' or GetUnitTypeId(at[i])=='o000')and J==false and GetUnitTypeId(at[i])!='orai' then
if mv[i] and b3(i,x,y,Qv[i],"LeftHeight")then
call l7(i)
if P==false then
call F0(at[i],"Walk First")
else
call F0(at[i],"Walk Second")
endif
elseif Mv[i] and b3(i,x,y,Qv[i],"RightHeight")then
call l7(i)
if P==false then
call F0(at[i],"Walk Second")
else
call F0(at[i],"Walk First")
endif
elseif qv[i]=="Left" and Lv[i] then
set Lv[i]=false
call l7(i)
if Pv[i]==false then
if P==false then
call SetUnitAnimation(at[i],"Stand First")
else
call SetUnitAnimation(at[i],"Stand Second")
endif
else
if P==false then
call SetUnitAnimation(at[i],"Stand ready First")
else
call SetUnitAnimation(at[i],"Stand ready Second")
endif
call H0(i)
endif
elseif qv[i]=="Right" and Lv[i] then
set Lv[i]=false
call l7(i)
if Pv[i]==false then
if P==false then
call SetUnitAnimation(at[i],"Stand Second")
else
call SetUnitAnimation(at[i],"Stand First")
endif
else
if P==false then
call SetUnitAnimation(at[i],"Stand ready Second")
else
call SetUnitAnimation(at[i],"Stand ready First")
endif
call H0(i)
endif
endif
endif
if(GetUnitTypeId(at[i])!='orai' and et==false)or(Kv[i]!=0 and Qv[i]<=0)then
set Qv[i]=0
endif
endif
loop
exitwhen(GetTerrainType(x,y)=='Xsqd' and IsPointInRegion(ie,x,y)==false)or GetUnitTypeId(at[i])=='orai' or IsPointInRegion(ne,x,y)
if P==false then
set y=y-8
else
set y=y+8
endif
endloop
call SetUnitX(at[i],x)
call SetUnitY(at[i],y)
endfunction
function p7 takes integer i returns nothing
local real P7=-30
local integer j=1
set yS=8
set tS=i
if Ox[i]==false then
call N7(i,GetUnitX(at[i]),GetUnitY(at[i]))
call m7(i,GetUnitX(at[i]),GetUnitY(at[i]))
if sU[kv]>=6 then
if IsUnitInRegion(Me,at[i]) then
set P7=-$A
endif
endif
if GetUnitTypeId(at[i])!='orai' then
if GetUnitTypeId(at[i])=='o001' then
if Qv[i]>2 then
set Qv[i]=Qv[i]-2.
elseif Qv[i]<-2 then
set Qv[i]=Qv[i]+2.
else
set Qv[i]=0
endif
else
if Le[i] and Pv[i] then
set Qv[i]=-$F
else
if Qv[i]>P7 then
set Qv[i]=Qv[i]-2.
elseif Qv[i]<P7 then
set Qv[i]=P7
endif
endif
endif
endif
if GetUnitTypeId(at[i])!='orai' then
if xt[i]==false then
if SS[i]!=0 then
if SS[i]>60 then
set SS[i]=60
elseif SS[i]>1 then
set SS[i]=SS[i]-1
elseif SS[i]<-60 then
set SS[i]=-60
elseif SS[i]<-1 then
set SS[i]=SS[i]+1
else
set SS[i]=0
endif
endif
else
set xt[i]=false
endif
endif
endif
endfunction
function q7 takes nothing returns nothing
local integer i=1
if M==false then
set YS=false
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
set wS[i]=GetUnitX(at[i])
set WS[i]=GetUnitY(at[i])
endif
set i=i+1
endloop
set i=1
loop
exitwhen i>7+Ae
if i<=7 then
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
if J==false then
if Ix[i]==0 then
if P==false then
call SetCameraTargetControllerNoZForPlayer(Player(i-1),at[i],0,$80,false)
else
call SetCameraTargetControllerNoZForPlayer(Player(i-1),at[i],0,-$80,false)
endif
else
if P==false then
call SetCameraTargetControllerNoZForPlayer(Player(i-1),at[Ix[i]],0,$80,false)
else
call SetCameraTargetControllerNoZForPlayer(Player(i-1),at[Ix[i]],0,-$80,false)
endif
endif
endif
call p7(i)
endif
else
set YS=true
call p7(i)
endif
set i=i+1
endloop
set YS=false
set i=1
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
if J==false then
call c0(i,wS[i],WS[i])
endif
set vt[i]=false
set ZS[i]=false
if he[i]!=null then
if P==false then
call SetTextTagPos(he[i],GetUnitX(at[i])-50,GetUnitY(at[i])-'x',0)
else
call SetTextTagPos(he[i],GetUnitX(at[i])+50,GetUnitY(at[i])+'x',0)
endif
endif
call t1(i)
if sU[kv]==6 and IsPointInRegion(ex,GetUnitX(at[i]),GetUnitY(at[i]))then
call l4(i)
endif
endif
if Ae!=0 and Ae>=i then
set vt[7+i]=false
set ZS[7+i]=false
call t1(7+i)
if sU[kv]==6 and IsPointInRegion(ex,GetUnitX(at[7+i]),GetUnitY(at[7+i]))then
call l4(7+i)
endif
endif
set i=i+1
endloop
endif
endfunction
function Q7 takes real x,real y returns boolean
local integer i=1
local real R3
local real I3
loop
exitwhen i>7+Ae
if(GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING or i>7)and GetUnitTypeId(at[i])!='orai' and GetUnitTypeId(at[i])!='ohun' and Ox[i]==false then
set R3=GetUnitX(at[i])
set I3=GetUnitY(at[i])
if R0(R3-64,I3-64,R3+64,I3+64,x,y) then
if ot then
if GetUnitTypeId(at[i])!='orai' then
return false
endif
else
return false
endif
endif
endif
set i=i+1
endloop
return true
endfunction
function s7 takes nothing returns nothing
local integer i=1
local real x=GetUnitX(GetEnumUnit())
local real y=GetUnitY(GetEnumUnit())
if GetUnitUserData(GetEnumUnit())==0 then
set x=x-16
elseif GetUnitUserData(GetEnumUnit())==1 then
set x=x+16
elseif GetUnitUserData(GetEnumUnit())==2 then
set y=y+16
elseif GetUnitUserData(GetEnumUnit())==3 then
set y=y-16
endif
if Q7(x,y)==false then
call KillUnit(GetEnumUnit())
call GroupRemoveUnit(sS,GetEnumUnit())
elseif(GetTerrainType(x,y)=='Xsqd' and IsPointInRegion(ie,x,y)==false)or IsPointInRegion(ae,x,y)then
call SetUnitX(GetEnumUnit(),x)
call SetUnitY(GetEnumUnit(),y)
if Gx and zx!=null then
if V0(x,y,GetUnitX(zx),GetUnitY(zx))<=386 then
call DestroyEffect(AddSpecialEffect("war3mapImported\\Orange1.mdx",GetUnitX(zx),GetUnitY(zx)+512))
call GroupRemoveUnit(sS,GetEnumUnit())
call RemoveUnit(GetEnumUnit())
call StopSound(fS,false,false)
call StartSound(fS)
if GetUnitState(zx,UNIT_STATE_LIFE)==40 then
set co=0
endif
if GetUnitState(zx,UNIT_STATE_LIFE)-1<=0 then
if Ux then
call TriggerExecute(Xo)
else
call TriggerExecute(io)
endif
else
call SetWidgetLife(zx,GetUnitState(zx,UNIT_STATE_LIFE)-1)
endif
call MultiboardSetItemValueBJ(QU[kv],2,1,I2S(R2I(GetUnitState(zx,UNIT_STATE_LIFE)))+" / "+I2S(R2I(GetUnitState(zx,UNIT_STATE_MAX_LIFE))))
endif
endif
else
call KillUnit(GetEnumUnit())
call GroupRemoveUnit(sS,GetEnumUnit())
if GetTerrainType(x,y)=='Xblm' then
call SetTerrainType(x,y,'Xsqd',-1,1,0)
endif
endif
endfunction
function S7 takes nothing returns nothing
call ForGroup(sS,function s7)
endfunction
function t7 takes nothing returns nothing
local integer i=1
local integer y=$F
if P then
set y=y*-1
endif
loop
exitwhen i>7
if nt[i]!=null then
call SetUnitX(nt[i],GetUnitX(at[i]))
call SetUnitY(nt[i],GetUnitY(at[i]))
endif
if Vt[i]!=null then
call SetUnitX(Vt[i],GetUnitX(at[i]))
call SetUnitY(Vt[i],GetUnitY(at[i])+y)
endif
set i=i+1
endloop
endfunction
function T7 takes nothing returns nothing
call q7()
call u6()
call t7()
if M==false then
if P==false then
call SetCameraField(CAMERA_FIELD_ROTATION,90.,0)
else
call SetCameraField(CAMERA_FIELD_ROTATION,270.,0)
endif
endif
call SetCameraField(CAMERA_FIELD_ANGLE_OF_ATTACK,269.9,0)
if J==false then
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,2500.,0)
endif
if M==false then
if IsUnitGroupEmptyBJ(sS)==false then
call TriggerExecute(US)
endif
endif
if SubString("|",-1,0)!="o" then
call StopMusic(false)
endif
endfunction
function u7 takes nothing returns nothing
call PauseGame(true)
call PauseGame(false)
call PauseGame(true)
call PauseGame(false)
call PauseGame(true)
call PauseGame(false)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 게임 불러오기로 플레이시 오류가 일어날 가능성이 있습니다.")
call SetSoundPitch(OS,1.2)
endfunction
function U7 takes integer i returns nothing
local unit u
local integer array R1
set R1[1]='nmyr'
set R1[2]='nnrg'
set R1[3]='nhyc'
set R1[4]='nmpe'
set R1[5]='nanm'
set R1[6]='hpea'
set R1[7]='nanb'
set u=CreateUnit(Player($B),R1[i],5888+(256*(i-1)),-$7020,270)
call SetUnitVertexColorBJ(u,100.,100.,100.,20)
set u=CreateUnit(Player($B),R1[i],GetRectCenterX(zF)+(256*(i-1)),GetRectCenterY(zF)-16.,270)
call SetUnitVertexColorBJ(u,100.,100.,100.,20)
set u=null
endfunction
function w7 takes nothing returns nothing
local integer i=1
loop
exitwhen i>7
call U7(i)
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING then
if It==0 then
set It=i
endif
set Rt[i]='hpea'
set nt[i]=CreateUnit(Player(i-1),'h00A',GetRectMinX(Ot)+($80*(i-1)),GetRectCenterY(Ot),270)
set Vt[i]=CreateUnit(Player(i-1),'h00A',GetRectMinX(Ot)+($80*(i-1)),GetRectCenterY(Ot),270)
set at[i]=CreateUnit(Player(i-1),Rt[i],GetRectMinX(Ot)+($80*(i-1)),GetRectCenterY(Ot),270)
set Et[i]=CreateUnit(Player(i-1),'hfoo',GetRectMinX(Ot)+($80*(i-1)),GetRectCenterY(Ot),270)
if SubString("|",-1,0)!="o" and GetUnitTypeId(Et[i])!='hspt' then
call SetUnitScale(Et[i],4,4,4)
endif
call SetUnitVertexColorBJ(Et[i],.0,.0,.0,'d')
if Player(i-1)==GetLocalPlayer()then
call SetUnitVertexColorBJ(Et[i],100.,100.,100.,0)
endif
call SetUnitBlendTime(at[i],.0)
call SetUnitPosition(at[i],GetRectMinX(Ot)+($80*(i-1)),GetRectCenterY(Ot))
set he[i]=CreateTextTag()
call SetTextTagText(he[i],Ge[i]+GetPlayerName(Player(i-1)),TextTagSize2Height($A))
call SetTextTagPos(he[i],-7168,-7168,0)
set Xt[i]=CreateTimer()
call SaveInteger(rt,GetHandleId(Xt[i]),0,i)
endif
set i=i+1
endloop
endfunction
function W7 takes nothing returns nothing
local string s
set s="9.8
"
set s=s+"- 깊은 산속 월드의 코스가 약간 수정되었습니다.
"
set s=s+"- 점멸 후 텔레포트 스톤이 작동하던 버그가 수정되었습니다.
"
set s=s+"- 텔레포트 스톤에서 점멸이 불가능 하던 버그가 수정되었습니다.
"
set s=s+"- 단축키 기능에 딜레이가 있던 현상이 해결되었습니다.
"
set s=s+"
"
set s=s+"9.9
"
set s=s+"- 깊은 산속 월드의 코스가 약간 수정되었습니다.
"
set s=s+"- 연습모드 상태에서 클리어가 가능하던 버그가 수정되었습니다.
"
set s=s+"- 가끔 단축키가 두번 동작하던 버그를 수정했습니다.
"
set s=s+"- 다른 유즈맵을 실행할때 페이탈이 나는 버그를 완화했습니다."
call CreateQuestBJ(2,"9.8~9.9",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomPinkIcon.blp")
set s="9.4
"
set s=s+"- 일부 맵들의 코스가 약간 변경되었습니다.
"
set s=s+"- 플레이어가 게임을 나갔을 때 스테이지가 클리어 되던 버그가 수정되었습니다.
"
set s=s+"- 열쇠 블럭이 타일에서 장식물로 변경되었습니다.
"
set s=s+"- 엔딩이 이상하게 나오던 버그가 수정되었습니다.
"
set s=s+"- 엘린숲 배경이 짤리던 버그가 수정되었습니다.
"
set s=s+"- 얼음 동굴 월드에 새로운 맵이 추가됩니다.
"
set s=s+"
"
set s=s+"9.5
"
set s=s+"- 플레이어가 게임을 나갔을 때 필드에 아무도 없다면 클리어가 되도록 변경되었습니다.
"
set s=s+"- 얼음 동굴 3-2 코스가 수정되었습니다.
"
set s=s+"- 얼음 동굴 스킨이 개선되었습니다.
"
set s=s+"- 얼음 동굴 엔딩이 추가되었습니다.
"
set s=s+"- 머쉬맘 스킨 이펙트 버그가 수정되었습니다.
"
set s=s+"- F9의 설명 일부분이 짤리던 버그가 수정되었습니다.
"
set s=s+"- 랜덤 월드 알고리즘이 변경되었습니다. 자세한건 F9의 확률표를 참고하여 주십시오.
"
set s=s+"- 랜덤 월드 에서 월드 챌린지가 나왔을 경우 컨티뉴가 두개 늘어나던 버그가 수정되었습니다.
"
set s=s+"- 컨티뉴가 25개 이상 주어지던 월드들을 스테이지 클리어시 컨티뉴 2개 증가로 변경하였습니다.
"
set s=s+"- 새로운 월드가 추가되었습니다.
"
set s=s+"
"
set s=s+"9.6
"
set s=s+"- 깊은 산속 3-2 코스가 너프되었습니다.
"
set s=s+"- 깊은 산속 플레이어 배치 버그가 수정되었습니다.
"
set s=s+"
"
set s=s+"9.7
"
set s=s+"- 깊은 산속 3-2, 3-7 코스가 수정되었습니다.
"
set s=s+"- 가끔 단축키가 작동하지 않던 버그가 수정되었습니다.
"
set s=s+"- 가끔 유닛 모션이 이상한 버그가 수정되었습니다.
"
set s=s+"- 연습모드가 추가되었습니다. 자세한건 F9를 확인해 주십시오.
"
set s=s+"- 스테이지 클리어시 컨티뉴 2개가 추가되던 월드들이 1개 추가로 변경되었습니다.
"
call CreateQuestBJ(2,"9.4~9.7",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomPinkIcon.blp")
set s="|cffFFFC00※ 9.1 버전부터 JN로더가 필요합니다. ※|r
"
set s=s+"9.1
"
set s=s+"- 이제 재선택은 2번만 사용할 수 있습니다.
"
set s=s+"- 재선택할 때 목숨을 소모하지 않습니다.
"
set s=s+"- 재선택시 가끔 게임이 멈추던 버그가 수정되었습니다.
"
set s=s+"- 얼음 동굴 스킨이 추가되었습니다.
"
set s=s+"- 얼음 동굴 코스가 약간 수정되었습니다.
"
set s=s+"- UI가 변경되었습니다.
"
set s=s+"- 단축키가 추가되었습니다. 자세한건 F9를 참고해주십시오.

"
set s=s+"9.2
"
set s=s+"- 패치노트가 반대로 정렬되었습니다.
"
set s=s+"- BGM 목록이 갱신되었습니다.
"
set s=s+"- 상단에 알 수 없는 그래픽이 보이던 버그가 수정되었습니다.
"
set s=s+"- 얼음 동굴 코스가 약간 수정되었습니다.
"
set s=s+"- 코드가 서버에 저장됩니다.
"
set s=s+"- -코드확인 명령어가 추가되었습니다.

"
set s=s+"9.3
"
set s=s+"- 트래픽이 과도하게 발생하던 버그가 수정되었습니다.
"
set s=s+"- 이제 닉네임의 대소문자 상관없이 서버에 저장됩니다."
call CreateQuestBJ(2,"9.1~9.3",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomPinkIcon.blp")
set s="8.2
"
set s=s+"- 새로운 월드가 추가되었습니다.
"
set s=s+"- 다른 분기점으로 가는 조건이 과반수가 아닌 다수로 변경되었습니다.
"
set s=s+"- 특정 코드가 사용이 안되던 버그를 수정하였습니다.
"
set s=s+"- 여러 스테이지가 약간 수정되었습니다.
"
set s=s+"- 이제 1-8 또는 2-8로 스킵을 선택할 수 있습니다.
"
set s=s+"- 카페 입구 모델이 변경되었습니다.
"
set s=s+"8.3
"
set s=s+"- 얼음 동굴의 목숨이 30개로 변경됩니다.
"
set s=s+"- 얼음 동굴 3-2 코스가 수정되었습니다.
"
set s=s+"- 이제 랜덤에 얼음 동굴 월드가 등장합니다.
"
set s=s+"8.4
"
set s=s+"- 특정 코드가 사용이 안되던 버그를 재수정 하였습니다.
"
set s=s+"- 사막 3-7 코스 시간제한이 인원수 비례로 변경되었습니다.
"
set s=s+"- 석상 오브젝트의 진동을 끌수있는 명령어가 추가되었습니다.
"
set s=s+"- 카운트다운의 최소 수치가 2로 변경되었습니다.
"
set s=s+"8.5
"
set s=s+"- 얼음 동굴 3-2 코스가 수정되었습니다.
"
set s=s+"- 스킨 버그가 수정되었습니다.
"
set s=s+"- 패턴 인식이 개선되었습니다.
"
set s=s+"8.6
"
set s=s+"- 시작하면 바로 비석이 먹어지는 버그가 수정되었습니다.
"
set s=s+"- 가끔 엔딩이 나오지 않는 버그가 수정되었습니다.
"
set s=s+"8.7
"
set s=s+"- 얼음 동굴의 스테이지 순서가 변경되었습니다.
"
set s=s+"- 얼음 동굴 3-3 코스가 수정되었습니다.
"
set s=s+"8.8
"
set s=s+"- 얼음 동굴 전체적인 코스가 수정되었습니다.
"
set s=s+"8.9
"
set s=s+"- 얼음 동굴 3-4 코스가 수정되었습니다.
"
set s=s+"9.0
"
set s=s+"- 이제 랜덤 월드에서 레벨을 재선택 할 수 있습니다.
"
set s=s+"- -재선택 명령어가 추가되었습니다."
call CreateQuestBJ(2,"8.2~9.0",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomPinkIcon.blp")
set s="- 체력바가 보이던 버그가 수정되었습니다.
"
set s=s+"- 투명스킨을 착용하면 오브젝트와 상호작용이 불가능하던 버그가 수정되었습니다.
"
set s=s+"- 이제 월드맵에 입장할 수 있습니다.
"
set s=s+"- 월드맵 3-3 물속 낙하속도가 빠른 버그가 수정되었습니다.
"
set s=s+"- 엘린숲 루트가 약간 수정되었습니다.
"
set s=s+"7.7: 게임 진행이 불가능하던 버그가 수정되었습니다.
"
set s=s+"7.7: 랜덤 스테이지에서 고 난이도의 맵이 나올 확률이 소폭 감소하였습니다.
"
set s=s+"7.8: 텔레포트 버그가 수정되었습니다.
"
set s=s+"7.8: 일부 코드가 작동하지 않던 버그를 수정하였습니다.
"
set s=s+"7.9: 사막 3-4 진행이 불가능하던 버그가 수정되었습니다.
"
set s=s+"7.9: 카페 3-7 판정이 소폭 상향되었습니다.
"
set s=s+"8.0: 변신 중 재시작 했을 때 포탈에 들어갈 수 없던 버그를 수정하였습니다.
"
set s=s+"8.1: 버그 수정.
"
call CreateQuestBJ(2,"7.6~8.1",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomPinkIcon.blp")
set s="- 랜덤 스테이지 추가
"
set s=s+"7.0: 버그 수정, 히든맵 하향
"
set s=s+"7.1: 히든맵 하향
"
set s=s+"7.2: 히든맵 3-3, 사막맵 3-6 하향
"
set s=s+"7.3: 히든맵 버그 수정, 랜덤맵 코드 스킨 추가, 스킨 버그 수정
"
set s=s+"7.4: 히든맵 코드 스킨 추가, 히든맵 하향, 랜덤맵 버그 수정, 코드가 안나오는 버그 수정
"
set s=s+"7.5: 비행기가 오브젝트에 영향을 받던 버그 수정"
call CreateQuestBJ(2,"6.9~7.5",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomPinkIcon.blp")
set s="- 월드맵 코드 스킨 추가
"
set s=s+"- 새로운 히든 스테이지 추가
"
set s=s+"6.2: 카페 스킨 추가, 히든 스테이지 난이도 수정, 사막 스테이지 버그 수정
"
set s=s+"6.3: 사막 3-6 버그 수정, 사막 스테이지 스킨 추가
"
set s=s+"6.4: 스킨 버그 수정, 히든 스테이지 완성
"
set s=s+"6.5: 지형이 안보이던 버그 수정
"
set s=s+"6.6: 전체적인 난이도 하향
"
set s=s+"6.7: 사막 코드 변경, 사막 3-4 변경, 히든 스테이지 하향
"
set s=s+"6.8: 사막 난이도 조절"
call CreateQuestBJ(2,"6.1~6.8",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomPinkIcon.blp")
set s="- 렉 최적화
"
set s=s+"- 히든 스테이지 버그 수정
"
set s=s+"- 사막 스테이지 난이도 수정
"
set s=s+"- 그외 잡다한 버그 수정
"
set s=s+"5.9: 사막 스테이지 3-6 버그 수정
"
set s=s+"6.0: 사막 스테이지 수정, 텔레포트 버그 수정"
call CreateQuestBJ(2,"5.8~6.0",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomPinkIcon.blp")
set s="-신규 오브젝트 추가
"
set s=s+"-신규 분기 월드 추가
"
set s=s+"-게임 렉 최적화
"
set s=s+"-신규 비밀 코드 추가
"
set s=s+"5.1: 사막 스테이지 3-3 7명에서 못깨던 버그수정
"
set s=s+"5.2: 사막 스테이지 3-5 최적화
"
set s=s+"5.3: 사막 스테이지 3-5 난이도 너프"
call CreateQuestBJ(2,"4.4~5.7",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomPinkIcon.blp")
set s="3.7
"
set s=s+"-강퇴 기능 3월드에서도 사용 가능하게 설정
"
set s=s+"-강퇴 기능 재사용 시간 3분 → 1분으로 변경
"
set s=s+"-게임 렉 최적화
"
set s=s+"-신규 오브젝트 추가
"
set s=s+"-신규 분기 월드 추가
"
set s=s+"-해변 3-8 난이도 너프
"
set s=s+"-관전 명령어 추가
"
set s=s+"-관전 중인 플레이어가 나가면 다른 플레이어 자동으로 관전하도록 설정
"
set s=s+"-신규 비밀 코드 추가
"
set s=s+"-신규 엔딩 추가
"
set s=s+"-분기점에서 들어간 인원수가 적은 곳으로 이동되는 버그 수정
"
set s=s+"-리포지드에서 구동시 워크 기본 배경음악 들리지 않게 설정
"
set s=s+"-스킵 명령어 추가
"
set s=s+"3.8
"
set s=s+"-신규 월드 3-4 코스 수정
"
set s=s+"-텔레포트 스톤 이펙트 변경
"
set s=s+"-해변 3-8 난이도 롤백
"
set s=s+"-오브젝트 위에서 내려갈때 간혹 기존보다 빠르게 낙하되는 버그 수정
"
set s=s+"-기타 컨텐츠 추가
"
set s=s+"3.9
"
set s=s+"-코스 오류 수정
"
set s=s+"4.0
"
set s=s+"-펩시 3-6 코스 수정
"
set s=s+"-특수 코드 초기화
"
set s=s+"-기타 수정
"
set s=s+"4.1
"
set s=s+"-몇몇 코스 수정
"
set s=s+"4.2
"
set s=s+"-코스 난이도 조정
"
set s=s+"4.3
"
set s=s+"-코스 난이도 조정 및 오류 수정, 기타
"
set s=s+"4.4
"
set s=s+"-텔레포트 스톤 탑승 시 오브젝트 겹치는 버그 수정"
call CreateQuestBJ(2,"3.7~4.4",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomPinkIcon.blp")
set s="-보너스 스테이지 버그 수정
"
set s=s+"-신규 분기 스테이지 추가
"
set s=s+"-몇 코스 약간 변경
"
set s=s+"-시간 표시 인터페이스 모양 변경
"
set s=s+"-금, 식량, 목재 란에 게임 플레이 타임 표시
"
set s=s+"-강퇴 명령어 추가(단 게임 시작 후 3분이 지나면 사용 불가)
"
set s=s+"2.5: 해변 스테이지 3-2 난이도 너프
"
set s=s+"2.6: 해변 스테이지 입장 코드 입력시 이펙트 과자성에 뜨는 버그 수정
"
set s=s+"2.7: 3-5화살표 방향 오류 수정, 강퇴 명령어 3분 제한 제거, 해변 보너스 스테이지 시간 증가
"
set s=s+"방장 외의 플레이어가 강퇴 가능한 버그 수정
"
set s=s+"2.8: 네 번째 비밀 코드 추가, 강퇴 명령어 삭제
"
set s=s+"2.9: 네 번째 코드 전용 외형 추가
"
set s=s+"3.0: 신규 외형 중력 변환 도중 이미지 짤리는 현상 제거
"
set s=s+"3.1: F9 오브젝트 설명 짤린 점 수정, 중력 변환 시 오브젝트들은 회전속도가 다른 점 수정
"
set s=s+"3.2: 슬라임 외형 버그 수정, 강퇴 명령어 다시 추가.
"
set s=s+"3.3: 강퇴 명령어 오류 수정
"
set s=s+"3.4: 좌우키 동시에 누른 상태에서 우측 가속도로 인해 벽에 충돌하면 생기는 버그 수정
"
set s=s+"3.5: 3.4 패치내역이 제대로 고쳐지지 않은 점 수정, 해변 3-2 꼼수 수정, 기타
"
set s=s+"3.6: 강퇴 명령어 재 입력시 버튼 데이터가 남아있는 버그 수정"
call CreateQuestBJ(2,"2.4~3.6",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomPinkIcon.blp")
set s="2.1
"
set s=s+"-코드 외형 추가
"
set s=s+"-보너스 스테이지 하향
"
set s=s+"-과자 스테이지 코스 약간 변경
"
set s=s+"-외형 변경시 현재 외형은 목록에 표시하지 않게 설정
"
set s=s+"2.2: 새 외형 추가, 2-6 비행기 밀림 현상 제거, 보너스 스테이지 너프
"
set s=s+"2.3: 보너스 스테이지 트랙 오류 수정, 기타 코스 수정"
call CreateQuestBJ(2,"2.1~2.3",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomPinkIcon.blp")
set s="1.5
"
set s=s+"-두 번째 분기점 월드 추가
"
set s=s+"-세 번째 엔딩 추가
"
set s=s+"-새로운 장치 추가
"
set s=s+"-2-6 코스 약간 변경
"
set s=s+"-외형 변경 코드 추가(과자성 루트 클리어시 획득)
"
set s=s+"-문어 블럭 모델 높이 위치 변경
"
set s=s+"-음악(music)명령어 추가"
set s=s+"1.6: 2-6코스 수정
"
set s=s+"1.7: 2-7이후 버그 수정
"
set s=s+"1.8: 과자 스테이지 3-6 열쇠 위치 오류 수정
"
set s=s+"1.9: 코드 타이핑 오류 수정, 배경 오류 수정
"
set s=s+"2.0: 버그 수정"
call CreateQuestBJ(2,"1.5~2.0",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomPinkIcon.blp")
set s="1.2: 벽 끼임 방지(완벽하지 않을 수 있음)
"
set s=s+"1.3
"
set s=s+"-분기점 월드 추가
"
set s=s+"-비밀 코드 추가(분기점 월드로 가는데 사용됨)
"
set s=s+"-2-8 코스 수정
"
set s=s+"-텔레포트 스톤 탑승 점프가 가능한 버그 수정
"
set s=s+"1.4
"
set s=s+"-코드 출력 잘 보이게 변경
"
set s=s+"-분기점 3-8 시간 제한 인원 별로 다르게 설정
"
set s=s+"-(1~4명: 30초, 5~6명: 60초, 7명: 180초)
"
set s=s+"-두 번째 엔딩(?) 추가
"
set s=s+"-엔딩 글자 출력 위치 약간 조절"
call CreateQuestBJ(2,"1.2~1.4",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomPinkIcon.blp")
set s="-사용된 BGM 목록 정확하게 수정
"
set s=s+"-워크 1.30 버전에서 일부 배경이 짤려 나오는 점 수정
"
set s=s+"-더미 데이터 제거
"
set s=s+"-유닛 곂칠시 게임 멈추는 오류 수정
"
set s=s+"-점프대에서 뛰는 버섯위에 탑 쌓으면 통과하는 오류 수정
"
set s=s+"-머리위에 오브젝트가 있을때 움직이면 멈칫하는 버그 수정
"
set s=s+"-위의 버그를 제거하기 위해 오브젝트 밀 때 y축 범위가 약간 감소
"
set s=s+"-카운트 다운 명령어 도중 스테이지 넘어가면 자동 종료되게 설정"
call CreateQuestBJ(2,"1.1",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomPinkIcon.blp")
set s="-이동중 아래 방향키 누르면 모션 캔슬되는 오류 수정
"
set s=s+"-텔레포트 포탈 공중에서 이용 시 도움말 문구 안 나오는 점 수정
"
set s=s+"-열쇠 판정 범위 이상한 점 수정
"
set s=s+"-관전자로 볼때 생기는 페이트 필터 오작동 수정
"
set s=s+"-카운트 다운 명령어 추가
"
set s=s+"-3-4 코스 약간 수정"
call CreateQuestBJ(2,"1.0",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomPinkIcon.blp")
set s="0.7: 워크 배경 음악 제거
"
set s=s+"0.8: 점프력 약간 증가, 방향키 아래를 누르면 모션이 나오게 설정
"
set s=s+"0.9: 0.8버전에서 발생하는 텔레포트 포탈 오작동 수정"
call CreateQuestBJ(2,"0.7~0.9",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomPinkIcon.blp")
set s="-3-4 코스 약간 수정
"
set s=s+"-F9 아이콘 변경
"
set s=s+"-플레이어 나갈 시 메뉴판 최신화 오류 수정"
call CreateQuestBJ(2,"0.6",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomPinkIcon.blp")
set s="-3-5 시간제한 90 → 120초로 변경
"
set s=s+"-빨강 나가면 재시작 권한 빨강이 받는 기능 오류 수정
"
set s=s+"-코스 재조정
"
set s=s+"-기타 잡버그 해결"
call CreateQuestBJ(2,"0.5",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomPinkIcon.blp")
set s="0.1: 최초 버전
"
set s=s+"0.2: 월드 3 난이도 대폭 하향
"
set s=s+"0.3: 코스 수정, 단체로 밀면 유닛 통과 하는 버그 수정, 월드 1 노래 길이 변경
"
set s=s+"0.4: 텍스트 출력 버그 제거"
call CreateQuestBJ(2,"0.1~0.4",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomPinkIcon.blp")
set s="소개팅 약속이 잡힌 주황버섯!
"
set s=s+"그런데 약속 장소로 가는 길의 상태가(?)
"
set s=s+"다 같이 협동하여 소개팅 장소로 데려다 주세요!

"
set s=s+"-모든 주황버섯이 포탈로 들어가면 레벨이 통과됩니다.
"
set s=s+"-방장이 'ESC'를 누르면 다시 시작하며 컨티뉴를 하나 소모합니다.
"
set s=s+"-모든 컨티뉴를 소모하면 패배합니다.
"
set s=s+"-컨티뉴는 한 월드를 클리어하면 20으로 초기화됩니다.
"
set s=s+"
"
set s=s+"제작: 2p4p, JungHun
"
set s=s+"원작자: z1z1z1"
call CreateQuestBJ(0,"게임 설명",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomIcon.blp")
set s="● 방장 명령어
"
set s=s+"-카운트 (2~10) / -count (2~10)
"
set s=s+"카운트다운을 합니다. 팀원과 호홉을 맞출때 사용하면 좋습니다.
"
set s=s+"
"
set s=s+"-강퇴 / -kick
"
set s=s+"원하는 플레이어를 투표를 통해 강제로 퇴장시킵니다.
"
set s=s+"사용하고 나면 1분의 재사용 대기시간이 존재합니다.
"
set s=s+"
"
set s=s+"-스킵 ??? / -skip ???(첫 번째 비밀 코드 기입)
"
set s=s+"1-1에서만 사용 가능하며, 2-8로 스킵할 수 있습니다.
"
set s=s+"첫번째 비밀 코드는 일반 스테이지를 클리어하면 얻을 수 있습니다.
"
set s=s+"다만 게임을 처음 해보는 유저가 있다면, 적응하기가 매우 어려울 수 있습니다.
"
set s=s+"
"
set s=s+"● 전체 명령어
"
set s=s+"-음악 / -music
"
set s=s+"배경음악을 정지 또는 재생합니다.
"
set s=s+"
"
set s=s+"-관전 / -obs / -observe
"
set s=s+"다른 플레이어를 관전할 수 있습니다.
"
set s=s+"명령어를 다시 입력하면 관전을 종료합니다.
"
set s=s+"
"
set s=s+"-진동끄기
"
set s=s+"석상 오브젝트의 진동을 끕니다.
"
set s=s+"
"
set s=s+"-진동켜기
"
set s=s+"석상 오브젝트의 진동을 켭니다.
"
set s=s+"
"
set s=s+"-재선택
"
set s=s+"현재 스테이지를 변경합니다.
"
set s=s+"총 2번 사용할 수 있으며, 랜덤 월드에서만 사용할 수 있습니다."
call CreateQuestBJ(0,"명령어1",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomIcon.blp")
set s="● 전체 명령어
"
set s=s+"-연습모드
"
set s=s+"연습모드로 변경합니다.
"
set s=s+"1-1 에서만 사용할 수 있습니다.
"
set s=s+"연습모드 상태에서는 클리어를 할 수 없습니다.
"
set s=s+"연습모드는 다시 해제할 수 없습니다.
"
set s=s+"연습모드를 사용 후 F9에 뜨는 연습모드 명령어를 참고하여 주십시오.
"
set s=s+"
"
set s=s+"-코드확인
"
set s=s+"흭득한 코드를 보여줍니다.
"
set s=s+"
"
set s=s+"-code ???(세 번째 비밀 코드 기입)
"
set s=s+"세 번째 비밀 코드는 과자성 루트를 클리어하면 얻을 수 있습니다.
"
set s=s+"플레이어의 외형을 변경합니다.
"
set s=s+"
"
set s=s+"-code2 ???(네 번째 비밀 코드 기입)
"
set s=s+"네 번째 비밀 코드는 소라껍질 루트를 클리어하면 얻을 수 있습니다.
"
set s=s+"플레이어의 외형을 변경합니다. 다만 위의 코드와 다른 외형이 나옵니다.
"
set s=s+"
"
set s=s+"-code3 ???(다섯 번째 비밀 코드 기입)
"
set s=s+"다섯 번째 비밀 코드는 코-크 플레이 루트를 클리어하면 얻을 수 있습니다.
"
set s=s+"플레이어의 외형을 변경합니다. 다만 위의 코드와 다른 외형이 나옵니다.
"
set s=s+"
"
set s=s+"-code4 ???(여섯 번째 비밀 코드 기입)
"
set s=s+"여섯 번째 비밀 코드는 사막 루트를 클리어하면 얻을 수 있습니다.
"
set s=s+"플레이어의 외형을 변경합니다. 다만 위의 코드와 다른 외형이 나옵니다.
"
set s=s+"
"
set s=s+"-code5 ???(일곱 번째 비밀 코드 기입)
"
set s=s+"일곱 번째 비밀 코드는 랜덤 루트를 클리어하면 얻을 수 있습니다.
"
set s=s+"플레이어의 외형을 변경합니다. 다만 위의 코드와 다른 외형이 나옵니다."
call CreateQuestBJ(0,"명령어2",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomIcon.blp")
set s="● C
"
set s=s+"- 카운트 3 을 실행합니다.
"
set s=s+"- 방장만 사용할 수 있습니다.

"
set s=s+"● V
"
set s=s+"- 다른사람을 관전합니다.
"
set s=s+"- 다시 입력하면 관전이 해제됩니다.

"
call CreateQuestBJ(0,"단축키",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomIcon.blp")
set s="● 상자
"
set s=s+"-밟고 올라가거나 밀어서 옮길 수 있습니다.
"
set s=s+"
"
set s=s+"● 열쇠
"
set s=s+"-열쇠 색깔과 같은 블럭을 모두 제거합니다.
"
set s=s+"-가끔 열쇠 색깔과 같은 블럭을 생성합니다.
"
set s=s+"-다른 오브젝트로도 작동시킬 수 있습니다.(상자, 문어 블럭)
"
set s=s+"
"
set s=s+"● 문어 블럭
"
set s=s+"-상자와 비슷하지만 정해진 방향으로 고정 이동합니다.
"
set s=s+"
"
set s=s+"● 비행기
"
set s=s+"-공중 발판입니다.
"
set s=s+"-위에 오브젝트(상자, 문어블럭)를 올릴 수도 있습니다.
"
set s=s+"
"
set s=s+"● 슬라임
"
set s=s+"-밟으면 6칸 점프합니다.
"
set s=s+"-오브젝트(상자, 문어블럭)도 밟으면 점프합니다.
"
set s=s+"
"
set s=s+"● 텔레포트 스톤
"
set s=s+"-아래 방향키를 누르면 같은 색의 스톤으로 이동합니다.
"
set s=s+"-자신이 무엇을 밟고 있을때만 작동합니다.
"
set s=s+"-즉 공중에서 탈려면 오브젝트(버섯, 상자, 문어 블럭)를 타고 있어야 합니다.
"
set s=s+"-상자, 문어 블럭을 밟은 상태에서 이동할 시 같이 이동합니다."
call CreateQuestBJ(0,"오브젝트 설명",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomIcon.blp")
set s="● 분홍 문어 블럭
"
set s=s+"-문어 블럭과 동일하나 벽에 부딪치면 방향을 바꿉니다.
"
set s=s+"
"
set s=s+"● 스톤볼
"
set s=s+"-파란 벽돌이 맞으면 부숴지는 빔을 발사합니다.
"
set s=s+"
"
set s=s+"● 트랙
"
set s=s+"-밟고 있으면 화살표 방향으로 움직입니다.
"
set s=s+"
"
set s=s+"● 중력 변환기
"
set s=s+"-맵을 180도 회전시킵니다.
"
set s=s+"-다른 오브젝트로도 작동시킬 수 있습니다.(상자, 문어 블럭)
"
set s=s+"
"
set s=s+"● 물
"
set s=s+"-물 속에서 방향키(↑)를 누르면 수영할 수 있습니다.
"
set s=s+"-또한 방향키(↓)를 누르고 있으면 빠르게 하강합니다.
"
set s=s+"
"
set s=s+"● 마법 활
"
set s=s+"-충돌하면 활이 보는 방향으로 발사합니다.
"
set s=s+"-가속도가 붙은 상태에서 오브젝트와 충돌하면 밀쳐집니다.
"
set s=s+"
"
set s=s+"● 코-크 버섯
"
set s=s+"-문어 블럭과 동일하나 밟으면 3칸 점프합니다.
"
set s=s+"-오브젝트(상자, 문어블럭)도 밟으면 점프합니다.
"
call CreateQuestBJ(0,"오브젝트 설명2",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomIcon.blp")
set s="● 푸른 비석
"
set s=s+"-비석에 표시된 오브젝트로 변신합니다.
"
set s=s+"-변신을 풀지 않으면 출구 포탈을 이용할 수 없습니다.
"
set s=s+"-비행기로 변신하면 특정 오브젝트를 건들 수 없습니다(예: 열쇠, 슬라임, 마법 활)
"
set s=s+"
"
set s=s+"● 초록 비석
"
set s=s+"-변신을 해제하여 원래 모습으로 돌아옵니다.
"
set s=s+"
"
set s=s+"● 블랙홀
"
set s=s+"-같은 색의 블랙홀로 이동합니다.
"
set s=s+"
"
set s=s+"● 석상
"
set s=s+"-석상에 접촉시 특정 블럭이 사라지며, 특정 블럭이 생성됩니다.
"
set s=s+"-석상에서 떨어지면 다시 원래 상태로 돌아갑니다.
"
set s=s+"
"
set s=s+"● 보름달
"
set s=s+"-아래 방향키를 누르면 같은 색의 보름달에 있는 오브젝트와 바꿔치기 합니다.
"
set s=s+"-텔레포트 스톤과 다르게 공중에서도 작동됩니다.
"
set s=s+"-반드시 반대쪽에도 오브젝트가 있어야 작동합니다.
"
set s=s+"-반대쪽 보름달에 여러 오브젝트가 같이 있다면 반드시 최상단에 있는 오브젝트와 바꿔치기 합니다.
"
set s=s+"
"
set s=s+"● 깨비 블럭
"
set s=s+"-문어 블럭과 동일하나, 깨비 블럭 위에서 방향키(↓)를 누르면 영혼 상태로 변신합니다.
"
set s=s+"
"
set s=s+"● 깨비(영혼)
"
set s=s+"-문어 블럭과 동일하나, 공중에 떠있습니다. 깨비(영혼) 위에서 방향키(↓)를 누르면 다시 블럭 상태로 돌아옵니다."
call CreateQuestBJ(0,"오브젝트 설명3",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomIcon.blp")
set s="2-8에 분기점 입구가 있습니다.
"
set s=s+"이 곳에 입장하기 위해선 호스트가 비밀 코드를 입력하셔야 합니다.
"
set s=s+"첫 번째 비밀 코드는 기존 스테이지를 전부 클리어해서 얻으며,
"
set s=s+"두 번째 비밀 코드는 지하철 루트 스테이지를 전부 클리어하면 얻습니다.
"
set s=s+"참고로 비밀 암호는 RPG 세이브 코드처럼 닉네임마다 다르니 주의하세요!"
call CreateQuestBJ(0,"분기점?",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomIcon.blp")
set s=Ge[7]+"쉬움|r : 1.64%, "+Ge[5]+"보통|r : 1.23%, "+Ge[6]+"어려움|r : 0.82%,"+Ge[1]+" 매우어려움|r : 0.41%

"
set s=s+"--- 핑크핑크 ---:
"
set s=s+"  3-1 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-2 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-3 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-4 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-5 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-6 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-7 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-8 : "+Ge[7]+"쉬움|r( 1.64% )

"
set s=s+"--- 도시 ---:
"
set s=s+"  3-1 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-2 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-3 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-4 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-5 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-6 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-7 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-8 : "+Ge[7]+"쉬움|r( 1.64% )

"
set s=s+"--- 발렌타인 ---:
"
set s=s+"  3-1 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-2 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-3 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-4 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-5 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-6 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-7 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-8 : "+Ge[7]+"쉬움|r( 1.64% )

"
call CreateQuestBJ(0,"랜덤 월드 확률표1",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomIcon.blp")
set s=Ge[7]+"쉬움|r : 1.64%, "+Ge[5]+"보통|r : 1.23%, "+Ge[6]+"어려움|r : 0.82%,"+Ge[1]+" 매우어려움|r : 0.41%

"
set s=s+"--- 해변 ---:
"
set s=s+"  3-1 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-2 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-3 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-4 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-5 : "+Ge[5]+"보통|r( 1.23% )
"
set s=s+"  3-6 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-7 : "+Ge[5]+"보통|r( 1.23% )
"
set s=s+"  3-8 : "+Ge[7]+"쉬움|r( 1.64% )

"
set s=s+"--- 코크타운 ---:
"
set s=s+"  3-1 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-2 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-3 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-4 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-5 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-6 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-7 : "+Ge[7]+"쉬움|r( 1.64% )
"
set s=s+"  3-8 : "+Ge[7]+"쉬움|r( 1.64% )

"
set s=s+"--- 월드 챌린지 ---:
"
set s=s+"  3-1 : "+Ge[1]+"매우 어려움|r( 0.41% )
"
set s=s+"  3-2 : "+Ge[5]+"보통|r( 1.23% )
"
set s=s+"  3-3 : "+Ge[5]+"보통|r( 1.23% )
"
set s=s+"  3-4 : "+Ge[6]+"어려움|r( 0.82% )
"
set s=s+"  3-5 : "+Ge[6]+"어려움|r( 0.82% )
"
set s=s+"  3-6 : "+Ge[6]+"어려움|r( 0.82% )
"
set s=s+"  3-7 : "+Ge[1]+"매우 어려움|r( 0.41% )

"
call CreateQuestBJ(0,"랜덤 월드 확률표2",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomIcon.blp")
set s=Ge[7]+"쉬움|r : 1.64%, "+Ge[5]+"보통|r : 1.23%, "+Ge[6]+"어려움|r : 0.82%,"+Ge[1]+" 매우어려움|r : 0.41%

"
set s=s+"--- 카페 ---:
"
set s=s+"  3-1 : "+Ge[5]+"보통|r( 1.23% )
"
set s=s+"  3-2 : "+Ge[5]+"보통|r( 1.23% )
"
set s=s+"  3-3 : "+Ge[5]+"보통|r( 1.23% )
"
set s=s+"  3-4 : "+Ge[5]+"보통|r( 1.23% )
"
set s=s+"  3-5 : "+Ge[6]+"어려움|r( 0.82% )
"
set s=s+"  3-6 : "+Ge[1]+"매우 어려움|r( 0.41% )
"
set s=s+"  3-7 : "+Ge[1]+"매우 어려움|r( 0.41% )
"
set s=s+"  3-8 : "+Ge[6]+"어려움|r( 0.82% )

"
set s=s+"--- 사막 ---:
"
set s=s+"  3-1 : "+Ge[6]+"어려움|r( 0.82% )
"
set s=s+"  3-2 : "+Ge[5]+"보통|r( 1.23% )
"
set s=s+"  3-3 : "+Ge[5]+"보통|r( 1.23% )
"
set s=s+"  3-4 : "+Ge[5]+"보통|r( 1.23% )
"
set s=s+"  3-5 : "+Ge[6]+"어려움|r( 0.82% )
"
set s=s+"  3-6 : "+Ge[1]+"매우 어려움|r( 0.41% )
"
set s=s+"  3-7 : "+Ge[1]+"매우 어려움|r( 0.41% )
"
set s=s+"  3-8 : "+Ge[1]+"매우 어려움|r( 0.41% )

"
set s=s+"--- 엘린 숲 ---:
"
set s=s+"  3-1 : "+Ge[5]+"보통|r( 1.23% )
"
set s=s+"  3-2 : "+Ge[6]+"어려움|r( 0.82% )
"
set s=s+"  3-3 : "+Ge[6]+"어려움|r( 0.82% )
"
set s=s+"  3-4 : "+Ge[1]+"매우 어려움|r( 0.41% )
"
set s=s+"  3-5 : "+Ge[1]+"매우 어려움|r( 0.41% )

"
call CreateQuestBJ(0,"랜덤 월드 확률표3",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomIcon.blp")
set s=Ge[7]+"쉬움|r : 1.64%, "+Ge[5]+"보통|r : 1.23%, "+Ge[6]+"어려움|r : 0.82%,"+Ge[1]+" 매우어려움|r : 0.41%

"
set s=s+"--- 얼음 동굴 ---:
"
set s=s+"  3-1 : "+Ge[5]+"보통|r( 1.23% )
"
set s=s+"  3-2 : "+Ge[6]+"어려움|r( 0.82% )
"
set s=s+"  3-3 : "+Ge[6]+"어려움|r( 0.82% )
"
set s=s+"  3-4 : "+Ge[1]+"매우 어려움|r( 0.41% )
"
set s=s+"  3-5 : "+Ge[1]+"매우 어려움|r( 0.41% )
"
set s=s+"  3-6 : "+Ge[1]+"매우 어려움|r( 0.41% )
"
set s=s+"  3-7 : "+Ge[1]+"매우 어려움|r( 0.41% )
"
set s=s+"  3-8 : "+Ge[1]+"매우 어려움|r( 0.41% )

"
set s=s+"--- 깊은 산속 ---:
"
set s=s+"  3-1 : "+Ge[5]+"보통|r( 1.23% )
"
set s=s+"  3-2 : "+Ge[5]+"보통|r( 1.23% )
"
set s=s+"  3-3 : "+Ge[5]+"보통|r( 1.23% )
"
set s=s+"  3-4 : "+Ge[6]+"어려움|r( 0.82% )
"
set s=s+"  3-5 : "+Ge[6]+"어려움|r( 0.82% )
"
set s=s+"  3-6 : "+Ge[1]+"매우 어려움|r( 0.41% )
"
set s=s+"  3-7 : "+Ge[1]+"매우 어려움|r( 0.41% )
"
set s=s+"  3-8 : "+Ge[1]+"매우 어려움|r( 0.41% )

"
call CreateQuestBJ(0,"랜덤 월드 확률표4",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomIcon.blp")
set s="● Kirby Super Star Ultra - Green Greens
"
set s=s+"● Sword Lord - William tell Overture Remix
"
set s=s+"● Captain Jack - Captain Jack
"
set s=s+"● Virtual Riot - Energy Drink
"
set s=s+"● OMFG - Hello
"
set s=s+"● Waterflame - Swirl!
"
set s=s+"● Maple Story - Coke Town
"
set s=s+"● EverPlanet - Skylight Harbor
"
set s=s+"● Maple Story - Ariant Remix
"
set s=s+"● Maple Story - The Tune of the Azure Light
"
set s=s+"● Waterflame - Red - Layerz OST
"
set s=s+"● Waterflame - Everybody Bounce"
call CreateQuestBJ(0,"사용된 BGM",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomIcon.blp")
endfunction
function y7 takes nothing returns nothing
call DzFrameSetAbsolutePoint(DzFrameFindByName("QuestDisplay",0),0,.2,.36)
call DzFrameSetAbsolutePoint(DzFrameFindByName("QuestDisplay",0),8,.6,.22)
endfunction
function Y7 takes nothing returns nothing
call DzFrameSetEnable(DzFrameFindByName("PauseButton",0),false)
call DzFrameShow(DzFrameFindByName("PauseButton",0),false)
call DzFrameSetEnable(DzFrameFindByName("SaveGameButton",0),false)
call DzFrameSetEnable(DzFrameFindByName("SaveGameSaveButton",0),false)
call DzFrameShow(DzFrameFindByName("SaveGameSaveButton",0),false)
call DzFrameSetEnable(DzFrameFindByName("OverwriteOverwriteButton",0),false)
call DzFrameSetEnable(DzFrameFindByName("SaveGameFileEditBox",0),false)
call DzFrameShow(DzFrameFindByName("SaveGameFileEditBox",0),false)
endfunction
function z7 takes nothing returns nothing
call SetDoodadAnimation(6144,-448,128.,'YOf3',false,"death",false)
call SetDoodadAnimation($577C,-$7A3D,128.,'D00A',false,"Death",false)
call SetDoodadAnimation($577C,-$7B3C,128.,'YOf3',false,"Death",false)
call SetDoodadAnimation($3F80+($80*23),-$6C00-($80*$F),128.,'VOfl',false,"Death",false)
call SetDoodadAnimation($413D,-$6B80,128.,'VOfl',false,"Death",false)
call SetDoodadAnimation($3FFF,-$6B00,128.,'DObw',false,"Death",false)
call SetDoodadAnimation($3FFF+$80,-$6B00,128.,'YObb',false,"Death",false)
call SetDoodadAnimation($3FFF+256,-$6B00,128.,'YOwb',false,"Death",false)
call SetDoodadAnimation($3FFF+384,-$6B00,128.,'LOic',false,"Death",false)
call SetDoodadAnimation($3FFF+512,-$6B00,128.,'YObw',false,"Death",false)
call SetDoodadAnimation($3FFF+640,-$6B00,128.,'IOsm',false,"Death",false)
call SetDoodadAnimation($6BC0,-$7340,128.,'D00A',false,"Death",false)
endfunction
function Z7 takes nothing returns nothing
call PauseGame(true)
call PauseGame(false)
call PauseGame(true)
call PauseGame(false)
call PauseGame(true)
call PauseGame(false)
call DzFrameHideInterface()
call DzFrameEditBlackBorders(0,0)
call DzFrameSetAbsolutePoint(DzFrameGetChatMessage(),3,.02,.4)
call DzFrameSetAbsolutePoint(DzFrameGetUnitMessage(),4,.3,.4)
call DzFrameShow(DzFrameGetMinimap(),false)
call DestroyTrigger(GetTriggeringTrigger())
call EnableDragSelect(false,false)
call FogEnable(false)
call FogMaskEnable(false)
call SetFloatGameState(GAME_STATE_TIME_OF_DAY,$C)
call SetTimeOfDayScale(0)
call StopMusic(false)
call PlayMusic(".mp3")
call SetMusicVolume($7F)
call az(Player($B),ConvertPlayerColor($C),true)
call z7()
call w7()
call W7()
call Y7()
call JNSetSyncDelay($F)
call X3()
call e4(1)
endfunction
function v8 takes integer i returns nothing
local integer j=1
set Kv[i]=0
call RemoveUnit(at[i])
call RemoveUnit(Et[i])
call DestroyTextTag(he[i])
set uU[kv]=true
if Ox[i] then
set TU[kv]=TU[kv]-1
endif
call V3(kv,TU[kv])
if Gx then
if TU[kv]>=B0()-2 then
if sU[kv]==6 then
call TriggerExecute(gx)
elseif sU[kv]==7 then
call TriggerExecute(mx)
elseif Ux then
call TriggerExecute(No)
endif
endif
else
if TU[kv]>=B0()-1 then
if it then
call BJDebugMsg("|cffFFFC00※ 연습모드는 클리어를 할 수 없습니다!|r")
else
call e4(1)
endif
endif
endif
set at[i]=null
set Et[i]=null
set he[i]=null
loop
exitwhen j>7
if GetPlayerSlotState(Player(j-1))==PLAYER_SLOT_STATE_PLAYING and Ix[j]==i and TU[kv]<B0()-1 then
call DisplayTimedTextToPlayer(Player(j-1),0,0,5,"※ 관전 중인 플레이어가 나갔으므로 다른 플레이어를 관전합니다.")
call R5(j,false)
endif
set j=j+1
endloop
if It==i then
set j=1
loop
exitwhen j>7
if GetPlayerSlotState(Player(j-1))==PLAYER_SLOT_STATE_PLAYING and It!=j then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 재시작 권한을 가진 플레이어가 나가서 "+Ge[j]+GetPlayerName(Player(j-1))+"|r 님이 재시작 권한을 가지게 됩니다. (ESC로 사용)")
set It=j
return
endif
set j=j+1
endloop
endif
endfunction
function e8 takes nothing returns nothing
local integer i=GetPlayerId(GetTriggerPlayer())+1
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,Ge[i]+GetPlayerName(Player(i-1))+"|r님이 게임을 떠났습니다.")
call v8(i)
endfunction
function x8 takes nothing returns nothing
local integer i=GetPlayerId(GetTriggerPlayer())+1
if hx then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,Ge[i]+GetPlayerName(Player(i-1))+": |r"+GetEventPlayerChatString())
endif
endfunction
function InitTrig_FinalMsg takes nothing returns nothing
local trigger t=CreateTrigger()
local integer i=1
loop
exitwhen i>7
call TriggerRegisterPlayerChatEvent(t,Player(i-1),"",false)
set i=i+1
endloop
call TriggerAddAction(t,function x8)
set t=null
endfunction
function o8 takes nothing returns nothing
call ClearTextMessages()
if Re or Bw[At]==-1 then
set bt=false
if M==false then
call SetSoundVolume(Ee,$7F)
endif
call E4(At)
return
elseif Bw[At]>0 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"　　　　------------ 카운트다운: ("+I2S(Bw[At])+") ------------")
elseif Bw[At]==0 then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"　　　　------------ END ------------")
endif
call StartSound(rS)
set Bw[At]=Bw[At]-1
endfunction
function r8 takes integer i,string s,boolean i8 returns nothing
local integer K0
if i==It then
if i8==false then
set K0=S2I(SubString(s,$B,$D))
else
set K0=S2I(SubString(s,7,9))
endif
if K0>=2 and K0<=$A then
if bt==false then
set bt=true
call SetSoundVolume(Ee,80)
set At=V4(K0)
call TimerStart(bw[(At)],((1.)*1.),(true),(function o8))
endif
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 시간은 2~10 사이의 수치만 가능합니다.")
endif
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 재시작 권한을 가진 플레이어만 사용 가능한 명령어 입니다.")
endif
endfunction
function a8 takes nothing returns nothing
local integer i=GetPlayerId(GetTriggerPlayer())+1
if RectContainsUnit(SR,at[i]) and yt[7]==false and i==It then
set yt[7]=true
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Items\\StaffOfPurification\\PurificationCaster.mdl",GetRectCenterX(SR),GetRectCenterY(SR)))
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 엘린 숲 입구가 열렸습니다!|r")
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 단 엘린 숲 입구로 들어간 인원이 다른 포탈에 들어간 인원보다 적으면 기존 스테이지로 이동합니다.|r")
endif
endfunction
function n8 takes nothing returns nothing
local integer i=GetPlayerId(GetTriggerPlayer())+1
if RectContainsUnit(Vl,at[i]) and yt[0]==false then
if i==It then
set yt[0]=true
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Items\\StaffOfPurification\\PurificationCaster.mdl",GetRectCenterX(Vl),GetRectCenterY(Vl)))
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 지하철 입구가 열렸습니다!|r")
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 단 지하철 입구로 들어간 인원이 다른 포탈에 들어간 인원보다 적으면 기존 스테이지로 이동합니다.|r")
if Yt==1 then
set Yt=Yt+1
endif
if zt==3 then
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",100.,100.,100.,.0,'d','d','d','d')
set yt[9]=true
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,Ge[7]+"※ 비밀 신호를 주자 동화책이 나타났습니다.|r")
call CreateUnit(Player($B),'n006',6144,-$80-32,270)
call SetDoodadAnimation(6144,-448,128.,'YOf3',false,"stand",false)
endif
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 방장(재시작 권한을 가진 사람)만 코드를 입력할 수 있습니다.")
endif
endif
endfunction
function V8 takes nothing returns nothing
local integer i=GetPlayerId(GetTriggerPlayer())+1
if RectContainsUnit(bQ,at[i]) and yt[1]==false then
if i==It then
set yt[1]=true
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Items\\StaffOfPurification\\PurificationCaster.mdl",GetRectCenterX(bQ),GetRectCenterY(bQ)))
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 쿠키 포탈이 열렸습니다!|r")
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 단 과자성 입구로 들어간 인원이 다른 포탈에 들어간 인원보다 적으면 기존 스테이지로 이동합니다.|r")
if Yt==0 then
set Yt=Yt+1
endif
if zt==2 then
set zt=zt+1
endif
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 방장(재시작 권한을 가진 사람)만 코드를 입력할 수 있습니다.")
endif
elseif RectContainsUnit(ln,at[i]) and yt[2]==false then
if i==It then
set yt[2]=true
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Items\\StaffOfPurification\\PurificationCaster.mdl",GetRectCenterX(ln),GetRectCenterY(ln)))
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 소라껍질 입구가 열렸습니다!|r")
if zt==0 then
set zt=zt+1
endif
if Yt==3 then
call CinematicFilterGenericBJ(1.,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",100.,100.,100.,.0,'d','d','d','d')
set yt[4]=true
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,Ge[1]+"※ 비밀 신호를 주자 빨간 풍선이 나타났습니다.|r")
call CreateUnit(Player($B),'nane',6144,-$80,270)
call PingMinimapEx(6144,-$80,5,$FF,$FF,$FF,false)
call SetDoodadAnimation(6144,-448,128.,'YOf3',false,"stand",false)
else
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 단 소라껍질 입구로 들어간 인원이 다른 포탈에 들어간 인원보다 적으면 기존 스테이지로 이동합니다.|r")
endif
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 방장(재시작 권한을 가진 사람)만 코드를 입력할 수 있습니다.")
endif
elseif RectContainsUnit(VR,at[i]) and yt[3]==false then
if i==It then
set yt[3]=true
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Items\\StaffOfPurification\\PurificationCaster.mdl",GetRectCenterX(VR),GetRectCenterY(VR)))
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 코-크 플레이 입구가 열렸습니다!|r")
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 단 코-크 플레이 입구로 들어간 인원이 다른 포탈에 들어간 인원보다 적으면 기존 스테이지로 이동합니다.|r")
if Yt==2 then
set Yt=Yt+1
endif
if zt==1 then
set zt=zt+1
endif
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 방장(재시작 권한을 가진 사람)만 코드를 입력할 수 있습니다.")
endif
elseif RectContainsUnit(qX,at[i]) and yt[5]==false then
if i==It then
set yt[5]=true
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Items\\StaffOfPurification\\PurificationCaster.mdl",GetRectCenterX(qX),GetRectCenterY(qX)))
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 카페 입구가 열렸습니다!|r")
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 단 카페 입구로 들어간 인원이 다른 포탈에 들어간 인원보다 적으면 기존 스테이지로 이동합니다.|r")
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 방장(재시작 권한을 가진 사람)만 코드를 입력할 수 있습니다.")
endif
elseif RectContainsUnit(gJ,at[i]) and yt[6]==false then
if i==It then
set yt[6]=true
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Items\\StaffOfPurification\\PurificationCaster.mdl",GetRectCenterX(gJ),GetRectCenterY(gJ)))
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 사막 입구가 열렸습니다!|r")
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 단 사막 입구로 들어간 인원이 다른 포탈에 들어간 인원보다 적으면 기존 스테이지로 이동합니다.|r")
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 방장(재시작 권한을 가진 사람)만 코드를 입력할 수 있습니다.")
endif
endif
endfunction
function E8 takes player nz,string X8 returns nothing
if AllowVictoryDefeat(PLAYER_GAME_RESULT_DEFEAT)then
call RemovePlayer(nz,PLAYER_GAME_RESULT_DEFEAT)
if(GetPlayerController(nz)==MAP_CONTROL_USER)then
call CustomDefeatDialogBJ(nz,X8)
endif
endif
endfunction
function O8 takes nothing returns nothing
local timer t=GetExpiredTimer()
set dt=dt-1
if dt==0 then
call DestroyTimer(t)
endif
set t=null
endfunction
function R8 takes nothing returns nothing
local integer i=1
local integer I8=0
local integer no=0
set dt=60
call TimerStart(CreateTimer(),1.,true,function O8)
call DestroyTimerDialog(ft)
loop
exitwhen i>7
if GetPlayerSlotState(Player(i-1))==PLAYER_SLOT_STATE_PLAYING and Ct!=i then
if ct[i] then
set I8=I8+1
else
set no=no+1
endif
endif
set i=i+1
endloop
call ClearTextMessages()
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"[투표 결과]")
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,Ge[2]+"찬성|r: "+I2S(I8))
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,Ge[1]+"반대|r: "+I2S(no))
if I8>no then
if GetPlayerSlotState(Player(Ct-1))==PLAYER_SLOT_STATE_PLAYING then
call E8(Player(Ct-1),"강퇴당하였습니다.")
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,Ge[Ct]+GetPlayerName(Player(Ct-1))+"|r님이 강퇴되었습니다.")
call v8(Ct)
else
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"하지만 대상 플레이어가 이미 나가서 무효 처리되었습니다.")
endif
elseif I8<no then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"찬성 인원이 적어 무효 처리되었습니다.")
else
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"찬성 인원과 반대 인원이 같아 무효 처리되었습니다.")
endif
set Bt=false
set Ct=0
endfunction
function A8 takes nothing returns nothing
local integer i=GetPlayerId(GetTriggerPlayer())+1
local integer j=1
loop
exitwhen j>7
if GetClickedButton()==ht[j]then
set Bt=true
set Ct=j
call TimerStart(Dt,20.,false,function R8)
set ft=CreateTimerDialogBJ(Dt,"투표 종료")
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ "+Ge[Ct]+GetPlayerName(Player(Ct-1))+"|r님의 강퇴 투표가 시작되었습니다.")
set j=7+1
endif
set j=j+1
endloop
call DialogClear(Ft)
if Bt then
set j=1
loop
exitwhen j>7
set ct[j]=false
if i==j then
set ct[j]=true
endif
if GetPlayerSlotState(Player(j-1))==PLAYER_SLOT_STATE_PLAYING and i!=j and Ct!=j then
call DisplayTimedTextToPlayer(Player(j-1),0,0,5,"|cffff0000※ 당신은 ESC키를 눌러 찬성 투표를 할 수 있습니다. (투표는 익명 처리)|r")
endif
set j=j+1
endloop
endif
endfunction
function N8 takes nothing returns nothing
local integer i=GetPlayerId(GetTriggerPlayer())+1
local integer j=1
local real x
local real y
local unit u
if GetClickedButton()!=LoadButtonHandle(Nt,i,0)then
if M==false then
loop
exitwhen GetClickedButton()==LoadButtonHandle(Nt,i,j)
set j=j+1
endloop
if Jt[i]==0 then
set Rt[i]=kt[j]
elseif Jt[i]==1 then
set Rt[i]=lt[j]
elseif Jt[i]==2 then
set Rt[i]=mt[j]
elseif Jt[i]==3 then
set Rt[i]=pt[j]
elseif Jt[i]==4 then
set Rt[i]=qt[j]
elseif Jt[i]==5 then
set Rt[i]=St[j]
elseif Jt[i]==6 then
set Rt[i]=Tt[j]
endif
if gv[i]==false then
set x=GetUnitX(at[i])
set y=GetUnitY(at[i])
call RemoveUnit(at[i])
if P==false then
set at[i]=CreateUnit(Player(i-1),Rt[i],x,y,270)
else
set at[i]=CreateUnit(Player(i-1),Rt[i],x,y,90)
endif
call SetUnitBlendTime(at[i],.0)
call SetUnitPosition(at[i],x,y)
set qv[i]="Left"
if Ox[i]==false then
if Rt[i]!='nanw' then
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Items\\StaffOfPurification\\PurificationCaster.mdl",x,y))
else
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Items\\StaffOfPurification\\PurificationCaster.mdl",x-64,y))
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Items\\StaffOfPurification\\PurificationCaster.mdl",x-64,y+64))
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Items\\StaffOfPurification\\PurificationCaster.mdl",x+64,y))
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Items\\StaffOfPurification\\PurificationCaster.mdl",x+64,y+64))
endif
else
call ShowUnit(at[i],false)
endif
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 외형을 '"+GetUnitName(at[i])+"'(으)로 변경하였습니다!")
else
set u=CreateUnit(Player(i-1),Rt[i],0,0,0)
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 외형을 '"+GetUnitName(u)+"'(으)로 변경하였습니다!")
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ (변신이 풀리면 바로 적용됩니다.)")
call RemoveUnit(u)
endif
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 중력 변환 중에는 사용할 수 없습니다.")
endif
endif
call DialogClear(Gt[i])
set u=null
endfunction
function b8 takes integer B8 returns nothing
local integer i=GetPlayerId(GetTriggerPlayer())+1
local integer j=1
if hx==false then
if M==false then
if GetUnitTypeId(at[i])!='ogru' and GetUnitTypeId(at[i])!='otau' then
set mv[i]=false
set Mv[i]=false
endif
call DialogSetMessage(Gt[i],"스킨을 선택하세요!")
if B8==1 then
set Jt[i]=0
loop
exitwhen kt[j]==null
if GetUnitTypeId(at[i])!=kt[j]then
call SaveButtonHandle(Nt,i,j,DialogAddButton(Gt[i],Kt[j],0))
endif
set j=j+1
endloop
elseif B8==2 then
set Jt[i]=1
loop
exitwhen lt[j]==null
if GetUnitTypeId(at[i])!=lt[j]then
call SaveButtonHandle(Nt,i,j,DialogAddButton(Gt[i],Lt[j],0))
endif
set j=j+1
endloop
elseif B8==3 then
set Jt[i]=2
loop
exitwhen mt[j]==null
if GetUnitTypeId(at[i])!=mt[j]then
call SaveButtonHandle(Nt,i,j,DialogAddButton(Gt[i],Mt[j],0))
endif
set j=j+1
endloop
elseif B8==4 then
set Jt[i]=3
loop
exitwhen pt[j]==null
if GetUnitTypeId(at[i])!=pt[j]then
call SaveButtonHandle(Nt,i,j,DialogAddButton(Gt[i],Pt[j],0))
endif
set j=j+1
endloop
elseif B8==5 then
set Jt[i]=4
loop
exitwhen qt[j]==null
if GetUnitTypeId(at[i])!=qt[j]then
call SaveButtonHandle(Nt,i,j,DialogAddButton(Gt[i],Qt[j],0))
endif
set j=j+1
endloop
elseif B8==6 then
set Jt[i]=5
loop
exitwhen St[j]==null
if GetUnitTypeId(at[i])!=St[j]then
call SaveButtonHandle(Nt,i,j,DialogAddButton(Gt[i],tt[j],0))
endif
set j=j+1
endloop
elseif B8==7 then
set Jt[i]=6
loop
exitwhen Tt[j]==null
if(j!=3 and GetUnitTypeId(at[i])!=St[j])or(j==3 and GetUnitTypeId(at[i])!='o002' and GetUnitTypeId(at[i])!='o003')then
call SaveButtonHandle(Nt,i,j,DialogAddButton(Gt[i],ut[j],0))
endif
set j=j+1
endloop
endif
call SaveButtonHandle(Nt,i,0,DialogAddButton(Gt[i],"취소 / Cancel",0))
call DialogDisplay(Player(i-1),Gt[i],true)
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 중력 변환 중에는 사용할 수 없습니다.")
endif
endif
endfunction
function c8 takes nothing returns nothing
local integer i=GetPlayerId(GetTriggerPlayer())+1
if Zt[i]==false then
if Player(i-1)==GetLocalPlayer()then
call StopSound(Ee,false,true)
endif
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 사운드를 정지합니다.")
set Zt[i]=true
else
if Player(i-1)==GetLocalPlayer()then
call StartSound(Ee)
endif
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 사운드를 재생합니다.")
set Zt[i]=false
endif
endfunction
function C8 takes nothing returns nothing
local integer i=GetPlayerId(GetTriggerPlayer())+1
local integer j=1
if i==It then
if dt==0 then
if Bt==false then
if hx==false and Gx==false then
if GetUnitTypeId(at[i])!='ogru' and GetUnitTypeId(at[i])!='otau' then
set mv[i]=false
set Mv[i]=false
endif
call DialogSetMessage(Ft,"Kick list")
loop
exitwhen j>7
if GetPlayerSlotState(Player(j-1))==PLAYER_SLOT_STATE_PLAYING and i!=j then
set ht[j]=DialogAddButton(Ft,Ge[j]+GetPlayerName(Player(j-1)),0)
endif
set j=j+1
endloop
set ht[0]=DialogAddButton(Ft,"취소 / Cancel",0)
call DialogDisplay(Player(i-1),Ft,true)
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 지금은 사용할 수 없습니다.")
endif
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 투표중에는 사용하실 수 없습니다.")
endif
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ "+I2S(dt)+"초 후에 다시 사용하실 수 있습니다.")
endif
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 재시작 권한을 가진 플레이어만 사용 가능한 명령어 입니다.")
endif
endfunction
function d8 takes integer i returns nothing
if Rx[i]==false then
set Rx[i]=not(Rx[i])
call DisplayTimedTextToPlayer(Player(i-1),0,0,$A,"※ 좌우 방향키로 다른 플레이어를 관전할 수 있습니다. (다시 입력하면 종료)")
elseif Ox[i]==false then
set Rx[i]=not(Rx[i])
if Player(i-1)==GetLocalPlayer()then
call SetUnitVertexColorBJ(Et[i],100.,100.,100.,0)
call SetUnitVertexColorBJ(Et[Ix[i]],.0,.0,.0,'d')
endif
set Ix[i]=0
call DisplayTimedTextToPlayer(Player(i-1),0,0,$A,"※ 관전이 해제되었습니다.")
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,$A,"※ 이미 탈출한 상태에서는 관전을 해제할 수 없습니다.")
endif
endfunction
function D8 takes nothing returns nothing
local integer i=GetPlayerId(GetTriggerPlayer())+1
local string s=StringCase(GetEventPlayerChatString(),false)
if i==It then
if sU[kv]==1 and SU[kv]==1 and Re==false then
if s=="-스킵 "+StringCase(qe[i],false)or s=="-skip "+StringCase(qe[i],false)then
call DialogSetMessage(Ht,"스킵 위치를 선택해주세요!")
call DialogDisplay(Player(i-1),Ht,true)
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,$A,"※ 코드가 틀렸습니다. 첫번째 비밀코드를 입력해야 합니다.")
call DisplayTimedTextToPlayer(Player(i-1),0,0,$A,"※ (예: -스킵 ??? / -skip ???)")
endif
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,$A,"※ 1-1에서만 사용할 수 있습니다.")
endif
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 방장 권한을 가진 플레이어만 사용 가능한 명령어 입니다.")
endif
endfunction
function f8 takes nothing returns nothing
local button F8=GetClickedButton()
if F8==jt[0]then
set F8=null
return
elseif F8==jt[2]then
call e4(7)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,7.,"※ 방장이 레벨을 스킵하였습니다.")
elseif F8==jt[1]then
set Ie=true
call e4(8)
endif
call DestroyTrigger(GetTriggeringTrigger())
call DialogDestroy(Ht)
set F8=null
endfunction
function g8 takes nothing returns nothing
local button F8=GetClickedButton()
local integer i=1
local integer j=GetPlayerId(GetTriggerPlayer())+1
local real x
local real y
if M==false then
loop
exitwhen i>5
if Wt[i]==F8 then
set x=GetUnitX(at[j])
set y=GetUnitY(at[j])
call RemoveUnit(nt[j])
set nt[j]=CreateUnit(Player(j-1),Ut[i],x,y,270)
call SetUnitBlendTime(at[j],.0)
call SetUnitPosition(nt[j],x,y)
if Ox[j]==false then
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Items\\StaffOfPurification\\PurificationCaster.mdl",x,y))
else
call ShowUnit(nt[j],false)
endif
if i==1 then
call DisplayTimedTextToPlayer(Player(j-1),0,0,5,"※ 오라가 제거되었습니다!")
else
call DisplayTimedTextToPlayer(Player(j-1),0,0,5,"※ '"+GetUnitName(nt[j])+"'를 장착하였습니다!")
endif
exitwhen true
endif
set i=i+1
endloop
else
call DisplayTimedTextToPlayer(Player(j-1),0,0,5,"※ 중력 변환 중에는 사용할 수 없습니다.")
endif
call DialogClear(gt[j])
endfunction
function G8 takes nothing returns nothing
local integer i=1
local integer j=GetPlayerId(GetTriggerPlayer())+1
if hx==false then
if M==false then
if GetUnitTypeId(at[j])!='ogru' and GetUnitTypeId(at[j])!='otau' then
set mv[j]=false
set Mv[j]=false
endif
call DialogSetMessage(gt[j],"스킨을 선택하세요!")
loop
exitwhen i>5
if GetUnitTypeId(nt[j])!=Ut[i]then
set Wt[i]=DialogAddButton(gt[j],wt[i],0)
endif
set i=i+1
endloop
set Wt[6]=DialogAddButton(gt[j],"취소 / Cancel",0)
call DialogDisplay(Player(j-1),gt[j],true)
else
call DisplayTimedTextToPlayer(Player(j-1),0,0,5,"※ 중력 변환 중에는 사용할 수 없습니다.")
endif
endif
endfunction
function h8 takes nothing returns nothing
local integer j=GetPlayerId(GetTriggerPlayer())+1
local real x=GetUnitX(at[j])
local real y=GetUnitY(at[j])
local boolean H8=true
local integer j8='h00A'
if GetUnitTypeId(Vt[j])=='h00A' then
set H8=false
set j8='h00E'
endif
call RemoveUnit(Vt[j])
set Vt[j]=CreateUnit(Player(j-1),j8,x,y,270)
call SetUnitBlendTime(at[j],.0)
call SetUnitPosition(Vt[j],x,y)
if Ox[j]==false then
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Items\\StaffOfPurification\\PurificationCaster.mdl",x,y))
else
call ShowUnit(Vt[j],false)
endif
if H8 then
call DisplayTimedTextToPlayer(Player(j-1),0,0,5,"※ 오라가 제거되었습니다!")
else
call DisplayTimedTextToPlayer(Player(j-1),0,0,5,"※ '"+GetUnitName(Vt[j])+"'를 장착하였습니다!")
endif
endfunction
function J8 takes nothing returns nothing
local string s=StringCase(GetEventPlayerChatString(),false)
local integer i=GetPlayerId(GetTriggerPlayer())+1
if SubString(s,0,6)=="-count" then
call r8(i,s,true)
elseif SubString(s,0,$A)=="-카운트" then
call r8(i,s,false)
elseif SubString(s,0,$D)=="-진동끄기" then
call c5(GetPlayerId(GetTriggerPlayer()))
elseif SubString(s,0,$D)=="-진동켜기" then
call B5(GetPlayerId(GetTriggerPlayer()))
elseif SubString(s,0,7)=="-음악" or SubString(s,0,6)=="-music" then
call c8()
elseif SubString(s,0,7)=="-강퇴" or SubString(s,0,5)=="-kick" then
call C8()
elseif s=="-관전" or s=="-obs" or s=="-observe" then
call d8(i)
elseif SubString(s,0,7)=="-스킵" or SubString(s,0,5)=="-skip" then
call D8()
elseif SubString(s,0,4)=="-"+StringCase(qe[GetPlayerId(GetTriggerPlayer())+1],false)and StringLength(s)==4 then
call n8()
elseif SubString(s,0,4)=="-"+StringCase(Qe[GetPlayerId(GetTriggerPlayer())+1],false)and StringLength(s)==4 then
call V8()
elseif SubString(s,0,9)=="-code "+StringCase(se[GetPlayerId(GetTriggerPlayer())+1],false)and StringLength(s)==9 then
call b8(1)
elseif SubString(s,0,$A)=="-code2 "+StringCase(Se[GetPlayerId(GetTriggerPlayer())+1],false)and StringLength(s)==$A then
call b8(2)
elseif SubString(s,0,$A)=="-code3 "+StringCase(te[GetPlayerId(GetTriggerPlayer())+1],false)and StringLength(s)==$A then
call b8(3)
elseif SubString(s,0,$A)=="-code4 "+StringCase(ue[GetPlayerId(GetTriggerPlayer())+1],false)and StringLength(s)==$A then
call b8(5)
elseif SubString(s,0,$A)=="-scode "+StringCase(Ue[GetPlayerId(GetTriggerPlayer())+1],false)and StringLength(s)==$A then
call b8(4)
elseif SubString(s,0,$B)=="-scode2 "+StringCase(Te[GetPlayerId(GetTriggerPlayer())+1],false)and StringLength(s)==$B then
call b8(6)
elseif SubString(s,0,$B)=="-scode3 "+StringCase(We[GetPlayerId(GetTriggerPlayer())+1],false)and StringLength(s)==$B then
call G8()
elseif SubString(s,0,$B)=="-scode4 "+StringCase(Ye[GetPlayerId(GetTriggerPlayer())+1],false)and StringLength(s)==$B then
call h8()
elseif SubString(s,0,$B)=="-scode5 "+StringCase(ze[GetPlayerId(GetTriggerPlayer())+1],false)and StringLength(s)==$B then
call b8(7)
elseif SubString(s,0,$C)=="-ellinforest" and StringLength(s)==$C then
call a8()
elseif s=="-코드확인" then
call n0(2,i-1)
elseif s=="-재선택" then
call K3()
elseif s=="-연습모드" then
call n0(3,i)
elseif SubString(s,0,2)=="-p" and(GetPlayerName(GetTriggerPlayer())=="2p4p" or StringCase(GetPlayerName(GetTriggerPlayer()),false)=="junghun")then
call k3(GetTriggerPlayer())
endif
endfunction
function k8 takes nothing returns nothing
local trigger t=CreateTrigger()
set Ht=DialogCreate()
set jt[1]=DialogAddButton(Ht,"World 2: 옥스포드 / Level 8",0)
set jt[2]=DialogAddButton(Ht,"World 1: 집 앞마당 / Level 8",0)
set jt[0]=DialogAddButton(Ht,"취소 / Cancel",0)
call TriggerRegisterDialogEvent(t,Ht)
call TriggerAddAction(t,function f8)
set t=null
endfunction
function K8 takes nothing returns nothing
local string s=StringCase(GetEventPlayerChatString(),false)
local integer i=GetPlayerId(GetTriggerPlayer())+1
local integer j
local integer K2
local integer l2
local integer d2
if i!=It then
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 재시작 권한을 가진 플레이어만 사용 가능한 명령어 입니다.")
return
endif
if SubString(s,0,2)=="-n" then
set K2=S2I(JNStringSplit(s," ",1))
set l2=S2I(JNStringSplit(s," ",2))
if K2<=0 or l2<=0 or l2>8 then
return
endif
set sU[kv]=K2
set SU[kv]=l2-1
call e4(1)
set j=0
loop
exitwhen not(j<7)
if GetPlayerSlotState(Player(j))==PLAYER_SLOT_STATE_PLAYING and eT[j+1]and(Jz((xY[oY[(ET)]+((j))]),sU[kv])>=1)==false then
set eT[j+1]=false
call DisplayTimedTextToPlayer(Player(j),0,0,60,"|cffFFFC00※ 해당 월드를 클리어 하지 않아 무한점프가 해제되었습니다.|r")
endif
set j=j+1
endloop
elseif SubString(s,0,2)=="-c" and JNStringContains(s,"-code")==false then
call o3(kv,S2I(SubString(s,2,6)))
elseif s=="-q" then
if B0()!=1 then
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"|cffFFFC00※ 혼자 플레이 할때만 사용 가능합니다.|r")
return
endif
if(Jz((xY[oY[(ET)]+((i-1))]),sU[kv])>=1)==false then
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"|cffFFFC00※ 해당 월드를 먼저 클리어 해주십시오.|r")
return
endif
set eT[i]=true
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"※ 무한점프 모드를 실행합니다!|r")
elseif s=="-w" and eT[i]then
set eT[i]=false
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"※ 무한점프 모드가 해제되었습니다.|r")
elseif SubString(s,0,2)=="-k" then
if B0()!=1 then
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"|cffFFFC00※ 혼자 플레이 할때만 사용 가능합니다.|r")
return
endif
if(Jz((xY[oY[(ET)]+((i-1))]),sU[kv])>=1)==false then
call DisplayTimedTextToPlayer(Player(i-1),0,0,60,"|cffFFFC00※ 해당 월드를 먼저 클리어 해주십시오.|r")
return
endif
if S2I(JNStringSplit(s," ",1))==1 then
set d2='IOic'
elseif S2I(JNStringSplit(s," ",1))==2 then
set d2='LOtr'
elseif S2I(JNStringSplit(s," ",1))==3 then
set d2='OOal'
elseif S2I(JNStringSplit(s," ",1))==4 then
set d2='YOsa'
else
return
endif
call m2(sU[kv],SU[kv],d2)
endif
endfunction
function l8 takes nothing returns nothing
local string s="● 방장 명령어
"
set s=s+"-c 숫자
"
set s=s+"컨티뉴를 숫자 만큼 설정합니다.
"
set s=s+"ex) -c 100
"
set s=s+"
"
set s=s+"-n 숫자(월드) 숫자(스테이지)
"
set s=s+"해당 월드의 스테이지로 이동합니다.
"
set s=s+"월드 숫자표는 F9의 월드 번호를 참고하여 주십시오.
"
set s=s+"ex) -n 10 2 = 사막 3-2
"
set s=s+"
"
set s=s+"-q
"
set s=s+"무한 점프 모드로 설정합니다.
"
set s=s+"혼자 플레이 할때만 가능합니다.
"
set s=s+"해당 월드를 클리어 해야 사용할 수 있습니다.
"
set s=s+"해당 월드를 클리어 하지 않았을 경우 자동으로 해제됩니다.
"
set s=s+"
"
set s=s+"-w
"
set s=s+"무한 점프 모드를 해제합니다.
"
set s=s+"
"
set s=s+"-k 숫자(열쇠)
"
set s=s+"번호에 맞는 열쇠를 작동 시킵니다.
"
set s=s+"혼자 플레이 할때만 가능합니다.
"
set s=s+"해당 월드를 클리어 해야 사용할 수 있습니다.
"
set s=s+"빨강 : 1, 노랑 : 2, 파랑 : 3, 횐색 : 4
"
call CreateQuestBJ(0,"|cffFF0202연습모드 명령어|r",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomIcon.blp")
set s="--- 월드 번호 ---:
"
set s=s+"  집 앞마당 : 1
"
set s=s+"  옥스포드 : 2
"
set s=s+"  핑크 핑크 : 3
"
set s=s+"  도시 : 4
"
set s=s+"  발렌타인 데이 : 5
"
set s=s+"  해변 : 6
"
set s=s+"  펩시 : 7
"
set s=s+"  월드 첼린지 : 8
"
set s=s+"  카페 : 9
"
set s=s+"  사막 : 10
"
set s=s+"  엘린 숲 : 11
"
set s=s+"  얼음 동굴 : 12
"
set s=s+"  깊은 산속 : 13
"
call CreateQuestBJ(0,"|cffFF0202월드 번호|r",s,"ReplaceableTextures\\CommandButtons\\BTNs_OrangeMushroomIcon.blp")
endfunction
function L8 takes nothing returns nothing
local trigger t=CreateTrigger()
local integer i
set i=0
loop
exitwhen not(i<7)
call TriggerRegisterPlayerChatEvent(t,Player(i),"-",false)
set i=i+1
endloop
call TriggerAddAction(t,function K8)
call k0(1.,'d','d','d',0,'d','d','d','d')
call l8()
set it=true
call BJDebugMsg("|cffFF0202※ 연습모드를 실행합니다.|r")
call BJDebugMsg("|cffFF0202※ 자세한건 F9를 확인해 주십시오.|r")
call DestroyTrigger(GetTriggeringTrigger())
set t=null
endfunction
function m8 takes unit u,string s1,string s2 returns nothing
local integer i=GetPlayerId(GetOwningPlayer(u))+1
local string u5
if s2=="First" then
set u5="Second"
else
set u5="First"
endif
if M==false then
if s1=="Walk" then
if P==false then
call F0(u,s1+" "+s2)
else
call F0(u,s1+" "+u5)
endif
elseif GetUnitTypeId(u)=='orai' then
if P==false then
call SetUnitAnimation(u,"Stand "+s2)
else
call SetUnitAnimation(u,"Stand "+u5)
endif
else
if P==false then
call SetUnitAnimation(u,s1+" "+s2)
else
call SetUnitAnimation(u,s1+" "+u5)
endif
endif
endif
set u=null
endfunction
function M8 takes integer i,real x,real y returns nothing
if GetUnitTypeId(at[i])!='ogru' and GetUnitTypeId(at[i])!='otau' and GetUnitTypeId(at[i])!='o000' and GetUnitTypeId(at[i])!='o001' then
set mv[i]=true
set qv[i]="Left"
if(Qv[i]<0 and b3(i,x,y,40,"DownWidth")==false)then
call m8(at[i],"Walk","First")
else
call m8(at[i],"Spell","First")
endif
call j0(i)
endif
endfunction
function p8 takes integer i,real x,real y returns nothing
if GetUnitTypeId(at[i])!='ogru' and GetUnitTypeId(at[i])!='otau' and GetUnitTypeId(at[i])!='o000' and GetUnitTypeId(at[i])!='o001' then
set Mv[i]=true
if mv[i]==false then
set qv[i]="Right"
if(Qv[i]<0 and b3(i,x,y,40,"DownWidth")==false)then
call m8(at[i],"Walk","Second")
else
call m8(at[i],"Spell","Second")
endif
endif
call j0(i)
endif
endfunction
function P8 takes nothing returns nothing
local integer i=GetPlayerId(GetTriggerPlayer())+1
local real x=GetUnitX(at[i])
local real y=GetUnitY(at[i])
if J==false then
if Rx[i]==false then
if P==false then
call M8(i,x,y)
else
call p8(i,x,y)
endif
else
call R5(i,true)
endif
endif
endfunction
function q8 takes nothing returns nothing
local integer i=GetPlayerId(GetTriggerPlayer())+1
local real x=GetUnitX(at[i])
local real y=GetUnitY(at[i])
if J==false then
if Rx[i]==false then
if P==false then
call p8(i,x,y)
else
call M8(i,x,y)
endif
else
call R5(i,false)
endif
endif
endfunction
function Q8 takes nothing returns nothing
local integer i=GetPlayerId(GetTriggerPlayer())+1
local real x=GetUnitX(at[i])
local real y=GetUnitY(at[i])
set pv[i]=true
if GetUnitTypeId(at[i])!='orai' and GetUnitTypeId(at[i])!='o001' then
if(b3(i,x,y,40,"DownWidth")==false and Rx[i]==false and M==false and hx==false)or IsUnitInRegion(Me,at[i])or eT[i]then
if(Rt[i]!='nanw' and Rt[i]!='n007' and Rt[i]!='n008')or gv[i] then
if Le[i]==false and Player(i-1)==GetLocalPlayer()then
call StartSound(Ss)
endif
else
if Le[i]==false and Player(i-1)==GetLocalPlayer()then
call StopSound(JS,false,false)
call StartSound(JS)
endif
endif
if b3(i,x,y,40,"UpWidth")then
set Kv[i]=0
set Qv[i]=27.
if qv[i]=="Left" then
call m8(at[i],"Spell","First")
elseif qv[i]=="Right" then
call m8(at[i],"Spell","Second")
endif
endif
endif
elseif GetUnitTypeId(at[i])=='orai' and Pv[i]==false then
set Qv[i]=8.
endif
endfunction
function s8 takes nothing returns nothing
local integer i=GetPlayerId(GetTriggerPlayer())+1
local real x=GetUnitX(at[i])
local real y=GetUnitY(at[i])
set Pv[i]=true
if Re==false and Rx[i]==false and M==false then
if b3(i,x,y,40,"DownWidth")==false then
if IsUnitInRegion(wv,at[i]) and gv[i]==false then
if IsUnitInRegion(Wv,at[i]) then
if yt[0] then
set Ne[1]=Ne[1]+1
call CreateUnit(Player(i-1),'hrif',x,y-60,90)
call A5(i)
endif
elseif IsUnitInRegion(yv,at[i]) then
if yt[1] then
set Ne[2]=Ne[2]+1
call CreateUnit(Player(i-1),'hrif',x,y-60,90)
call A5(i)
endif
elseif IsUnitInRegion(Yv,at[i]) then
if yt[2] then
set Ne[3]=Ne[3]+1
call CreateUnit(Player(i-1),'hrif',x,y-60,90)
call A5(i)
endif
elseif IsUnitInRegion(zv,at[i]) then
if yt[3] then
set Ne[4]=Ne[4]+1
call CreateUnit(Player(i-1),'hrif',x,y-60,90)
call A5(i)
endif
elseif IsUnitInRegion(oe,at[i]) then
if yt[4] then
set Ne[5]=Ne[5]+1
call CreateUnit(Player(i-1),'hrif',x,y-60,90)
call A5(i)
elseif yt[9] then
set Ne[$B]=Ne[$B]+1
call CreateUnit(Player(i-1),'hrif',x,y-60,90)
call A5(i)
elseif mv[i]==false and Mv[i]==false then
if qv[i]=="Left" then
call m8(at[i],"Stand Ready","First")
call G0(i)
elseif qv[i]=="Right" then
call m8(at[i],"Stand Ready","Second")
call G0(i)
endif
endif
elseif IsUnitInRegion(Zv,at[i]) then
if yt[5] then
set Ne[6]=Ne[6]+1
call CreateUnit(Player(i-1),'hrif',x,y-60,90)
call A5(i)
endif
elseif IsUnitInRegion(ve,at[i]) then
if yt[6] then
set Ne[7]=Ne[7]+1
call CreateUnit(Player(i-1),'hrif',x,y-60,90)
call A5(i)
endif
elseif IsUnitInRegion(xe,at[i]) then
set Ne[9]=Ne[9]+1
call CreateUnit(Player(i-1),'hrif',x,y-60,90)
call A5(i)
elseif IsUnitInRegion(re,at[i]) then
if yt[8] then
set Ne[$A]=Ne[$A]+1
call CreateUnit(Player(i-1),'hrif',x,y-60,90)
call A5(i)
endif
elseif IsUnitInRegion(ee,at[i]) then
if yt[7] then
set Ne[8]=Ne[8]+1
call CreateUnit(Player(i-1),'hrif',x,y-60,90)
call A5(i)
elseif mv[i]==false and Mv[i]==false then
if qv[i]=="Left" then
call m8(at[i],"Stand Ready","First")
call G0(i)
elseif qv[i]=="Right" then
call m8(at[i],"Stand Ready","Second")
call G0(i)
endif
endif
else
call CreateUnit(Player(i-1),'hrif',x,y-60,90)
call A5(i)
endif
elseif GetUnitTypeId(at[TS])=='o000' and IsUnitInRegion(Cx,at[i])==false and IsUnitInRegion(Nx,at[i])==false then
call D0(TS,'o001')
elseif GetUnitTypeId(at[TS])=='o001' and IsUnitInRegion(Cx,at[i])==false and IsUnitInRegion(Nx,at[i])==false then
call D0(TS,'o000')
else
if mv[i]==false and Mv[i]==false and M==false then
if qv[i]=="Left" then
call m8(at[i],"Stand Ready","First")
elseif qv[i]=="Right" then
call m8(at[i],"Stand Ready","Second")
endif
call H0(i)
call q1(i)
endif
endif
elseif GetUnitTypeId(at[i])=='orai' then
set Qv[i]=-8.
endif
call z5(i)
call w5(i)
if((IsUnitInRegion(Cx,at[i])==false and IsUnitInRegion(Nx,at[i])==false)or TS==0)and sU[kv]==$B then
call b5(i,x,y)
endif
endif
endfunction
function S8 takes integer i,real x,real y returns nothing
if GetUnitTypeId(at[i])!='ogru' and GetUnitTypeId(at[i])!='otau' and GetUnitTypeId(at[i])!='o000' and GetUnitTypeId(at[i])!='o001' then
set mv[i]=false
call j0(i)
if Mv[i] then
if Qv[i]<0 and b3(i,x,y,40,"DownWidth")==false then
call m8(at[i],"Walk","Second")
else
call m8(at[i],"Spell","Second")
endif
set qv[i]="Right"
else
if Qv[i]<0 and b3(i,x,y,40,"DownWidth")==false and Lv[i] then
set Lv[i]=false
call m8(at[i],"Stand","First")
else
set Lv[i]=true
call m8(at[i],"Spell","First")
endif
set qv[i]="Left"
endif
endif
endfunction
function t8 takes integer i,real x,real y returns nothing
if GetUnitTypeId(at[i])!='ogru' and GetUnitTypeId(at[i])!='otau' and GetUnitTypeId(at[i])!='o000' and GetUnitTypeId(at[i])!='o001' then
set Mv[i]=false
call j0(i)
if mv[i] then
if Qv[i]<0 and b3(i,x,y,40,"DownWidth")==false then
call m8(at[i],"Walk","First")
else
call m8(at[i],"Spell","First")
endif
set qv[i]="Left"
else
if Qv[i]<0 and b3(i,x,y,40,"DownWidth")==false and Lv[i] then
set Lv[i]=false
call m8(at[i],"Stand","Second")
else
set Lv[i]=true
call m8(at[i],"Spell","Second")
endif
set qv[i]="Right"
endif
endif
endfunction
function T8 takes nothing returns nothing
local integer i=GetPlayerId(GetTriggerPlayer())+1
local real x=GetUnitX(at[i])
local real y=GetUnitY(at[i])
if J==false and Rx[i]==false then
if P==false then
call S8(i,x,y)
else
call t8(i,x,y)
endif
endif
endfunction
function u8 takes nothing returns nothing
local integer i=GetPlayerId(GetTriggerPlayer())+1
local real x=GetUnitX(at[i])
local real y=GetUnitY(at[i])
if J==false and Rx[i]==false then
if P==false then
call t8(i,x,y)
else
call S8(i,x,y)
endif
endif
endfunction
function U8 takes nothing returns nothing
local integer i=GetPlayerId(GetTriggerPlayer())+1
set pv[i]=false
if GetUnitTypeId(at[i])=='orai' then
if Pv[i] then
set Qv[i]=-8
else
set Qv[i]=0
endif
endif
endfunction
function w8 takes nothing returns nothing
local integer i=GetPlayerId(GetTriggerPlayer())+1
local real x=GetUnitX(at[i])
local real y=GetUnitY(at[i])
set Pv[i]=false
if GetUnitTypeId(at[i])=='orai' then
if pv[i] then
set Qv[i]=8
else
set Qv[i]=0
endif
else
if mv[i]==false and Mv[i]==false and Re==false and Rx[i]==false and b3(i,x,y,40,"DownWidth")==false and M==false then
if qv[i]=="Left" then
call m8(at[i],"Stand","First")
elseif qv[i]=="Right" then
call m8(at[i],"Stand","Second")
endif
endif
call j0(i)
endif
endfunction
function W8 takes nothing returns nothing
local integer i=1
local trigger array t
set t[0]=CreateTrigger()
set t[1]=CreateTrigger()
set t[2]=CreateTrigger()
set t[3]=CreateTrigger()
set t[4]=CreateTrigger()
set t[5]=CreateTrigger()
set t[6]=CreateTrigger()
set t[7]=CreateTrigger()
loop
exitwhen i>7
call TriggerRegisterPlayerEvent(t[0],Player(i-1),EVENT_PLAYER_ARROW_LEFT_DOWN)
call TriggerRegisterPlayerEvent(t[1],Player(i-1),EVENT_PLAYER_ARROW_RIGHT_DOWN)
call TriggerRegisterPlayerEvent(t[2],Player(i-1),EVENT_PLAYER_ARROW_UP_DOWN)
call TriggerRegisterPlayerEvent(t[3],Player(i-1),EVENT_PLAYER_ARROW_DOWN_DOWN)
call TriggerRegisterPlayerEvent(t[4],Player(i-1),EVENT_PLAYER_ARROW_LEFT_UP)
call TriggerRegisterPlayerEvent(t[5],Player(i-1),EVENT_PLAYER_ARROW_RIGHT_UP)
call TriggerRegisterPlayerEvent(t[6],Player(i-1),EVENT_PLAYER_ARROW_UP_UP)
call TriggerRegisterPlayerEvent(t[7],Player(i-1),EVENT_PLAYER_ARROW_DOWN_UP)
set i=i+1
endloop
call TriggerAddAction(t[0],function P8)
call TriggerAddAction(t[1],function q8)
call TriggerAddAction(t[2],function Q8)
call TriggerAddAction(t[3],function s8)
call TriggerAddAction(t[4],function T8)
call TriggerAddAction(t[5],function u8)
call TriggerAddAction(t[6],function U8)
call TriggerAddAction(t[7],function w8)
set i=0
loop
exitwhen i>7
set t[i]=null
set i=i+1
endloop
endfunction
function y8 takes nothing returns nothing
local integer i=GetPlayerId(GetTriggerPlayer())+1
if eo==false then
if i==It then
if Re==false and M==false then
if Gx==false then
call TriggerExecute(Xe)
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 현재 스테이지에서는 재시작 할 수 없습니다.")
endif
endif
elseif Bt and i!=Ct then
if ct[i]==false then
set ct[i]=true
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 찬성 투표를 하였습니다. (다시 ESC를 누르면 취소할 수 있습니다.)")
else
set ct[i]=false
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 반대 투표를 하였습니다. (다시 ESC를 누르면 찬성할 수 있습니다.)")
endif
endif
elseif oo then
set xo[i]=not(xo[i])
if xo[i]==false then
if GetLocalPlayer()==Player(i-1)then
call SetCineFilterTexture("war3mapImported\\DL.blp")
call SetCineFilterDuration(0)
call DisplayCineFilter(true)
endif
else
if GetLocalPlayer()==Player(i-1)then
call SetCineFilterTexture("ReplaceableTextures\\CameraMasks\\Black_mask.blp")
call SetCineFilterDuration(0)
call DisplayCineFilter(true)
endif
endif
endif
endfunction
function Y8 takes nothing returns nothing
local integer i=GetPlayerId(DzGetTriggerSyncPlayer())
set aY[i]=S2I((DzGetTriggerSyncData()))!=0
endfunction
function z8 takes nothing returns nothing
if DzGetTriggerKeyPlayer()==GetLocalPlayer()then
call DzSyncData("onEnter",I2S((JNMemoryGetByte((Vx+$D04FEC)))))
endif
endfunction
function Z8 takes nothing returns nothing
local integer gz=(LoadInteger(Fe,0,GetHandleId(GetTriggeringTrigger())))
local integer i=GetPlayerId(DzGetTriggerKeyPlayer())
if aY[i]==false then
call uz(gz,i)
elseif DzGetTriggerKeyPlayer()==GetLocalPlayer()and(JNMemoryGetByte((Vx+$D04FEC)))==0 then
call DzSyncData("onEnter","0")
endif
endfunction
function vvv takes nothing returns nothing
call r0(('C'))
endfunction
function vev takes nothing returns nothing
call i0(('V'))
endfunction
function vxv takes nothing returns nothing
call ZZ((L))
endfunction
function vov takes integer x,integer y,integer vrv returns nothing
local integer array dx
local integer array dy
local integer nx
local integer ny
local integer viv=4
local integer vav
local integer u5
set dx[0]=1
set dx[1]=0
set dx[2]=-1
set dx[3]=0
set dy[0]=0
set dy[1]=-1
set dy[2]=0
set dy[3]=1
set Ay[Ny[((Dy[fy[(xT)]+(y)]))]+(x)]=(true)
if Hy<vrv then
set Hy=vrv
set jy=x
set Jy=y
endif
loop
exitwhen viv<=0
set vav=GetRandomInt(0,viv-1)
set nx=dx[vav]
set ny=dy[vav]
set viv=viv-1
set u5=dx[vav]
set dx[vav]=dx[viv]
set dx[viv]=u5
set u5=dy[vav]
set dy[vav]=dy[viv]
set dy[viv]=u5
if x+nx<47-1 and x+nx>0 and y+ny<31-1 and y+ny>0 then
if(Ay[Ny[((Dy[fy[(xT)]+(y+ny+ny)]))]+(x+nx+nx)])==false then
set Ay[Ny[((Dy[fy[(xT)]+(y+ny)]))]+(x+nx)]=(true)
call vov(x+nx+nx,y+ny+ny,vrv+1)
endif
endif
endloop
endfunction
function vnv takes nothing returns nothing
call SetDoodadAnimation($577C,-$7A3D,128.,'D00A',false,"stand",false)
call SetDoodadAnimation($577C,-$7B3C,128.,'YOf3',false,"stand",false)
call SetDoodadAnimation($3F80+($80*23),-$6C00-($80*$F),128.,'VOfl',false,"stand",false)
call SetDoodadAnimation($413D,-$6B80,128.,'VOfl',false,"stand",false)
call SetDoodadAnimation($3FFF,-$6B00,128.,'DObw',false,"stand",false)
call SetDoodadAnimation($3FFF+$80,-$6B00,128.,'YObb',false,"stand",false)
call SetDoodadAnimation($3FFF+256,-$6B00,128.,'YOwb',false,"stand",false)
call SetDoodadAnimation($3FFF+384,-$6B00,128.,'LOic',false,"stand",false)
call SetDoodadAnimation($3FFF+512,-$6B00,128.,'YObw',false,"stand",false)
call SetDoodadAnimation($3FFF+640,-$6B00,128.,'IOsm',false,"stand",false)
endfunction
function vVv takes nothing returns nothing
local integer H1=GetUnitTypeId(GetTriggerUnit())
local integer id=GetPlayerId(GetOwningPlayer(GetTriggerUnit()))
local rect r1
local rect r2
if X0(H1)==false or id>=7 then
return
endif
set r1=Rect($5700-64,-$7A80-64,$5700+32,-$7A80+32)
set r2=Rect($5700-64,-$7A80-64+$80,$5700+32,-$7A80+32+$80)
call RemoveUnit(oT)
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Items\\AIem\\AIemTarget.mdl",GetRectCenterX(rT),GetRectCenterY(rT)))
call RegionClearRect(ie,r1)
call RegionClearRect(ie,r2)
call SetDoodadAnimationRect(r1,'D00D',"Death",false)
call SetDoodadAnimationRect(r2,'D00D',"Death",false)
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Human\\DispelMagic\\DispelMagicTarget.mdl",GetRectCenterX(r1),GetRectCenterY(r1)))
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Human\\DispelMagic\\DispelMagicTarget.mdl",GetRectCenterX(r2),GetRectCenterY(r2)))
call RemoveRect(r1)
call RemoveRect(r2)
call RemoveRect(rT)
call DestroyTrigger(GetTriggeringTrigger())
set r1=null
set r2=null
endfunction
function vEv takes nothing returns nothing
local integer vXv=$3F80
local integer vOv=-$6C00
local integer y=0
local integer x=0
local trigger t=CreateTrigger()
local rect r1=Rect($5700-64,-$7A80-64,$5700+32,-$7A80+32)
local rect r2=Rect($5700-64,-$7A80-64+$80,$5700+32,-$7A80+32+$80)
call DestroyTrigger(GetTriggeringTrigger())
loop
exitwhen y>=31
set x=0
loop
exitwhen x>=47
if(Ay[Ny[((Dy[fy[(xT)]+(y)]))]+(x)])==false then
call SetTerrainType(vXv+($80*x),vOv+(-$80*y),Rv,-1,1,0)
endif
set x=x+1
endloop
set y=y+1
endloop
set x=0
loop
exitwhen x>=47
call SetTerrainType(vXv+($80*x),vOv+(-$80*31),Rv,-1,1,0)
if x<31 then
call SetTerrainType(vXv+($80*47),vOv+(-$80*x),Rv,-1,1,0)
call SetTerrainType(vXv-$80,vOv+(-$80*x),Rv,-1,1,0)
endif
if x>=7 then
call SetTerrainType(vXv+($80*x),vOv+$80,Rv,-1,1,0)
endif
set x=x+1
endloop
call SetTerrainType($42FF,-$6B00,Rv,-1,1,0)
call SetTerrainType($42FF+$80,-$6B00,Rv,-1,1,0)
call SetTerrainType(vXv+$80,vOv,Nv,-1,1,0)
call SetTerrainType($567F,-$7A7F,Nv,-1,1,0)
call SetTerrainType($567F+$80,-$7A7F,Nv,-1,1,0)
call SetTerrainType($567F,-$7A7F+$80,Nv,-1,1,0)
call SetTerrainType($567F+$80,-$7A7F+$80,Nv,-1,1,0)
call vnv()
set oT=CreateUnit(Player($B),'h00C',vXv+($80*jy),vOv-($80*Jy),270)
set rT=Rect((vXv+($80*jy))-64.,(vOv-($80*Jy))-64.,(vXv+($80*jy))+64.,(vOv-($80*Jy))+64.)
call TriggerRegisterEnterRectSimple(t,rT)
call TriggerAddAction(t,function vVv)
call RegionAddRect(ie,r1)
call RegionAddRect(ie,r2)
call RemoveRect(r1)
call RemoveRect(r2)
set r1=null
set r2=null
set t=null
endfunction
function vRv takes nothing returns nothing
local trigger t=CreateTrigger()
local integer p=GetPlayerId(GetOwningPlayer(GetTriggerUnit()))+1
local integer y=0
if GetTriggerUnit()!=at[p]then
return
endif
call k0(1.,'d','d','d',0,'d','d','d','d')
call DestroyTrigger(GetTriggeringTrigger())
set xT=mz()
loop
exitwhen y>=31
set Dy[fy[(xT)]+(y)]=(pz())
set y=y+1
endloop
call vov(1,1,0)
call TriggerAddCondition(t,Filter(function vEv))
call TriggerEvaluate(t)
set t=null
endfunction
function vIv takes nothing returns nothing
local integer i=1
local integer j=1
if GetUnitTypeId(GetTriggerUnit())=='orai' then
loop
exitwhen aT[i]==null
if GetTriggeringRegion()==iT[i]then
loop
exitwhen j>Ae
if GetUnitTypeId(at[7+j])=='orai' and GetTriggerUnit()==at[7+j]and GetUnitUserData(GetTriggerUnit())!=i then
call SetUnitUserData(GetTriggerUnit(),i)
if VT[i]=="Left" then
if P==false then
call SetUnitAnimation(GetTriggerUnit(),"Stand First")
else
call SetUnitAnimation(GetTriggerUnit(),"Stand Second")
endif
set mv[7+j]=true
set Mv[7+j]=false
elseif VT[i]=="Right" then
if P==false then
call SetUnitAnimation(GetTriggerUnit(),"Stand Second")
else
call SetUnitAnimation(GetTriggerUnit(),"Stand First")
endif
set mv[7+j]=false
set Mv[7+j]=true
else
set mv[7+j]=false
set Mv[7+j]=false
endif
set Qv[7+j]=nT[i]
endif
set j=j+1
endloop
return
endif
set i=i+1
endloop
endif
endfunction
function vAv takes trigger t,integer i,rect r,real g,string a returns nothing
set iT[i]=CreateRegion()
call RegionAddRect(iT[i],r)
set nT[i]=g
set aT[i]=r
set VT[i]=a
call TriggerRegisterEnterRegion(t,iT[i],null)
endfunction
function vNv takes nothing returns integer
local integer gz=Kz()
set Yy[gz]=Lz()
return gz
endfunction
function vbv takes nothing returns nothing
local integer i=0
set ET=Hz()
loop
exitwhen i>=rY[ET]
set xY[oY[(ET)]+(i)]=(vNv())
set i=i+1
endloop
endfunction
function vBv takes nothing returns nothing
local integer i=0
local integer u5=0
local string t4
loop
exitwhen i>=7
if GetPlayerSlotState(Player(i))==PLAYER_SLOT_STATE_PLAYING then
set t4=StringCase(GetPlayerName(Player(i)),false)
if GetLocalPlayer()==Player(i)then
call JNObjectCharacterInit("OM150",t4,"3b1e2c80-db90-462a-9835-a0ddb80752b1","ClearList")
endif
set Ly[Yy[(xY[oY[(ET)]+(i)])]]=JNObjectCharacterGetInt(t4,"CaptainJack")
set my[Yy[(xY[oY[(ET)]+(i)])]]=JNObjectCharacterGetInt(t4,"Subway")
set My[Yy[(xY[oY[(ET)]+(i)])]]=JNObjectCharacterGetInt(t4,"Valentine")
set Py[Yy[(xY[oY[(ET)]+(i)])]]=JNObjectCharacterGetInt(t4,"Beach")
set qy[Yy[(xY[oY[(ET)]+(i)])]]=JNObjectCharacterGetInt(t4,"Coke")
set Qy[Yy[(xY[oY[(ET)]+(i)])]]=JNObjectCharacterGetInt(t4,"WorldChallenge")
set sy[Yy[(xY[oY[(ET)]+(i)])]]=JNObjectCharacterGetInt(t4,"Cafe")
set Sy[Yy[(xY[oY[(ET)]+(i)])]]=JNObjectCharacterGetInt(t4,"Desert")
set ty[Yy[(xY[oY[(ET)]+(i)])]]=JNObjectCharacterGetInt(t4,"Forest")
set Ty[Yy[(xY[oY[(ET)]+(i)])]]=JNObjectCharacterGetInt(t4,"IceCave")
set uy[Yy[(xY[oY[(ET)]+(i)])]]=JNObjectCharacterGetInt(t4,"DownTown")
set Uy[Yy[(xY[oY[(ET)]+(i)])]]=JNObjectCharacterGetInt(t4,"Random")
endif
set i=i+1
endloop
endfunction
function vcv takes nothing returns nothing
local integer i=1
set i=1
loop
exitwhen not(i<=7)
if GetLocalPlayer()==Player(i-1)then
if JNObjectCharacterServerConnectCheck()==false then
call BJDebugMsg("|cffFFFC00※ 서버와의 연결에 실패하였습니다.|r")
call BJDebugMsg("|cffFFFC00※ 현재 버전이 최신버전인지 확인해 주십시오.|r")
call BJDebugMsg("|cffFFFC00※ https://m16tool.xyz/Game/OM150|r")
endif
endif
set i=i+1
endloop
endfunction
function InitCustomTeams takes nothing returns nothing
call SetPlayerTeam(Player(0),0)
call SetPlayerState(Player(0),PLAYER_STATE_ALLIED_VICTORY,1)
call SetPlayerTeam(Player(1),0)
call SetPlayerState(Player(1),PLAYER_STATE_ALLIED_VICTORY,1)
call SetPlayerTeam(Player(2),0)
call SetPlayerState(Player(2),PLAYER_STATE_ALLIED_VICTORY,1)
call SetPlayerTeam(Player(3),0)
call SetPlayerState(Player(3),PLAYER_STATE_ALLIED_VICTORY,1)
call SetPlayerTeam(Player(4),0)
call SetPlayerState(Player(4),PLAYER_STATE_ALLIED_VICTORY,1)
call SetPlayerTeam(Player(5),0)
call SetPlayerState(Player(5),PLAYER_STATE_ALLIED_VICTORY,1)
call SetPlayerTeam(Player(6),0)
call SetPlayerState(Player(6),PLAYER_STATE_ALLIED_VICTORY,1)
call SetPlayerAllianceStateAllyBJ(Player(0),Player(1),true)
call SetPlayerAllianceStateAllyBJ(Player(0),Player(2),true)
call SetPlayerAllianceStateAllyBJ(Player(0),Player(3),true)
call SetPlayerAllianceStateAllyBJ(Player(0),Player(4),true)
call SetPlayerAllianceStateAllyBJ(Player(0),Player(5),true)
call SetPlayerAllianceStateAllyBJ(Player(0),Player(6),true)
call SetPlayerAllianceStateAllyBJ(Player(1),Player(0),true)
call SetPlayerAllianceStateAllyBJ(Player(1),Player(2),true)
call SetPlayerAllianceStateAllyBJ(Player(1),Player(3),true)
call SetPlayerAllianceStateAllyBJ(Player(1),Player(4),true)
call SetPlayerAllianceStateAllyBJ(Player(1),Player(5),true)
call SetPlayerAllianceStateAllyBJ(Player(1),Player(6),true)
call SetPlayerAllianceStateAllyBJ(Player(2),Player(0),true)
call SetPlayerAllianceStateAllyBJ(Player(2),Player(1),true)
call SetPlayerAllianceStateAllyBJ(Player(2),Player(3),true)
call SetPlayerAllianceStateAllyBJ(Player(2),Player(4),true)
call SetPlayerAllianceStateAllyBJ(Player(2),Player(5),true)
call SetPlayerAllianceStateAllyBJ(Player(2),Player(6),true)
call SetPlayerAllianceStateAllyBJ(Player(3),Player(0),true)
call SetPlayerAllianceStateAllyBJ(Player(3),Player(1),true)
call SetPlayerAllianceStateAllyBJ(Player(3),Player(2),true)
call SetPlayerAllianceStateAllyBJ(Player(3),Player(4),true)
call SetPlayerAllianceStateAllyBJ(Player(3),Player(5),true)
call SetPlayerAllianceStateAllyBJ(Player(3),Player(6),true)
call SetPlayerAllianceStateAllyBJ(Player(4),Player(0),true)
call SetPlayerAllianceStateAllyBJ(Player(4),Player(1),true)
call SetPlayerAllianceStateAllyBJ(Player(4),Player(2),true)
call SetPlayerAllianceStateAllyBJ(Player(4),Player(3),true)
call SetPlayerAllianceStateAllyBJ(Player(4),Player(5),true)
call SetPlayerAllianceStateAllyBJ(Player(4),Player(6),true)
call SetPlayerAllianceStateAllyBJ(Player(5),Player(0),true)
call SetPlayerAllianceStateAllyBJ(Player(5),Player(1),true)
call SetPlayerAllianceStateAllyBJ(Player(5),Player(2),true)
call SetPlayerAllianceStateAllyBJ(Player(5),Player(3),true)
call SetPlayerAllianceStateAllyBJ(Player(5),Player(4),true)
call SetPlayerAllianceStateAllyBJ(Player(5),Player(6),true)
call SetPlayerAllianceStateAllyBJ(Player(6),Player(0),true)
call SetPlayerAllianceStateAllyBJ(Player(6),Player(1),true)
call SetPlayerAllianceStateAllyBJ(Player(6),Player(2),true)
call SetPlayerAllianceStateAllyBJ(Player(6),Player(3),true)
call SetPlayerAllianceStateAllyBJ(Player(6),Player(4),true)
call SetPlayerAllianceStateAllyBJ(Player(6),Player(5),true)
call SetPlayerTeam(Player($B),1)
call SetPlayerState(Player($B),PLAYER_STATE_ALLIED_VICTORY,1)
endfunction
function main takes nothing returns nothing
local weathereffect we
local trigger t
local integer i
local integer Dz
local integer fz
local version v
local integer Rz
call SetCameraBounds(-8192.+GetCameraMargin(CAMERA_MARGIN_LEFT),-32256.+GetCameraMargin(CAMERA_MARGIN_BOTTOM),28672.-GetCameraMargin(CAMERA_MARGIN_RIGHT),25088.-GetCameraMargin(CAMERA_MARGIN_TOP),-8192.+GetCameraMargin(CAMERA_MARGIN_LEFT),25088.-GetCameraMargin(CAMERA_MARGIN_TOP),28672.-GetCameraMargin(CAMERA_MARGIN_RIGHT),-32256.+GetCameraMargin(CAMERA_MARGIN_BOTTOM))
call SetDayNightModels("Environment\\DNC\\DNCDalaran\\DNCDalaranTerrain\\DNCDalaranTerrain.mdl","Environment\\DNC\\DNCDalaran\\DNCDalaranUnit\\DNCDalaranUnit.mdl")
call NewSoundEnvironment("Default")
call SetAmbientDaySound("DalaranDay")
call SetAmbientNightSound("DalaranNight")
call SetMapMusic("Music",true,0)
set Ss=CreateSound("war3mapImported\\OM_Jump.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(Ss,'j')
call SetSoundChannel(Ss,0)
call SetSoundVolume(Ss,$7F)
call SetSoundPitch(Ss,1.)
set ts=CreateSound("war3mapImported\\William tell Overture Remix.mp3",true,false,false,$A,$A,"DefaultEAXON")
call SetSoundDuration(ts,$1E0E6)
call SetSoundChannel(ts,0)
call SetSoundVolume(ts,$7F)
call SetSoundPitch(ts,1.)
set Ts=CreateSound("war3mapImported\\CaptainJack.mp3",true,false,false,$A,$A,"DefaultEAXON")
call SetSoundDuration(Ts,$327D4)
call SetSoundChannel(Ts,0)
call SetSoundVolume(Ts,$7F)
call SetSoundPitch(Ts,1.)
set us=CreateSound("war3mapImported\\door open.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(us,6473)
call SetSoundChannel(us,0)
call SetSoundVolume(us,$7F)
call SetSoundPitch(us,1.)
set Us=CreateSound("war3mapImported\\OM_lightdown.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(Us,$4C6)
call SetSoundChannel(Us,0)
call SetSoundVolume(Us,$7F)
call SetSoundPitch(Us,1.)
set ws=CreateSound("war3mapImported\\DeepDarkFantasy.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(ws,$972)
call SetSoundChannel(ws,0)
call SetSoundVolume(ws,$7F)
call SetSoundPitch(ws,1.)
set Ws=CreateSound("war3mapImported\\TheRoost.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(Ws,$4E34)
call SetSoundChannel(Ws,0)
call SetSoundVolume(Ws,$7F)
call SetSoundPitch(Ws,1.)
set ys=CreateSound("war3mapImported\\OM_GayBar.mp3",true,false,false,$A,$A,"DefaultEAXON")
call SetSoundDuration(ys,$E1C6)
call SetSoundChannel(ys,0)
call SetSoundVolume(ys,$7F)
call SetSoundPitch(ys,1.)
set Ys=CreateSound("war3mapImported\\OM_LightEffct.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(Ys,$666)
call SetSoundChannel(Ys,0)
call SetSoundVolume(Ys,$7F)
call SetSoundPitch(Ys,1.)
set zs=CreateSound("war3mapImported\\OM_Chezic.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(zs,468)
call SetSoundChannel(zs,0)
call SetSoundVolume(zs,$7F)
call SetSoundPitch(zs,1.)
set Zs=CreateSound("war3mapImported\\OM_GladosNo.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(Zs,8398)
call SetSoundChannel(Zs,0)
call SetSoundVolume(Zs,$7F)
call SetSoundPitch(Zs,1.)
set vS=CreateSound("war3mapImported\\OM_EndingSound.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(vS,$614C)
call SetSoundChannel(vS,0)
call SetSoundVolume(vS,$7F)
call SetSoundPitch(vS,1.)
set eS=CreateSound("war3mapImported\\OM_EndingSound2.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(eS,$55B8)
call SetSoundChannel(eS,0)
call SetSoundVolume(eS,$7F)
call SetSoundPitch(eS,1.)
set xS=CreateSound("war3mapImported\\OM_EndingSound3.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(xS,$6646)
call SetSoundChannel(xS,0)
call SetSoundVolume(xS,$7F)
call SetSoundPitch(xS,1.)
set oS=CreateSound("war3mapImported\\Green Greens.mp3",true,false,false,$A,$A,"DefaultEAXON")
call SetSoundDuration(oS,86892)
call SetSoundChannel(oS,0)
call SetSoundVolume(oS,$7F)
call SetSoundPitch(oS,1.)
set rS=CreateSound("Sound\\Interface\\BattleNetTick.wav",false,false,false,$A,$A,"DefaultEAXON")
call SetSoundParamsFromLabel(rS,"ChatroomTimerTick")
call SetSoundDuration(rS,476)
call SetSoundChannel(rS,0)
set iS=CreateSound("war3mapImported\\Virtual Riot - Energy Drink.mp3",true,false,false,$A,$A,"DefaultEAXON")
call SetSoundDuration(iS,$49DAE)
call SetSoundChannel(iS,0)
call SetSoundVolume(iS,$7F)
call SetSoundPitch(iS,1.)
set aS=CreateSound("war3mapImported\\Insertion001.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(aS,442)
call SetSoundChannel(aS,0)
call SetSoundVolume(aS,$7F)
call SetSoundPitch(aS,1.)
set nS=CreateSound("war3mapImported\\GearSound001.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(nS,$A90)
call SetSoundChannel(nS,0)
call SetSoundVolume(nS,$7F)
call SetSoundPitch(nS,1.)
set VS=CreateSound("war3mapImported\\FREE.BGM_OMG-Hello..mp3",true,false,false,$A,$A,"DefaultEAXON")
call SetSoundDuration(VS,$371DE)
call SetSoundChannel(VS,0)
call SetSoundVolume(VS,$7F)
call SetSoundPitch(VS,1.)
set ES=CreateSound("war3mapImported\\KirbysEpicYarn.mp3",true,false,false,$A,$A,"DefaultEAXON")
call SetSoundDuration(ES,$AA38)
call SetSoundChannel(ES,0)
call SetSoundVolume(ES,$7F)
call SetSoundPitch(ES,1.)
set XS=CreateSound("war3mapImported\\knock001.mp3",false,false,false,$A,$A,"DefaultEAXON")
call SetSoundDuration(XS,$AAA)
call SetSoundChannel(XS,0)
call SetSoundVolume(XS,$7F)
call SetSoundPitch(XS,1.)
set OS=CreateSound("war3mapImported\\FREE.BGM_OMG-Hello..mp3",true,false,false,$A,$A,"DefaultEAXON")
call SetSoundDuration(OS,$371DE)
call SetSoundChannel(OS,0)
call SetSoundVolume(OS,$7F)
call SetSoundPitch(OS,1.2)
set RS=CreateSound("Doodads\\LordaeronSummer\\Terrain\\Gate\\GateEpicDeath.wav",false,false,true,$A,$A,"DefaultEAXON")
call SetSoundParamsFromLabel(RS,"GateDeath")
call SetSoundDuration(RS,$62E)
set IS=CreateSound("war3mapImported\\Waterflame_Swirl.mp3",true,false,false,$A,$A,"DefaultEAXON")
call SetSoundDuration(IS,$46F78)
call SetSoundChannel(IS,0)
call SetSoundVolume(IS,$7F)
call SetSoundPitch(IS,1.)
set AS=CreateSound("Sound\\Buildings\\Naga\\NagaBuildingCancel.wav",false,false,true,$A,$A,"DefaultEAXON")
call SetSoundParamsFromLabel(AS,"NagaBuildingDeath")
call SetSoundDuration(AS,$818)
call SetSoundChannel(AS,0)
call SetSoundVolume(AS,60)
set NS=CreateSound("war3mapImported\\FlashJump.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(NS,704)
call SetSoundChannel(NS,0)
call SetSoundVolume(NS,$7F)
call SetSoundPitch(NS,1.)
set bS=CreateSound("war3mapImported\\Waterflame_Swirl.mp3",true,false,false,$A,$A,"DefaultEAXON")
call SetSoundDuration(bS,$46F78)
call SetSoundChannel(bS,0)
call SetSoundVolume(bS,$7F)
call SetSoundPitch(bS,1.5)
set BS=CreateSound("war3mapImported\\CokeTown001.mp3",true,false,false,$A,$A,"DefaultEAXON")
call SetSoundDuration(BS,$263B6)
call SetSoundChannel(BS,0)
call SetSoundVolume(BS,$7F)
call SetSoundPitch(BS,1.)
set cS=CreateSound("war3mapImported\\CokeJump001.mp3",false,false,false,$A,$A,"DefaultEAXON")
call SetSoundDuration(cS,520)
call SetSoundChannel(cS,0)
call SetSoundVolume(cS,$7F)
call SetSoundPitch(cS,1.)
set CS=CreateSound("war3mapImported\\Morph001.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(CS,$5CA)
call SetSoundChannel(CS,0)
call SetSoundVolume(CS,$7F)
call SetSoundPitch(CS,1.)
set dS=CreateSound("war3mapImported\\SentinelEffect.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(dS,$7EC)
call SetSoundChannel(dS,0)
call SetSoundVolume(dS,$7F)
call SetSoundPitch(dS,1.)
set DS=CreateSound("war3mapImported\\WilliamTellOvertureRemixFull.mp3",true,false,false,$A,$A,"DefaultEAXON")
call SetSoundDuration(DS,$1E3A4)
call SetSoundChannel(DS,0)
call SetSoundVolume(DS,$7F)
call SetSoundPitch(DS,1.)
set fS=CreateSound("war3mapImported\\Damage001.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(fS,390)
call SetSoundChannel(fS,0)
call SetSoundVolume(fS,$7F)
call SetSoundPitch(fS,1.)
set FS=CreateSound("war3mapImported\\MushroomDie.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(FS,338)
call SetSoundChannel(FS,0)
call SetSoundVolume(FS,$7F)
call SetSoundPitch(FS,1.)
set gS=CreateSound("war3mapImported\\BeamSound.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(gS,5564)
call SetSoundChannel(gS,0)
call SetSoundVolume(gS,$7F)
call SetSoundPitch(gS,1.)
set GS=CreateSound("war3mapImported\\AAAng001.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(GS,$71C)
call SetSoundChannel(GS,0)
call SetSoundVolume(GS,$7F)
call SetSoundPitch(GS,1.)
set hS=CreateSound("war3mapImported\\SexyBGM001.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(hS,$A0FA)
call SetSoundChannel(hS,0)
call SetSoundVolume(hS,$7F)
call SetSoundPitch(hS,1.)
set HS=CreateSound("war3mapImported\\GunSoundEffect001.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(HS,$8A2)
call SetSoundChannel(HS,0)
call SetSoundVolume(HS,$7F)
call SetSoundPitch(HS,1.)
set jS=CreateSound("war3mapImported\\FucX.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(jS,$9C0)
call SetSoundChannel(jS,0)
call SetSoundVolume(jS,$7F)
call SetSoundPitch(jS,1.)
set JS=CreateSound("war3mapImported\\MushmomJump001.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(JS,442)
call SetSoundChannel(JS,0)
call SetSoundVolume(JS,$7F)
call SetSoundPitch(JS,1.)
set kS=CreateSound("war3mapImported\\MushmomJump002.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(kS,650)
call SetSoundChannel(kS,0)
call SetSoundVolume(kS,$7F)
call SetSoundPitch(kS,1.)
set KS=CreateSound("war3mapImported\\MushmomAttack.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(KS,780)
call SetSoundChannel(KS,0)
call SetSoundVolume(KS,$7F)
call SetSoundPitch(KS,1.)
set lS=CreateSound("war3mapImported\\skylight_harbor.mp3",true,false,false,$A,$A,"DefaultEAXON")
call SetSoundDuration(lS,$286F0)
call SetSoundChannel(lS,0)
call SetSoundVolume(lS,$7F)
call SetSoundPitch(lS,1.)
set LS=CreateSound("war3mapImported\\Ariant.mp3",true,false,false,$A,$A,"DefaultEAXON")
call SetSoundDuration(LS,97881)
call SetSoundChannel(LS,0)
call SetSoundVolume(LS,$7F)
call SetSoundPitch(LS,1.)
set mS=CreateSound("war3mapImported\\EllinforestBGM.mp3",true,false,false,$A,$A,"DefaultEAXON")
call SetSoundDuration(mS,$2B473)
call SetSoundChannel(mS,0)
call SetSoundVolume(mS,$7F)
call SetSoundPitch(mS,1.)
set MS=CreateSound("war3mapImported\\Waterflame - Red - Layerz OST.mp3",true,false,false,$A,$A,"DefaultEAXON")
call SetSoundDuration(MS,$94C6E)
call SetSoundChannel(MS,0)
call SetSoundVolume(MS,$7F)
call SetSoundPitch(MS,1.)
set pS=CreateSound("war3mapImported\\KeySound.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(pS,418)
call SetSoundChannel(pS,0)
call SetSoundVolume(pS,$7F)
call SetSoundPitch(pS,1.)
set PS=CreateSound("war3mapImported\\StoneStatueBgm.mp3",false,false,false,$A,$A,"")
call SetSoundDuration(PS,784)
call SetSoundChannel(PS,0)
call SetSoundVolume(PS,$7F)
call SetSoundPitch(PS,1.)
set qS=CreateSound("war3mapImported\\EverybodyBounce.mp3",true,false,false,$A,$A,"DefaultEAXON")
call SetSoundDuration(qS,$37BD2)
call SetSoundChannel(qS,0)
call SetSoundVolume(qS,$7F)
call SetSoundPitch(qS,1.)
set QS=CreateSound("war3mapImported\\EllinRainy.mp3",true,false,false,$A,$A,"DefaultEAXON")
call SetSoundDuration(QS,$1E09C)
call SetSoundChannel(QS,0)
call SetSoundVolume(QS,$7F)
call SetSoundPitch(QS,1.)
set ho=Rect(4800.,-22944.,4928.,-22784.)
set Ho=Rect(6592.,-23360.,6720.,-23232.)
set jo=Rect(6272.,-22336.,6400.,-22208.)
set Jo=Rect(5312.,-21696.,5440.,-21568.)
set ko=Rect(4416.,-21440.,4544.,-21312.)
set Ko=Rect(6016.,-21056.,6144.,-20928.)
set lo=Rect(6656.,-21056.,6784.,-20928.)
set Lo=Rect(9280.,-22336.,9408.,-22208.)
set mo=Rect(12352.,-23104.,12480.,-22976.)
set Mo=Rect(7744.,-21952.,7872.,-21824.)
set po=Rect(12160.,-21664.,12288.,-21568.)
set Po=Rect(12672.,-21664.,12800.,-21568.)
set qo=Rect(13504.,-23360.,13632.,-23232.)
set Qo=Rect(13760.,-23232.,13888.,-23104.)
set so=Rect(13504.,-22976.,13632.,-22848.)
set So=Rect(15680.,-21696.,15808.,-21568.)
set to=Rect(14656.,-22592.,14784.,-22464.)
set To=Rect(14656.,-22208.,14784.,-22080.)
set uo=Rect(13888.,-23616.,14016.,-23488.)
set Uo=Rect(8384.,-20032.,8512.,-19904.)
set wo=Rect(7872.,-19392.,8000.,-19264.)
set Wo=Rect(6976.,-19264.,7104.,-19136.)
set yo=Rect(6336.,-19648.,6464.,-19520.)
set Yo=Rect(6208.,-19264.,6336.,-19136.)
set zo=Rect(11456.,-19456.,11584.,-19328.)
set Zo=Rect(10432.,-19712.,10560.,-19584.)
set vr=Rect(11456.,-19968.,11584.,-19840.)
set er=Rect(10432.,-20224.,10560.,-20096.)
set xr=Rect(15424.,-26880.,15552.,-26752.)
set rr=Rect(14784.,-26560.,14912.,-26432.)
set ir=Rect(15424.,-26240.,15552.,-26112.)
set ar=Rect(14784.,-26176.,14912.,-26048.)
set nr=Rect(13504.,-26304.,13632.,-26176.)
set Vr=Rect(12736.,-26816.,12864.,-26688.)
set Er=Rect(12608.,-26432.,12736.,-26304.)
set Xr=Rect(2880.,-25664.,3008.,-25536.)
set Rr=Rect(3648.,-25920.,3776.,-25792.)
set Ir=Rect(3904.,-25152.,4032.,-25024.)
set Ar=Rect(5568.,-25536.,5696.,-25408.)
set Nr=Rect(6464.,-27584.,6592.,-27456.)
set br=Rect(6720.,-25536.,6848.,-25408.)
set Br=Rect(6592.,-25280.,6720.,-25152.)
set cr=Rect(6592.,-25792.,6720.,-25664.)
set Cr=Rect(-6208.,-31296.,-6080.,-31168.)
set dr=Rect(-3904.,-29472.,-3776.,-29376.)
set Dr=Rect(-2368.,-30144.,-2240.,-30016.)
set fr=Rect(-3008.,13888.,-2880.,14016.)
set Fr=Rect(-2112.,13888.,-1984.,14016.)
set gr=Rect(-1344.,14016.,-1216.,14144.)
set Gr=Rect(-1856.,14528.,-1728.,14656.)
set hr=Rect(-3264.,15168.,-3136.,15296.)
set Hr=Rect(-4160.,15168.,-4032.,15296.)
set jr=Rect(-3904.,16320.,-3776.,16448.)
set Jr=Rect(-3648.,15680.,-3520.,15808.)
set kr=Rect(-1536.,15200.,-1408.,15296.)
set Kr=Rect(-1152.,15200.,-1024.,15296.)
set lr=Rect(-768.,15200.,-640.,15296.)
set Lr=Rect(2304.,13376.,2432.,13504.)
set mr=Rect(2880.,13248.,3008.,13376.)
set Mr=Rect(2496.,13440.,2624.,13568.)
set pr=Rect(3136.,13376.,3264.,13504.)
set Pr=Rect(3520.,14400.,3648.,14528.)
set qr=Rect(5184.,14912.,5312.,15424.)
set Qr=Rect(26176.,-3520.,26368.,-3392.)
set sr=Rect(24192.,-1984.,24384.,-1856.)
set Sr=Rect(24000.,-1984.,24192.,-1856.)
set tr=Rect(23808.,-1984.,24000.,-1856.)
set Tr=Rect(23616.,-1984.,23808.,-1856.)
set ur=Rect(23424.,-1984.,23616.,-1856.)
set Ur=Rect(23232.,-1984.,23424.,-1856.)
set wr=Rect(23040.,-1984.,23232.,-1856.)
set Wr=Rect(22848.,-1984.,23040.,-1856.)
set yr=Rect(22656.,-1984.,22848.,-1856.)
set Yr=Rect(22464.,-1984.,22656.,-1856.)
set zr=Rect(22272.,-1984.,22464.,-1856.)
set Zr=Rect(22080.,-1984.,22272.,-1856.)
set vi=Rect(21888.,-1984.,22080.,-1856.)
set ei=Rect(22592.,-4544.,22784.,-4416.)
set xi=Rect(22784.,-4544.,22976.,-4416.)
set oi=Rect(22976.,-4544.,23168.,-4416.)
set ri=Rect(23168.,-4544.,23360.,-4416.)
set ii=Rect(23360.,-4544.,23552.,-4416.)
set ai=Rect(23552.,-4544.,23744.,-4416.)
set ni=Rect(23744.,-4544.,23936.,-4416.)
set Vi=Rect(23936.,-4544.,24128.,-4416.)
set Ei=Rect(23936.,-4672.,24128.,-4544.)
set Xi=Rect(22688.,-4928.,22880.,-4800.)
set Oi=Rect(23232.,-4928.,23424.,-4800.)
set Ri=Rect(23808.,-4928.,24000.,-4800.)
set Ii=Rect(24288.,-3904.,24480.,-3776.)
set Ai=Rect(24512.,-3904.,24704.,-3776.)
set Ni=Rect(24768.,-3904.,24960.,-3776.)
set bi=Rect(24992.,-3904.,25184.,-3776.)
set Bi=Rect(25216.,-3904.,25408.,-3776.)
set ci=Rect(25408.,-3904.,25600.,-3776.)
set Ci=Rect(25600.,-3904.,25792.,-3776.)
set di=Rect(25792.,-3904.,25984.,-3776.)
set Di=Rect(25984.,-3904.,26176.,-3776.)
set fi=Rect(24288.,-4032.,24480.,-3904.)
set Fi=Rect(24896.,-5312.,25120.,-5184.)
set gi=Rect(25120.,-5312.,25344.,-5184.)
set Gi=Rect(26368.,-3520.,26560.,-3392.)
set hi=Rect(26560.,-3520.,26752.,-3392.)
set Hi=Rect(26752.,-3520.,26944.,-3392.)
set ji=Rect(26944.,-3520.,27136.,-3392.)
set Ji=Rect(27136.,-3520.,27328.,-3392.)
set ki=Rect(26048.,-10816.,26240.,-10688.)
set Ki=Rect(24800.,-11808.,25024.,-11680.)
set li=Rect(24576.,-11808.,24800.,-11680.)
set Li=Rect(24352.,-11808.,24576.,-11680.)
set mi=Rect(24128.,-11808.,24352.,-11680.)
set Mi=Rect(23904.,-11808.,24128.,-11680.)
set pi=Rect(23680.,-11808.,23904.,-11680.)
set Pi=Rect(23456.,-11808.,23680.,-11680.)
set qi=Rect(23328.,-11808.,23456.,-11680.)
set Qi=Rect(21632.,-5568.,21760.,-5440.)
set si=Rect(21824.,-5568.,21952.,-5440.)
set Si=Rect(22016.,-5568.,22144.,-5440.)
set ti=Rect(22208.,-5568.,22336.,-5440.)
set Ti=Rect(19040.,-4800.,19200.,-4672.)
set ui=Rect(18432.,-4800.,18560.,-4672.)
set Ui=Rect(17728.,-2496.,17792.,-2368.)
set wi=Rect(25152.,-7264.,25312.,-7104.)
set Wi=Rect(25344.,-7264.,25504.,-7104.)
set yi=Rect(25536.,-7264.,25696.,-7104.)
set Yi=Rect(25728.,-7264.,25888.,-7104.)
set zi=Rect(25920.,-7264.,26080.,-7104.)
set Zi=Rect(26112.,-7264.,26272.,-7104.)
set va=Rect(26304.,-7264.,26464.,-7104.)
set ea=Rect(26496.,-7264.,26656.,-7104.)
set xa=Rect(26688.,-7264.,26848.,-7104.)
set oa=Rect(22912.,-9888.,23008.,-9792.)
set ra=Rect(23136.,-9888.,23264.,-9792.)
set ia=Rect(19648.,-11904.,19808.,-11648.)
set aa=Rect(21312.,-10944.,21568.,-10816.)
set na=Rect(21824.,-10944.,22016.,-10816.)
set Va=Rect(22016.,-10944.,22240.,-10816.)
set Ea=Rect(22240.,-10944.,22464.,-10816.)
set Xa=Rect(20928.,-10944.,21184.,-10816.)
set Oa=Rect(19648.,-10816.,19776.,-10688.)
set Ra=Rect(21568.,-10944.,21824.,-10816.)
set Ia=Rect(19936.,-10560.,20384.,-10432.)
set Aa=Rect(24800.,-15072.,25024.,-14944.)
set Na=Rect(24576.,-15072.,24800.,-14944.)
set ba=Rect(24320.,-15072.,24544.,-14944.)
set Ba=Rect(24064.,-15072.,24288.,-14944.)
set ca=Rect(23808.,-15072.,24032.,-14944.)
set Ca=Rect(23552.,-15072.,23776.,-14944.)
set da=Rect(23296.,-15072.,23520.,-14944.)
set Da=Rect(22976.,-15072.,23200.,-14944.)
set fa=Rect(22688.,-15072.,22912.,-14944.)
set Fa=Rect(22400.,-15072.,22624.,-14944.)
set ga=Rect(22112.,-15072.,22336.,-14944.)
set Ga=Rect(21824.,-15072.,22048.,-14944.)
set ha=Rect(21440.,-15072.,21728.,-14944.)
set Ha=Rect(21216.,-15072.,21344.,-14944.)
set ja=Rect(21184.,-14784.,21408.,-14656.)
set Ja=Rect(21184.,-14528.,21408.,-14400.)
set ka=Rect(21184.,-14272.,21408.,-14144.)
set Ka=Rect(21184.,-14016.,21408.,-13888.)
set la=Rect(21184.,-13728.,21408.,-13632.)
set La=Rect(18752.,-22720.,18816.,-22592.)
set ma=Rect(25216.,-25152.,25344.,-25024.)
set Ma=Rect(26528.,-25152.,26624.,-25024.)
set pa=Rect(26368.,-24576.,26464.,-24448.)
set Pa=Rect(24288.,-24192.,24384.,-24064.)
set qa=Rect(25472.,-24000.,25600.,-23872.)
set Qa=Rect(25632.,-24000.,25760.,-23872.)
set sa=Rect(17344.,-21376.,17472.,-21248.)
set Sa=Rect(23552.,6912.,23616.,7104.)
set ta=Rect(25632.,6912.,25792.,7168.)
set Ta=Rect(21120.,-6784.,21216.,-6592.)
set ua=Rect(20320.,-7296.,20448.,-7168.)
set Ua=Rect(19136.,320.,19264.,448.)
set wa=Rect(17952.,2240.,18080.,2368.)
set Wa=Rect(18624.,1184.,18848.,1248.)
set ya=Rect(18208.,-960.,18336.,-832.)
set Ya=Rect(18848.,-960.,18976.,-832.)
set za=Rect(19488.,-960.,19616.,-832.)
set Za=Rect(22592.,-4384.,23904.,-4256.)
set vn=Rect(24256.,-3680.,26048.,-3552.)
set en=Rect(26176.,-3392.,27328.,-3168.)
set xn=Rect(25664.,-3776.,26176.,-3648.)
set on=Rect(24160.,-6528.,24352.,-6432.)
set rn=Rect(24768.,-7264.,24928.,-7104.)
set in=Rect(24960.,-7264.,25120.,-7104.)
set an=Rect(8512.,14912.,8640.,15040.)
set nn=Rect(14912.,9664.,16000.,9728.)
set Vn=Rect(18624.,13504.,19264.,13632.)
set En=Rect(19424.,13632.,19552.,14144.)
set Xn=Rect(19136.,13632.,19264.,14144.)
set On=Rect(18880.,13632.,19008.,14144.)
set Rn=Rect(18624.,13632.,18752.,14144.)
set In=Rect(15040.,14144.,15168.,14272.)
set An=Rect(15040.,11200.,15168.,11456.)
set Nn=Rect(15936.,11200.,16064.,11456.)
set bn=Rect(22976.,15744.,23488.,15872.)
set Bn=Rect(21952.,16320.,22080.,16448.)
set cn=Rect(22464.,16448.,22592.,16576.)
set Cn=Rect(22848.,16320.,22976.,16448.)
set dn=Rect(16448.,15200.,16704.,15328.)
set Dn=Rect(14912.,9600.,16000.,9664.)
set fn=Rect(15040.,15424.,15168.,16192.)
set Fn=Rect(21216.,11584.,21408.,11840.)
set gn=Rect(21312.,12448.,21856.,12640.)
set Gn=Rect(22304.,13440.,22880.,13632.)
set hn=Rect(22720.,13824.,22848.,13984.)
set Hn=Rect(22592.,13984.,22720.,14144.)
set jn=Rect(25280.,14272.,25408.,14528.)
set Jn=Rect(768.,19520.,864.,19616.)
set kn=Rect(11296.,17632.,11392.,17824.)
set Kn=Rect(10816.,18624.,10944.,18752.)
set ln=Rect(4160.,-352.,4544.,-128.)
set Ln=Rect(2496.,18496.,2624.,18624.)
set mn=Rect(5440.,17984.,5568.,18112.)
set Mn=Rect(6208.,17088.,6336.,17216.)
set pn=Rect(8768.,17984.,8896.,18112.)
set Pn=Rect(8768.,18240.,8896.,18368.)
set qn=Rect(9280.,19264.,9408.,19392.)
set Qn=Rect(13376.,18112.,13504.,18240.)
set sn=Rect(17856.,18496.,17984.,18624.)
set Sn=Rect(25664.,-10560.,25792.,-10432.)
set tn=Rect(17088.,-16448.,17216.,-16320.)
set Tn=Rect(21696.,-1728.,21824.,-1600.)
set un=Rect(24512.,-8256.,24640.,-8128.)
set Un=Rect(26912.,-8832.,27040.,-8704.)
set wn=Rect(26912.,-8928.,27040.,-8800.)
set Wn=Rect(17472.,-20416.,17600.,-20288.)
set yn=Rect(22720.,-21600.,22848.,-21472.)
set Yn=Rect(19008.,15552.,19136.,15680.)
set zn=Rect(11200.,12992.,11328.,13120.)
set Zn=Rect(14912.,11584.,15040.,11712.)
set vV=Rect(19392.,13376.,19520.,13504.)
set eV=Rect(192.,19904.,320.,20032.)
set xV=Rect(448.,18752.,576.,18880.)
set oV=Rect(14272.,18880.,14400.,19008.)
set rV=Rect(16704.,19136.,16832.,19264.)
set iV=Rect(17344.,19264.,17472.,19392.)
set aV=Rect(-7616.,-576.,-7488.,-448.)
set nV=Rect(-5184.,-448.,-5056.,-320.)
set VV=Rect(-1472.,-3136.,-1344.,-3008.)
set EV=Rect(8512.,-1728.,8640.,-1600.)
set XV=Rect(9408.,-2880.,9536.,-2752.)
set OV=Rect(10048.,-2880.,10176.,-2752.)
set RV=Rect(10688.,-2880.,10816.,-2752.)
set IV=Rect(-3392.,2880.,-3264.,3008.)
set AV=Rect(-4160.,4544.,-4032.,4672.)
set NV=Rect(-3392.,7232.,-3264.,7360.)
set bV=Rect(4544.,5056.,4672.,5184.)
set BV=Rect(9920.,-12096.,10048.,-11968.)
set cV=Rect(12608.,-11456.,12736.,-11328.)
set CV=Rect(10048.,-16704.,10176.,-16576.)
set dV=Rect(-5952.,-17472.,-5824.,-17344.)
set DV=Rect(-1856.,-22208.,-1728.,-22080.)
set fV=Rect(-1344.,-20928.,-1216.,-20800.)
set FV=Rect(4544.,-22336.,4672.,-22208.)
set gV=Rect(4416.,-21696.,4544.,-21568.)
set GV=Rect(15296.,-22592.,15424.,-22464.)
set hV=Rect(14656.,-21824.,14784.,-21696.)
set HV=Rect(11072.,-20416.,11200.,-20288.)
set jV=Rect(-3904.,-30016.,-3776.,-29888.)
set JV=Rect(-7744.,-30528.,-7616.,-30400.)
set kV=Rect(-6208.,-29120.,-6080.,-28992.)
set KV=Rect(-1088.,9664.,-960.,9792.)
set lV=Rect(2752.,9920.,2880.,10048.)
set LV=Rect(16864.,-2240.,16992.,-2112.)
set mV=Rect(25152.,192.,25280.,320.)
set MV=Rect(24896.,1216.,25024.,1344.)
set pV=Rect(26432.,5824.,26560.,5952.)
set PV=Rect(20928.,-5088.,21056.,-4960.)
set qV=Rect(18752.,1920.,18880.,2048.)
set QV=Rect(23040.,704.,23168.,832.)
set sV=Rect(22912.,192.,23040.,320.)
set SV=Rect(20864.,-832.,20992.,-704.)
set tV=Rect(-1408.,-31744.,2304.,-29312.)
set TV=Rect(17216.,7392.,17344.,7520.)
set uV=Rect(17600.,7264.,17728.,7392.)
set UV=Rect(-1088.,-7360.,-960.,-7232.)
set wV=Rect(-320.,-7104.,-192.,-6976.)
set WV=Rect(5312.,-7104.,5440.,-6976.)
set yV=Rect(5568.,-6720.,5696.,-6592.)
set YV=Rect(5824.,-6336.,5952.,-6208.)
set zV=Rect(5440.,-7616.,5568.,-7488.)
set ZV=Rect(8576.,-7360.,8704.,-7232.)
set vE=Rect(8576.,-7232.,8704.,-7104.)
set eE=Rect(8320.,-7360.,8448.,-7232.)
set xE=Rect(13248.,-5440.,13376.,-5312.)
set oE=Rect(11968.,-6464.,12096.,-6336.)
set rE=Rect(14272.,-6848.,14400.,-6720.)
set iE=Rect(-6720.,-4800.,-6592.,-4672.)
set aE=Rect(17728.,-9408.,17856.,-9280.)
set nE=Rect(19584.,-15040.,19712.,-14912.)
set VE=Rect(25152.,-9696.,25280.,-9568.)
set EE=Rect(18240.,-15680.,18368.,-15552.)
set XE=Rect(18368.,-15680.,18496.,-15552.)
set OE=Rect(22208.,-4032.,22336.,-3904.)
set RE=Rect(26560.,-1728.,26688.,-1600.)
set IE=Rect(25792.,-3520.,25920.,-3392.)
set AE=Rect(16960.,-11200.,17088.,-11072.)
set NE=Rect(17216.,-11328.,17344.,-11200.)
set bE=Rect(22336.,-13376.,22464.,-13248.)
set BE=Rect(24000.,-14272.,24128.,-14144.)
set cE=Rect(22720.,-5952.,22848.,-5824.)
set CE=Rect(25664.,-16192.,25792.,-16064.)
set dE=Rect(21696.,-18752.,21824.,-18624.)
set DE=Rect(25920.,-26848.,26048.,-26720.)
set fE=Rect(17856.,-24160.,17984.,-24032.)
set FE=Rect(22848.,15936.,22976.,16064.)
set gE=Rect(21312.,15680.,21440.,15808.)
set GE=Rect(15296.,10816.,15424.,10944.)
set hE=Rect(17216.,10816.,17344.,10944.)
set HE=Rect(-7488.,20032.,-7360.,20160.)
set jE=Rect(-1856.,19776.,-1728.,19904.)
set JE=Rect(832.,18368.,960.,18496.)
set kE=Rect(-1472.,-192.,-1344.,-64.)
set KE=Rect(-1472.,-64.,-1344.,64.)
set lE=Rect(3648.,-576.,3776.,-448.)
set LE=Rect(4608.,-2880.,4736.,-2752.)
set mE=Rect(11712.,-960.,11840.,-832.)
set ME=Rect(13120.,-1856.,13248.,-1728.)
set pE=Rect(14912.,-960.,15040.,-832.)
set PE=Rect(-5568.,3136.,-5440.,3264.)
set qE=Rect(-2368.,3520.,-2240.,3648.)
set QE=Rect(-1984.,3552.,-1856.,3680.)
set sE=Rect(-1600.,3584.,-1472.,3712.)
set SE=Rect(1216.,2592.,1344.,2720.)
set tE=Rect(1728.,5312.,1856.,5440.)
set TE=Rect(-1856.,6976.,-1728.,7104.)
set uE=Rect(-7104.,6976.,-6976.,7104.)
set UE=Rect(6336.,6976.,6464.,7104.)
set wE=Rect(7744.,7104.,7872.,7232.)
set WE=Rect(5184.,3520.,5312.,3648.)
set yE=Rect(5696.,3520.,5824.,3648.)
set YE=Rect(4672.,-10944.,4800.,-10816.)
set zE=Rect(10432.,-12096.,10560.,-11968.)
set ZE=Rect(14784.,-11584.,14912.,-11456.)
set vX=Rect(9920.,-10176.,10048.,-10048.)
set eX=Rect(-5184.,-15936.,-5056.,-15808.)
set xX=Rect(-6208.,-14784.,-6080.,-14656.)
set oX=Rect(-1600.,-15680.,-1472.,-15552.)
set rX=Rect(2368.,-14144.,2496.,-14016.)
set iX=Rect(3776.,-15040.,3904.,-14912.)
set aX=Rect(1728.,-15808.,1856.,-15680.)
set nX=Rect(4544.,-16448.,4672.,-16320.)
set VX=Rect(7616.,-15552.,7744.,-15424.)
set EX=Rect(9664.,-15424.,9792.,-15296.)
set XX=Rect(10176.,-15936.,10304.,-15808.)
set OX=Rect(15680.,-15936.,15808.,-15808.)
set RX=Rect(-5952.,-19072.,-5824.,-18944.)
set IX=Rect(-3520.,-17472.,-3392.,-17344.)
set AX=Rect(-5056.,-21568.,-4928.,-21440.)
set NX=Rect(-3520.,-21184.,-3392.,-21056.)
set bX=Rect(-3520.,-21056.,-3392.,-20928.)
set BX=Rect(-3264.,-22208.,-3136.,-22080.)
set cX=Rect(12160.,-21696.,12288.,-21568.)
set CX=Rect(11456.,-19136.,11584.,-19008.)
set dX=Rect(10432.,-19136.,10560.,-19008.)
set DX=Rect(-6016.,-26816.,-5888.,-26688.)
set fX=Rect(-1536.,-27328.,-1408.,-27200.)
set FX=Rect(704.,-27328.,832.,-27200.)
set gX=Rect(576.,-26432.,704.,-26304.)
set GX=Rect(832.,-25792.,960.,-25664.)
set hX=Rect(1472.,-25792.,1600.,-25664.)
set HX=Rect(5184.,-26560.,5312.,-26432.)
set jX=Rect(-4544.,-29632.,-4416.,-29504.)
set JX=Rect(-4672.,10048.,-4544.,10176.)
set kX=Rect(6080.,9536.,6208.,9664.)
set KX=Rect(7232.,9536.,7360.,9664.)
set lX=Rect(8128.,9536.,8256.,9664.)
set LX=Rect(-7488.,12864.,-7360.,12992.)
set mX=Rect(-6464.,14912.,-6336.,15040.)
set MX=Rect(-1728.,15808.,-1600.,15936.)
set pX=Rect(19008.,-2912.,19136.,-2784.)
set PX=Rect(26944.,5696.,27072.,5824.)
set qX=Rect(-3520.,-4960.,-3232.,-4736.)
set QX=Rect(1728.,-29024.,1984.,-28768.)
set sX=Rect(-3680.,-26208.,-3552.,-25984.)
set SX=Rect(704.,-29280.,832.,-29056.)
set tX=Rect(14560.,3488.,14624.,3648.)
set TX=Rect(14816.,3488.,14880.,3648.)
set uX=Rect(15072.,3488.,15136.,3648.)
set UX=Rect(15328.,3488.,15392.,3648.)
set wX=Rect(15584.,3488.,15648.,3648.)
set WX=Rect(15840.,3488.,15904.,3648.)
set yX=Rect(16096.,3488.,16192.,3648.)
set YX=Rect(8256.,-29152.,8384.,-28992.)
set zX=Rect(8512.,-29152.,8640.,-28992.)
set ZX=Rect(8768.,-29152.,8896.,-28992.)
set vO=Rect(9024.,-29152.,9152.,-28992.)
set eO=Rect(9280.,-29152.,9408.,-28992.)
set xO=Rect(9536.,-29152.,9664.,-28992.)
set oO=Rect(9792.,-29152.,9920.,-28992.)
set rO=Rect(25792.,-13792.,25920.,-13632.)
set iO=Rect(26048.,-13792.,26176.,-13632.)
set aO=Rect(26304.,-13792.,26432.,-13632.)
set nO=Rect(26560.,-13792.,26688.,-13632.)
set VO=Rect(26816.,-13792.,26944.,-13632.)
set EO=Rect(27072.,-13792.,27200.,-13632.)
set XO=Rect(27328.,-13792.,27456.,-13632.)
set OO=Rect(3264.,-31456.,3392.,-31296.)
set RO=Rect(3520.,-31456.,3648.,-31296.)
set IO=Rect(3776.,-31456.,3904.,-31296.)
set AO=Rect(4032.,-31456.,4160.,-31296.)
set NO=Rect(4288.,-31456.,4416.,-31296.)
set bO=Rect(4544.,-31456.,4672.,-31296.)
set BO=Rect(4800.,-31456.,4928.,-31296.)
set cO=Rect(6336.,-31456.,6464.,-31296.)
set CO=Rect(6592.,-31456.,6720.,-31296.)
set dO=Rect(6848.,-31456.,6976.,-31296.)
set DO=Rect(7104.,-31456.,7232.,-31296.)
set fO=Rect(7360.,-31456.,7488.,-31296.)
set FO=Rect(7616.,-31456.,7744.,-31296.)
set gO=Rect(7872.,-31456.,8000.,-31296.)
set GO=Rect(27456.,-5824.,27584.,-5664.)
set hO=Rect(27200.,-5824.,27328.,-5664.)
set HO=Rect(26944.,-5824.,27072.,-5664.)
set jO=Rect(26688.,-5824.,26816.,-5664.)
set JO=Rect(26432.,-5824.,26560.,-5664.)
set kO=Rect(26176.,-5824.,26304.,-5664.)
set KO=Rect(25920.,-5824.,26048.,-5664.)
set lO=Rect(9408.,-31456.,9536.,-31296.)
set LO=Rect(9664.,-31456.,9792.,-31296.)
set mO=Rect(9920.,-31456.,10048.,-31296.)
set MO=Rect(10176.,-31456.,10304.,-31296.)
set pO=Rect(10432.,-31456.,10560.,-31296.)
set PO=Rect(10688.,-31456.,10816.,-31296.)
set qO=Rect(10944.,-31456.,11072.,-31296.)
set QO=Rect(15808.,4000.,15840.,4032.)
set sO=Rect(9536.,-28608.,9568.,-28576.)
set SO=Rect(27072.,-13248.,27104.,-13216.)
set tO=Rect(4544.,-30944.,4576.,-30912.)
set TO=Rect(7584.,-30912.,7616.,-30880.)
set uO=Rect(26304.,-6272.,26336.,-6240.)
set UO=Rect(10688.,-30912.,10720.,-30880.)
set wO=Rect(11328.,6560.,11456.,6784.)
set WO=Rect(14400.,3232.,14528.,3456.)
set yO=Rect(-4544.,-29856.,-4416.,-29760.)
set YO=Rect(8128.,-29408.,8256.,-29184.)
set zO=Rect(-3744.,-22400.,-3616.,-22336.)
set ZO=Rect(25664.,-14048.,25792.,-13824.)
set vR=Rect(10688.,-11712.,10816.,-11584.)
set eR=Rect(3136.,-31744.,3264.,-31520.)
set xR=Rect(-64.,-19680.,64.,-19456.)
set oR=Rect(6208.,-31712.,6336.,-31488.)
set rR=Rect(27200.,-2048.,27328.,-1984.)
set iR=Rect(27584.,-5664.,27712.,-5440.)
set aR=Rect(18496.,6048.,18624.,6272.)
set nR=Rect(9280.,-31712.,9408.,-31488.)
set VR=Rect(3456.,32.,3840.,256.)
set ER=Rect(18496.,-9408.,18624.,-9280.)
set XR=Rect(16960.,-13248.,17088.,-13120.)
set OR=Rect(16960.,-13504.,17088.,-13376.)
set RR=Rect(27840.,-11456.,27968.,-11328.)
set IR=Rect(26432.,-9152.,26560.,-9024.)
set AR=Rect(21696.,-3008.,21824.,-2880.)
set NR=Rect(24512.,-2240.,24640.,-2112.)
set bR=Rect(20672.,-10176.,20800.,-10048.)
set BR=Rect(23200.,-9664.,23328.,-9536.)
set cR=Rect(23872.,-14272.,24000.,-14144.)
set CR=Rect(26912.,-8736.,27040.,-8608.)
set dR=Rect(17472.,-26848.,17600.,-26720.)
set DR=Rect(22336.,16192.,22464.,16320.)
set fR=Rect(10816.,14784.,10944.,14912.)
set FR=Rect(10816.,14528.,10944.,14656.)
set gR=Rect(9792.,18752.,9920.,18880.)
set GR=Rect(-7616.,-25152.,-7488.,-25024.)
set hR=Rect(-4928.,-26816.,-4800.,-26688.)
set HR=Rect(-7616.,-27072.,-7488.,-26944.)
set jR=Rect(-4672.,-27840.,-4544.,-27712.)
set JR=Rect(-3904.,-27072.,-3776.,-26944.)
set kR=Rect(-4416.,-25536.,-4288.,-25408.)
set KR=Rect(-4416.,-25792.,-4288.,-25664.)
set lR=Rect(-448.,-27840.,-320.,-27712.)
set LR=Rect(-192.,-25792.,-64.,-25664.)
set mR=Rect(3776.,-25536.,3904.,-25408.)
set MR=Rect(10560.,-25920.,10688.,-25792.)
set pR=Rect(9152.,-25408.,9280.,-25280.)
set PR=Rect(-2112.,-30144.,-1984.,-30016.)
set qR=Rect(-7744.,-30272.,-7616.,-30144.)
set QR=Rect(1216.,13888.,1344.,14016.)
set sR=Rect(2496.,14528.,2624.,14656.)
set SR=Rect(7840.,640.,8032.,864.)
set tR=Rect(14464.,6432.,15232.,6560.)
set TR=Rect(320.,-19680.,1088.,-19552.)
set uR=Rect(12672.,-27872.,13440.,-27744.)
set UR=Rect(22144.,9024.,22912.,9152.)
set wR=Rect(3648.,-17088.,3776.,-16960.)
set WR=Rect(14016.,-25792.,14304.,-25600.)
set yR=Rect(23424.,-29152.,23552.,-28992.)
set YR=Rect(5184.,-16064.,5312.,-15936.)
set zR=Rect(6464.,-16320.,6592.,-16192.)
set ZR=Rect(5312.,-14528.,5440.,-14400.)
set vI=Rect(6848.,-15040.,6976.,-14912.)
set eI=Rect(6848.,-15424.,6976.,-15296.)
set xI=Rect(7488.,-16704.,7616.,-16576.)
set oI=Rect(9664.,-17472.,9792.,-17344.)
set rI=Rect(8896.,-14784.,9024.,-14656.)
set iI=Rect(11584.,-15808.,11712.,-15680.)
set aI=Rect(9920.,-14272.,10048.,-14144.)
set nI=Rect(13120.,-17472.,13248.,-17376.)
set VI=Rect(11584.,-14656.,11712.,-14528.)
set EI=Rect(-5952.,-18656.,-5824.,-18496.)
set XI=Rect(-7552.,-17472.,-7424.,-17344.)
set OI=Rect(-7104.,-18112.,-6976.,-17984.)
set RI=Rect(-5824.,-16576.,-5696.,-16448.)
set II=Rect(-2880.,-19648.,-2752.,-19552.)
set AI=Rect(-832.,-18240.,-704.,-18112.)
set NI=Rect(-4672.,-17344.,-4544.,-17216.)
set bI=Rect(-1728.,-16704.,-1600.,-16576.)
set BI=Rect(-64.,-26944.,64.,-26816.)
set cI=Rect(-320.,-26304.,-192.,-26176.)
set CI=Rect(-7616.,13376.,-7488.,13504.)
set dI=Rect(-7104.,16192.,-6976.,16320.)
set DI=Rect(-6400.,16192.,-6272.,16320.)
set fI=Rect(-5696.,16192.,-5568.,16320.)
set FI=Rect(22720.,-5696.,22848.,-5568.)
set gI=Rect(17504.,-11712.,17664.,-11584.)
set GI=Rect(20544.,-9280.,20672.,-9152.)
set hI=Rect(17216.,-11456.,17344.,-11360.)
set HI=Rect(19520.,-10816.,19648.,-10688.)
set jI=Rect(20928.,-14656.,21056.,-14528.)
set JI=Rect(20032.,-15168.,20160.,-15040.)
set kI=Rect(19648.,-13248.,19776.,-13120.)
set KI=Rect(22656.,-13376.,22784.,-13248.)
set lI=Rect(23392.,-13376.,23520.,-13248.)
set LI=Rect(23040.,-13376.,23168.,-13248.)
set mI=Rect(23744.,-13376.,23872.,-13248.)
set MI=Rect(26176.,-1984.,26304.,-1856.)
set pI=Rect(21696.,-2048.,21824.,-1920.)
set PI=Rect(24640.,-4672.,24768.,-4544.)
set qI=Rect(22720.,-8896.,22848.,-8768.)
set QI=Rect(15232.,13376.,15360.,13504.)
set sI=Rect(17664.,14144.,17792.,14272.)
set SI=Rect(18624.,13056.,18752.,13184.)
set tI=Rect(15168.,13888.,15296.,14016.)
set TI=Rect(17088.,8384.,17216.,8512.)
set uI=Rect(5824.,-28768.,5952.,-28608.)
set UI=Rect(6080.,-28768.,6208.,-28608.)
set wI=Rect(6336.,-28768.,6464.,-28608.)
set WI=Rect(6592.,-28768.,6720.,-28608.)
set yI=Rect(6848.,-28768.,6976.,-28608.)
set YI=Rect(7104.,-28768.,7232.,-28608.)
set zI=Rect(7360.,-28768.,7488.,-28608.)
set ZI=Rect(-7424.,-7680.,-7296.,-7456.)
set vA=Rect(5952.,-6112.,6080.,-5888.)
set eA=Rect(-5184.,-512.,-5056.,-288.)
set xA=Rect(-5568.,3232.,-5440.,3456.)
set oA=Rect(-7488.,-12672.,-7360.,-12448.)
set rA=Rect(15680.,-15680.,15808.,-15552.)
set iA=Rect(-3520.,-17536.,-3392.,-17312.)
set aA=Rect(3264.,-22464.,3392.,-22336.)
set nA=Rect(-4160.,-30432.,-4032.,-30208.)
set VA=Rect(25152.,-1760.,25280.,-1536.)
set EA=Rect(-832.,-29920.,-704.,-29696.)
set XA=Rect(11392.,6368.,11424.,6400.)
set OA=Rect(-4480.,-30112.,-4448.,-30080.)
set RA=Rect(-3712.,-22560.,-3680.,-22528.)
set IA=Rect(10752.,-11808.,10784.,-11776.)
set AA=Rect(.0,-19744.,32.,-19712.)
set NA=Rect(27264.,-1888.,27296.,-1856.)
set bA=Rect(18560.,5920.,18592.,5952.)
set BA=Rect(-7456.,1728.,-7136.,1856.)
set cA=Rect(-5568.,1856.,-5440.,1984.)
set CA=Rect(-4128.,1728.,-3808.,1856.)
set dA=Rect(-2112.,1728.,-576.,1856.)
set DA=Rect(320.,3520.,576.,3648.)
set fA=Rect(-192.,3520.,64.,3648.)
set FA=Rect(-704.,3520.,-448.,3648.)
set gA=Rect(-1600.,3392.,-1472.,3520.)
set GA=Rect(-1984.,3392.,-1856.,3520.)
set hA=Rect(-2368.,3392.,-2240.,3520.)
set HA=Rect(2240.,2624.,3008.,2752.)
set jA=Rect(1216.,4288.,1600.,4416.)
set JA=Rect(1984.,4544.,2112.,4640.)
set kA=Rect(-3648.,5312.,-3264.,5440.)
set KA=Rect(-4672.,5792.,-4544.,5920.)
set lA=Rect(-3776.,6432.,-3648.,6560.)
set LA=Rect(-7488.,4032.,-7104.,4160.)
set mA=Rect(-6336.,6336.,-5952.,6464.)
set MA=Rect(2496.,5056.,2624.,5184.)
set pA=Rect(4800.,2752.,5184.,2880.)
set PA=Rect(6336.,5568.,6464.,5696.)
set qA=Rect(5568.,5568.,5696.,5696.)
set QA=Rect(4800.,6336.,4928.,6464.)
set sA=Rect(12352.,2784.,14144.,2848.)
set SA=Rect(12352.,3424.,14144.,3520.)
set tA=Rect(9216.,6464.,9280.,6592.)
set TA=Rect(12352.,1344.,14144.,1600.)
set uA=Rect(12352.,2144.,14144.,2208.)
set UA=Rect(-3872.,-12384.,-3808.,-12256.)
set wA=Rect(480.,-12640.,2976.,-12512.)
set WA=Rect(3168.,-15936.,3232.,-15808.)
set yA=Rect(7392.,-14784.,7456.,-14656.)
set YA=Rect(9536.,-16480.,9632.,-16352.)
set zA=Rect(4192.,-12384.,4384.,-12256.)
set ZA=Rect(4448.,-11744.,4512.,-11616.)
set vN=Rect(13408.,-12768.,13856.,-12640.)
set eN=Rect(13792.,-11616.,13856.,-11488.)
set xN=Rect(-6048.,-19552.,-5728.,-19424.)
set oN=Rect(-6336.,-18656.,-6208.,-18528.)
set rN=Rect(-4544.,-18080.,-3648.,-18016.)
set iN=Rect(-4544.,-17440.,-3648.,-17376.)
set aN=Rect(3680.,-19648.,3904.,-19552.)
set nN=Rect(3680.,-18368.,3904.,-18272.)
set VN=Rect(192.,-17344.,416.,-17248.)
set EN=Rect(-6304.,-22976.,-6208.,-22848.)
set XN=Rect(-160.,-21312.,32.,-21216.)
set ON=Rect(1376.,-21056.,1568.,-20960.)
set RN=Rect(2528.,-22592.,2624.,-22496.)
set IN=Rect(3040.,-22592.,3136.,-22496.)
set AN=Rect(9440.,-22336.,9536.,-22240.)
set NN=Rect(14432.,-22336.,14528.,-22240.)
set bN=Rect(8544.,-20032.,8640.,-19936.)
set BN=Rect(13920.,-27840.,14016.,-27744.)
set cN=Rect(15552.,-27200.,15808.,-27104.)
set CN=Rect(-4640.,-27584.,-4544.,-27456.)
set dN=Rect(-4192.,-26560.,-4096.,-26464.)
set DN=Rect(-2848.,-26176.,-2752.,-26080.)
set fN=Rect(-1312.,-26176.,-1088.,-26080.)
set FN=Rect(-416.,-25792.,-320.,-25696.)
set gN=Rect(2528.,-26816.,2624.,-26720.)
set GN=Rect(5344.,-27584.,5440.,-27488.)
set hN=Rect(10080.,-27200.,10176.,-27104.)
set HN=Rect(8512.,-25792.,8640.,-25696.)
set jN=Rect(9440.,-26048.,9536.,-25920.)
set JN=Rect(10592.,-25664.,10688.,-25568.)
set kN=Rect(7776.,-27840.,7872.,-27744.)
set KN=Rect(-6048.,-31296.,-5952.,-31200.)
set lN=Rect(-7456.,-29888.,-6592.,-29792.)
set LN=Rect(-7456.,-29504.,-6592.,-29408.)
set mN=Rect(-2464.,-30912.,-2368.,-30816.)
set MN=Rect(-4000.,-30272.,-3776.,-30176.)
set pN=Rect(-3232.,-29888.,-3136.,-29792.)
set PN=Rect(1376.,-31424.,1472.,-31328.)
set qN=Rect(-928.,-26816.,-832.,-26720.)
set QN=Rect(5728.,-29376.,5824.,-29280.)
set sN=Rect(-5664.,9440.,-5568.,9504.)
set SN=Rect(-5152.,9440.,-5056.,9504.)
set tN=Rect(-4640.,9440.,-4544.,9504.)
set TN=Rect(-4128.,9440.,-4032.,9504.)
set uN=Rect(24384.,6688.,24544.,6816.)
set UN=Rect(-5664.,9920.,-5568.,9984.)
set wN=Rect(-5152.,9920.,-5056.,9984.)
set WN=Rect(-4640.,9920.,-4544.,9984.)
set yN=Rect(-4128.,9920.,-4032.,9984.)
set YN=Rect(26944.,5440.,27072.,5568.)
set zN=Rect(-3360.,9760.,-3264.,9856.)
set ZN=Rect(-4640.,10688.,-4544.,10784.)
set vb=Rect(26944.,6464.,27328.,6592.)
set eb=Rect(2400.,9760.,2496.,9888.)
set xb=Rect(4832.,10144.,4928.,10240.)
set ob=Rect(5344.,10144.,5440.,10240.)
set rb=Rect(26336.,4672.,26560.,4768.)
set ib=Rect(26048.,4768.,26560.,4896.)
set ab=Rect(9952.,9408.,10048.,9472.)
set nb=Rect(-2080.,15424.,-1984.,15520.)
set Vb=Rect(-32.,15680.,64.,15776.)
set Eb=Rect(2016.,14272.,2112.,14368.)
set Xb=Rect(2016.,14656.,2240.,14752.)
set Ob=Rect(5344.,13888.,5440.,13984.)
set Rb=Rect(26944.,7456.,27072.,7584.)
set Ib=Rect(27424.,7456.,27552.,7584.)
set Ab=Rect(26944.,7584.,27968.,7712.)
set Nb=Rect(19520.,-4192.,19776.,-4064.)
set bb=Rect(16960.,-6848.,17216.,-6720.)
set Bb=Rect(18112.,-6592.,18496.,-6464.)
set cb=Rect(18080.,-6464.,18208.,-6336.)
set Cb=Rect(18464.,-6464.,18560.,-6336.)
set db=Rect(17600.,-5824.,18880.,-5696.)
set Db=Rect(20928.,-5568.,21056.,-5440.)
set fb=Rect(20672.,-352.,20928.,-224.)
set Fb=Rect(21184.,928.,22336.,1056.)
set gb=Rect(18624.,-6336.,19136.,-6208.)
set Gb=Rect(24256.,-5440.,24384.,-5312.)
set hb=Rect(24640.,-4544.,24896.,-4416.)
set Hb=Rect(21696.,-1728.,21824.,-1600.)
set jb=Rect(25152.,-9920.,25280.,-9792.)
set Jb=Rect(24320.,-11200.,24448.,-11072.)
set kb=Rect(26176.,-10816.,26304.,-10688.)
set Kb=Rect(18528.,-8736.,18656.,-8608.)
set lb=Rect(18880.,-10048.,19008.,-9952.)
set Lb=Rect(23744.,-6976.,23872.,-6912.)
set mb=Rect(23424.,-6080.,23552.,-5952.)
set Mb=Rect(23232.,-5568.,23584.,-5440.)
set pb=Rect(19264.,-11456.,19648.,-11328.)
set Pb=Rect(24576.,-23008.,24704.,-22880.)
set qb=Rect(23744.,-19648.,24352.,-19520.)
set Qb=Rect(24768.,-19744.,25376.,-19616.)
set sb=Rect(25792.,-19392.,27584.,-19264.)
set Sb=Rect(26304.,-20576.,26432.,-20448.)
set tb=Rect(26816.,-20576.,26944.,-20448.)
set Tb=Rect(26208.,-19936.,26304.,-19840.)
set ub=Rect(26720.,-19936.,26816.,-19840.)
set Ub=Rect(26304.,-19808.,26432.,-19552.)
set wb=Rect(26816.,-19808.,26912.,-19552.)
set Wb=Rect(23872.,-19744.,24352.,-19616.)
set yb=Rect(22592.,-19104.,23488.,-18976.)
set Yb=Rect(22976.,-19584.,23104.,-19456.)
set zb=Rect(22880.,-19808.,22976.,-19680.)
set Zb=Rect(24000.,-25888.,24128.,-25632.)
set vB=Rect(24480.,-25888.,24768.,-25760.)
set eB=Rect(24896.,-26976.,25024.,-26848.)
set xB=Rect(26816.,-26976.,26944.,-26848.)
set oB=Rect(26784.,-26336.,26912.,-26208.)
set rB=Rect(26304.,-25888.,27072.,-25760.)
set iB=Rect(23616.,3744.,23872.,3872.)
set aB=Rect(22592.,5408.,22848.,5536.)
set nB=Rect(24128.,5792.,24544.,5920.)
set VB=Rect(23712.,6304.,24000.,6432.)
set EB=Rect(26560.,-1088.,26688.,-960.)
set XB=Rect(24896.,-448.,25152.,-320.)
set OB=Rect(20800.,4000.,20928.,4128.)
set RB=Rect(20928.,4384.,21312.,4512.)
set IB=Rect(27328.,5440.,27456.,5568.)
set AB=Rect(27104.,6336.,27264.,6496.)
set NB=Rect(27200.,3872.,27328.,4000.)
set bB=Rect(25792.,3872.,26688.,4000.)
set BB=Rect(26048.,4000.,26304.,4128.)
set cB=Rect(26432.,4896.,26560.,5024.)
set CB=Rect(25792.,4384.,25920.,4512.)
set dB=Rect(27072.,6816.,27968.,6944.)
set DB=Rect(27200.,6944.,27328.,7072.)
set fB=Rect(27616.,6944.,27840.,7072.)
set FB=Rect(27744.,7072.,27872.,7200.)
set gB=Rect(18624.,-7264.,18752.,-7136.)
set GB=Rect(14656.,3104.,14784.,3232.)
set hB=Rect(8384.,-29504.,8512.,-29376.)
set HB=Rect(25920.,-14144.,26048.,-14016.)
set jB=Rect(3392.,-31840.,3520.,-31712.)
set JB=Rect(6464.,-31808.,6592.,-31680.)
set kB=Rect(27328.,-5440.,27456.,-5312.)
set KB=Rect(9536.,-31840.,9664.,-31712.)
set lB=Rect(9152.,13760.,9824.,13888.)
set LB=Rect(9664.,13344.,9792.,13472.)
set mB=Rect(9536.,15424.,9664.,15552.)
set MB=Rect(11456.,12832.,11584.,12960.)
set pB=Rect(11456.,13504.,11584.,13632.)
set PB=Rect(11456.,14208.,11584.,14336.)
set qB=Rect(11456.,14880.,11584.,15008.)
set QB=Rect(17120.,15296.,17216.,15392.)
set sB=Rect(16832.,11840.,16960.,11968.)
set SB=Rect(17088.,12352.,17216.,12480.)
set tB=Rect(20288.,15040.,20416.,15168.)
set TB=Rect(20032.,15840.,20416.,15968.)
set uB=Rect(20160.,15520.,20288.,15648.)
set UB=Rect(19008.,15296.,19136.,15424.)
set wB=Rect(22176.,15648.,22752.,15776.)
set WB=Rect(21312.,11456.,21440.,11584.)
set yB=Rect(-6304.,18112.,-6208.,18208.)
set YB=Rect(-5312.,18624.,-5184.,18720.)
set zB=Rect(-4672.,19264.,-4544.,19360.)
set ZB=Rect(-320.,17856.,320.,17984.)
set vc=Rect(-320.,18656.,320.,18720.)
set ec=Rect(832.,18112.,960.,18208.)
set xc=Rect(3552.,19008.,3648.,19104.)
set oc=Rect(3776.,18752.,4160.,18848.)
set rc=Rect(3776.,19520.,4160.,19616.)
set ic=Rect(5216.,17984.,5312.,18080.)
set ac=Rect(5344.,19136.,5440.,19232.)
set nc=Rect(6880.,16704.,6976.,16800.)
set Vc=Rect(7232.,17472.,7616.,17568.)
set Ec=Rect(6464.,17472.,6560.,17568.)
set Xc=Rect(7744.,18496.,7840.,18592.)
set Oc=Rect(8640.,19136.,8896.,19232.)
set Rc=Rect(11456.,17984.,11712.,18080.)
set Ic=Rect(9664.,19648.,10048.,19744.)
set Ac=Rect(9664.,19136.,9792.,19232.)
set Nc=Rect(12608.,18496.,12736.,18560.)
set bc=Rect(12480.,18848.,12864.,18944.)
set Bc=Rect(13792.,17568.,13888.,17696.)
set cc=Rect(12896.,19232.,12992.,19680.)
set Cc=Rect(12224.,20192.,13120.,20288.)
set dc=Rect(14816.,18624.,14912.,18720.)
set Dc=Rect(16064.,18752.,16192.,18848.)
set fc=Rect(2752.,-6592.,2880.,-6464.)
set Fc=Rect(1344.,-6592.,1472.,-6464.)
set gc=Rect(6592.,-5952.,6720.,-5824.)
set Gc=Rect(13632.,-5440.,13760.,-5312.)
set hc=Rect(13504.,-6080.,13632.,-5952.)
set Hc=Rect(15680.,-7488.,15808.,-7360.)
set jc=Rect(-6336.,-3520.,-6208.,-3392.)
set Jc=Rect(-5184.,-3520.,-5056.,-3392.)
set kc=Rect(-4160.,-3520.,-4032.,-3392.)
set Kc=Rect(18240.,-9536.,18368.,-9408.)
set lc=Rect(19904.,-9536.,20032.,-9408.)
set Lc=Rect(16960.,-14016.,17088.,-13888.)
set mc=Rect(16960.,-14528.,17088.,-14400.)
set Mc=Rect(19264.,-13248.,19392.,-13120.)
set pc=Rect(25664.,-10944.,25792.,-10816.)
set Pc=Rect(27840.,-11072.,27968.,-10944.)
set qc=Rect(23360.,-11456.,23488.,-11328.)
set Qc=Rect(26752.,-11968.,26880.,-11840.)
set sc=Rect(18624.,-16576.,18752.,-16448.)
set Sc=Rect(17088.,-15680.,17216.,-15552.)
set tc=Rect(19776.,-17728.,19904.,-17600.)
set Tc=Rect(19520.,-15680.,19648.,-15552.)
set uc=Rect(22976.,-4928.,23104.,-4800.)
set Uc=Rect(23008.,-3264.,23104.,-1600.)
set wc=Rect(23680.,-3520.,23808.,-3392.)
set Wc=Rect(21696.,-1920.,21824.,-1792.)
set yc=Rect(22912.,-10176.,23040.,-10048.)
set Yc=Rect(17408.,-11712.,17536.,-11584.)
set zc=Rect(20544.,-9376.,20672.,-9248.)
set Zc=Rect(20448.,-11488.,20608.,-11328.)
set vC=Rect(22656.,-14272.,22784.,-14144.)
set eC=Rect(24064.,-13376.,24192.,-13248.)
set xC=Rect(25024.,-13248.,25152.,-13120.)
set oC=Rect(26816.,-7872.,26944.,-7744.)
set rC=Rect(22720.,-8768.,22848.,-8672.)
set iC=Rect(25792.,-8192.,25920.,-8064.)
set aC=Rect(24000.,-8928.,24128.,-8704.)
set nC=Rect(26176.,-16512.,26304.,-16384.)
set VC=Rect(22208.,-20288.,22336.,-20160.)
set EC=Rect(27328.,-17024.,27456.,-16896.)
set XC=Rect(27200.,-17856.,27328.,-17728.)
set OC=Rect(26944.,-16192.,27072.,-16064.)
set RC=Rect(22592.,-20032.,22720.,-19904.)
set IC=Rect(26880.,-25024.,27008.,-24896.)
set AC=Rect(27072.,-19904.,27200.,-19776.)
set NC=Rect(25536.,-19776.,25664.,-19648.)
set bC=Rect(18656.,-21568.,18752.,-21472.)
set BC=Rect(18368.,-22080.,18496.,-21952.)
set cC=Rect(17856.,-22272.,17984.,-22144.)
set CC=Rect(22080.,-22304.,22208.,-21888.)
set dC=Rect(22080.,-24160.,22208.,-24032.)
set DC=Rect(22208.,-25792.,22336.,-25664.)
set fC=Rect(21312.,-25088.,21440.,-24960.)
set FC=Rect(22432.,15744.,22496.,15840.)
set gC=Rect(22720.,16384.,22848.,16512.)
set GC=Rect(24192.,14656.,24320.,14784.)
set hC=Rect(20736.,14400.,20864.,14528.)
set HC=Rect(21760.,13376.,21888.,13504.)
set jC=Rect(25664.,12480.,25792.,12608.)
set JC=Rect(17600.,15808.,17728.,15936.)
set kC=Rect(18528.,16192.,18624.,16320.)
set KC=Rect(18112.,15104.,18240.,15232.)
set lC=Rect(10176.,13824.,10304.,13952.)
set LC=Rect(10688.,14400.,10816.,14528.)
set mC=Rect(9536.,15168.,9664.,15296.)
set MC=Rect(8256.,14144.,8384.,14272.)
set pC=Rect(19264.,16256.,19392.,16384.)
set PC=Rect(17984.,10816.,18112.,10944.)
set qC=Rect(12480.,15424.,12608.,15552.)
set QC=Rect(12352.,13440.,12480.,13568.)
set sC=Rect(16448.,11840.,16576.,11968.)
set SC=Rect(17280.,13920.,17408.,13984.)
set tC=Rect(19392.,13504.,19520.,13632.)
set TC=Rect(14912.,11200.,15040.,11328.)
set uC=Rect(17600.,9920.,17728.,10048.)
set UC=Rect(24064.,10176.,24192.,10304.)
set wC=Rect(-7488.,18368.,-7360.,18496.)
set WC=Rect(-6592.,17984.,-6464.,18112.)
set yC=Rect(-2752.,18240.,-2624.,18368.)
set YC=Rect(-3392.,19392.,-3264.,19520.)
set zC=Rect(-4032.,17728.,-3904.,17856.)
set ZC=Rect(1472.,19648.,1600.,19776.)
set vd=Rect(960.,19200.,1088.,19328.)
set ed=Rect(192.,18752.,320.,18880.)
set xd=Rect(5312.,19520.,5440.,19648.)
set od=Rect(5056.,17088.,5184.,17216.)
set rd=Rect(2112.,19520.,2240.,19648.)
set ad=Rect(6336.,17600.,6464.,17728.)
set nd=Rect(8768.,16960.,8896.,17088.)
set Vd=Rect(6208.,17344.,6336.,17472.)
set Ed=Rect(13248.,17856.,13376.,17984.)
set Xd=Rect(10752.,18752.,10880.,18880.)
set Od=Rect(11232.,17664.,11360.,17792.)
set Rd=Rect(11840.,18656.,11968.,18816.)
set Id=Rect(17728.,18368.,17856.,18496.)
set Ad=Rect(17600.,17984.,17728.,18112.)
set Nd=Rect(15488.,18752.,15616.,18880.)
set bd=Rect(16192.,19392.,16320.,19520.)
set Bd=Rect(-6080.,-1472.,-5952.,-1344.)
set cd=Rect(-3904.,-1344.,-3776.,-1216.)
set Cd=Rect(-2624.,-448.,-2496.,-320.)
set dd=Rect(-1472.,-576.,-1344.,-448.)
set Dd=Rect(-1216.,-3392.,-1088.,-3264.)
set fd=Rect(1152.,-3360.,1280.,-3296.)
set Fd=Rect(4544.,-4160.,4672.,-4032.)
set gd=Rect(3776.,-2112.,3904.,-1984.)
set Gd=Rect(8384.,-1856.,8512.,-1728.)
set hd=Rect(4224.,-3136.,4352.,-3008.)
set Hd=Rect(9408.,-2464.,9536.,-2368.)
set jd=Rect(10048.,-2464.,10176.,-2368.)
set Jd=Rect(10688.,-2464.,10816.,-2368.)
set kd=Rect(12224.,-3136.,12352.,-3008.)
set Kd=Rect(12928.,-3392.,13056.,-3264.)
set ld=Rect(8064.,704.,8192.,832.)
set Ld=Rect(-4416.,3392.,-4288.,3520.)
set md=Rect(-1984.,4672.,-1856.,4800.)
set Md=Rect(448.,2624.,576.,2752.)
set pd=Rect(2432.,4288.,2560.,4416.)
set Pd=Rect(-4416.,4544.,-4288.,4672.)
set qd=Rect(-1728.,6720.,-1600.,6848.)
set Qd=Rect(4288.,4928.,4416.,5056.)
set sd=Rect(3904.,6272.,4032.,6336.)
set Sd=Rect(2112.,7168.,2240.,7232.)
set td=Rect(-320.,6592.,-192.,6720.)
set Td=Rect(10176.,6784.,10304.,6848.)
set ud=Rect(14016.,1920.,14144.,1984.)
set Ud=Rect(6976.,3392.,7104.,3520.)
set wd=Rect(6848.,6848.,6976.,6976.)
set Wd=Rect(-5056.,-10816.,-4928.,-10688.)
set yd=Rect(-6464.,-12608.,-6336.,-12480.)
set Yd=Rect(-7744.,-12608.,-7616.,-12480.)
set zd=Rect(-4480.,-10368.,-4352.,-10240.)
set Zd=Rect(-1152.,-10816.,-1024.,-10688.)
set vD=Rect(1152.,-10688.,1280.,-10560.)
set eD=Rect(-320.,-10176.,-192.,-10048.)
set xD=Rect(3200.,-12352.,3328.,-12224.)
set oD=Rect(9920.,-11712.,10048.,-11584.)
set rD=Rect(10304.,-11712.,10432.,-11584.)
set iD=Rect(9536.,-12736.,9664.,-12608.)
set aD=Rect(9536.,-12224.,9664.,-12096.)
set nD=Rect(14784.,-12320.,14912.,-12224.)
set VD=Rect(14784.,-12096.,14912.,-11968.)
set ED=Rect(12672.,-12736.,12800.,-12608.)
set XD=Rect(11328.,-11072.,11456.,-10944.)
set OD=Rect(11840.,-11072.,11968.,-10944.)
set RD=Rect(12352.,-11200.,12480.,-11072.)
set ID=Rect(-5184.,-14592.,-5056.,-14528.)
set AD=Rect(-4160.,-15296.,-4032.,-15168.)
set ND=Rect(-1088.,-14272.,-960.,-14144.)
set bD=Rect(-1728.,-16192.,-1600.,-16064.)
set BD=Rect(192.,-15040.,320.,-14912.)
set cD=Rect(3776.,-14592.,3904.,-14464.)
set CD=Rect(2880.,-15424.,3008.,-15296.)
set dD=Rect(6464.,-16448.,6592.,-16320.)
set DD=Rect(6976.,-16448.,7104.,-16320.)
set fD=Rect(7744.,-15168.,7872.,-15040.)
set FD=Rect(9536.,-17216.,9664.,-17088.)
set gD=Rect(8384.,-14528.,8512.,-14400.)
set GD=Rect(12224.,-15552.,12352.,-15424.)
set hD=Rect(-7552.,-18240.,-7424.,-18112.)
set HD=Rect(-6208.,-19648.,-6080.,-19520.)
set jD=Rect(-2112.,-19520.,-1984.,-19392.)
set JD=Rect(-4544.,-17856.,-4416.,-17760.)
set kD=Rect(-4160.,-22592.,-4032.,-22464.)
set KD=Rect(-1664.,-21312.,-1536.,-21184.)
set lD=Rect(2240.,-22592.,2368.,-22464.)
set LD=Rect(-2848.,-22976.,-2784.,-22880.)
set mD=Rect(3264.,-22592.,3392.,-22464.)
set MD=Rect(-128.,-21824.,.0,-21696.)
set pD=Rect(4800.,-22592.,4928.,-22464.)
set PD=Rect(9152.,-23232.,9280.,-23104.)
set qD=Rect(9664.,-21184.,9792.,-21056.)
set QD=Rect(14144.,-23616.,14272.,-23488.)
set sD=Rect(14656.,-23616.,14784.,-23488.)
set SD=Rect(10176.,-19648.,10304.,-19520.)
set tD=Rect(5696.,-18624.,5824.,-18496.)
set TD=Rect(7744.,-19232.,7872.,-19136.)
set uD=Rect(10944.,-19392.,11072.,-19264.)
set UD=Rect(11328.,-20544.,11456.,-20416.)
set wD=Rect(11584.,-20544.,11712.,-20416.)
set WD=Rect(10432.,-20672.,10560.,-20544.)
set yD=Rect(-6208.,-25408.,-6080.,-25280.)
set YD=Rect(-5440.,-25920.,-5312.,-25792.)
set zD=Rect(-6720.,-27072.,-6592.,-26944.)
set ZD=Rect(-3136.,-27456.,-3008.,-27328.)
set vf=Rect(-4672.,-26560.,-4544.,-26432.)
set ef=Rect(-2368.,-27072.,-2240.,-26944.)
set xf=Rect(-1664.,-27328.,-1536.,-27200.)
set of=Rect(-64.,-26304.,64.,-26176.)
set rf=Rect(-64.,-27584.,64.,-27456.)
set af=Rect(192.,-25920.,320.,-25856.)
set nf=Rect(3776.,-25152.,3904.,-25024.)
set Vf=Rect(6016.,-25152.,6144.,-25024.)
set Ef=Rect(6464.,-26048.,6592.,-25920.)
set Xf=Rect(6848.,-27584.,6976.,-27456.)
set Of=Rect(10240.,-27712.,10368.,-27584.)
set Rf=Rect(9664.,-25664.,9792.,-25536.)
set If=Rect(7488.,-27840.,7616.,-27712.)
set Af=Rect(-4160.,-30528.,-4032.,-30400.)
set Nf=Rect(-2624.,-28608.,-2496.,-28544.)
set bf=Rect(-1856.,-28608.,-1728.,-28544.)
set Bf=Rect(-6304.,-31296.,-6208.,-31168.)
set cf=Rect(-4512.,-30016.,-4416.,-29920.)
set Cf=Rect(-7616.,-30272.,-7520.,-30144.)
set df=Rect(-6592.,-30528.,-6464.,-30400.)
set Df=Rect(-3904.,10432.,-3776.,10528.)
set ff=Rect(-3776.,10048.,-3648.,10176.)
set Ff=Rect(-4544.,10624.,-4416.,10688.)
set gf=Rect(-8128.,11968.,-8000.,12096.)
set Gf=Rect(-960.,9792.,-832.,9920.)
set hf=Rect(2112.,8896.,2240.,9024.)
set Hf=Rect(576.,10816.,704.,10944.)
set jf=Rect(320.,11456.,448.,11584.)
set Jf=Rect(6208.,9600.,6336.,9728.)
set kf=Rect(6080.,8768.,6208.,8896.)
set Kf=Rect(7232.,8768.,7360.,8896.)
set lf=Rect(12224.,11072.,12352.,11200.)
set Lf=Rect(11712.,11072.,11840.,11200.)
set mf=Rect(-7488.,13376.,-7360.,13504.)
set Mf=Rect(-3392.,14528.,-3264.,14656.)
set pf=Rect(-4032.,16320.,-3904.,16448.)
set Pf=Rect(192.,16000.,320.,16064.)
set qf=Rect(320.,16000.,448.,16064.)
set Qf=Rect(3008.,13376.,3136.,13504.)
set sf=Rect(3904.,14400.,4032.,14528.)
set Sf=Rect(5056.,14912.,5184.,15040.)
set tf=Rect(21184.,-3264.,21312.,-3136.)
set Tf=Rect(17152.,-2496.,17280.,-2368.)
set uf=Rect(23232.,4416.,23360.,4544.)
set Uf=Rect(26112.,-128.,26240.,.0)
set wf=Rect(24960.,1856.,25088.,1984.)
set Wf=Rect(27456.,1600.,27584.,1728.)
set yf=Rect(17856.,4672.,17984.,4800.)
set Yf=Rect(17088.,6592.,17216.,6720.)
set zf=Rect(21248.,6976.,21376.,7104.)
set Zf=Rect(28096.,7616.,28224.,7744.)
set vF=Rect(27680.,7040.,27776.,7136.)
set eF=Rect(27392.,6944.,27520.,7008.)
set xF=Rect(21312.,-5824.,21440.,-5696.)
set oF=Rect(21248.,-6560.,21376.,-6464.)
set rF=Rect(18240.,-6464.,18400.,-6368.)
set iF=Rect(19520.,-8160.,19648.,-8064.)
set aF=Rect(19200.,1344.,19328.,1472.)
set nF=Rect(17760.,-64.,17888.,64.)
set VF=Rect(16992.,1856.,17120.,1984.)
set EF=Rect(22720.,64.,22848.,192.)
set XF=Rect(19456.,-1376.,19584.,-1248.)
set OF=Rect(21696.,-1120.,21824.,-992.)
set RF=Rect(20032.,2496.,20160.,2624.)
set IF=Rect(14528.,3872.,15488.,4064.)
set AF=Rect(8256.,-28768.,9216.,-28576.)
set NF=Rect(25792.,-13408.,26752.,-13216.)
set bF=Rect(3264.,-31072.,4224.,-30880.)
set BF=Rect(6336.,-31072.,7296.,-30880.)
set cF=Rect(26624.,-6240.,27584.,-6048.)
set CF=Rect(9408.,-31072.,10368.,-30880.)
set dF=Rect(19648.,-13376.,19776.,-13248.)
set DF=Rect(22592.,-11712.,22720.,-11584.)
set fF=Rect(22208.,-21472.,22336.,-21344.)
set FF=Rect(22208.,-24384.,22336.,-24256.)
set gF=Rect(15040.,15040.,15168.,15168.)
set GF=Rect(19520.,9408.,19648.,9536.)
set hF=Rect(11456.,15424.,11584.,15552.)
set HF=Rect(-5056.,18112.,-4928.,18240.)
set jF=Rect(-4032.,18752.,-3904.,18880.)
set JF=Rect(-7488.,-10816.,-7360.,-10688.)
set kF=Rect(-4352.,-12224.,-4224.,-12096.)
set KF=Rect(1088.,-10816.,1216.,-10688.)
set lF=Rect(5120.,-10048.,5248.,-9920.)
set LF=Rect(14656.,-10944.,14784.,-10816.)
set mF=Rect(10944.,-9792.,11072.,-9664.)
set MF=Rect(-3648.,-14528.,-3520.,-14400.)
set pF=Rect(-5568.,-19392.,-5440.,-19264.)
set PF=Rect(-4544.,-23488.,-4416.,-23360.)
set qF=Rect(9792.,-23488.,9920.,-23360.)
set QF=Rect(-2880.,-27456.,-2752.,-27328.)
set sF=Rect(9664.,9376.,9792.,9504.)
set SF=Rect(13056.,10176.,13184.,10304.)
set tF=Rect(-4032.,14784.,-3904.,14912.)
set TF=Rect(22880.,4416.,23008.,4544.)
set uF=Rect(17280.,4160.,17408.,4288.)
set UF=Rect(17152.,5696.,17280.,5824.)
set wF=Rect(26112.,8000.,26240.,8128.)
set WF=Rect(22272.,-5824.,22400.,-5696.)
set yF=Rect(3552.,-29408.,3744.,-29120.)
set YF=Rect(16288.,-27200.,16416.,-27072.)
set zF=Rect(12480.,-31072.,12608.,-30912.)
set ZF=Rect(12736.,-31072.,12864.,-30912.)
set vg=Rect(12992.,-31072.,13120.,-30912.)
set eg=Rect(13248.,-31072.,13376.,-30912.)
set xg=Rect(13504.,-31072.,13632.,-30912.)
set og=Rect(13760.,-31072.,13888.,-30912.)
set rg=Rect(14016.,-31072.,14144.,-30912.)
set ig=Rect(1856.,-27712.,1984.,-27520.)
set ag=Rect(7232.,-25152.,7360.,-24896.)
set ng=Rect(7424.,-25536.,7552.,-25344.)
set Vg=Rect(3392.,-27200.,3520.,-26912.)
set Eg=Rect(1792.,-25280.,1920.,-25088.)
set Xg=Rect(6976.,-25152.,7104.,-24896.)
set Og=Rect(8896.,-27712.,9024.,-27456.)
set Rg=Rect(10304.,-27200.,10432.,-26944.)
set Ig=Rect(8128.,-26560.,8256.,-26304.)
set Ag=Rect(9600.,-25152.,9728.,-24896.)
set Ng=Rect(-7616.,-31040.,-7488.,-30784.)
set bg=Rect(-6720.,-29760.,-6592.,-29504.)
set Bg=Rect(-4032.,-30912.,-3904.,-30656.)
set cg=Rect(-128.,-28736.,.0,-28480.)
set Cg=Rect(1088.,-31040.,1216.,-30784.)
set dg=Rect(1600.,-31040.,1728.,-30784.)
set Dg=Rect(2624.,14144.,2752.,14400.)
set fg=Rect(5568.,14016.,5696.,14272.)
set Fg=Rect(6336.,14784.,6464.,15040.)
set gg=Rect(6528.,14784.,6656.,15040.)
set Gg=Rect(24704.,-3616.,24832.,-3296.)
set hg=Rect(24704.,-3904.,24832.,-3616.)
set Hg=Rect(27008.,-3104.,27136.,-2816.)
set jg=Rect(23744.,-6848.,23872.,-6592.)
set Jg=Rect(25024.,-11616.,25152.,-11360.)
set kg=Rect(25280.,-12224.,25408.,-11968.)
set Kg=Rect(19264.,-9536.,19392.,-9280.)
set lg=Rect(20160.,-9536.,20288.,-9280.)
set Lg=Rect(18112.,-10944.,18240.,-10688.)
set mg=Rect(18752.,-10944.,18880.,-10688.)
set Mg=Rect(22848.,-7360.,22976.,-7104.)
set pg=Rect(18112.,-14144.,18240.,-13888.)
set Pg=Rect(17984.,-14144.,18112.,-13888.)
set qg=Rect(16960.,-14912.,17088.,-14656.)
set Qg=Rect(16960.,-15168.,17088.,-14912.)
set sg=Rect(18112.,-15168.,18240.,-14912.)
set Sg=Rect(18368.,-15040.,18496.,-14784.)
set tg=Rect(19264.,-15168.,19392.,-14912.)
set Tg=Rect(19904.,-14784.,20032.,-14528.)
set ug=Rect(18752.,-13376.,18880.,-13120.)
set Ug=Rect(22912.,-14656.,23040.,-14400.)
set wg=Rect(23232.,-14656.,23360.,-14400.)
set Wg=Rect(23360.,-19712.,23488.,-19456.)
set yg=Rect(25792.,-19840.,25920.,-19584.)
set Yg=Rect(27456.,-19936.,27584.,-19680.)
set zg=Rect(24256.,-3296.,24384.,-3040.)
set Zg=Rect(24896.,-4736.,25024.,-4480.)
set vG=Rect(23552.,-4960.,23680.,-4736.)
set eG=Rect(24704.,-3296.,24832.,-3008.)
set xG=Rect(23232.,-14368.,23360.,-14112.)
set oG=Rect(23232.,-14080.,23360.,-13824.)
set rG=Rect(12544.,13248.,12672.,13504.)
set iG=Rect(2496.,14144.,2624.,14400.)
set aG=Rect(22464.,-4032.,22592.,-3776.)
set nG=Rect(24384.,12512.,24512.,12768.)
set VG=Rect(21888.,13344.,22016.,13600.)
set EG=Rect(21632.,13344.,21760.,13600.)
set XG=Rect(20864.,14368.,20992.,14624.)
set OG=Rect(20608.,14368.,20736.,14624.)
set RG=Rect(22912.,14016.,23040.,14272.)
set IG=Rect(24896.,12512.,25024.,12768.)
set AG=Rect(24512.,12512.,24640.,12768.)
set NG=Rect(25152.,14272.,25280.,14528.)
set bG=Rect(24768.,12512.,24896.,12768.)
set BG=Rect(19840.,11328.,19968.,11584.)
set cG=Rect(25216.,11200.,25344.,11424.)
set CG=Rect(23296.,11456.,23424.,11680.)
set dG=Rect(22400.,15424.,22528.,15648.)
set DG=Rect(23296.,16256.,23424.,16480.)
set fG=Rect(23296.,12064.,23424.,12288.)
set FG=Rect(22976.,13120.,23104.,13344.)
set gG=Rect(19968.,13120.,20096.,13344.)
set GG=Rect(20160.,14272.,20288.,14496.)
set hG=Rect(15552.,14784.,15680.,15008.)
set HG=Rect(18240.,15872.,18368.,16096.)
set jG=Rect(8896.,13376.,9024.,13600.)
set JG=Rect(10304.,13280.,10432.,13472.)
set kG=Rect(9536.,14912.,9664.,15136.)
set KG=Rect(9664.,13440.,9792.,13664.)
set lG=Rect(18944.,10624.,19072.,10848.)
set LG=Rect(18112.,10176.,18240.,10400.)
set mG=Rect(13248.,13440.,13376.,13664.)
set MG=Rect(13248.,14464.,13376.,14688.)
set pG=Rect(14144.,13440.,14272.,13696.)
set PG=Rect(14144.,14464.,14272.,14688.)
set qG=Rect(16832.,12288.,16960.,12512.)
set QG=Rect(16384.,12160.,16512.,12384.)
set sG=Rect(16384.,12928.,16512.,13120.)
set SG=Rect(17088.,11808.,17216.,12000.)
set tG=Rect(15104.,10496.,15232.,10720.)
set TG=Rect(17600.,9088.,17728.,9312.)
set uG=Rect(12096.,18464.,12224.,18688.)
set UG=Rect(11840.,19360.,11968.,19584.)
set wG=Rect(-7296.,-6592.,-7168.,-6464.)
set WG=Rect(.0,-7104.,128.,-6976.)
set yG=Rect(2816.,-7616.,2944.,-7488.)
set YG=Rect(4224.,-7104.,4352.,-6976.)
set zG=Rect(10112.,-6720.,10240.,-6592.)
set ZG=Rect(13440.,-6976.,13568.,-6848.)
set vh=Rect(15616.,-7232.,15744.,-7104.)
set eh=Rect(-3328.,-4544.,-3200.,-4416.)
set xh=Rect(-5888.,-1088.,-5760.,-960.)
set oh=Rect(-1472.,-1344.,-1344.,-1280.)
set rh=Rect(4608.,-4544.,4736.,-4416.)
set ih=Rect(-640.,-1600.,-512.,-1472.)
set ah=Rect(6528.,-2752.,6656.,-2624.)
set nh=Rect(11264.,-2880.,11392.,-2752.)
set Vh=Rect(15552.,-3008.,15680.,-2880.)
set Eh=Rect(5504.,-320.,5632.,-192.)
set Xh=Rect(-4608.,1856.,-4480.,1984.)
set Oh=Rect(384.,1856.,512.,1984.)
set Rh=Rect(4032.,3776.,4160.,3904.)
set Ih=Rect(-5440.,5312.,-5312.,5440.)
set Ah=Rect(-5888.,5056.,-5760.,5184.)
set Nh=Rect(1472.,5824.,1600.,5952.)
set bh=Rect(10944.,1728.,11072.,1856.)
set Bh=Rect(14912.,1856.,15040.,1984.)
set ch=Rect(-5056.,-12096.,-4928.,-11968.)
set Ch=Rect(-1600.,-11072.,-1472.,-10944.)
set dh=Rect(3520.,-11712.,3648.,-11584.)
set Dh=Rect(7488.,-12352.,7616.,-12224.)
set fh=Rect(12416.,-12096.,12544.,-11968.)
set Fh=Rect(14144.,-10944.,14272.,-10816.)
set gh=Rect(13312.,-10304.,13440.,-10176.)
set Gh=Rect(-7488.,-9664.,-7360.,-9536.)
set hh=Rect(-4160.,-14784.,-4032.,-14656.)
set Hh=Rect(-768.,-14592.,-640.,-14336.)
set jh=Rect(-256.,-16064.,-128.,-15936.)
set Jh=Rect(7232.,-15936.,7360.,-15808.)
set kh=Rect(9728.,-14656.,9856.,-14528.)
set Kh=Rect(15232.,-17216.,15360.,-17088.)
set lh=Rect(-5056.,-17728.,-4928.,-17600.)
set Lh=Rect(-960.,-17344.,-832.,-17216.)
set mh=Rect(-5632.,-21344.,-5504.,-21216.)
set Mh=Rect(-3840.,-22848.,-3712.,-22720.)
set ph=Rect(-384.,-21824.,-256.,-21696.)
set Ph=Rect(7936.,-20672.,8064.,-20544.)
set qh=Rect(12800.,-21056.,12928.,-20928.)
set Qh=Rect(13248.,-21696.,13376.,-21568.)
set sh=Rect(7360.,-18752.,7488.,-18624.)
set Sh=Rect(11904.,-20160.,12032.,-20032.)
set th=Rect(-5888.,-27456.,-5760.,-27328.)
set Th=Rect(-4608.,-25280.,-4480.,-25152.)
set uh=Rect(-1920.,-25280.,-1792.,-25152.)
set Uh=Rect(2048.,-26176.,2176.,-26048.)
set wh=Rect(7808.,-25152.,7936.,-25024.)
set Wh=Rect(9024.,-25152.,9152.,-25024.)
set yh=Rect(-512.,-28736.,-384.,-28608.)
set Yh=Rect(-5376.,-28736.,-5248.,-28608.)
set zh=Rect(-7040.,9536.,-6912.,9664.)
set Zh=Rect(3136.,9920.,3264.,10048.)
set vH=Rect(7360.,10304.,7488.,10432.)
set eH=Rect(11520.,9408.,11648.,9536.)
set xH=Rect(-6016.,15232.,-5888.,15488.)
set oH=Rect(256.,16192.,384.,16320.)
set rH=Rect(7680.,14528.,7808.,14656.)
set iH=Rect(20928.,-3008.,21056.,-2848.)
set aH=Rect(23808.,7456.,23968.,7616.)
set nH=Rect(27648.,1600.,27808.,1792.)
set VH=Rect(21056.,6432.,21216.,6592.)
set EH=Rect(26368.,6976.,26496.,7136.)
set XH=Rect(19648.,-6464.,19776.,-6304.)
set OH=Rect(17216.,320.,17344.,480.)
set RH=Rect(22752.,1056.,22944.,1248.)
set IH=Rect(19200.,-10816.,19328.,-10624.)
set AH=Rect(16992.,-13664.,17152.,-13472.)
set NH=Rect(27808.,-9856.,28000.,-9664.)
set bH=Rect(20224.,-16864.,20352.,-16640.)
set BH=Rect(26816.,-3040.,27008.,-2848.)
set cH=Rect(23680.,-8416.,23808.,-8256.)
set CH=Rect(21952.,-11872.,22080.,-11712.)
set dH=Rect(25312.,-14176.,25440.,-14016.)
set DH=Rect(22272.,-18272.,22400.,-18112.)
set fH=Rect(27360.,-17824.,27456.,-17632.)
set FH=Rect(27328.,-19808.,27456.,-19648.)
set gH=Rect(22208.,-22912.,22336.,-22752.)
set GH=Rect(19072.,-26240.,19200.,-26080.)
set hH=Rect(21056.,15680.,21184.,15840.)
set HH=Rect(23328.,13984.,23456.,14176.)
set jH=Rect(16800.,14784.,16928.,14944.)
set JH=Rect(10944.,13248.,11072.,13408.)
set kH=Rect(18112.,9920.,18240.,10080.)
set KH=Rect(14528.,14912.,14656.,15072.)
set lH=Rect(17344.,11840.,17472.,12000.)
set LH=Rect(15424.,10272.,15552.,10432.)
set mH=Rect(-7040.,19264.,-6912.,19392.)
set MH=Rect(-4032.,19904.,-3904.,20032.)
set pH=Rect(-960.,19264.,-832.,19392.)
set PH=Rect(4992.,19776.,5120.,19904.)
set qH=Rect(6272.,18624.,6400.,18752.)
set QH=Rect(9344.,17856.,9472.,18016.)
set sH=Rect(17792.,18848.,17920.,19008.)
set SH=Rect(-5120.,19392.,-4992.,19520.)
set tH=Rect(-1600.,18240.,-1472.,18368.)
set TH=Rect(-576.,17984.,-448.,18112.)
set uH=Rect(2688.,19520.,2816.,19648.)
set UH=Rect(7040.,20032.,7168.,20160.)
set wH=Rect(13248.,19648.,13376.,19840.)
set WH=Rect(14272.,19360.,14400.,19552.)
set yH=Rect(24640.,-8512.,24768.,-8384.)
set YH=Rect(21184.,-22112.,21312.,-21984.)
set zH=Rect(13376.,13504.,13504.,13632.)
set ZH=Rect(12736.,14816.,12864.,14944.)
set vj=Rect(1216.,-1920.,1344.,-1792.)
set ej=Rect(1600.,-320.,1728.,-192.)
set xj=Rect(5824.,-3360.,5952.,-3232.)
set oj=Rect(5952.,-1600.,6080.,-1472.)
set rj=Rect(11648.,-1600.,11776.,-1472.)
set ij=Rect(12864.,-1856.,12992.,-1728.)
set aj=Rect(13120.,-1376.,13248.,-1248.)
set nj=Rect(8512.,-64.,8640.,64.)
set Vj=Rect(8640.,-64.,8768.,64.)
set Ej=Rect(8768.,-64.,8896.,64.)
set Xj=Rect(1664.,2112.,1792.,2240.)
set Oj=Rect(-3200.,6592.,-3072.,6720.)
set Rj=Rect(7296.,5248.,7424.,5376.)
set Ij=Rect(9088.,-10688.,9216.,-10560.)
set Aj=Rect(12416.,-16576.,12544.,-16448.)
set Nj=Rect(8704.,-20032.,8832.,-19904.)
set bj=Rect(5440.,-19648.,5568.,-19520.)
set Bj=Rect(5248.,-27200.,5376.,-27072.)
set cj=Rect(6208.,-26688.,6336.,-26560.)
set Cj=Rect(-5440.,-30784.,-5312.,-30656.)
set dj=Rect(-1088.,10304.,-960.,10432.)
set Dj=Rect(-64.,10816.,64.,10944.)
set fj=Rect(-64.,11328.,64.,11456.)
set Fj=Rect(-7264.,13888.,-7136.,14016.)
set gj=Rect(17856.,-6208.,17984.,-6080.)
set Gj=Rect(1216.,-1920.,1728.,-1792.)
set hj=Rect(1216.,-320.,1728.,-192.)
set Hj=Rect(5824.,-3360.,6080.,-3232.)
set jj=Rect(5824.,-1600.,6080.,-1472.)
set Jj=Rect(10176.,-1600.,10304.,-1472.)
set kj=Rect(11648.,-1600.,11776.,-1472.)
set Kj=Rect(12416.,-16576.,12544.,-16448.)
set lj=Rect(14400.,-16576.,14528.,-16448.)
set Lj=Rect(2944.,-2272.,3072.,-2144.)
set mj=Rect(3072.,-2272.,3200.,-2144.)
set Mj=Rect(12864.,-1856.,12992.,-1728.)
set pj=Rect(12864.,-832.,12992.,-704.)
set Pj=Rect(13056.,-704.,13184.,-576.)
set qj=Rect(14528.,-640.,14656.,-512.)
set Qj=Rect(14592.,-1344.,14720.,-1216.)
set sj=Rect(13120.,-1408.,13248.,-1280.)
set Sj=Rect(6784.,-576.,7296.,-448.)
set tj=Rect(8320.,.0,8896.,128.)
set Tj=Rect(1664.,2112.,1792.,2240.)
set uj=Rect(3456.,2112.,3584.,2240.)
set Uj=Rect(-3200.,6592.,-3072.,6720.)
set wj=Rect(-2048.,6592.,-1920.,6720.)
set Wj=Rect(7296.,5248.,7552.,5376.)
set yj=Rect(8704.,6784.,8960.,6912.)
set Yj=Rect(9088.,-10688.,9216.,-10560.)
set zj=Rect(10624.,-10688.,10752.,-10560.)
set Zj=Rect(8704.,-20032.,8832.,-19904.)
set vJ=Rect(10112.,-20032.,10240.,-19904.)
set eJ=Rect(5440.,-19712.,5568.,-19584.)
set xJ=Rect(6016.,-19648.,6144.,-19520.)
set oJ=Rect(5952.,-19072.,6080.,-18944.)
set rJ=Rect(5376.,-19136.,5504.,-19008.)
set iJ=Rect(5184.,-27200.,5312.,-27072.)
set aJ=Rect(6784.,-27200.,6912.,-27072.)
set nJ=Rect(6144.,-26688.,6272.,-26560.)
set VJ=Rect(7424.,-26688.,7552.,-26560.)
set EJ=Rect(-5440.,-30848.,-5312.,-30720.)
set XJ=Rect(-5440.,-29376.,-5312.,-29248.)
set OJ=Rect(-1152.,10304.,-1024.,11456.)
set RJ=Rect(320.,10304.,448.,10432.)
set IJ=Rect(.0,10816.,128.,11456.)
set AJ=Rect(-7328.,13888.,-7200.,14016.)
set NJ=Rect(-6112.,13888.,-5984.,14016.)
set bJ=Rect(17856.,-6208.,17984.,-6080.)
set BJ=Rect(19072.,-6208.,19200.,-6080.)
set cJ=Rect(24640.,-8512.,24768.,-8384.)
set CJ=Rect(25472.,-8512.,25600.,-8384.)
set dJ=Rect(13248.,13440.,13440.,13664.)
set DJ=Rect(14144.,14464.,14272.,14688.)
set fJ=Rect(12736.,14816.,12864.,14944.)
set FJ=Rect(12224.,14816.,12352.,14944.)
set gJ=Rect(2880.,32.,3264.,256.)
set GJ=Rect(2368.,32.,2752.,256.)
set hJ=Rect(6048.,-352.,6240.,-128.)
set HJ=Rect(6976.,-12384.,7104.,-12256.)
set jJ=Rect(4032.,-10976.,4160.,-10848.)
set JJ=Rect(4160.,-10080.,4288.,-9952.)
set kJ=Rect(8128.,-11744.,8256.,-11616.)
set KJ=Rect(8128.,-11872.,8256.,-11744.)
set lJ=Rect(8128.,-12000.,8256.,-11872.)
set LJ=Rect(8128.,-12128.,8256.,-12000.)
set mJ=Rect(8128.,-12256.,8256.,-12128.)
set MJ=Rect(8128.,-12384.,8256.,-12256.)
set pJ=Rect(14016.,-11872.,14144.,-11744.)
set PJ=Rect(15808.,-12000.,15936.,-11872.)
set qJ=Rect(15936.,-11744.,16064.,-11616.)
set QJ=Rect(8128.,-9824.,8256.,-9696.)
set sJ=Rect(-5056.,-9952.,-4928.,-9824.)
set SJ=Rect(11840.,-15424.,11968.,-15296.)
set tJ=Rect(11840.,-15552.,11968.,-15424.)
set TJ=Rect(11840.,-15680.,11968.,-15552.)
set uJ=Rect(13888.,-21824.,14016.,-21696.)
set UJ=Rect(13888.,-21952.,14016.,-21824.)
set wJ=Rect(13888.,-22080.,14016.,-21952.)
set WJ=Rect(10432.,-20416.,10560.,-20288.)
set yJ=Rect(-6336.,-30784.,-6208.,-30656.)
set YJ=Rect(-6208.,-30784.,-6080.,-30656.)
set zJ=Rect(11200.,9408.,11328.,9536.)
set ZJ=Rect(11200.,9120.,11328.,9248.)
set vk=Rect(9792.,10400.,9920.,10528.)
set ek=Rect(-7552.,-7648.,-6784.,-7520.)
set xk=Rect(-2944.,-7616.,-2176.,-7488.)
set ok=Rect(1280.,-7616.,2048.,-7488.)
set rk=Rect(4224.,-7616.,4992.,-7488.)
set ik=Rect(7168.,-7360.,7936.,-7232.)
set ak=Rect(11520.,-5312.,12288.,-5184.)
set nk=Rect(14080.,-7616.,14848.,-7488.)
set Vk=Rect(-7552.,-4800.,-6784.,-4672.)
set Ek=Rect(-7552.,-1344.,-6784.,-1216.)
set Xk=Rect(-5120.,-1344.,-4352.,-1216.)
set Ok=Rect(-960.,-3392.,-192.,-3264.)
set Rk=Rect(-192.,-1600.,576.,-1472.)
set Ik=Rect(4928.,-2880.,5696.,-2752.)
set Ak=Rect(9472.,-1600.,10240.,-1472.)
set Nk=Rect(14400.,-3008.,15168.,-2880.)
set bk=Rect(6016.,-320.,6784.,-192.)
set Bk=Rect(-6976.,1856.,-6208.,1984.)
set ck=Rect(-448.,4544.,320.,4672.)
set Ck=Rect(1408.,3520.,2176.,3648.)
set dk=Rect(-3008.,5696.,-2240.,5824.)
set Dk=Rect(-7040.,4160.,-6272.,4288.)
set fk=Rect(-640.,6464.,128.,6592.)
set Fk=Rect(10112.,6592.,10880.,6720.)
set gk=Rect(5472.,2880.,6240.,3008.)
set Gk=Rect(-6912.,-10816.,-6144.,-10688.)
set hk=Rect(-3648.,-12224.,-2880.,-12096.)
set Hk=Rect(192.,-10688.,960.,-10560.)
set jk=Rect(6080.,-12352.,6848.,-12224.)
set Jk=Rect(8576.,-12352.,9344.,-12224.)
set kk=Rect(14976.,-12480.,15744.,-12352.)
set Kk=Rect(8256.,-10560.,9024.,-10432.)
set lk=Rect(-5888.,-9920.,-5120.,-9792.)
set Lk=Rect(-7296.,-15936.,-6528.,-15808.)
set mk=Rect(-3520.,-14272.,-2752.,-14144.)
set Mk=Rect(1856.,-14656.,2624.,-14528.)
set pk=Rect(4800.,-16448.,5568.,-16320.)
set Pk=Rect(10496.,-17024.,11264.,-16896.)
set qk=Rect(11648.,-16960.,12416.,-16832.)
set Qk=Rect(-6976.,-19392.,-6208.,-19264.)
set sk=Rect(-5184.,-19520.,-4416.,-19392.)
set Sk=Rect(-7488.,-22848.,-6720.,-22720.)
set Tk=Rect(-3072.,-23616.,-2304.,-23488.)
set uk=Rect(-1024.,-21184.,-256.,-21056.)
set Uk=Rect(3904.,-22976.,4672.,-22848.)
set wk=Rect(8192.,-21568.,8960.,-21440.)
set Wk=Rect(14912.,-23232.,15680.,-23104.)
set yk=Rect(7488.,-20032.,8256.,-19904.)
set Yk=Rect(10944.,-20096.,11072.,-19456.)
set zk=Rect(-7552.,-25536.,-6784.,-25408.)
set Zk=Rect(-4480.,-27456.,-3712.,-27328.)
set vK=Rect(-2304.,-27840.,-1536.,-27712.)
set eK=Rect(896.,-27840.,1664.,-27712.)
set xK=Rect(1792.,-25664.,2560.,-25536.)
set oK=Rect(7936.,-27712.,8704.,-27584.)
set rK=Rect(-4096.,-31296.,-3328.,-31168.)
set iK=Rect(-7232.,-31296.,-6464.,-31168.)
set aK=Rect(-6656.,9792.,-5888.,9920.)
set nK=Rect(-1024.,9024.,-256.,9152.)
set VK=Rect(4864.,9536.,5632.,9664.)
set EK=Rect(9984.,9280.,10752.,9408.)
set XK=Rect(-7168.,12864.,-6400.,12992.)
set OK=Rect(-3968.,13888.,-3200.,14016.)
set RK=Rect(1280.,13376.,2048.,13504.)
set IK=Rect(17216.,-4928.,17984.,-4800.)
set AK=Rect(22720.,5824.,23488.,5952.)
set NK=Rect(24480.,-1056.,25248.,-928.)
set bK=Rect(17696.,4032.,18464.,4160.)
set BK=Rect(25728.,6368.,26496.,6496.)
set cK=Rect(21408.,-7456.,22176.,-7328.)
set CK=Rect(17792.,864.,18560.,992.)
set dK=Rect(17248.,-832.,18016.,-704.)
set DK=Rect(17184.,-10656.,17952.,-10528.)
set fK=Rect(18304.,-14112.,19072.,-13984.)
set FK=Rect(23936.,-9920.,24704.,-9792.)
set gK=Rect(17472.,-16576.,18240.,-16448.)
set GK=Rect(22144.,-3232.,22912.,-3104.)
set hK=Rect(20864.,-10176.,21632.,-10048.)
set HK=Rect(21920.,-14624.,22688.,-14496.)
set jK=Rect(22912.,-6816.,23680.,-6688.)
set JK=Rect(22368.,-17536.,23136.,-17408.)
set kK=Rect(17984.,-19488.,18752.,-19360.)
set KK=Rect(24288.,-26784.,25056.,-26656.)
set lK=Rect(21376.,-21856.,22144.,-21728.)
set LK=Rect(18176.,-24608.,18944.,-24480.)
set mK=Rect(21888.,15072.,22656.,15200.)
set MK=Rect(24320.,14304.,25088.,14432.)
set pK=Rect(15232.,15456.,16000.,15584.)
set PK=Rect(9536.,14432.,10304.,14560.)
set qK=Rect(18752.,9952.,19520.,10080.)
set QK=Rect(12224.,13792.,12992.,13920.)
set sK=Rect(15296.,12256.,16064.,12384.)
set SK=Rect(14976.,9184.,15744.,9312.)
set tK=Rect(-6400.,19392.,-6016.,19520.)
set TK=Rect(-4416.,19392.,-4032.,19520.)
set uK=Rect(-512.,19520.,-128.,19648.)
set UK=Rect(4800.,19136.,5184.,19264.)
set wK=Rect(6528.,16960.,6912.,17088.)
set WK=Rect(10176.,18752.,10560.,18880.)
set yK=Rect(14656.,18880.,15040.,19008.)
set YK=Rect(-6784.,18368.,-6528.,18496.)
set zK=Rect(-3328.,18240.,-3072.,18368.)
set ZK=Rect(1280.,18880.,1536.,19008.)
set vl=Rect(2688.,18112.,2944.,18240.)
set el=Rect(8576.,17472.,8832.,17600.)
set xl=Rect(12928.,17984.,13184.,18112.)
set ol=Rect(17152.,18624.,17408.,18752.)
set rl=Rect(15264.,15904.,15456.,16128.)
set il=Rect(15904.,9120.,16096.,9344.)
set al=Rect(16352.,12512.,16544.,12800.)
set nl=Rect(18464.,9888.,18656.,10112.)
set Vl=Rect(5056.,-352.,5440.,-128.)
set El=Rect(-5952.,18720.,-5824.,18944.)
set Xl=Rect(-6656.,18336.,-6528.,18560.)
set Ol=Rect(-7488.,19584.,-7360.,19808.)
set Rl=Rect(-6592.,19360.,-6464.,19584.)
set Il=Rect(-3776.,19360.,-3648.,19584.)
set Al=Rect(-3520.,18720.,-3392.,18944.)
set Nl=Rect(-4288.,18720.,-4160.,18944.)
set bl=Rect(-3776.,18080.,-3648.,18336.)
set Bl=Rect(-2240.,18848.,-2112.,19072.)
set cl=Rect(-1856.,19104.,-1728.,19328.)
set Cl=Rect(1344.,18016.,1472.,18240.)
set dl=Rect(832.,18336.,960.,18560.)
set Dl=Rect(-384.,18976.,-256.,19200.)
set fl=Rect(-128.,18400.,.0,18624.)
set Fl=Rect(3264.,18976.,3392.,19200.)
set gl=Rect(2496.,18080.,2624.,18304.)
set Gl=Rect(8000.,18208.,8128.,18432.)
set hl=Rect(7360.,18592.,7488.,18816.)
set Hl=Rect(8704.,19424.,8832.,19648.)
set jl=Rect(5952.,18592.,6080.,18816.)
set Jl=Rect(10432.,18848.,10560.,19072.)
set kl=Rect(12224.,17952.,12352.,18176.)
set Kl=Rect(9536.,19104.,9664.,19328.)
set ll=Rect(13760.,18336.,13888.,18560.)
set Ll=Rect(12480.,17184.,12608.,17408.)
set ml=Rect(10912.,17568.,11072.,17792.)
set Ml=Rect(15808.,18112.,15936.,18400.)
set pl=Rect(16320.,18336.,16448.,18560.)
set Pl=Rect(17216.,18720.,17344.,18944.)
set ql=Rect(14592.,18144.,14720.,18368.)
set Ql=Rect(15296.,18720.,15424.,18944.)
set sl=Rect(14400.,18848.,14528.,19072.)
set Sl=Rect(1280.,3488.,1408.,3712.)
set tl=Rect(3840.,2336.,3968.,2560.)
set Tl=Rect(1088.,2592.,1216.,2816.)
set ul=Rect(3200.,4256.,3328.,4480.)
set Ul=Rect(3200.,3488.,3328.,3712.)
set wl=Rect(1344.,4832.,1472.,5056.)
set Wl=Rect(-3520.,5664.,-3392.,5888.)
set yl=Rect(-5568.,4640.,-5440.,4864.)
set Yl=Rect(-5056.,6432.,-4928.,6656.)
set zl=Rect(-2880.,4768.,-2752.,4992.)
set Zl=Rect(-6208.,4128.,-6080.,4352.)
set vL=Rect(-7360.,4448.,-7232.,4672.)
set eL=Rect(-6208.,4512.,-6080.,4736.)
set xL=Rect(-6208.,6624.,-6080.,6848.)
set oL=Rect(-1216.,5792.,-1088.,6016.)
set rL=Rect(3520.,5056.,3648.,5280.)
set iL=Rect(-320.,5792.,-192.,6016.)
set aL=Rect(4352.,6048.,4480.,6272.)
set nL=Rect(576.,5792.,704.,6016.)
set VL=Rect(4224.,6944.,4352.,7168.)
set EL=Rect(5440.,3488.,5568.,3712.)
set XL=Rect(5888.,4512.,6016.,4736.)
set OL=Rect(5056.,4768.,5184.,4992.)
set RL=Rect(6848.,6304.,6976.,6528.)
set IL=Rect(6720.,4768.,6848.,4992.)
set AL=Rect(8832.,6176.,8960.,6400.)
set NL=Rect(10176.,4896.,10304.,5120.)
set bL=Rect(13184.,1824.,13312.,2048.)
set BL=Rect(13568.,4000.,13696.,4224.)
set cL=Rect(15616.,2144.,15744.,2368.)
set CL=Rect(-2880.,-12256.,-2752.,-12032.)
set dL=Rect(-1984.,-12256.,-1856.,-12032.)
set DL=Rect(-4288.,-11872.,-4160.,-11648.)
set fL=Rect(-4160.,-9952.,-4032.,-9728.)
set FL=Rect(-320.,-11744.,-192.,-11520.)
set gL=Rect(64.,-12128.,192.,-11904.)
set GL=Rect(4800.,-10080.,4928.,-9856.)
set hL=Rect(5440.,-10080.,5568.,-9856.)
set HL=Rect(14208.,-12640.,14336.,-12416.)
set jL=Rect(14400.,-11936.,14528.,-11712.)
set JL=Rect(15040.,-11744.,15168.,-11520.)
set kL=Rect(13056.,-12640.,13184.,-12416.)
set KL=Rect(15168.,-10976.,15296.,-10752.)
set lL=Rect(15168.,-10208.,15296.,-9984.)
set LL=Rect(-5440.,-15968.,-5312.,-15744.)
set mL=Rect(-6400.,-14816.,-6272.,-14592.)
set ML=Rect(-4608.,-15968.,-4480.,-15744.)
set pL=Rect(-7552.,-14176.,-7424.,-13952.)
set PL=Rect(-2048.,-14944.,-1920.,-14720.)
set qL=Rect(-1344.,-14304.,-1216.,-14080.)
set QL=Rect(-1088.,-16224.,-960.,-16000.)
set sL=Rect(-768.,-14240.,-640.,-14016.)
set SL=Rect(-256.,-15584.,-128.,-15360.)
set tL=Rect(2176.,-15840.,2304.,-15616.)
set TL=Rect(4544.,-14720.,4672.,-14496.)
set uL=Rect(6912.,-14592.,7040.,-14368.)
set UL=Rect(-5952.,-18368.,-5824.,-18144.)
set wL=Rect(-7552.,-17984.,-7424.,-17760.)
set WL=Rect(-6848.,-18144.,-6720.,-17920.)
set yL=Rect(-5888.,-17248.,-5760.,-17024.)
set YL=Rect(-7232.,-16640.,-7104.,-16416.)
set zL=Rect(-5440.,-16640.,-5312.,-16416.)
set ZL=Rect(-2240.,-18816.,-2112.,-18592.)
set vm=Rect(-3136.,-18816.,-3008.,-18592.)
set em=Rect(-896.,-18816.,-768.,-18592.)
set xm=Rect(-3776.,-17792.,-3648.,-17568.)
set om=Rect(-5184.,-18560.,-5056.,-18336.)
set rm=Rect(-2816.,-17280.,-2688.,-17056.)
set im=Rect(-7488.,-23392.,-7360.,-23168.)
set am=Rect(-7232.,-21472.,-7104.,-21248.)
set nm=Rect(-1792.,-23648.,-1664.,-23424.)
set Vm=Rect(-3904.,-21472.,-3776.,-21248.)
set Em=Rect(832.,-21728.,960.,-21504.)
set Xm=Rect(1344.,-21216.,1472.,-20992.)
set Om=Rect(2944.,-21760.,3072.,-21536.)
set Rm=Rect(2176.,-23392.,2304.,-23168.)
set Im=Rect(3264.,-23264.,3392.,-23040.)
set Am=Rect(-1024.,-21728.,-896.,-21504.)
set Nm=Rect(8320.,-23648.,8448.,-23424.)
set bm=Rect(5312.,-21472.,5440.,-21248.)
set Bm=Rect(14912.,-23360.,15040.,-23040.)
set cm=Rect(13152.,-23488.,13344.,-23168.)
set Cm=Rect(15040.,-21216.,15168.,-20992.)
set dm=Rect(14816.,-22240.,15008.,-22016.)
set Dm=Rect(7520.,-19520.,7712.,-19200.)
set fm=Rect(9024.,-20928.,9152.,-20608.)
set Fm=Rect(-64.,-27296.,64.,-27072.)
set gm=Rect(-1344.,-27616.,-1216.,-27392.)
set Gm=Rect(256.,-26624.,384.,-26400.)
set hm=Rect(-1088.,-26496.,-960.,-26272.)
set Hm=Rect(2112.,-27104.,2240.,-26880.)
set jm=Rect(4288.,-27616.,4416.,-27392.)
set Jm=Rect(2624.,-25312.,2752.,-25088.)
set km=Rect(3392.,-25504.,3520.,-25280.)
set Km=Rect(4608.,-26464.,4736.,-26240.)
set lm=Rect(4928.,-27360.,5056.,-27136.)
set Lm=Rect(7808.,-26592.,7936.,-26368.)
set mm=Rect(7552.,-26080.,7680.,-25856.)
set Mm=Rect(8448.,-26592.,8576.,-26368.)
set pm=Rect(9152.,-25952.,9280.,-25728.)
set Pm=Rect(-7104.,-30304.,-6976.,-30080.)
set qm=Rect(-6272.,-29664.,-6144.,-29440.)
set Qm=Rect(5856.,-27872.,5984.,-27648.)
set sm=Rect(6656.,-29408.,6784.,-29184.)
set Sm=Rect(960.,9248.,1088.,9472.)
set tm=Rect(1216.,9888.,1344.,10112.)
set Tm=Rect(1472.,9248.,1600.,9472.)
set um=Rect(1728.,9888.,1856.,10112.)
set Um=Rect(512.,8992.,640.,9216.)
set wm=Rect(832.,10400.,960.,10624.)
set Wm=Rect(6080.,9120.,6208.,9344.)
set ym=Rect(4800.,10592.,4928.,10880.)
set Ym=Rect(7232.,9120.,7360.,9344.)
set zm=Rect(5312.,10592.,5440.,10880.)
set Zm=Rect(8128.,8800.,8256.,9024.)
set vM=Rect(8128.,10272.,8256.,10496.)
set eM=Rect(10176.,9632.,10304.,9856.)
set xM=Rect(10304.,11104.,10432.,11328.)
set oM=Rect(13056.,9632.,13184.,9856.)
set rM=Rect(13056.,11040.,13184.,11264.)
set iM=Rect(-6976.,14976.,-6848.,15200.)
set aM=Rect(-7360.,14976.,-7232.,15200.)
set nM=Rect(-7232.,14464.,-7104.,14688.)
set VM=Rect(-7616.,15712.,-7488.,15936.)
set EM=Rect(-7232.,15744.,-7104.,15968.)
set XM=Rect(-6592.,15168.,-6464.,15392.)
set OM=Rect(-1152.,14240.,-1024.,14464.)
set RM=Rect(-3712.,14496.,-3584.,14720.)
set IM=Rect(-3712.,15136.,-3584.,15360.)
set AM=Rect(-2496.,15136.,-2368.,15360.)
set NM=Rect(1856.,13856.,1984.,14080.)
set bM=Rect(2496.,13856.,2624.,14080.)
set BM=Rect(4224.,13088.,4352.,13312.)
set cM=Rect(6400.,13088.,6528.,13312.)
set CM=Rect(22080.,-4320.,22208.,-4096.)
set dM=Rect(21952.,-5152.,22080.,-4928.)
set DM=Rect(25280.,-4896.,25408.,-4672.)
set fM=Rect(25664.,-3232.,25792.,-3008.)
set FM=Rect(26560.,-1952.,26688.,-1696.)
set gM=Rect(27200.,-2816.,27328.,-2592.)
set GM=Rect(24576.,-6496.,24704.,-6272.)
set hM=Rect(24192.,-7456.,24320.,-7232.)
set HM=Rect(24320.,-9440.,24448.,-9216.)
set jM=Rect(23104.,-11232.,23232.,-11008.)
set JM=Rect(25728.,-12256.,25856.,-12032.)
set kM=Rect(27840.,-9312.,27968.,-9088.)
set KM=Rect(23360.,-12512.,23488.,-12288.)
set lM=Rect(26496.,-10080.,26624.,-9856.)
set LM=Rect(18304.,-10848.,18432.,-10624.)
set mM=Rect(17088.,-9184.,17216.,-8960.)
set MM=Rect(18560.,-10848.,18688.,-10624.)
set pM=Rect(19712.,-9184.,19840.,-8960.)
set PM=Rect(19904.,-10080.,20032.,-9856.)
set qM=Rect(17728.,-9888.,17856.,-9664.)
set QM=Rect(18880.,-9632.,19008.,-9376.)
set sM=Rect(23552.,-6496.,23680.,-6272.)
set SM=Rect(23488.,-7392.,23616.,-7168.)
set tM=Rect(20544.,-10208.,20672.,-9984.)
set TM=Rect(19456.,-12000.,19584.,-11776.)
set uM=Rect(17728.,-14688.,17856.,-14464.)
set UM=Rect(18240.,-14944.,18368.,-14720.)
set wM=Rect(18496.,-15200.,18624.,-14976.)
set WM=Rect(19264.,-14432.,19392.,-14208.)
set yM=Rect(20032.,-14464.,20160.,-14240.)
set YM=Rect(17856.,-13472.,17984.,-13248.)
set zM=Rect(22080.,-14496.,22208.,-14272.)
set ZM=Rect(24512.,-14112.,24640.,-13888.)
set vp=Rect(24512.,-13696.,24640.,-13504.)
set ep=Rect(24896.,-14432.,25024.,-14208.)
set xp=Rect(18496.,-16864.,18624.,-16640.)
set op=Rect(17088.,-15872.,17216.,-15648.)
set rp=Rect(18496.,-16224.,18624.,-16000.)
set ip=Rect(18752.,-16032.,18880.,-15808.)
set ap=Rect(20032.,-15968.,20160.,-15744.)
set np=Rect(19776.,-16736.,19904.,-16512.)
set Vp=Rect(26944.,-18784.,27072.,-18560.)
set Ep=Rect(26944.,-15456.,27072.,-15232.)
set Xp=Rect(21568.,-19840.,21696.,-19648.)
set Op=Rect(27328.,-18144.,27456.,-17920.)
set Rp=Rect(17664.,-19296.,17792.,-19072.)
set Ip=Rect(19200.,-20320.,19328.,-20096.)
set Ap=Rect(19904.,-21472.,20032.,-21248.)
set Np=Rect(18112.,-21600.,18240.,-21376.)
set bp=Rect(17600.,-21472.,17728.,-21248.)
set Bp=Rect(20864.,-21856.,20992.,-21632.)
set cp=Rect(17696.,-24480.,17856.,-24256.)
set Cp=Rect(23488.,-24032.,23616.,-23808.)
set dp=Rect(20224.,-24288.,20352.,-24064.)
set Dp=Rect(21568.,-25184.,21696.,-24960.)
set fp=Rect(19200.,-26720.,19328.,-26496.)
set Fp=Rect(24960.,-23008.,25088.,-22784.)
set gp=Rect(23360.,-19616.,23488.,-19392.)
set Gp=Rect(24000.,-26912.,24128.,-26688.)
set hp=Rect(22976.,-19936.,23104.,-19712.)
set Hp=Rect(22592.,-19424.,22720.,-19200.)
set jp=Rect(26752.,-24032.,26880.,-23808.)
set Jp=Rect(26496.,-20576.,26624.,-20352.)
set kp=Rect(18880.,-2656.,19008.,-2432.)
set Kp=Rect(17344.,-2400.,17472.,-2176.)
set lp=Rect(24320.,7456.,24448.,7680.)
set Lp=Rect(22528.,6816.,22656.,7040.)
set mp=Rect(26880.,160.,27008.,384.)
set Mp=Rect(25600.,160.,25728.,384.)
set pp=Rect(27008.,-480.,27136.,-256.)
set Pp=Rect(26432.,1184.,26560.,1408.)
set qp=Rect(27584.,288.,27712.,512.)
set Qp=Rect(24768.,1824.,24896.,2048.)
set sp=Rect(18752.,5152.,18880.,5376.)
set Sp=Rect(18176.,6816.,18304.,7040.)
set Tp=Rect(26048.,5536.,26176.,5760.)
set up=Rect(25824.,6944.,26016.,7168.)
set Up=Rect(27520.,4640.,27648.,4864.)
set wp=Rect(26560.,4992.,26688.,5216.)
set Wp=Rect(19136.,-8032.,19264.,-7808.)
set yp=Rect(18496.,-7776.,18624.,-7552.)
set Yp=Rect(19232.,-6752.,19360.,-6528.)
set zp=Rect(18240.,-8160.,18368.,-7936.)
set Zp=Rect(17856.,-7136.,17984.,-6912.)
set vP=Rect(21440.,-6240.,21568.,-6016.)
set eP=Rect(18912.,288.,19104.,512.)
set xP=Rect(19040.,1312.,19232.,1536.)
set oP=Rect(18112.,224.,18240.,448.)
set rP=Rect(17216.,2080.,17344.,2304.)
set iP=Rect(18464.,1760.,18656.,1984.)
set aP=Rect(18496.,2272.,18624.,2496.)
set nP=Rect(20480.,-864.,20608.,-640.)
set VP=Rect(20032.,160.,20160.,384.)
set EP=Rect(22848.,-1120.,22976.,-896.)
set XP=Rect(19904.,1056.,20032.,1280.)
set OP=Rect(5696.,-352.,5824.,-128.)
set RP=Rect(2112.,32.,2240.,256.)
set IP=Rect(13120.,14880.,13248.,15104.)
set AP=Rect(12800.,13216.,12928.,13440.)
set NP=Rect(18176.,12704.,18304.,12928.)
set bP=Rect(17728.,13472.,17856.,13696.)
set BP=Rect(17472.,13600.,17600.,13824.)
set cP=Rect(15424.,11520.,15552.,11744.)
set CP=Rect(19392.,10080.,19520.,10304.)
set dP=Rect(19008.,15712.,19136.,15936.)
set DP=Rect(18944.,9888.,19072.,10112.)
set fP=Rect(20288.,15264.,20416.,15488.)
set FP=Rect(18752.,9888.,18880.,10112.)
set gP=Rect(19904.,16288.,20032.,16512.)
set GP=Rect(23296.,15904.,23424.,16128.)
set hP=Rect(21760.,15200.,21888.,15424.)
set HP=Rect(12544.,13984.,12672.,14208.)
set jP=Rect(13760.,14880.,13888.,15104.)
set JP=Rect(12608.,-31840.,12736.,-31616.)
set kP=Rect(22336.,-31456.,22464.,-31232.)
set KP=Rect(25408.,14240.,25536.,14464.)
set lP=Rect(19776.,11552.,19904.,11776.)
set LP=Rect(23808.,11424.,23936.,11648.)
set MP=Rect(20224.,11552.,20352.,11776.)
set pP=Rect(-7168.,18592.,-7040.,18816.)
set PP=Rect(-6976.,20128.,-6848.,20352.)
set qP=Rect(-3520.,19360.,-3392.,19584.)
set QP=Rect(-3008.,19616.,-2880.,19840.)
set sP=Rect(1344.,18400.,1472.,18624.)
set SP=Rect(576.,18336.,704.,18560.)
set tP=Rect(3904.,18080.,4032.,18304.)
set TP=Rect(2752.,19104.,2880.,19328.)
set uP=Rect(4416.,18720.,4544.,18976.)
set UP=Rect(3904.,17312.,4032.,17536.)
set wP=Rect(4352.,19488.,4480.,19712.)
set WP=Rect(3072.,17312.,3200.,17536.)
set yP=Rect(7360.,16992.,7488.,17216.)
set YP=Rect(6976.,17440.,7104.,17664.)
set zP=Rect(11648.,18464.,11776.,18688.)
set ZP=Rect(13504.,18336.,13632.,18560.)
set vq=Rect(11712.,17184.,11840.,17408.)
set eq=Rect(13248.,19872.,13376.,20096.)
set xq=Rect(27520.,-29664.,27648.,-29440.)
set oq=Rect(22272.,9184.,22400.,9408.)
set rq=Rect(14176.,18080.,14368.,18304.)
set iq=Rect(16448.,19360.,16576.,19584.)
set aq=Rect(14080.,19296.,14208.,19520.)
set nq=Rect(17728.,19616.,17856.,19840.)
set Vq=Rect(27552.,-29664.,27680.,-29536.)
set Eq=Rect(13632.,-19680.,14400.,-19552.)
set Xq=Rect(13632.,-25184.,14400.,-25056.)
set Oq=Rect(-576.,-31328.,192.,-31200.)
set Rq=Rect(2624.,-29408.,3392.,-29280.)
set Iq=Rect(23328.,-30176.,24096.,-30048.)
set Aq=Rect(15776.,-27200.,16320.,-27072.)
set Nq=Rect(27200.,-29664.,27616.,-29600.)
set bq=Rect(-6048.,-23616.,-4448.,-22624.)
set Bq=Rect(-7584.,-23616.,-6048.,-22976.)
set cq=Rect(-6944.,-21952.,-5856.,-21472.)
set Cq=Rect(-3360.,-23616.,1728.,-23104.)
set dq=Rect(-3872.,-22208.,-3424.,-21216.)
set Dq=Rect(-2464.,-22208.,-2016.,-21824.)
set fq=Rect(-1824.,-21824.,-1376.,-21440.)
set Fq=Rect(-1056.,-21824.,32.,-21344.)
set gq=Rect(1376.,-21824.,3136.,-21280.)
set Gq=Rect(3136.,-22080.,3360.,-21440.)
set hq=Rect(2144.,-23616.,3360.,-22976.)
set Hq=Rect(7264.,-23616.,8480.,-23264.)
set jq=Rect(3808.,-22080.,4256.,-21728.)
set Jq=Rect(3808.,-21728.,5792.,-20960.)
set kq=Rect(9568.,-23616.,11936.,-23008.)
set Kq=Rect(14656.,-22592.,15776.,-21952.)
set lq=Rect(14144.,-27872.,15808.,-27232.)
set Lq=Rect(15552.,-22720.,15776.,-22592.)
set mq=Rect(8000.,8608.,8384.,9408.)
set Mq=Rect(-4288.,14528.,-1984.,15424.)
set pq=Rect(20032.,-3648.,20160.,-3520.)
set Pq=Rect(20160.,-3520.,20288.,-3392.)
set qq=Rect(20288.,-3392.,20416.,-3264.)
set Qq=Rect(20416.,-3264.,20544.,-3136.)
set sq=Rect(22976.,4160.,24000.,5440.)
set Sq=Rect(25472.,-1216.,25600.,-1088.)
set tq=Rect(25728.,-1216.,25856.,-1088.)
set Tq=Rect(25984.,-1216.,26112.,-1088.)
set uq=Rect(26240.,-1216.,26368.,-1088.)
set Uq=Rect(26432.,-576.,26560.,-448.)
set wq=Rect(26048.,-576.,26176.,-448.)
set Wq=Rect(25664.,-576.,25792.,-448.)
set yq=Rect(25920.,64.,26048.,192.)
set Yq=Rect(26176.,64.,26304.,192.)
set zq=Rect(26496.,64.,26624.,192.)
set Zq=Rect(26944.,6816.,28224.,7616.)
set vQ=Rect(18624.,-7104.,18752.,-6976.)
set eQ=Rect(24960.,-3520.,25088.,-3392.)
set xQ=Rect(24512.,-3520.,24640.,-3392.)
set oQ=Rect(25280.,-3520.,25408.,-3392.)
set rQ=Rect(24160.,-7648.,24352.,-6720.)
set iQ=Rect(24064.,-7744.,24448.,-7616.)
set aQ=Rect(23104.,-7488.,23232.,-7360.)
set nQ=Rect(23360.,-7488.,23488.,-7360.)
set VQ=Rect(17344.,-15232.,17984.,-14592.)
set EQ=Rect(16960.,-5184.,18240.,-4288.)
set XQ=Rect(18368.,-2752.,18496.,-2624.)
set OQ=Rect(9536.,15296.,9664.,15424.)
set RQ=Rect(16320.,-31424.,22080.,-27584.)
set IQ=Rect(22016.,-31424.,22464.,-31168.)
set AQ=Rect(16320.,-27616.,17088.,-27328.)
set NQ=Rect(12480.,-31840.,14144.,-31168.)
set bQ=Rect(4640.,-352.,4992.,-128.)
set BQ=Rect(16768.,19008.,16832.,19072.)
set cQ=Rect(19456.,19648.,19968.,19776.)
set CQ=Rect(20192.,18496.,20640.,18624.)
set dQ=Rect(19392.,19392.,19520.,19488.)
set DQ=Rect(22784.,20448.,22912.,20544.)
set fQ=Rect(22208.,19584.,22464.,19648.)
set FQ=Rect(19264.,19264.,19392.,19392.)
set gQ=Rect(18816.,19264.,18944.,19392.)
set GQ=Rect(21216.,18368.,21344.,18496.)
set hQ=Rect(18816.,19264.,18944.,19488.)
set HQ=Rect(21696.,18368.,21824.,18624.)
set jQ=Rect(21216.,18368.,21344.,18496.)
set JQ=Rect(19488.,19232.,19648.,19520.)
set kQ=Rect(22080.,19264.,22976.,19520.)
set KQ=Rect(22976.,19616.,23104.,19776.)
set lQ=Rect(19584.,19264.,19712.,19456.)
set LQ=Rect(22080.,19264.,22208.,19520.)
set mQ=Rect(19776.,19264.,19904.,19456.)
set MQ=Rect(22848.,19264.,22976.,19520.)
set pQ=Rect(20032.,19264.,20160.,19520.)
set PQ=Rect(21056.,19264.,21184.,19520.)
set qQ=Rect(20544.,19264.,20672.,19520.)
set QQ=Rect(21568.,19264.,21696.,19520.)
set sQ=Rect(21056.,18304.,21184.,18528.)
set SQ=Rect(22272.,18304.,22400.,18528.)
set tQ=Rect(21696.,17728.,21824.,17856.)
set TQ=Rect(-7040.,23104.,-6912.,23328.)
set uQ=Rect(-4352.,22208.,-4224.,22432.)
set UQ=Rect(-4352.,23040.,-4224.,23264.)
set wQ=Rect(-7744.,23616.,-7616.,23840.)
set WQ=Rect(-4416.,21440.,-4288.,21600.)
set yQ=Rect(-6912.,21344.,-6784.,21536.)
set YQ=Rect(-4384.,21824.,-4256.,21952.)
set zQ=Rect(-4032.,21824.,-3904.,21952.)
set ZQ=Rect(-7488.,23104.,-7360.,23232.)
set vs=Rect(-7584.,23488.,-7488.,23872.)
set es=Rect(-7200.,21440.,-7008.,21568.)
set xs=Rect(-4544.,21408.,-4416.,21600.)
set os=Rect(-3712.,22720.,-3584.,22976.)
set rs=Rect(-4096.,23616.,-3968.,23840.)
set is=Rect(-3392.,22592.,-3264.,22688.)
set as=Rect(-7296.,22432.,-7168.,22688.)
set ns=Rect(-1856.,22592.,-1728.,22688.)
set Vs=Rect(-2624.,22848.,-2496.,23008.)
set Es=Rect(-7168.,23104.,-6656.,23232.)
set Xs=Rect(-4544.,22208.,-4096.,22336.)
set Os=Rect(-7360.,23232.,-7232.,23328.)
set Rs=Rect(-4672.,21824.,-4544.,21920.)
set Is=Rect(-2240.,22208.,-2112.,22304.)
set As=Rect(-3904.,22784.,-3776.,22912.)
set Ns=Rect(-4960.,21376.,-4640.,21600.)
set bs=Rect(-4928.,21440.,-4800.,21568.)
set Bs=Rect(-4800.,21440.,-4672.,21568.)
set cs=Rect(-6976.,23872.,-3904.,24000.)
set Cs=Rect(-6592.,22848.,-4160.,22976.)
set ds=Rect(-6208.,23616.,-5824.,23872.)
set Ds=Rect(-6208.,22976.,-5824.,23360.)
set fs=Rect(-5824.,22976.,-5312.,23232.)
set Fs=Rect(-5312.,22976.,-5184.,23616.)
set gs=Rect(-5184.,22976.,-5056.,23328.)
set Gs=Rect(-5056.,22944.,-4928.,23200.)
set hs=Rect(-4928.,22976.,-4800.,23104.)
set Hs=Rect(-5600.,23424.,-5472.,23552.)
set js=Rect(-5056.,23744.,-4416.,23872.)
set Js=Rect(-4928.,23616.,-4544.,23744.)
set ks=Rect(-4864.,23488.,-4608.,23616.)
set Ks=Rect(-6752.,22464.,-4032.,22592.)
set ls=Rect(-6752.,22336.,-6240.,22464.)
set Ls=Rect(-6752.,21952.,-6368.,22336.)
set ms=Rect(-5472.,22080.,-4960.,22336.)
set Ms=Rect(-5344.,21920.,-5216.,22048.)
set ps=Rect(-4800.,21664.,-4704.,21792.)
set Ps=Rect(-6144.,21568.,-5760.,21696.)
set qs=Rect(-6080.,21696.,-5856.,21792.)
set Qs=Rect(-6016.,21792.,-5888.,21920.)
set ss=Rect(-5600.,22336.,-4960.,22464.)
call ConfigureNeutralVictim()
set xz=Filter(function Cz)
set filterIssueHauntOrderAtLocBJ=Filter(function IssueHauntOrderAtLocBJFilter)
set filterEnumDestructablesInCircleBJ=Filter(function rz)
set filterGetUnitsInRectOfPlayer=Filter(function GetUnitsInRectOfPlayerFilter)
set filterGetUnitsOfTypeIdAll=Filter(function GetUnitsOfTypeIdAllFilter)
set filterGetUnitsOfPlayerAndTypeId=Filter(function GetUnitsOfPlayerAndTypeIdFilter)
set filterMeleeTrainedUnitIsHeroBJ=Filter(function MeleeTrainedUnitIsHeroBJFilter)
set filterLivingPlayerUnitsOfTypeId=Filter(function LivingPlayerUnitsOfTypeIdFilter)
set Dz=0
loop
exitwhen Dz==16
set bj_FORCE_PLAYER[Dz]=CreateForce()
call ForceAddPlayer(bj_FORCE_PLAYER[Dz],Player(Dz))
set Dz=Dz+1
endloop
set bj_FORCE_ALL_PLAYERS=CreateForce()
call ForceEnumPlayers(bj_FORCE_ALL_PLAYERS,null)
set bj_cineModePriorSpeed=GetGameSpeed()
set bj_cineModePriorFogSetting=IsFogEnabled()
set bj_cineModePriorMaskSetting=IsFogMaskEnabled()
set Dz=0
loop
exitwhen Dz>=bj_MAX_QUEUED_TRIGGERS
set bj_queuedExecTriggers[Dz]=null
set bj_queuedExecUseConds[Dz]=false
set Dz=Dz+1
endloop
set bj_isSinglePlayer=false
set fz=0
set Dz=0
loop
exitwhen Dz>=$C
if(GetPlayerController(Player(Dz))==MAP_CONTROL_USER and GetPlayerSlotState(Player(Dz))==PLAYER_SLOT_STATE_PLAYING)then
set fz=fz+1
endif
set Dz=Dz+1
endloop
set bj_isSinglePlayer=(fz==1)
set bj_rescueSound=CreateSoundFromLabel("Rescue",false,false,false,$2710,$2710)
set bj_questDiscoveredSound=CreateSoundFromLabel("QuestNew",false,false,false,$2710,$2710)
set bj_questUpdatedSound=CreateSoundFromLabel("QuestUpdate",false,false,false,$2710,$2710)
set bj_questCompletedSound=CreateSoundFromLabel("QuestCompleted",false,false,false,$2710,$2710)
set bj_questFailedSound=CreateSoundFromLabel("QuestFailed",false,false,false,$2710,$2710)
set bj_questHintSound=CreateSoundFromLabel("Hint",false,false,false,$2710,$2710)
set bj_questSecretSound=CreateSoundFromLabel("SecretFound",false,false,false,$2710,$2710)
set bj_questItemAcquiredSound=CreateSoundFromLabel("ItemReward",false,false,false,$2710,$2710)
set bj_questWarningSound=CreateSoundFromLabel("Warning",false,false,false,$2710,$2710)
set bj_victoryDialogSound=CreateSoundFromLabel("QuestCompleted",false,false,false,$2710,$2710)
set bj_defeatDialogSound=CreateSoundFromLabel("QuestFailed",false,false,false,$2710,$2710)
call DelayedSuspendDecayCreate()
set v=VersionGet()
if(v==VERSION_REIGN_OF_CHAOS)then
set bj_MELEE_MAX_TWINKED_HEROES=bj_MELEE_MAX_TWINKED_HEROES_V0
else
set bj_MELEE_MAX_TWINKED_HEROES=bj_MELEE_MAX_TWINKED_HEROES_V1
endif
call InitQueuedTriggers()
call InitRescuableBehaviorBJ()
call InitDNCSounds()
call InitMapRects()
call InitSummonableCaps()
set Rz=0
loop
set bj_stockAllowedPermanent[Rz]=false
set bj_stockAllowedCharged[Rz]=false
set bj_stockAllowedArtifact[Rz]=false
set Rz=Rz+1
exitwhen Rz>$A
endloop
call SetAllItemTypeSlots($B)
call SetAllUnitTypeSlots($B)
set bj_stockUpdateTimer=CreateTimer()
call TimerStart(bj_stockUpdateTimer,bj_STOCK_RESTOCK_INITIAL_DELAY,false,function Bz)
set bj_stockItemPurchased=CreateTrigger()
call TriggerRegisterPlayerUnitEvent(bj_stockItemPurchased,Player($F),EVENT_PLAYER_UNIT_SELL_ITEM,null)
call TriggerAddAction(bj_stockItemPurchased,function RemovePurchasedItem)
call DetectGameStarted()
call ExecuteFunc("vCv")
call ExecuteFunc("N1")
call ExecuteFunc("C1")
call ExecuteFunc("L1")
call ExecuteFunc("P1")
call ExecuteFunc("S1")
call ExecuteFunc("u1")
call ExecuteFunc("U2")
call ExecuteFunc("Z2")
call ExecuteFunc("C3")
call ExecuteFunc("l3")
call ExecuteFunc("m3")
call ExecuteFunc("i4")
call ExecuteFunc("n4")
call ExecuteFunc("R4")
call ExecuteFunc("C4")
call ExecuteFunc("H4")
call ExecuteFunc("K4")
call ExecuteFunc("q4")
call ExecuteFunc("u4")
call ExecuteFunc("U4")
call ExecuteFunc("O5")
call ExecuteFunc("S5")
call ExecuteFunc("Y5")
call ExecuteFunc("v6")
call ExecuteFunc("V6")
call ExecuteFunc("N6")
call ExecuteFunc("C6")
call ExecuteFunc("H6")
call ExecuteFunc("L6")
call ExecuteFunc("s6")
call ExecuteFunc("y6")
call ExecuteFunc("n7")
call ExecuteFunc("X7")
set t=CreateTrigger()
call TriggerRegisterTimerEvent(t,.02,true)
call TriggerAddAction(t,function T7)
set US=CreateTrigger()
call TriggerAddAction(US,function S7)
set t=null
set t=CreateTrigger()
call TriggerRegisterGameEvent(t,EVENT_GAME_LOADED)
call TriggerAddAction(t,function u7)
set t=null
set t=CreateTrigger()
call TriggerRegisterTimerEvent(t,.0,false)
call TriggerAddAction(t,function Z7)
set t=CreateTrigger()
call TriggerRegisterTimerEvent(t,.02,true)
call TriggerAddAction(t,function y7)
set t=null
set i=1
set t=CreateTrigger()
loop
exitwhen i>7
call TriggerRegisterPlayerEvent(t,Player(i-1),EVENT_PLAYER_LEAVE)
set i=i+1
endloop
call TriggerAddAction(t,function e8)
set t=null
set t=CreateTrigger()
set i=1
set kt[1]='hpea'
set kt[2]='uaco'
set kt[3]='ushd'
set kt[4]='ugho'
set kt[5]='uabo'
set kt[6]='umtw'
set kt[7]='ucry'
set kt[8]='ugar'
set Kt[1]="주황버섯 / Orange Mushroom"
set Kt[2]="파란버섯 / Blue Mushroom"
set Kt[3]="좀비버섯 / Zombie Mushroom"
set Kt[4]="버섯무더기 / Mushrooms"
set Kt[5]="문어블럭 / Bloctopus"
set Kt[6]="분홍 문어블럭 / King Bloctopus"
set Kt[7]="분홍버섯 / Pink Mushroom"
set Kt[8]="상자 / Box"
set lt[1]='hpea'
set lt[2]='uban'
set lt[3]='unec'
set lt[4]='uobs'
set lt[5]='ufro'
set lt[6]='earc'
set lt[7]='esen'
set lt[8]='edry'
set Lt[1]="주황버섯 / Orange Mushroom"
set Lt[2]="슬라임 / Slime"
set Lt[3]="버블링 / Bubbling"
set Lt[4]="비행기 / Propelly"
set Lt[5]="큐브 슬라임 / Cube Slime"
set Lt[6]="예티 / Yeti"
set Lt[7]="리본돼지 / Ribbon Pig"
set Lt[8]="루팡 / Lupin"
set mt[1]='hpea'
set mt[2]='ehpr'
set mt[3]='edot'
set mt[4]='echm'
set mt[5]='edoc'
set mt[6]='emtg'
set mt[7]='efdr'
set mt[8]='nnsw'
set Mt[1]="주황버섯 / Orange Mushroom"
set Mt[2]="코-크 버섯 / Coke Mushroom"
set Mt[3]="스톤볼 / Sentinel"
set Mt[4]="낙서 / Doodle"
set Mt[5]="코-크 텀프 / Coketump"
set Mt[6]="메소 / Meso"
set Mt[7]="뽑기기계 / Catcher"
set Mt[8]="뿔버섯 / Horny Mushroom"
set pt[1]='hpea'
set pt[2]='nmyr'
set pt[3]='nnrg'
set pt[4]='nhyc'
set pt[5]='nmpe'
set pt[6]='nanm'
set pt[7]='nanb'
set pt[8]='nanc'
set pt[9]='nanw'
set Pt[1]="주황버섯 / Orange Mushroom"
set Pt[2]="빨간색 버섯 / Mushroom|cffFF0202(Red)|r"
set Pt[3]="파란색 버섯 / Mushroom|cff0041FF(Blue)|r"
set Pt[4]="연두색 버섯 / Mushroom|cff1BE5B8(Teal)|r"
set Pt[5]="보라색 버섯 / Mushroom|cff530080(Purple)|r"
set Pt[6]="노란색 버섯 / Mushroom|cffFFFC00(Yellow)|r"
set Pt[7]="초록색 버섯 / Mushroom|cff1FBF00(Green)|r"
set Pt[8]="검정색 버섯 / Mushroom|cff282828(Black)|r"
set Pt[9]="머쉬맘 / Mushmom"
set qt[1]='hpea'
set qt[2]='n000'
set Qt[1]="주황버섯 / Orange Mushroom"
set Qt[2]="핑크빈 / PinkBean|cffc966bc|r"
set St[1]='hpea'
set St[2]='h003'
set tt[1]="주황버섯 / Orange Mushroom"
set tt[2]="투명 / Transparent"
set Tt[1]='hpea'
set Tt[2]='n007'
set Tt[3]='o003'
set Tt[4]='n008'
set ut[1]="주황버섯 / Orange Mushroom"
set ut[2]="블루 머쉬맘 / Blue Mushmom"
set ut[3]="깨비 / Blin"
set ut[4]="파풀라투스 / Papulatus"
set Ut[1]='h00A'
set Ut[2]='h005'
set Ut[3]='h004'
set Ut[4]='h009'
set Ut[5]='h008'
set wt[1]="제거 / Remove"
set wt[2]="노랑 오라 / Yellow Aura"
set wt[3]="파랑 오라 / Blue Aura"
set wt[4]="빨강 오라 / Red Aura"
set wt[5]="초록 오라 / Green Aura"
loop
exitwhen i>7
call TriggerRegisterPlayerChatEvent(t,Player(i-1),"-",false)
set i=i+1
endloop
call TriggerAddAction(t,function J8)
set t=CreateTrigger()
set i=1
loop
exitwhen i>7
set Gt[i]=DialogCreate()
call TriggerRegisterDialogEvent(t,Gt[i])
set i=i+1
endloop
call TriggerAddAction(t,function N8)
set t=CreateTrigger()
set Ft=DialogCreate()
call TriggerRegisterDialogEvent(t,Ft)
call TriggerAddAction(t,function A8)
set t=CreateTrigger()
set i=1
loop
exitwhen i>7
set gt[i]=DialogCreate()
call TriggerRegisterDialogEvent(t,gt[i])
set i=i+1
endloop
call TriggerAddAction(t,function g8)
call k8()
set t=null
set vT=CreateTrigger()
call TriggerAddAction(vT,function L8)
call W8()
set i=1
set t=CreateTrigger()
loop
exitwhen i>7
call TriggerRegisterPlayerEvent(t,Player(i-1),EVENT_PLAYER_END_CINEMATIC)
set i=i+1
endloop
call TriggerAddAction(t,function y8)
set t=null
set t=CreateTrigger()
call DzTriggerRegisterSyncData(t,"onEnter",false)
call TriggerAddAction(t,function Y8)
set t=CreateTrigger()
call DzTriggerRegisterKeyEvent(t,$D,1,true,null)
call TriggerAddAction(t,function z8)
call E7(t)
call O7(function z8)
set t=null
set t=CreateTrigger()
call TriggerRegisterEnterRectSimple(t,YF)
call TriggerAddAction(t,function vRv)
set t=null
set t=CreateTrigger()
call vAv(t,1,Gj,$A,"none")
call vAv(t,2,hj,-$A,"none")
call vAv(t,3,Hj,$A,"none")
call vAv(t,4,jj,-$A,"none")
call vAv(t,5,Jj,0,"Right")
call vAv(t,6,kj,0,"Left")
call vAv(t,7,Kj,0,"Right")
call vAv(t,8,lj,0,"Left")
call vAv(t,9,Lj,$A,"none")
call vAv(t,$A,mj,-$A,"none")
call vAv(t,$B,Mj,$A,"none")
call vAv(t,$C,pj,-$A,"none")
call vAv(t,$D,Pj,-$A,"none")
call vAv(t,$E,qj,0,"Left")
call vAv(t,$F,Qj,$A,"none")
call vAv(t,16,sj,0,"Right")
call vAv(t,17,Sj,2,"Right")
call vAv(t,18,tj,-2,"Left")
call vAv(t,19,Tj,0,"Right")
call vAv(t,20,uj,0,"Left")
call vAv(t,21,Uj,0,"Right")
call vAv(t,22,wj,0,"Left")
call vAv(t,23,Wj,8,"Right")
call vAv(t,24,yj,-8,"Left")
call vAv(t,25,Yj,0,"Right")
call vAv(t,26,zj,0,"Left")
call vAv(t,27,Zj,0,"Right")
call vAv(t,28,vJ,0,"Left")
call vAv(t,29,eJ,0,"Right")
call vAv(t,30,xJ,$A,"none")
call vAv(t,31,oJ,0,"Left")
call vAv(t,32,rJ,-$A,"none")
call vAv(t,33,iJ,0,"Right")
call vAv(t,34,aJ,0,"Left")
call vAv(t,35,nJ,0,"Right")
call vAv(t,36,VJ,0,"Left")
call vAv(t,37,EJ,$A,"none")
call vAv(t,38,XJ,-$A,"none")
call vAv(t,39,OJ,0,"Right")
call vAv(t,40,RJ,0,"Left")
call vAv(t,41,IJ,0,"Left")
call vAv(t,42,AJ,0,"Right")
call vAv(t,43,NJ,0,"Left")
call vAv(t,44,bJ,0,"Right")
call vAv(t,45,BJ,0,"Left")
call vAv(t,46,cJ,0,"Right")
call vAv(t,47,CJ,0,"Left")
call vAv(t,48,dJ,0,"Right")
call vAv(t,49,DJ,0,"Left")
call vAv(t,50,fJ,0,"Left")
call vAv(t,51,FJ,0,"Right")
call vAv(t,52,jQ,0,"Right")
call vAv(t,53,JQ,0,"Right")
call vAv(t,54,kQ,0,"Left")
call vAv(t,55,Ns,0,"Left")
call TriggerAddAction(t,function vIv)
set t=null
call JNUse()
call vbv()
call vBv()
set t=CreateTrigger()
//call TriggerRegisterTimerEvent(t,30,true)
call TriggerAddAction(t,function vcv)
set t=null
endfunction
function config takes nothing returns nothing
call SetMapName("TRIGSTR_001")
call SetMapDescription("TRIGSTR_003")
call SetPlayers(8)
call SetTeams(8)
call SetGamePlacement(MAP_PLACEMENT_TEAMS_TOGETHER)
call DefineStartLocation(0,-8128.,16832.)
call DefineStartLocation(1,-8128.,16832.)
call DefineStartLocation(2,-8128.,16832.)
call DefineStartLocation(3,-8128.,16832.)
call DefineStartLocation(4,-8128.,16832.)
call DefineStartLocation(5,-8128.,16832.)
call DefineStartLocation(6,-8128.,16832.)
call DefineStartLocation(7,-8128.,16832.)
call SetPlayerStartLocation(Player(0),0)
call SetPlayerColor(Player(0),ConvertPlayerColor(0))
call SetPlayerRacePreference(Player(0),RACE_PREF_NIGHTELF)
call SetPlayerRaceSelectable(Player(0),false)
call SetPlayerController(Player(0),MAP_CONTROL_USER)
call SetPlayerStartLocation(Player(1),1)
call SetPlayerColor(Player(1),ConvertPlayerColor(1))
call SetPlayerRacePreference(Player(1),RACE_PREF_NIGHTELF)
call SetPlayerRaceSelectable(Player(1),false)
call SetPlayerController(Player(1),MAP_CONTROL_USER)
call SetPlayerStartLocation(Player(2),2)
call SetPlayerColor(Player(2),ConvertPlayerColor(2))
call SetPlayerRacePreference(Player(2),RACE_PREF_NIGHTELF)
call SetPlayerRaceSelectable(Player(2),false)
call SetPlayerController(Player(2),MAP_CONTROL_USER)
call SetPlayerStartLocation(Player(3),3)
call SetPlayerColor(Player(3),ConvertPlayerColor(3))
call SetPlayerRacePreference(Player(3),RACE_PREF_NIGHTELF)
call SetPlayerRaceSelectable(Player(3),false)
call SetPlayerController(Player(3),MAP_CONTROL_USER)
call SetPlayerStartLocation(Player(4),4)
call SetPlayerColor(Player(4),ConvertPlayerColor(4))
call SetPlayerRacePreference(Player(4),RACE_PREF_NIGHTELF)
call SetPlayerRaceSelectable(Player(4),false)
call SetPlayerController(Player(4),MAP_CONTROL_USER)
call SetPlayerStartLocation(Player(5),5)
call SetPlayerColor(Player(5),ConvertPlayerColor(5))
call SetPlayerRacePreference(Player(5),RACE_PREF_NIGHTELF)
call SetPlayerRaceSelectable(Player(5),false)
call SetPlayerController(Player(5),MAP_CONTROL_USER)
call SetPlayerStartLocation(Player(6),6)
call SetPlayerColor(Player(6),ConvertPlayerColor(6))
call SetPlayerRacePreference(Player(6),RACE_PREF_NIGHTELF)
call SetPlayerRaceSelectable(Player(6),false)
call SetPlayerController(Player(6),MAP_CONTROL_USER)
call SetPlayerStartLocation(Player($B),7)
call SetPlayerColor(Player($B),ConvertPlayerColor($B))
call SetPlayerRacePreference(Player($B),RACE_PREF_NIGHTELF)
call SetPlayerRaceSelectable(Player($B),false)
call SetPlayerController(Player($B),MAP_CONTROL_COMPUTER)
call InitCustomTeams()
call SetStartLocPrioCount(0,6)
call SetStartLocPrio(0,0,1,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(0,1,2,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(0,2,3,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(0,3,4,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(0,4,5,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(0,5,6,MAP_LOC_PRIO_HIGH)
call SetStartLocPrioCount(1,6)
call SetStartLocPrio(1,0,0,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(1,1,2,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(1,2,3,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(1,3,4,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(1,4,5,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(1,5,6,MAP_LOC_PRIO_HIGH)
call SetStartLocPrioCount(2,6)
call SetStartLocPrio(2,0,0,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(2,1,1,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(2,2,3,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(2,3,4,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(2,4,5,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(2,5,6,MAP_LOC_PRIO_HIGH)
call SetStartLocPrioCount(3,6)
call SetStartLocPrio(3,0,0,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(3,1,1,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(3,2,2,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(3,3,4,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(3,4,5,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(3,5,6,MAP_LOC_PRIO_HIGH)
call SetStartLocPrioCount(4,6)
call SetStartLocPrio(4,0,0,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(4,1,1,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(4,2,2,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(4,3,3,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(4,4,5,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(4,5,6,MAP_LOC_PRIO_HIGH)
call SetStartLocPrioCount(5,6)
call SetStartLocPrio(5,0,0,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(5,1,1,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(5,2,2,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(5,3,3,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(5,4,4,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(5,5,6,MAP_LOC_PRIO_HIGH)
call SetStartLocPrioCount(6,6)
call SetStartLocPrio(6,0,0,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(6,1,1,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(6,2,2,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(6,3,3,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(6,4,4,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(6,5,5,MAP_LOC_PRIO_HIGH)
endfunction
function vdv takes nothing returns boolean
local integer gz=UY
call SetUnitScale(dT[gz],BT[gz],BT[gz],1)
call SetUnitVertexColorBJ(dT[gz],100.,100.,100.,cT[gz])
set cT[gz]=cT[gz]+5
return true
endfunction
function vDv takes nothing returns boolean
local integer gz=UY
local integer i=qY
set wY=xY[oY[gz]+i]
return true
endfunction
function vfv takes nothing returns boolean
local integer gz=UY
local integer kz=qY
if kz>=1 and kz<=2 then
set wY=1
return true
elseif kz==3 then
set wY=Ly[Yy[gz]]
return true
elseif kz==4 then
set wY=my[Yy[gz]]
return true
elseif kz==5 then
set wY=My[Yy[gz]]
return true
elseif kz==6 then
set wY=Py[Yy[gz]]
return true
elseif kz==7 then
set wY=qy[Yy[gz]]
return true
elseif kz==8 then
set wY=Qy[Yy[gz]]
return true
elseif kz==9 then
set wY=sy[Yy[gz]]
return true
elseif kz==$A then
set wY=Sy[Yy[gz]]
return true
elseif kz==$B then
set wY=ty[Yy[gz]]
return true
elseif kz==$C then
set wY=Ty[Yy[gz]]
return true
elseif kz==$D then
set wY=uy[Yy[gz]]
return true
else
set wY=0
return true
endif
return true
endfunction
function vFv takes nothing returns boolean
local integer gz=UY
local integer i=0
call T0(UT[gz])
call DestroyTrigger(mT[gz])
call RemoveRegion(qT[gz])
call RemoveUnit(tT[gz])
call RemoveRect(ST[gz])
call RemoveRect(sT[gz])
set mT[gz]=null
set qT[gz]=null
set tT[gz]=null
set ST[gz]=null
set sT[gz]=null
loop
exitwhen i>=7
call RemoveRect(TT[uT[gz]+i])
set TT[uT[gz]+i]=null
if i<4 then
call DestroyTrigger(MT[pT[gz]+i])
set MT[pT[gz]+i]=null
endif
set i=i+1
endloop
return true
endfunction
function vgv takes nothing returns boolean
local integer gz=UY
local integer i=qY
local integer Sz=QY
local integer id='D003'
if PT[gz]then
set id='D004'
endif
if DT[(HT[jT[(UT[gz])]+(i)])]==Sz then
call StartSound(pS)
call TriggerRegisterTimerEvent(fT[(HT[jT[(UT[gz])]+(i)])],.05,true)
set LT[gz]=LT[gz]+1
if LT[gz]==7 then
call k0(1.,'d','d','d',0,'d','d','d','d')
call SetDoodadAnimation(GetRectMinX(sT[gz]),GetRectMaxY(sT[gz]),128.,id,false,QT[gz],false)
call u0(gz)
endif
else
call u0(gz)
endif
return true
endfunction
function vGv takes nothing returns boolean
local integer gz=UY
local integer s3=270
local integer array vhv
local integer array vHv
local integer i=0
local integer vjv=-1
local real vJv=0
if PT[gz]then
set s3=90
endif
set vhv[0]='n002'
set vhv[1]='n003'
set vhv[2]='n004'
set vhv[3]='n005'
set vHv[0]=IT
set vHv[1]=AT
set vHv[2]=NT
set vHv[3]=bT
call v1(gz)
set tT[gz]=CreateUnit(Player($B),'n001',GetRectCenterX(ST[gz]),GetRectCenterY(ST[gz]),s3)
call SetUnitVertexColorBJ(tT[gz],'d','d','d',20)
set UT[gz]=qz()
loop
exitwhen i>=7
if PT[gz]then
set vJv=GetRectMaxX(ST[gz])-(i*$80)-91
else
set vJv=GetRectMinX(ST[gz])+(i*$80)+91
endif
set HT[jT[(UT[gz])]+(i)]=(Gz())
set fT[(HT[jT[(UT[gz])]+(i)])]=kZ((HT[jT[(UT[gz])]+(i)]),0,function s0)
set vjv=GetRandomInt(0,3)
set DT[(HT[jT[(UT[gz])]+(i)])]=vHv[vjv]
set dT[(HT[jT[(UT[gz])]+(i)])]=CreateUnit(Player($B),vhv[vjv],vJv,GetRectCenterY(ST[gz]),s3)
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Undead\\FrostArmor\\FrostArmorDamage.mdl",vJv,GetRectCenterY(ST[gz])))
set i=i+1
endloop
set Bw[C]=gz
call TimerStart(bw[(C)],((3.5)*1.),(false),(function w0))
call DestroyTrigger(mT[gz])
set mT[gz]=null
return true
endfunction
function vkv takes nothing returns boolean
local integer gz=UY
local integer Uz=qY
return true
endfunction
function vKv takes nothing returns boolean
local integer Wz=qY
local integer gz=yz()
local trigger t=a4(gz,0,function Z8)
call DzTriggerRegisterKeyEvent(t,Wz,1,true,null)
call E7(t)
set t=null
set wY=gz
return true
endfunction
function vlv takes nothing returns boolean
local integer gz=UY
local integer vZ=qY
local integer i=GetPlayerId(GetTriggerPlayer())+1
if i==It and au[nu[gz]+Xu[gz]]==vZ and RectContainsUnit(QX,at[i])then
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Undead\\FrostArmor\\FrostArmorDamage.mdl",GetUnitX(at[i]),GetUnitY(at[i])))
set Xu[gz]=Xu[gz]+1
if Xu[gz]<6 then
return true
endif
set yt[8]=true
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Items\\StaffOfPurification\\PurificationCaster.mdl",GetRectCenterX(QX),GetRectCenterY(QX)))
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 얼음 동굴 입구가 열렸습니다!|r")
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 단 얼음 동굴 입구로 들어간 인원이 다른 포탈에 들어간 인원보다 적으면 기존 스테이지로 이동합니다.|r")
call e1(gz)
elseif i==It then
set Xu[gz]=0
endif
return true
endfunction
function vLv takes nothing returns boolean
local integer gz=UY
local string nZ=uY
local integer v2=kW[MW[gz]]
local integer b
loop
exitwhen v2==0
set b=FW[v2]
if nZ=="Action" then
call IZ(b)
elseif nZ=="Reset" then
call AZ(b)
endif
set v2=gW[v2]
endloop
return true
endfunction
function vmv takes nothing returns boolean
local integer gz=UY
return true
endfunction
function vMv takes nothing returns boolean
local integer gz=UY
return true
endfunction
function vpv takes nothing returns boolean
local real x=sY
local real y=SY
local integer bZ=qY
local integer gz=BZ()
set BW[gz]=x
set cW[gz]=y
set CW[gz]=bZ
set wY=gz
return true
endfunction
function vPv takes nothing returns boolean
local integer gz=UY
local integer i=qY
local real C0=GetUnitX(at[i])
local real d0=GetUnitY(at[i])
local real x=GetRectCenterX(Pw[sw[gz]])
local real y=GetRectCenterY(Pw[sw[gz]])
local rect r
loop
set r=Rect(x-64,y-64,x+64,y+64)
exitwhen CountUnitsInGroup(iz(r))==0
if P==false then
set y=y+32
else
set y=y-32
endif
call RemoveRect(r)
endloop
call RemoveRect(r)
if GetTerrainType(x,y)=='Xsqd' and((P==false and GetTerrainType(x,y+40)=='Xsqd')or(P and GetTerrainType(x,y-40)=='Xsqd'))then
call DestroyEffect(AddSpecialEffect("war3mapImported\\Teleport.mdl",C0,d0))
call DestroyEffect(AddSpecialEffect("war3mapImported\\Teleport.mdl",x,y))
call A4(i)
call SetUnitPosition(at[i],x,y)
call c0(i,C0,d0)
else
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 출구에 빈 공간이 없어 이동할 수 없습니다!")
endif
set r=null
return true
endfunction
function vqv takes nothing returns boolean
local integer hZ=qY
local integer gz=jZ()
local integer i=gz
if i>Aw then
set Aw=gz
endif
if bw[gz]==null then
set bw[gz]=CreateTimer()
call SaveInteger(Nw,0,GetHandleId(bw[gz]),gz)
endif
set Bw[gz]=hZ
set wY=gz
return true
endfunction
function vQv takes nothing returns boolean
local integer gz=UY
local real r=sY
local boolean vsv=TY
local code c=tY
call TimerStart(bw[gz],r,vsv,c)
return true
endfunction
function vSv takes nothing returns boolean
local integer gz=UY
call PauseTimer(bw[gz])
call JZ(gz)
return true
endfunction
function vtv takes nothing returns boolean
set wY=LoadInteger(Fe,0,GetHandleId(GetTriggeringTrigger()))
return true
endfunction
function vTv takes nothing returns boolean
local integer id=qY
local integer ev=QY
local code c=tY
local destructable d=LoadDestructableHandle(fe,0,ev)
set ge=CreateTrigger()
if d==null then
set d=CreateDestructable('OTis',0,0,0,0,0)
call KillDestructable(d)
call SaveDestructableHandle(fe,0,ev,d)
endif
call TriggerRegisterDeathEvent(ge,d)
call SaveInteger(Fe,0,GetHandleId(ge),id)
call TriggerAddCondition(ge,Filter(c))
set d=null
set WY=ge
return true
endfunction
function vuv takes nothing returns boolean
local integer gz=UY
local integer v2
set v2=vU[nU[gz]]
loop
exitwhen v2==0
call R2(Uu[v2])
set v2=wu[v2]
endloop
set EU[gz]=true
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Items\\AIem\\AIemTarget.mdl",GetRectCenterX(iU[gz]),GetRectCenterY(iU[gz])))
call SetDoodadAnimationRect(iU[gz],aU[gz],"Death",false)
return true
endfunction
function vUv takes nothing returns boolean
local integer uZ=qY
local integer UZ=QY
local integer gz=WZ()
set su[gz]=uZ
set Su[gz]=UZ
set wY=gz
return true
endfunction
function vwv takes nothing returns boolean
local integer gz=UY
local real x=sY
local real y=SY
return true
endfunction
function vWv takes nothing returns boolean
local integer gz=UY
local real x=sY
local real y=SY
call SetTerrainType(x,y,pu[gz],-1,1,0)
return true
endfunction
function vyv takes nothing returns boolean
local integer gz=UY
local real x=sY
local real y=SY
call SetDoodadAnimation(x,y,64,mu[gz],false,Mu[gz],false)
return true
endfunction
function vYv takes nothing returns boolean
local integer gz=UY
local integer Uz=qY
return true
endfunction
function vzv takes nothing returns boolean
local integer gz=UY
local real x=sY
local real y=SY
local rect r=Rect(x-64,y-64,x+32,y+32)
call RegionAddRect(ie,r)
call RemoveRect(r)
set r=null
return true
endfunction
function vZv takes nothing returns boolean
local integer gz=UY
local real x=sY
local real y=SY
local rect r=Rect(x-64,y-64,x+32,y+32)
call RegionClearRect(ie,r)
call RemoveRect(r)
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Human\\DispelMagic\\DispelMagicTarget.mdl",x,y))
set r=null
return true
endfunction
function v_v takes nothing returns boolean
local integer gz=UY
call D5(gz,Nv)
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Undead\\FrostArmor\\FrostArmorDamage.mdl",BW[gz],cW[gz]))
return true
endfunction
function v0v takes nothing returns boolean
local integer gz=UY
call D5(gz,CW[gz])
return true
endfunction
function v1v takes nothing returns boolean
local integer gz=UY
call D5(gz,CW[gz])
return true
endfunction
function v2v takes nothing returns boolean
local integer gz=UY
call D5(gz,Nv)
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Undead\\FrostArmor\\FrostArmorDamage.mdl",BW[gz],cW[gz]))
return true
endfunction
function v3v takes nothing returns boolean
local integer gz=UY
local integer Uz=qY
call r8(Uz+1,"-count 3",true)
return true
endfunction
function v4v takes nothing returns boolean
local integer gz=UY
local integer Uz=qY
call d8(Uz+1)
return true
endfunction
function v5v takes nothing returns boolean
local integer i=qY
if Re==false then
set Re=true
set de=GZ(i)
if(sU[kv]==3 and SU[kv]==5)or(sU[kv]==4 and SU[kv]==8)or(sU[kv]==9 and SU[kv]==3)or(sU[kv]==$A and SU[kv]==7)or(sU[kv]==$C and SU[kv]==8)or(sU[kv]==$D and SU[kv]==8)then
call PauseTimer(be)
call DestroyTimerDialog(Ce)
endif
call k0(1.,0,0,0,'d',0,0,0,0)
if Tv==false then
if(SU[kv]+i>8 or(sU[kv]==1 and SU[kv]==0))then
call CinematicModeBJ(true,bj_FORCE_ALL_PLAYERS)
if sU[kv]==1 and SU[kv]==0 then
call CinematicFilterGenericBJ(.0,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",0,0,0,0,0,0,0,0)
if false then
call i3(kv,$C,8)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"Secret World: 깊은 산속")
call TimerStart(bw[(de)],((3.)*1.),(false),(function v4))
else
call TimerStart(bw[(de)],((1.)*1.),(false),(function v4))
endif
elseif sU[kv]==3 or sU[kv]==4 or sU[kv]==9 or sU[kv]==$D then
call k0(2.,0,0,0,'d','d','d','d',0)
call TriggerExecute(rx)
elseif sU[kv]==5 then
call k0(2.,0,0,0,'d','d','d','d',0)
call TriggerExecute(gx)
elseif sU[kv]==6 then
call k0(2.,0,0,0,'d','d','d','d',0)
call TriggerExecute(mx)
elseif sU[kv]==7 then
call k0(2.,0,0,0,'d','d','d','d',0)
call TriggerExecute(Wx)
elseif sU[kv]==$A then
call k0(2.,0,0,0,'d','d','d','d',0)
set ux=true
call TriggerExecute(Wx)
elseif sU[kv]==$C then
call k0(2.,0,0,0,'d','d','d','d',0)
set Ux=true
call TriggerExecute(Wx)
else
call StopSound(Ee,false,true)
if Ie then
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"※ 방장이 월드를 스킵하였습니다.")
endif
if false then
call TimerStart(bw[(de)],((0)*1.),(false),(function v4))
else
call TimerStart(bw[(de)],((2.)*1.),(false),(function v4))
endif
endif
elseif M3()==$A and i>0 then
call CinematicModeBJ(true,bj_FORCE_ALL_PLAYERS)
call StopSound(Ee,false,true)
call TimerStart(bw[(de)],((2.)*1.),(false),(function v4))
elseif SU[kv]+i>7 and sU[kv]==8 and it==false then
set Tx=true
call CinematicModeBJ(true,bj_FORCE_ALL_PLAYERS)
call k0(2.,0,0,0,'d','d','d','d',0)
call TriggerExecute(Wx)
elseif sU[kv]==$B and SU[kv]+i>5 and it==false then
set ro=true
call CinematicModeBJ(true,bj_FORCE_ALL_PLAYERS)
call k0(2.,0,0,0,'d','d','d','d',0)
call TriggerExecute(Wx)
else
call TimerStart(bw[(de)],((1.5)*1.),(false),(function z3))
endif
elseif tv+i>8 then
call CinematicModeBJ(true,bj_FORCE_ALL_PLAYERS)
call k0(2.,0,0,0,'d','d','d','d',0)
call TriggerExecute(rx)
else
call TimerStart(bw[(de)],((1.5)*1.),(false),(function z3))
endif
endif
return true
endfunction
function v6v takes nothing returns boolean
local integer i=0
local integer o=-1
local boolean oops=false
if(Ke)then
return true
else
set Ke=true
endif
set je=InitHashtable()
loop
exitwhen(i==256)
set iY[i]=CreateTimer()
call SaveInteger(je,0,GetHandleId((iY[i])),(ke))
set i=i+1
endloop
set Je=256
return true
endfunction
function v7v takes nothing returns boolean
local integer K2=qY
local integer l2=QY
local integer v2=nW[Xx]
local integer S0
loop
exitwhen v2==0
set S0=vW[v2]
if uw[S0]==K2 and Uw[S0]==l2 then
call v5(S0)
exitwhen true
endif
set v2=eW[v2]
endloop
return true
endfunction
function v8v takes nothing returns boolean
local integer K2=qY
local integer l2=QY
local integer v2=iy[Ax]
local integer st
loop
exitwhen v2==0
set st=zW[v2]
if K2==UW[st]and l2==wW[st]then
call k5(st)
exitwhen true
endif
set v2=ZW[v2]
endloop
return true
endfunction
function v9v takes nothing returns boolean
local integer i=qY
if sU[kv]!=1 or SU[kv]!=1 then
call DisplayTimedTextToPlayer(Player(i-1),0,0,$A,"※ 1-1에서만 사용할 수 있습니다.")
return true
endif
if i!=It then
call DisplayTimedTextToPlayer(Player(i-1),0,0,5,"※ 재시작 권한을 가진 플레이어만 사용 가능한 명령어 입니다.")
return true
endif
call TriggerExecute(vT)
return true
endfunction
function evv takes nothing returns boolean
local integer i=qY
local boolean eev=true
if GetLocalPlayer()==Player(i)then
call ClearTextMessages()
endif
if Ly[Yy[(xY[oY[(ET)]+(i)])]]>0 then
set eev=false
call DisplayTimedTextToPlayer(Player(i),0,0,5,"　　　　　　핑크: "+qe[i+1])
endif
if my[Yy[(xY[oY[(ET)]+(i)])]]>0 then
set eev=false
call DisplayTimedTextToPlayer(Player(i),0,0,5,"　　　　　　지하철: "+Qe[i+1])
endif
if My[Yy[(xY[oY[(ET)]+(i)])]]>0 then
set eev=false
call DisplayTimedTextToPlayer(Player(i),0,0,5,"　　　　　　발렌: "+se[i+1])
endif
if Py[Yy[(xY[oY[(ET)]+(i)])]]>0 then
set eev=false
call DisplayTimedTextToPlayer(Player(i),0,0,5,"　　　　　　해변: "+Se[i+1])
endif
if qy[Yy[(xY[oY[(ET)]+(i)])]]>0 then
set eev=false
call DisplayTimedTextToPlayer(Player(i),0,0,5,"　　　　　　코크: "+te[i+1])
endif
if Qy[Yy[(xY[oY[(ET)]+(i)])]]>0 then
set eev=false
call DisplayTimedTextToPlayer(Player(i),0,0,5,"　　　　　　월드: "+Ue[i+1])
endif
if sy[Yy[(xY[oY[(ET)]+(i)])]]>0 then
set eev=false
call DisplayTimedTextToPlayer(Player(i),0,0,5,"　　　　　　카페: "+Te[i+1])
endif
if Sy[Yy[(xY[oY[(ET)]+(i)])]]>0 then
set eev=false
call DisplayTimedTextToPlayer(Player(i),0,0,5,"　　　　　　사막: "+ue[i+1])
endif
if ty[Yy[(xY[oY[(ET)]+(i)])]]>0 then
set eev=false
call DisplayTimedTextToPlayer(Player(i),0,0,5,"　　　　　　엘린숲: "+We[i+1])
endif
if Ty[Yy[(xY[oY[(ET)]+(i)])]]>0 then
set eev=false
call DisplayTimedTextToPlayer(Player(i),0,0,5,"　　　　　　얼음 동굴: "+Ye[i+1])
endif
if uy[Yy[(xY[oY[(ET)]+(i)])]]>0 then
set eev=false
call DisplayTimedTextToPlayer(Player(i),0,0,5,"　　　　　　아랫 마을: "+ze[i+1])
endif
if Uy[Yy[(xY[oY[(ET)]+(i)])]]>0 then
set eev=false
call DisplayTimedTextToPlayer(Player(i),0,0,5,"　　　　　　랜덤: "+ye[i+1])
endif
if eev then
call DisplayTimedTextToPlayer(Player(i),0,0,20,"　　　　　　|cffFFFC00※ 클리어한 맵이 없습니다! ※|r")
endif
return true
endfunction
function vCv takes nothing returns nothing
set BY=CreateTrigger()
call TriggerAddCondition(BY,Condition(function vdv))
set mY=CreateTrigger()
call TriggerAddCondition(mY,Condition(function vDv))
set LY=CreateTrigger()
call TriggerAddCondition(LY,Condition(function vfv))
set cY=CreateTrigger()
call TriggerAddCondition(cY,Condition(function vFv))
set CY=CreateTrigger()
call TriggerAddCondition(CY,Condition(function vgv))
set dY=CreateTrigger()
call TriggerAddCondition(dY,Condition(function vGv))
set XY[60]=CreateTrigger()
call TriggerAddCondition(XY[60],Condition(function vkv))
call TriggerAddAction(XY[60],function vkv)
set lY=CreateTrigger()
call TriggerAddCondition(lY,Condition(function vKv))
set bY[60]=null
set bY[61]=null
set bY[62]=null
set bY[63]=null
set DY=CreateTrigger()
call TriggerAddCondition(DY,Condition(function vlv))
set KY=CreateTrigger()
call TriggerAddCondition(KY,Condition(function vLv))
set VY[44]=CreateTrigger()
call TriggerAddCondition(VY[44],Condition(function vmv))
call TriggerAddAction(VY[44],function vmv)
set EY[44]=CreateTrigger()
call TriggerAddCondition(EY[44],Condition(function vMv))
call TriggerAddAction(EY[44],function vMv)
set kY=CreateTrigger()
call TriggerAddCondition(kY,Condition(function vpv))
set AY[44]=null
set AY[45]=null
set AY[46]=null
set JY=CreateTrigger()
call TriggerAddCondition(JY,Condition(function vPv))
set hY=CreateTrigger()
call TriggerAddCondition(hY,Condition(function vqv))
set HY=CreateTrigger()
call TriggerAddCondition(HY,Condition(function vQv))
set jY=CreateTrigger()
call TriggerAddCondition(jY,Condition(function vSv))
set gY=CreateTrigger()
call TriggerAddCondition(gY,Condition(function vtv))
set GY=CreateTrigger()
call TriggerAddCondition(GY,Condition(function vTv))
set FY=CreateTrigger()
call TriggerAddCondition(FY,Condition(function vuv))
set fY=CreateTrigger()
call TriggerAddCondition(fY,Condition(function vUv))
set nY[18]=CreateTrigger()
call TriggerAddCondition(nY[18],Condition(function vwv))
call TriggerAddAction(nY[18],function vwv)
set RY[18]=null
set RY[19]=null
set RY[20]=null
set Lu[17]=CreateTrigger()
call TriggerAddCondition(Lu[17],Condition(function vWv))
call TriggerAddAction(Lu[17],function vWv)
set lu[17]=null
set Lu[16]=CreateTrigger()
call TriggerAddCondition(Lu[16],Condition(function vyv))
call TriggerAddAction(Lu[16],function vyv)
set lu[16]=null
set XY[63]=CreateTrigger()
call TriggerAddCondition(XY[63],Condition(function vYv))
call TriggerAddAction(XY[63],function vYv)
set nY[19]=CreateTrigger()
call TriggerAddCondition(nY[19],Condition(function vzv))
call TriggerAddAction(nY[19],function vzv)
set nY[20]=CreateTrigger()
call TriggerAddCondition(nY[20],Condition(function vZv))
call TriggerAddAction(nY[20],function vZv)
set VY[45]=CreateTrigger()
call TriggerAddCondition(VY[45],Condition(function v_v))
call TriggerAddAction(VY[45],function v_v)
set EY[45]=CreateTrigger()
call TriggerAddCondition(EY[45],Condition(function v0v))
call TriggerAddAction(EY[45],function v0v)
set VY[46]=CreateTrigger()
call TriggerAddCondition(VY[46],Condition(function v1v))
call TriggerAddAction(VY[46],function v1v)
set EY[46]=CreateTrigger()
call TriggerAddCondition(EY[46],Condition(function v2v))
call TriggerAddAction(EY[46],function v2v)
set Fw[53]=null
set Fw[54]=null
set Fw[55]=null
set Fw[56]=null
set Fw[57]=null
set Fw[58]=null
set Fw[59]=null
set XY[61]=CreateTrigger()
call TriggerAddCondition(XY[61],Condition(function v3v))
call TriggerAddAction(XY[61],function v3v)
set XY[62]=CreateTrigger()
call TriggerAddCondition(XY[62],Condition(function v4v))
call TriggerAddAction(XY[62],function v4v)
set PY[1]=CreateTrigger()
call TriggerAddAction(PY[1],function v5v)
call TriggerAddCondition(PY[1],Condition(function v5v))
set MY[1]=CreateTrigger()
call TriggerAddAction(MY[1],function v6v)
call TriggerAddCondition(MY[1],Condition(function v6v))
set pY[1]=CreateTrigger()
call TriggerAddAction(pY[1],function v7v)
call TriggerAddCondition(pY[1],Condition(function v7v))
set pY[2]=CreateTrigger()
call TriggerAddAction(pY[2],function v8v)
call TriggerAddCondition(pY[2],Condition(function v8v))
set PY[3]=CreateTrigger()
call TriggerAddAction(PY[3],function v9v)
call TriggerAddCondition(PY[3],Condition(function v9v))
set PY[2]=CreateTrigger()
call TriggerAddAction(PY[2],function evv)
call TriggerAddCondition(PY[2],Condition(function evv))
call ExecuteFunc("vvv")
call ExecuteFunc("vev")
call ExecuteFunc("vxv")
endfunction
