//===== rAthena Script =======================================
//=
//===== By: ==================================================
//=
//===== Current Version: =====================================
//= 1.0
//===== Compatible With: =====================================
//= rAthena
//===== Description: =========================================
//= [Aegis Conversion]
//= Original filename:
//= NPC list:
//= - #fund_master (prt_gld 1 1)
//= - Investment_total#fund00 (prt_gld 2 2)
//= - Revoting manager#Invest1 (prt_gld 164 98)
//= - Revoting manager#Invest2 (prt_gld 164 98)
//= - checking message. (prt_gld 3 2)
//= - check global Var (sec_in02 15 35)
//= - Brito01 (gefg_cas01 1 3)
//= - Brito02 (gefg_cas02 1 3)
//= - Brito03 (gefg_cas03 1 3)
//= - Brito04 (gefg_cas04 1 3)
//= - Brito05 (gefg_cas05 1 3)
//= - Britopill (gef_fild13 1 3)
//= - Green lake01 (payg_cas01 1 3)
//= - Green lake02 (payg_cas02 1 3)
//= - Green lake03 (payg_cas03 1 3)
//= - Green lake04 (payg_cas04 1 3)
//= - Green lake05 (payg_cas05 1 3)
//= - Green lake00 (pay_gld 1 3)
//= - Alde00 (alde_gld 1 3)
//= - Alde01 (aldeg_cas01 1 3)
//= - Alde02 (aldeg_cas02 1 3)
//= - Alde03 (aldeg_cas03 1 3)
//= - Alde04 (aldeg_cas04 1 3)
//= - Alde05 (aldeg_cas05 1 3)
//= - Valkyrie01 (prtg_cas01 1 3)
//= - Valkyrie02 (prtg_cas02 1 3)
//= - Valkyrie03 (prtg_cas03 1 3)
//= - Valkyrie04 (prtg_cas04 1 3)
//= - Valkyrie05 (prtg_cas05 1 3)
//===== Additional Comments: =================================
//= 1.0 Converted from the official Aegis script.
//============================================================
prt_gld,1,1,0 script #fund_master 844,{
end;
OnInit:
set .@inven, $2011_agit_invest;
if (GetAgitInvestMsg == 1) {
set $2011_agit_invest, 1;
}
else if (((GetAgitInvestMsg == 3) && (.@inven == 2)) || ((GetAgitInvestMsg == 3) && (.@inven == 1)) || ((GetAgitInvestMsg == 2) && (.@inven == 1))) {
set .@pcas01, $fund_prt01;
set .@pcas02, $fund_prt02;
set .@pcas03, $fund_prt03;
set .@pcas04, $fund_prt04;
set .@pcas05, $fund_prt05;
set .@pcasex, $fund_prt_extra;
set .@pycas01, $fund_pay01;
set .@pycas02, $fund_pay02;
set .@pycas03, $fund_pay03;
set .@pycas04, $fund_pay04;
set .@pycas05, $fund_pay05;
set .@pycasex, $fund_pay_extra;
set .@gcas01, $fund_gef01;
set .@gcas02, $fund_gef02;
set .@gcas03, $fund_gef03;
set .@gcas04, $fund_gef04;
set .@gcas05, $fund_gef05;
set .@gcasex, $fund_gef_extra;
set .@acas01, $fund_alde01;
set .@acas02, $fund_alde02;
set .@acas03, $fund_alde03;
set .@acas04, $fund_alde04;
set .@acas05, $fund_alde05;
set .@acasex, $fund_alde_extra;
set .@prtgld_res, .@pcas01 + .@pcas02 + .@pcas03 + .@pcas04 + .@pcas05 + .@pcasex;
set .@paygld_res, .@pycas01 + .@pycas02 + .@pycas03 + .@pycas04 + .@pycas05 + .@pycasex;
set .@gefgld_res, .@gcas01 + .@gcas02 + .@gcas03 + .@gcas04 + .@gcas05 + .@gcasex;
set .@aldegld_res, .@acas01 + .@acas02 + .@acas03 + .@acas04 + .@acas05 + .@acasex;
//----------- 2000 ¸¸ ÀÌ»óÀÎ ¾ÆÁöÆ®¿¡ ±âº»ÀûÀ¸·Î 2 ¼³Á¤/ ¹Ì¸¸ÀÏ °æ¿ì 1 ¼³Á¤
if (.@prtgld_res > 1999) {
set $prt_invest_result, 2;
}
else {
set $prt_invest_result, 1;
}
if (.@paygld_res > 1999) {
set $pay_invest_result, 2;
}
else {
set $pay_invest_result, 1;
}
if (.@gefgld_res > 1999) {
set $gef_invest_result, 2;
}
else {
set $gef_invest_result, 1;
}
if (.@aldegld_res > 1999) {
set $alde_invest_result, 2;
}
else {
set $alde_invest_result, 1;
}
//-------------------------------------------------------
//----- 7000 ¸¸ ÀÌ»óÀÇ ¾ÆÁöÆ®°¡ Á¸ÀçÇÒ °æ¿ì ¼øÀ§ ¼±º° ¾øÀÌ Á¾·á
if ((.@prtgld_res > 6999) || (.@paygld_res > 6999) || (.@gefgld_res > 6999) || (.@aldegld_res > 6999)) {
if (.@prtgld_res > 6999) {
set $prt_invest_result, 3;
}
if (.@paygld_res > 6999) {
set $pay_invest_result, 3;
}
if (.@gefgld_res > 6999) {
set $gef_invest_result, 3;
}
if (.@aldegld_res > 6999) {
set $alde_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else {
//---- 2000 ÀÌ»ó 6999 ¹Ì¸¸ 1¼øÀ§ ¼±º° ȤÀº ÀçÅõÇ¥ ¼±º°
if (.@prtgld_res > .@paygld_res) {
if (.@prtgld_res > .@gefgld_res) {
if ((.@prtgld_res > .@aldegld_res) && (.@prtgld_res > 1999)) {
// ¹ßÅ°¸® 1À§
set $prt_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@prtgld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@prtgld_res == .@aldegld_res) && (.@prtgld_res > 1999)) {
// ¹ßÅ°¸® vs ·çÀ̳ª ÀçÅõÇ¥
set .@win, rand(1,2);
if (.@win == 1) {
set $prt_invest_result, 3;
}
else {
set $alde_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
}
else if (.@prtgld_res < .@gefgld_res) {
if ((.@gefgld_res > .@aldegld_res) && (.@gefgld_res > 1999)) {
// ºê¸®Å丮¾Æ 1À§
set $gef_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res == .@aldegld_res) && (.@aldegld_res > 1999)) {
// ºê¸®Å丮¾Æ vs ·çÀ̳ª ÀçÅõÇ¥
set .@win, rand(1,2);
if (.@win == 1) {
set $alde_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
}
else if (.@prtgld_res == .@gefgld_res) {
if ((.@gefgld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res > .@aldegld_res) && (.@gefgld_res > 1999)) {
// ¹ßÅ°¸® vs ºê¸®Å丮¾Æ ÀçÅõÇ¥
set .@win, rand(1,2);
if (.@win == 1) {
set $prt_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res == .@aldegld_res) && (.@gefgld_res > 1999)) {
// ¹ßÅ°¸® vs ºê¸®Å丮¾Æ vs ·çÀ̳ª ÀçÅõÇ¥
set .@win, rand(1,3);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else if (.@win == 2) {
set $alde_invest_result, 3;
}
else {
set $prt_invest_result, 3;
}
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
}
}
else if (.@prtgld_res < .@paygld_res) {
if (.@paygld_res > .@gefgld_res) {
if ((.@paygld_res > .@aldegld_res) && (.@paygld_res > 1999)) {
// û¸²È£¼ö 1À§
set $pay_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@paygld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@paygld_res == .@aldegld_res) && (.@aldegld_res > 1999)) {
// û¸²È£¼ö vs ·çÀ̳ª ÀçÅõÇ¥
set .@win, rand(1,2);
if (.@win == 1) {
set $pay_invest_result, 3;
}
else {
set $alde_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
}
else if (.@paygld_res < .@gefgld_res) {
if ((.@gefgld_res > .@aldegld_res) && (.@gefgld_res > 1999)) {
//ºê¸®Å丮¾Æ 1À§
set $gef_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res == .@aldegld_res) && (.@aldegld_res > 1999)) {
// ºê¸®Å丮¾Æ vs ·çÀ̳ª ÀçÅõÇ¥
set .@win, rand(1,2);
if (.@win == 1) {
set $alde_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
}
else if (.@paygld_res == .@gefgld_res) {
if ((.@gefgld_res > .@aldegld_res) && (.@gefgld_res > 1999)) {
// û¸² vs ºê¸®Å丮¾Æ ÀçÅõÇ¥
set .@win, rand(1,2);
if (.@win == 1) {
set $pay_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res == .@aldegld_res) && (.@aldegld_res > 1999)) {
// û¸² vs ºê¸®Å丮¾Æ vs ·çÀ̳ª ÀçÅõÇ¥
set .@win, rand(1,3);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else if (.@win == 2) {
set $alde_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
}
}
else if (.@prtgld_res == .@paygld_res) {
if (.@paygld_res < .@gefgld_res) {
if ((.@gefgld_res > .@aldegld_res) && (.@gefgld_res > 1999)) {
// ºê¸®Å丮¾Æ 1À§
set $gef_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res == .@aldegld_res) && (.@aldegld_res > 1999)) {
// ºê¸®Å丮¾Æ vs ·çÀ̳ª ÀçÅõÇ¥
set .@win, rand(1,2);
if (.@win == 1) {
set $alde_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
} // prt = pay = gef;
if ((.@gefgld_res == .@aldegld_res) && (.@gefgld_res > 1999)) { // prt = pay = gef = alde > 1999;
// ¹ßÅ°¸® vs ·çÀ̳ª vs û¸² vs ºê¸®Å丮¾Æ ÀçÅõÇ¥
set .@win, rand(1,4);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else if (.@win == 2) {
set $prt_invest_result, 3;
}
else if (.@win == 3) {
set $alde_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res > .@aldegld_res) && (.@gefgld_res > 1999)) {
// ¹ßÅ°¸® vs û¸² vs ºê¸®Å丮¾Æ ÀçÅõÇ¥
set .@win, rand(1,3);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else if (.@win == 2) {
set $pay_invest_result, 3;
}
else {
set $prt_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
} // prt = pay > gef;
if ((.@paygld_res > .@aldegld_res) && (.@paygld_res > 1999)) {
// ¹ßÅ°¸® vs û¸² ÀçÅõÇ¥
set .@win, rand(1,2);
if (.@win == 1) {
set $prt_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else if ((.@paygld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@paygld_res == .@aldegld_res) && (.@aldegld_res > 1999)) {
// ¹ßÅ°¸® vs û¸² vs ·çÀ̳ª ÀçÅõÇ¥
set .@win, rand(1,3);
if (.@win == 1) {
set $alde_invest_result, 3;
}
else if (.@win == 2) {
set $pay_invest_result, 3;
}
else {
set $prt_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
}
}
}
}
end;
//-- ÅõÀÚ ½ÃÀÛÇ϶ó´Â ½ÅÈ£
OnInvest_start:
set .@notice$, "From now on, we are going to start investment to connect 'Abyss gate' on WOE area; Valkyrie realm, Greenwood Lake, Luina, Britoniah.";
// broadcastserver "FF0000" FW_NORMAL 10 0 0 notice
set $fund_prt01, 0;
set $fund_prt02, 0;
set $fund_prt03, 0;
set $fund_prt04, 0;
set $fund_prt05, 0;
set $fund_pay01, 0;
set $fund_pay02, 0;
set $fund_pay03, 0;
set $fund_pay04, 0;
set $fund_pay05, 0;
set $fund_gef01, 0;
set $fund_gef02, 0;
set $fund_gef03, 0;
set $fund_gef04, 0;
set $fund_gef05, 0;
set $fund_alde01, 0;
set $fund_alde02, 0;
set $fund_alde03, 0;
set $fund_alde04, 0;
set $fund_alde05, 0;
donpcevent "Investment_total#fund00::OnEnable";
end;
//-- ÅõÀÚ±Ý ±×¸¸ ¹ÞÀ¸¶ó´Â ½ÅÈ£
OnInvest_stop:
set .@notice$, "We've finished investment to connect 'Abyss gate'.";
// broadcastserver "FF0000" FW_NORMAL 10 0 0 notice
donpcevent "Investment_total#fund00::OnReset";
// ÅõÀÚ³»¿ª Á¤»ê¿¡ µé¾î°£´Ù. ¸¸¾à µ¿Á¡ÀÌ ÀÖÀ» °æ¿ì Ãß°¡ ÅõÇ¥°¡ ÁøÇàµÈ´Ù.
set .@pcas01, $fund_prt01;
set .@pcas02, $fund_prt02;
set .@pcas03, $fund_prt03;
set .@pcas04, $fund_prt04;
set .@pcas05, $fund_prt05;
set .@pcasex, $fund_prt_extra;
set .@pycas01, $fund_pay01;
set .@pycas02, $fund_pay02;
set .@pycas03, $fund_pay03;
set .@pycas04, $fund_pay04;
set .@pycas05, $fund_pay05;
set .@pycasex, $fund_pay_extra;
set .@gcas01, $fund_gef01;
set .@gcas02, $fund_gef02;
set .@gcas03, $fund_gef03;
set .@gcas04, $fund_gef04;
set .@gcas05, $fund_gef05;
set .@gcasex, $fund_gef_extra;
set .@acas01, $fund_alde01;
set .@acas02, $fund_alde02;
set .@acas03, $fund_alde03;
set .@acas04, $fund_alde04;
set .@acas05, $fund_alde05;
set .@acasex, $fund_alde_extra;
set .@prtgld_res, .@pcas01 + .@pcas02 + .@pcas03 + .@pcas04 + .@pcas05 + .@pcasex;
set .@paygld_res, .@pycas01 + .@pycas02 + .@pycas03 + .@pycas04 + .@pycas05 + .@pycasex;
set .@gefgld_res, .@gcas01 + .@gcas02 + .@gcas03 + .@gcas04 + .@gcas05 + .@gcasex;
set .@aldegld_res, .@acas01 + .@acas02 + .@acas03 + .@acas04 + .@acas05 + .@acasex;
//----------- 2000 ¸¸ ÀÌ»óÀÎ ¾ÆÁöÆ®¿¡ ±âº»ÀûÀ¸·Î 2 ¼³Á¤/ ¹Ì¸¸ÀÏ °æ¿ì 1 ¼³Á¤
if (.@prtgld_res > 1999) {
set $prt_invest_result, 2;
}
else {
set $prt_invest_result, 1;
}
if (.@paygld_res > 1999) {
set $pay_invest_result, 2;
}
else {
set $pay_invest_result, 1;
}
if (.@gefgld_res > 1999) {
set $gef_invest_result, 2;
}
else {
set $gef_invest_result, 1;
}
if (.@aldegld_res > 1999) {
set $alde_invest_result, 2;
}
else {
set $alde_invest_result, 1;
}
//-------------------------------------------------------
//----- 7000 ¸¸ ÀÌ»óÀÇ ¾ÆÁöÆ®°¡ Á¸ÀçÇÒ °æ¿ì ¼øÀ§ ¼±º° ¾øÀÌ Á¾·á
if ((.@prtgld_res > 6999) || (.@paygld_res > 6999) || (.@gefgld_res > 6999) || (.@aldegld_res > 6999)) {
if (.@prtgld_res > 6999) {
set $prt_invest_result, 3;
}
if (.@paygld_res > 6999) {
set $pay_invest_result, 3;
}
if (.@gefgld_res > 6999) {
set $gef_invest_result, 3;
}
if (.@aldegld_res > 6999) {
set $alde_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else {
//---- 2000 ÀÌ»ó 6999 ¹Ì¸¸ 1¼øÀ§ ¼±º° ȤÀº ÀçÅõÇ¥ ¼±º°
if (.@prtgld_res > .@paygld_res) {
if (.@prtgld_res > .@gefgld_res) {
if ((.@prtgld_res > .@aldegld_res) && (.@prtgld_res > 1999)) {
// ¹ßÅ°¸® 1À§
set $prt_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@prtgld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@prtgld_res == .@aldegld_res) && (.@prtgld_res > 1999)) {
// ¹ßÅ°¸® vs ·çÀ̳ª ÀçÅõÇ¥
donpcevent "Revoting manager#Invest1::OnStart";
set $2011_agit_invest, 11;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
}
else if (.@prtgld_res < .@gefgld_res) {
if ((.@gefgld_res > .@aldegld_res) && (.@gefgld_res > 1999)) {
// ºê¸®Å丮¾Æ 1À§
set $gef_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res == .@aldegld_res) && (.@aldegld_res > 1999)) {
// ºê¸®Å丮¾Æ vs ·çÀ̳ª ÀçÅõÇ¥
donpcevent "Revoting manager#Invest1::OnStart";
set $2011_agit_invest, 15;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
}
else if (.@prtgld_res == .@gefgld_res) {
if ((.@gefgld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res > .@aldegld_res) && (.@gefgld_res > 1999)) {
// ¹ßÅ°¸® vs ºê¸®Å丮¾Æ ÀçÅõÇ¥
donpcevent "Revoting manager#Invest1::OnStart";
set $2011_agit_invest, 13;
}
else if ((.@gefgld_res == .@aldegld_res) && (.@gefgld_res > 1999)) {
// ¹ßÅ°¸® vs ºê¸®Å丮¾Æ vs ·çÀ̳ª ÀçÅõÇ¥
donpcevent "Revoting manager#Invest1::OnStart";
set $2011_agit_invest, 18;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
}
}
else if (.@prtgld_res < .@paygld_res) {
if (.@paygld_res > .@gefgld_res) {
if ((.@paygld_res > .@aldegld_res) && (.@paygld_res > 1999)) {
// û¸²È£¼ö 1À§
set $pay_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@paygld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@paygld_res == .@aldegld_res) && (.@aldegld_res > 1999)) {
// û¸²È£¼ö vs ·çÀ̳ª ÀçÅõÇ¥
donpcevent "Revoting manager#Invest1::OnStart";
set $2011_agit_invest, 14;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
}
else if (.@paygld_res < .@gefgld_res) {
if ((.@gefgld_res > .@aldegld_res) && (.@gefgld_res > 1999)) {
//ºê¸®Å丮¾Æ 1À§
set $gef_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res == .@aldegld_res) && (.@aldegld_res > 1999)) {
// ºê¸®Å丮¾Æ vs ·çÀ̳ª
donpcevent "Revoting manager#Invest1::OnStart";
set $2011_agit_invest, 15;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
}
else if (.@paygld_res == .@gefgld_res) {
if ((.@gefgld_res > .@aldegld_res) && (.@gefgld_res > 1999)) {
// û¸² vs ºê¸®Å丮¾Æ ÀçÅõÇ¥
donpcevent "Revoting manager#Invest1::OnStart";
set $2011_agit_invest, 16;
}
else if ((.@gefgld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res == .@aldegld_res) && (.@aldegld_res > 1999)) {
// û¸² vs ºê¸®Å丮¾Æ vs ·çÀ̳ª ÀçÅõÇ¥
donpcevent "Revoting manager#Invest1::OnStart";
set $2011_agit_invest, 19;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
}
}
else if (.@prtgld_res == .@paygld_res) {
if (.@paygld_res < .@gefgld_res) {
if ((.@gefgld_res > .@aldegld_res) && (.@gefgld_res > 1999)) {
// ºê¸®Å丮¾Æ 1À§
set $gef_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res == .@aldegld_res) && (.@aldegld_res > 1999)) {
// ºê¸®Å丮¾Æ vs ·çÀ̳ª ÀçÅõÇ¥
donpcevent "Revoting manager#Invest1::OnStart";
set $2011_agit_invest, 15;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
} // prt = pay = gef;
if ((.@gefgld_res == .@aldegld_res) && (.@gefgld_res > 1999)) { // prt = pay = gef = alde > 1999;
// ¹ßÅ°¸® vs ·çÀ̳ª vs û¸² vs ºê¸®Å丮¾Æ ÀçÅõÇ¥
donpcevent "Revoting manager#Invest1::OnStart";
set $2011_agit_invest, 21;
}
else if ((.@gefgld_res > .@aldegld_res) && (.@gefgld_res > 1999)) {
// ¹ßÅ°¸® vs û¸² vs ºê¸®Å丮¾Æ ÀçÅõÇ¥
donpcevent "Revoting manager#Invest1::OnStart";
set $2011_agit_invest, 20;
}
else if ((.@gefgld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
} // prt = pay > gef;
if ((.@paygld_res > .@aldegld_res) && (.@paygld_res > 1999)) {
// ¹ßÅ°¸® vs û¸² ÀçÅõÇ¥
donpcevent "Revoting manager#Invest1::OnStart";
set $2011_agit_invest, 12;
}
else if ((.@paygld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@paygld_res == .@aldegld_res) && (.@aldegld_res > 1999)) {
// ¹ßÅ°¸® vs û¸² vs ·çÀ̳ª ÀçÅõÇ¥
donpcevent "Revoting manager#Invest1::OnStart";
set $2011_agit_invest, 17;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
}
}
}
end;
//-- ÅõÀÚ °á°ú ¹ßÇ¥Ç϶ó´Â ½ÅÈ£
OnResult:
// broadcastserver "FF0000" FW_NORMAL 10 0 0 "We've got the result of investment for 'Abyss gate'. you can check through Investment Status Board on each WOE area."
set .@invest, $2011_agit_invest;
if (.@invest == 4) {
set $fund_prt01, 0;
set $fund_prt02, 0;
set $fund_prt03, 0;
set $fund_prt04, 0;
set $fund_prt05, 0;
set $fund_prt_extra, 0;
set $fund_pay01, 0;
set $fund_pay02, 0;
set $fund_pay03, 0;
set $fund_pay04, 0;
set $fund_pay05, 0;
set $fund_pay_extra, 0;
set $fund_gef01, 0;
set $fund_gef02, 0;
set $fund_gef03, 0;
set $fund_gef04, 0;
set $fund_gef05, 0;
set $fund_gef_extra, 0;
set $fund_alde01, 0;
set $fund_alde02, 0;
set $fund_alde03, 0;
set $fund_alde04, 0;
set $fund_alde05, 0;
set $fund_alde_extra, 0;
}
else if (.@invest == 2) {
// ÅõÀÚ³»¿ª Á¤»ê¿¡ µé¾î°£´Ù. ¸¸¾à µ¿Á¡ÀÌ ÀÖÀ» °æ¿ì Ãß°¡ ÅõÇ¥°¡ ÁøÇàµÈ´Ù.
set .@pcas01, $fund_prt01;
set .@pcas02, $fund_prt02;
set .@pcas03, $fund_prt03;
set .@pcas04, $fund_prt04;
set .@pcas05, $fund_prt05;
set .@pcasex, $fund_prt_extra;
set .@pycas01, $fund_pay01;
set .@pycas02, $fund_pay02;
set .@pycas03, $fund_pay03;
set .@pycas04, $fund_pay04;
set .@pycas05, $fund_pay05;
set .@pycasex, $fund_pay_extra;
set .@gcas01, $fund_gef01;
set .@gcas02, $fund_gef02;
set .@gcas03, $fund_gef03;
set .@gcas04, $fund_gef04;
set .@gcas05, $fund_gef05;
set .@gcasex, $fund_gef_extra;
set .@acas01, $fund_alde01;
set .@acas02, $fund_alde02;
set .@acas03, $fund_alde03;
set .@acas04, $fund_alde04;
set .@acas05, $fund_alde05;
set .@acasex, $fund_alde_extra;
set .@prtgld_res, .@pcas01 + .@pcas02 + .@pcas03 + .@pcas04 + .@pcas05 + .@pcasex;
set .@paygld_res, .@pycas01 + .@pycas02 + .@pycas03 + .@pycas04 + .@pycas05 + .@pycasex;
set .@gefgld_res, .@gcas01 + .@gcas02 + .@gcas03 + .@gcas04 + .@gcas05 + .@gcasex;
set .@aldegld_res, .@acas01 + .@acas02 + .@acas03 + .@acas04 + .@acas05 + .@acasex;
//----------- 2000 ¸¸ ÀÌ»óÀÎ ¾ÆÁöÆ®¿¡ ±âº»ÀûÀ¸·Î 2 ¼³Á¤/ ¹Ì¸¸ÀÏ °æ¿ì 1 ¼³Á¤
if (.@prtgld_res > 1999) {
set $prt_invest_result, 2;
}
else {
set $prt_invest_result, 1;
}
if (.@paygld_res > 1999) {
set $pay_invest_result, 2;
}
else {
set $pay_invest_result, 1;
}
if (.@gefgld_res > 1999) {
set $gef_invest_result, 2;
}
else {
set $gef_invest_result, 1;
}
if (.@aldegld_res > 1999) {
set $alde_invest_result, 2;
}
else {
set $alde_invest_result, 1;
}
//-------------------------------------------------------
//----- 7000 ¸¸ ÀÌ»óÀÇ ¾ÆÁöÆ®°¡ Á¸ÀçÇÒ °æ¿ì ¼øÀ§ ¼±º° ¾øÀÌ Á¾·á
if ((.@prtgld_res > 6999) || (.@paygld_res > 6999) || (.@gefgld_res > 6999) || (.@aldegld_res > 6999)) {
if (.@prtgld_res > 6999) {
set $prt_invest_result, 3;
}
if (.@paygld_res > 6999) {
set $pay_invest_result, 3;
}
if (.@gefgld_res > 6999) {
set $gef_invest_result, 3;
}
if (.@aldegld_res > 6999) {
set $alde_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else {
//---- 2000 ÀÌ»ó 6999 ¹Ì¸¸ 1¼øÀ§ ¼±º° ȤÀº ÀçÅõÇ¥ ¼±º°
if (.@prtgld_res > .@paygld_res) {
if (.@prtgld_res > .@gefgld_res) {
if ((.@prtgld_res > .@aldegld_res) && (.@prtgld_res > 1999)) {
// ¹ßÅ°¸® 1À§
set $prt_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@prtgld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@prtgld_res == .@aldegld_res) && (.@prtgld_res > 1999)) {
// ¹ßÅ°¸® vs ·çÀ̳ª ÀçÅõÇ¥
set .@win, rand(1,2);
if (.@win == 1) {
set $prt_invest_result, 3;
}
else {
set $alde_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
}
else if (.@prtgld_res < .@gefgld_res) {
if ((.@gefgld_res > .@aldegld_res) && (.@gefgld_res > 1999)) {
// ºê¸®Å丮¾Æ 1À§
set $gef_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res == .@aldegld_res) && (.@aldegld_res > 1999)) {
// ºê¸®Å丮¾Æ vs ·çÀ̳ª ÀçÅõÇ¥
set .@win, rand(1,2);
if (.@win == 1) {
set $alde_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
}
else if (.@prtgld_res == .@gefgld_res) {
if ((.@gefgld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res > .@aldegld_res) && (.@gefgld_res > 1999)) {
// ¹ßÅ°¸® vs ºê¸®Å丮¾Æ ÀçÅõÇ¥
set .@win, rand(1,2);
if (.@win == 1) {
set $prt_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res == .@aldegld_res) && (.@gefgld_res > 1999)) {
// ¹ßÅ°¸® vs ºê¸®Å丮¾Æ vs ·çÀ̳ª ÀçÅõÇ¥
set .@win, rand(1,3);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else if (.@win == 2) {
set $alde_invest_result, 3;
}
else {
set $prt_invest_result, 3;
}
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
}
}
else if (.@prtgld_res < .@paygld_res) {
if (.@paygld_res > .@gefgld_res) {
if ((.@paygld_res > .@aldegld_res) && (.@paygld_res > 1999)) {
// û¸²È£¼ö 1À§
set $pay_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@paygld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@paygld_res == .@aldegld_res) && (.@aldegld_res > 1999)) {
// û¸²È£¼ö vs ·çÀ̳ª ÀçÅõÇ¥
set .@win, rand(1,2);
if (.@win == 1) {
set $pay_invest_result, 3;
}
else {
set $alde_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
}
else if (.@paygld_res < .@gefgld_res) {
if ((.@gefgld_res > .@aldegld_res) && (.@gefgld_res > 1999)) {
//ºê¸®Å丮¾Æ 1À§
set $gef_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res == .@aldegld_res) && (.@aldegld_res > 1999)) {
// ºê¸®Å丮¾Æ vs ·çÀ̳ª ÀçÅõÇ¥
set .@win, rand(1,2);
if (.@win == 1) {
set $alde_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
}
else if (.@paygld_res == .@gefgld_res) {
if ((.@gefgld_res > .@aldegld_res) && (.@gefgld_res > 1999)) {
// û¸² vs ºê¸®Å丮¾Æ ÀçÅõÇ¥
set .@win, rand(1,2);
if (.@win == 1) {
set $pay_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res == .@aldegld_res) && (.@aldegld_res > 1999)) {
// û¸² vs ºê¸®Å丮¾Æ vs ·çÀ̳ª ÀçÅõÇ¥
set .@win, rand(1,3);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else if (.@win == 2) {
set $alde_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
}
}
else if (.@prtgld_res == .@paygld_res) {
if (.@paygld_res < .@gefgld_res) {
if ((.@gefgld_res > .@aldegld_res) && (.@gefgld_res > 1999)) {
// ºê¸®Å丮¾Æ 1À§
set $gef_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res == .@aldegld_res) && (.@aldegld_res > 1999)) {
// ºê¸®Å丮¾Æ vs ·çÀ̳ª ÀçÅõÇ¥
set .@win, rand(1,2);
if (.@win == 1) {
set $alde_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
} // prt = pay = gef;
if ((.@gefgld_res == .@aldegld_res) && (.@gefgld_res > 1999)) { // prt = pay = gef = alde > 1999;
// ¹ßÅ°¸® vs ·çÀ̳ª vs û¸² vs ºê¸®Å丮¾Æ ÀçÅõÇ¥
set .@win, rand(1,4);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else if (.@win == 2) {
set $prt_invest_result, 3;
}
else if (.@win == 3) {
set $alde_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res > .@aldegld_res) && (.@gefgld_res > 1999)) {
// ¹ßÅ°¸® vs û¸² vs ºê¸®Å丮¾Æ ÀçÅõÇ¥
set .@win, rand(1,3);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else if (.@win == 2) {
set $pay_invest_result, 3;
}
else {
set $prt_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else if ((.@gefgld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
} // prt = pay > gef;
if ((.@paygld_res > .@aldegld_res) && (.@paygld_res > 1999)) {
// ¹ßÅ°¸® vs û¸² ÀçÅõÇ¥
set .@win, rand(1,2);
if (.@win == 1) {
set $prt_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else if ((.@paygld_res < .@aldegld_res) && (.@aldegld_res > 1999)) {
// ·çÀ̳ª 1À§
set $alde_invest_result, 3;
set $2011_agit_invest, 4;
}
else if ((.@paygld_res == .@aldegld_res) && (.@aldegld_res > 1999)) {
// ¹ßÅ°¸® vs û¸² vs ·çÀ̳ª ÀçÅõÇ¥
set .@win, rand(1,3);
if (.@win == 1) {
set $alde_invest_result, 3;
}
else if (.@win == 2) {
set $pay_invest_result, 3;
}
else {
set $prt_invest_result, 3;
}
set $2011_agit_invest, 4;
}
else {
// Àü Áö¿ª ÅõÀÚ ½ÇÆÐ
set $2011_agit_invest, 4;
}
}
}
}
}
end;
OnReset:
set $2011_agit_invest, 0;
donpcevent "Investment_total#fund00::OnReset";
end;
//---------------ÅõÀÚÁý°è-------------------------------------------------------
}
prt_gld,2,2,0 script Investment_total#fund00 844,{
mes "is this not working properly?";
next;
input .@input;
if (.@input == 1854) {
mes "if you think investment timer is dead, please adjust the timer.";
next;
switch (select("Turn on the timer:cancel")) {
case 1:
donpcevent "Investment_total#fund00::OnTimer2";
mes "you've turned on the timer";
close2;
break;
case 2:
mes "cancel";
close2;
break;
}
}
else {
mes "I don't need to adjust now.";
close2;
}
end;
//-------------------------------------ÀçÅõÇ¥-----------------------------------
//-- ÀçÅõÇ¥
OnInit:
if (GetAgitInvestMsg == 1) {
initnpctimer;
set .@prt01res, $fund_prt01;
set .@prt02res, $fund_prt02;
set .@prt03res, $fund_prt03;
set .@prt04res, $fund_prt04;
set .@prt05res, $fund_prt05;
set .@prt06res, $fund_prt_extra;
// SetGlobalVar "vfund_prt01" prt01res
// SetGlobalVar "vfund_prt02" prt02res
// SetGlobalVar "vfund_prt03" prt03res
// SetGlobalVar "vfund_prt04" prt04res
// SetGlobalVar "vfund_prt05" prt05res
// SetGlobalVar "vfund_prt_extra" prt06res
set .@pay01res, $fund_pay01;
set .@pay02res, $fund_pay02;
set .@pay03res, $fund_pay03;
set .@pay04res, $fund_pay04;
set .@pay05res, $fund_pay05;
set .@pay06res, $fund_pay_extra;
// SetGlobalVar "vfund_pay01" pay01res
// SetGlobalVar "vfund_pay02" pay02res
// SetGlobalVar "vfund_pay03" pay03res
// SetGlobalVar "vfund_pay04" pay04res
// SetGlobalVar "vfund_pay05" pay05res
// SetGlobalVar "vfund_pay_extra" pay06res
set .@gef01res, $fund_gef01;
set .@gef02res, $fund_gef02;
set .@gef03res, $fund_gef03;
set .@gef04res, $fund_gef04;
set .@gef05res, $fund_gef05;
set .@gef06res, $fund_gef_extra;
// SetGlobalVar "vfund_gef01" gef01res
// SetGlobalVar "vfund_gef02" gef02res
// SetGlobalVar "vfund_gef03" gef03res
// SetGlobalVar "vfund_gef04" gef04res
// SetGlobalVar "vfund_gef05" gef05res
// SetGlobalVar "vfund_gef_extra" gef06res
set .@alde01res, $fund_alde01;
set .@alde02res, $fund_alde02;
set .@alde03res, $fund_alde03;
set .@alde04res, $fund_alde04;
set .@alde05res, $fund_alde05;
set .@alde06res, $fund_alde_extra;
// SetGlobalVar "vfund_alde01" alde01res
// SetGlobalVar "vfund_alde02" alde02res
// SetGlobalVar "vfund_alde03" alde03res
// SetGlobalVar "vfund_alde04" alde04res
// SetGlobalVar "vfund_alde05" alde05res
// SetGlobalVar "vfund_alde_extra" alde06res
}
else {
set $agit_result_timer, 0;
set $agit_result_notice, 0;
}
end;
OnEnable:
set $agit_result_timer, 0;
set $agit_result_notice, 0;
initnpctimer;
end;
OnReset:
set $agit_result_timer, 0;
set $agit_result_notice, 0;
stopnpctimer;
end;
OnTimer2:
initnpctimer;
end;
OnTimer3600000:
set .@time, $agit_result_timer;
set .@notice, $agit_result_notice;
if (GetAgitInvestMsg == 1) {
if (.@time < 59) {
// IncGlobalVar "agit_result_timer" 1
set .@time1, $agit_result_timer;
if ((.@time1 == 5) || (.@time1 == 10) || (.@time1 == 15) || (.@time1 == 20) || (.@time1 == 25) || (.@time1 == 30)) {
// IncGlobalVar "agit_result_notice" 1
set .@prt01res, $fund_prt01;
set .@prt02res, $fund_prt02;
set .@prt03res, $fund_prt03;
set .@prt04res, $fund_prt04;
set .@prt05res, $fund_prt05;
set .@prt06res, $fund_prt_extra;
// SetGlobalVar "vfund_prt01" prt01res
// SetGlobalVar "vfund_prt02" prt02res
// SetGlobalVar "vfund_prt03" prt03res
// SetGlobalVar "vfund_prt04" prt04res
// SetGlobalVar "vfund_prt05" prt05res
// SetGlobalVar "vfund_prt_extra" prt06res
set .@pay01res, $fund_pay01;
set .@pay02res, $fund_pay02;
set .@pay03res, $fund_pay03;
set .@pay04res, $fund_pay04;
set .@pay05res, $fund_pay05;
set .@pay06res, $fund_pay_extra;
// SetGlobalVar "vfund_pay01" pay01res
// SetGlobalVar "vfund_pay02" pay02res
// SetGlobalVar "vfund_pay03" pay03res
// SetGlobalVar "vfund_pay04" pay04res
// SetGlobalVar "vfund_pay05" pay05res
// SetGlobalVar "vfund_pay_extra" pay06res
set .@gef01res, $fund_gef01;
set .@gef02res, $fund_gef02;
set .@gef03res, $fund_gef03;
set .@gef04res, $fund_gef04;
set .@gef05res, $fund_gef05;
set .@gef06res, $fund_gef_extra;
// SetGlobalVar "vfund_gef01" gef01res
// SetGlobalVar "vfund_gef02" gef02res
// SetGlobalVar "vfund_gef03" gef03res
// SetGlobalVar "vfund_gef04" gef04res
// SetGlobalVar "vfund_gef05" gef05res
// SetGlobalVar "vfund_gef_extra" gef06res
set .@alde01res, $fund_alde01;
set .@alde02res, $fund_alde02;
set .@alde03res, $fund_alde03;
set .@alde04res, $fund_alde04;
set .@alde05res, $fund_alde05;
set .@alde06res, $fund_alde_extra;
// SetGlobalVar "vfund_alde01" alde01res
// SetGlobalVar "vfund_alde02" alde02res
// SetGlobalVar "vfund_alde03" alde03res
// SetGlobalVar "vfund_alde04" alde04res
// SetGlobalVar "vfund_alde05" alde05res
// SetGlobalVar "vfund_alde_extra" alde06res
set .@notice, $agit_result_notice;
set .@notice2$, "No." + .@notice + " Interim statement is now available. You can check through Investment Status Board on each WOE area.";
// broadcastserver "FF0000" FW_NORMAL 10 0 0 notice2
}
else if ((.@time1 == 35) || (.@time1 == 40) || (.@time1 == 45) || (.@time1 == 50) || (.@time1 == 55) || (.@time1 == 58)) {
set .@notice, $agit_result_notice;
// IncGlobalVar "agit_result_notice" 1
set .@prt01res, $fund_prt01;
set .@prt02res, $fund_prt02;
set .@prt03res, $fund_prt03;
set .@prt04res, $fund_prt04;
set .@prt05res, $fund_prt05;
set .@prt06res, $fund_prt_extra;
// SetGlobalVar "vfund_prt01" prt01res
// SetGlobalVar "vfund_prt02" prt02res
// SetGlobalVar "vfund_prt03" prt03res
// SetGlobalVar "vfund_prt04" prt04res
// SetGlobalVar "vfund_prt05" prt05res
// SetGlobalVar "vfund_prt_extra" prt06res
set .@pay01res, $fund_pay01;
set .@pay02res, $fund_pay02;
set .@pay03res, $fund_pay03;
set .@pay04res, $fund_pay04;
set .@pay05res, $fund_pay05;
set .@pay06res, $fund_pay_extra;
// SetGlobalVar "vfund_pay01" pay01res
// SetGlobalVar "vfund_pay02" pay02res
// SetGlobalVar "vfund_pay03" pay03res
// SetGlobalVar "vfund_pay04" pay04res
// SetGlobalVar "vfund_pay05" pay05res
// SetGlobalVar "vfund_pay_extra" pay06res
set .@gef01res, $fund_gef01;
set .@gef02res, $fund_gef02;
set .@gef03res, $fund_gef03;
set .@gef04res, $fund_gef04;
set .@gef05res, $fund_gef05;
set .@gef06res, $fund_gef_extra;
// SetGlobalVar "vfund_gef01" gef01res
// SetGlobalVar "vfund_gef02" gef02res
// SetGlobalVar "vfund_gef03" gef03res
// SetGlobalVar "vfund_gef04" gef04res
// SetGlobalVar "vfund_gef05" gef05res
// SetGlobalVar "vfund_gef_extra" gef06res
set .@alde01res, $fund_alde01;
set .@alde02res, $fund_alde02;
set .@alde03res, $fund_alde03;
set .@alde04res, $fund_alde04;
set .@alde05res, $fund_alde05;
set .@alde06res, $fund_alde_extra;
// SetGlobalVar "vfund_alde01" alde01res
// SetGlobalVar "vfund_alde02" alde02res
// SetGlobalVar "vfund_alde03" alde03res
// SetGlobalVar "vfund_alde04" alde04res
// SetGlobalVar "vfund_alde05" alde05res
// SetGlobalVar "vfund_alde_extra" alde06res
set .@notice, $agit_result_notice;
set .@notice2$, "No." + .@notice + " Interim statement is now available. You can check through Investment Status Board on each WOE area.";
// broadcastserver "FF0000" FW_NORMAL 10 0 0 notice2
}
donpcevent "Investment_total#fund00::OnTimer2";
}
else if (.@time > 59) {
stopnpctimer;
}
}
else {
donpcevent "Investment_total#fund00::OnReset";
end;
}
end;
}
prt_gld,164,98,3 script Revoting manager#Invest1 421,{
mes "[Revoting manager]";
mes "we are not accepting additional vote.";
mes "please wait for our result announcement.";
close;
//------------------------------------------------------------------------------
OnInit:
set .@invest, $2011_agit_invest;
set .@revote, $agit_revoting_timer;
if ((GetAgitInvestMsg == 2) && (.@invest > 10) && (.@revote < 30)) {
donpcevent "Revoting manager#Invest2::OnEnable";
initnpctimer;
}
else if ((GetAgitInvestMsg == 3) && (.@invest > 10)) {
if (.@invest == 11) {
//¹ßÅ°¸®·¼¸§ vs û¸²È£¼ö
set .@prt, $fund_prt_extra;
set .@pay, $fund_pay_extra;
if (.@prt > .@pay) {
set $prt_invest_result, 3;
}
else if (.@prt < .@pay) {
set $pay_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $prt_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
}
}
else if (.@invest == 12) {
// ¹ßÅ°¸®·¼¸§ vs ·çÀ̳ª
set .@prt, $fund_prt_extra;
set .@alde, $fund_alde_extra;
if (.@prt > .@alde) {
set $prt_invest_result, 3;
}
else if (.@prt < .@alde) {
set $alde_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $prt_invest_result, 3;
}
else {
set $alde_invest_result, 3;
}
}
}
else if (.@invest == 13) {
// ¹ßÅ°¸®·¼¸§ vs ºê¸®Å丮¾Æ
set .@prt, $fund_prt_extra;
set .@gef, $fund_gef_extra;
if (.@prt > .@gef) {
set $prt_invest_result, 3;
}
else if (.@prt < .@gef) {
set $gef_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $prt_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
}
}
else if (.@invest == 14) {
// û¸²È£¼ö vs ·çÀ̳ª
set .@pay, $fund_pay_extra;
set .@alde, $fund_alde_extra;
if (.@pay > .@alde) {
set $pay_invest_result, 3;
}
else if (.@pay < .@alde) {
set $alde_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $pay_invest_result, 3;
}
else {
set $alde_invest_result, 3;
}
}
}
else if (.@invest == 15) {
// û¸²È£¼ö vs ºê¸®Å丮¾Æ
set .@pay, $fund_pay_extra;
set .@gef, $fund_gef_extra;
if (.@pay > .@gef) {
set $pay_invest_result, 3;
}
else if (.@pay < .@gef) {
set $gef_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $pay_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
}
}
else if (.@invest == 16) {
// ·çÀ̳ª vs ºê¸®Å丮¾Æ
set .@alde, $fund_alde_extra;
set .@gef, $fund_gef_extra;
if (.@alde > .@gef) {
set $alde_invest_result, 3;
}
else if (.@alde < .@gef) {
set $gef_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $alde_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
}
}
else if (.@invest == 17) {
// ¹ßÅ°¸®·¼¸§ vs û¸²È£¼ö vs ·çÀ̳ª
set .@alde, $fund_alde_extra;
set .@pay, $fund_pay_extra;
set .@prt, $fund_prt_extra;
if (.@prt > .@alde) {
if (.@prt > .@pay) {
set $prt_invest_result, 3;
}
else if (.@prt < .@pay) {
set $pay_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $prt_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
}
}
else if (.@prt < .@alde) {
if (.@alde > .@pay) {
set $alde_invest_result, 3;
}
else if (.@alde < .@pay) {
set $pay_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $alde_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
}
}
else {
if (.@alde > .@pay) {
set .@win, rand(1,2);
if (.@win == 1) {
set $alde_invest_result, 3;
}
else {
set $prt_invest_result, 3;
}
}
else if (.@alde < .@pay) {
set $pay_invest_result, 3;
}
else {
set .@win, rand(1,3);
if (.@win == 1) {
set $alde_invest_result, 3;
}
else if (.@win == 2) {
set $pay_invest_result, 3;
}
else {
set $prt_invest_result, 3;
}
}
}
}
else if (.@invest == 18) {
// ¹ßÅ°¸®·¼¸§ vs û¸²È£¼ö vs ºê¸®Å丮¾Æ
set .@gef, $fund_gef_extra;
set .@pay, $fund_pay_extra;
set .@prt, $fund_prt_extra;
if (.@prt > .@gef) {
if (.@prt > .@pay) {
set $prt_invest_result, 3;
}
else if (.@prt < .@pay) {
set $pay_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $prt_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
}
}
else if (.@prt < .@gef) {
if (.@gef > .@pay) {
set $gef_invest_result, 3;
}
else if (.@gef < .@pay) {
set $pay_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
}
}
else {
if (.@gef > .@pay) {
set .@win, rand(1,2);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else {
set $prt_invest_result, 3;
}
}
else if (.@gef < .@pay) {
set $pay_invest_result, 3;
}
else {
set .@win, rand(1,3);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else if (.@win == 2) {
set $pay_invest_result, 3;
}
else {
set $prt_invest_result, 3;
}
}
}
}
else if (.@invest == 19) {
// ¹ßÅ°¸®·¼¸§ vs ·çÀ̳ª vs ºê¸®Å丮¾Æ
set .@gef, $fund_gef_extra;
set .@alde, $fund_alde_extra;
set .@prt, $fund_prt_extra;
if (.@prt > .@gef) {
if (.@prt > .@alde) {
set $prt_invest_result, 3;
}
else if (.@prt < .@alde) {
set $alde_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $prt_invest_result, 3;
}
else {
set $alde_invest_result, 3;
}
}
}
else if (.@prt < .@gef) {
if (.@gef > .@alde) {
set $gef_invest_result, 3;
}
else if (.@gef < .@alde) {
set $alde_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else {
set $alde_invest_result, 3;
}
}
}
else {
if (.@gef > .@alde) {
set .@win, rand(1,2);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else {
set $prt_invest_result, 3;
}
}
else if (.@gef < .@alde) {
set $alde_invest_result, 3;
}
else {
set .@win, rand(1,3);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else if (.@win == 2) {
set $alde_invest_result, 3;
}
else {
set $prt_invest_result, 3;
}
}
}
}
else if (.@invest == 20) {
// ·çÀ̳ª vs û¸²È£¼ö vs ºê¸®Å丮¾Æ
set .@gef, $fund_gef_extra;
set .@alde, $fund_alde_extra;
set .@pay, $fund_pay_extra;
if (.@pay > .@gef) {
if (.@pay > .@alde) {
set $pay_invest_result, 3;
}
else if (.@pay < .@alde) {
set $alde_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $pay_invest_result, 3;
}
else {
set $alde_invest_result, 3;
}
}
}
else if (.@pay < .@gef) {
if (.@gef > .@alde) {
set $gef_invest_result, 3;
}
else if (.@gef < .@alde) {
set $alde_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else {
set $alde_invest_result, 3;
}
}
}
else {
if (.@gef > .@alde) {
set .@win, rand(1,2);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
}
else if (.@gef < .@alde) {
set $alde_invest_result, 3;
}
else {
set .@win, rand(1,3);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else if (.@win == 2) {
set $alde_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
}
}
}
else if (.@invest == 21) {
// ¹ßÅ°¸®·¼¸§ vs û¸²È£¼ö vs ·çÀ̳ª vs ºê¸®Å丮¾Æ
set .@gef, $fund_gef_extra;
set .@alde, $fund_alde_extra;
set .@pay, $fund_pay_extra;
set .@prt, $fund_prt_extra;
if (.@prt > .@pay) {
if (.@prt > .@alde) {
if (.@prt > .@gef) {
set $prt_invest_result, 3;
}
else if (.@prt < .@gef) {
set $gef_invest_result, 3;
}
else {
set .@wain, rand(1,2);
if (.@win == 1) {
set $prt_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
}
}
else if (.@prt < .@alde) {
if (.@alde > .@gef) {
set $alde_invest_result, 3;
}
else if (.@alde < .@gef) {
set $gef_invest_result, 3;
}
else {
set .@wain, rand(1,2);
if (.@win == 1) {
set $alde_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
}
}
else {
if (.@alde > .@gef) {
set $alde_invest_result, 3;
}
else if (.@alde < .@gef) {
set $gef_invest_result, 3;
}
else {
set .@win, rand(1,3);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else if (.@win == 2) {
set $alde_invest_result, 3;
}
else {
set $prt_invest_result, 3;
}
}
}
}
else if (.@prt < .@pay) {
if (.@pay > .@alde) {
if (.@pay > .@gef) {
set $pay_invest_result, 3;
}
else if (.@pay < .@gef) {
set $gef_invest_result, 3;
}
else {
set .@wain, rand(1,2);
if (.@win == 1) {
set $pay_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
}
}
else if (.@pay < .@alde) {
if (.@alde > .@gef) {
set $alde_invest_result, 3;
}
else if (.@alde < .@gef) {
set $gef_invest_result, 3;
}
else {
set .@wain, rand(1,2);
if (.@win == 1) {
set $alde_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
}
}
else {
if (.@alde < .@gef) {
set $gef_invest_result, 3;
}
else if (.@alde > .@gef) {
set .@wain, rand(1,2);
if (.@win == 1) {
set $pay_invest_result, 3;
}
else {
set $alde_invest_result, 3;
}
}
else {
set .@win, rand(1,3);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else if (.@win == 2) {
set $alde_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
}
}
} // prt == pay;
if (.@pay > .@alde) {
if (.@pay > .@gef) {
set .@wain, rand(1,2);
if (.@win == 1) {
set $pay_invest_result, 3;
}
else {
set $prt_invest_result, 3;
}
}
else if (.@pay < .@gef) {
set $gef_invest_result, 3;
} // prt == pay == gef > alde;
set .@win, rand(1,3);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else if (.@win == 2) {
set $prt_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
}
}
else if (.@pay < .@alde) {
if (.@alde > .@gef) {
set $alde_invest_result, 3;
}
else if (.@alde < .@gef) {
set $gef_invest_result, 3;
}
else {
set .@wain, rand(1,2);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else {
set $alde_invest_result, 3;
}
}
} // prt = pay = alde;
if (.@alde > .@gef) {
set .@win, rand(1,3);
if (.@win == 1) {
set $alde_invest_result, 3;
}
else if (.@win == 2) {
set $prt_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
}
else if (.@alde < .@gef) {
set $gef_invest_result, 3;
} // prt = pay = alde = gef;
set .@win, rand(1,4);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else if (.@win == 2) {
set $prt_invest_result, 3;
}
else if (.@win == 3) {
set $alde_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
}
}
}
}
set $2011_agit_invest, 4;
set $agit_revoting_timer, 0;
}
hideonnpc "Revoting manager#Invest1";
end;
OnEnable:
hideoffnpc "Revoting manager#Invest1";
end;
OnDisable:
hideonnpc "Revoting manager#Invest1";
end;
OnStart:
initnpctimer;
donpcevent "Revoting manager#Invest2::OnNotice_on";
end;
OnEnd:
stopnpctimer;
hideonnpc "Revoting manager#Invest1";
end;
OnTimer2:
initnpctimer;
end;
OnTimer60000:
set .@revote, $agit_revoting_timer;
if (.@revote < 30) {
// IncGlobalVar "agit_revoting_timer" 1
donpcevent "Revoting manager#Invest1::OnTimer2";
}
else if (.@revote == 30) {
// broadcastserver "FF0000" FW_NORMAL 10 0 0 "Cat paw merchant guild Prontera branch manager: Now, we are going to close additional vote. We will announce the result in soon."
donpcevent "Revoting manager#Invest2::OnDisable";
hideoffnpc "Revoting manager#Invest1";
// IncGlobalVar "agit_revoting_timer" 1
donpcevent "Revoting manager#Invest1::OnTimer2";
}
else if (.@revote == 31) {
set .@invest, $2011_agit_invest;
if (.@invest == 11) {
//¹ßÅ°¸®·¼¸§ vs û¸²È£¼ö
set .@prt, $fund_prt_extra;
set .@pay, $fund_pay_extra;
if (.@prt > .@pay) {
set $prt_invest_result, 3;
}
else if (.@prt < .@pay) {
set $pay_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $prt_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
}
}
else if (.@invest == 12) {
// ¹ßÅ°¸®·¼¸§ vs ·çÀ̳ª
set .@prt, $fund_prt_extra;
set .@alde, $fund_alde_extra;
if (.@prt > .@alde) {
set $prt_invest_result, 3;
}
else if (.@prt < .@alde) {
set $alde_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $prt_invest_result, 3;
}
else {
set $alde_invest_result, 3;
}
}
}
else if (.@invest == 13) {
// ¹ßÅ°¸®·¼¸§ vs ºê¸®Å丮¾Æ
set .@prt, $fund_prt_extra;
set .@gef, $fund_gef_extra;
if (.@prt > .@gef) {
set $prt_invest_result, 3;
}
else if (.@prt < .@gef) {
set $gef_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $prt_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
}
}
else if (.@invest == 14) {
// û¸²È£¼ö vs ·çÀ̳ª
set .@pay, $fund_pay_extra;
set .@alde, $fund_alde_extra;
if (.@pay > .@alde) {
set $pay_invest_result, 3;
}
else if (.@pay < .@alde) {
set $alde_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $pay_invest_result, 3;
}
else {
set $alde_invest_result, 3;
}
}
}
else if (.@invest == 15) {
// û¸²È£¼ö vs ºê¸®Å丮¾Æ
set .@pay, $fund_pay_extra;
set .@gef, $fund_gef_extra;
if (.@pay > .@gef) {
set $pay_invest_result, 3;
}
else if (.@pay < .@gef) {
set $gef_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $pay_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
}
}
else if (.@invest == 16) {
// ·çÀ̳ª vs ºê¸®Å丮¾Æ
set .@alde, $fund_alde_extra;
set .@gef, $fund_gef_extra;
if (.@alde > .@gef) {
set $alde_invest_result, 3;
}
else if (.@alde < .@gef) {
set $gef_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $alde_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
}
}
else if (.@invest == 17) {
// ¹ßÅ°¸®·¼¸§ vs û¸²È£¼ö vs ·çÀ̳ª
set .@alde, $fund_alde_extra;
set .@pay, $fund_pay_extra;
set .@prt, $fund_prt_extra;
if (.@prt > .@alde) {
if (.@prt > .@pay) {
set $prt_invest_result, 3;
}
else if (.@prt < .@pay) {
set $pay_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $prt_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
}
}
else if (.@prt < .@alde) {
if (.@alde > .@pay) {
set $alde_invest_result, 3;
}
else if (.@alde < .@pay) {
set $pay_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $alde_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
}
}
else {
if (.@alde > .@pay) {
set .@win, rand(1,2);
if (.@win == 1) {
set $alde_invest_result, 3;
}
else {
set $prt_invest_result, 3;
}
}
else if (.@alde < .@pay) {
set $pay_invest_result, 3;
}
else {
set .@win, rand(1,3);
if (.@win == 1) {
set $alde_invest_result, 3;
}
else if (.@win == 2) {
set $pay_invest_result, 3;
}
else {
set $prt_invest_result, 3;
}
}
}
}
else if (.@invest == 18) {
// ¹ßÅ°¸®·¼¸§ vs û¸²È£¼ö vs ºê¸®Å丮¾Æ
set .@gef, $fund_gef_extra;
set .@pay, $fund_pay_extra;
set .@prt, $fund_prt_extra;
if (.@prt > .@gef) {
if (.@prt > .@pay) {
set $prt_invest_result, 3;
}
else if (.@prt < .@pay) {
set $pay_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $prt_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
}
}
else if (.@prt < .@gef) {
if (.@gef > .@pay) {
set $gef_invest_result, 3;
}
else if (.@gef < .@pay) {
set $pay_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
}
}
else {
if (.@gef > .@pay) {
set .@win, rand(1,2);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else {
set $prt_invest_result, 3;
}
}
else if (.@gef < .@pay) {
set $pay_invest_result, 3;
}
else {
set .@win, rand(1,3);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else if (.@win == 2) {
set $pay_invest_result, 3;
}
else {
set $prt_invest_result, 3;
}
}
}
}
else if (.@invest == 19) {
// ¹ßÅ°¸®·¼¸§ vs ·çÀ̳ª vs ºê¸®Å丮¾Æ
set .@gef, $fund_gef_extra;
set .@alde, $fund_alde_extra;
set .@prt, $fund_prt_extra;
if (.@prt > .@gef) {
if (.@prt > .@alde) {
set $prt_invest_result, 3;
}
else if (.@prt < .@alde) {
set $alde_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $prt_invest_result, 3;
}
else {
set $alde_invest_result, 3;
}
}
}
else if (.@prt < .@gef) {
if (.@gef > .@alde) {
set $gef_invest_result, 3;
}
else if (.@gef < .@alde) {
set $alde_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else {
set $alde_invest_result, 3;
}
}
}
else {
if (.@gef > .@alde) {
set .@win, rand(1,2);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else {
set $prt_invest_result, 3;
}
}
else if (.@gef < .@alde) {
set $alde_invest_result, 3;
}
else {
set .@win, rand(1,3);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else if (.@win == 2) {
set $alde_invest_result, 3;
}
else {
set $prt_invest_result, 3;
}
}
}
}
else if (.@invest == 20) {
// ·çÀ̳ª vs û¸²È£¼ö vs ºê¸®Å丮¾Æ
set .@gef, $fund_gef_extra;
set .@alde, $fund_alde_extra;
set .@pay, $fund_pay_extra;
if (.@pay > .@gef) {
if (.@pay > .@alde) {
set $pay_invest_result, 3;
}
else if (.@pay < .@alde) {
set $alde_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $pay_invest_result, 3;
}
else {
set $alde_invest_result, 3;
}
}
}
else if (.@pay < .@gef) {
if (.@gef > .@alde) {
set $gef_invest_result, 3;
}
else if (.@gef < .@alde) {
set $alde_invest_result, 3;
}
else {
set .@win, rand(1,2);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else {
set $alde_invest_result, 3;
}
}
}
else {
if (.@gef > .@alde) {
set .@win, rand(1,2);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
}
else if (.@gef < .@alde) {
set $alde_invest_result, 3;
}
else {
set .@win, rand(1,3);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else if (.@win == 2) {
set $alde_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
}
}
}
else if (.@invest == 21) {
// ¹ßÅ°¸®·¼¸§ vs û¸²È£¼ö vs ·çÀ̳ª vs ºê¸®Å丮¾Æ
set .@gef, $fund_gef_extra;
set .@alde, $fund_alde_extra;
set .@pay, $fund_pay_extra;
set .@prt, $fund_prt_extra;
if (.@prt > .@pay) {
if (.@prt > .@alde) {
if (.@prt > .@gef) {
set $prt_invest_result, 3;
}
else if (.@prt < .@gef) {
set $gef_invest_result, 3;
}
else {
set .@wain, rand(1,2);
if (.@win == 1) {
set $prt_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
}
}
else if (.@prt < .@alde) {
if (.@alde > .@gef) {
set $alde_invest_result, 3;
}
else if (.@alde < .@gef) {
set $gef_invest_result, 3;
}
else {
set .@wain, rand(1,2);
if (.@win == 1) {
set $alde_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
}
}
else {
if (.@alde > .@gef) {
set $alde_invest_result, 3;
}
else if (.@alde < .@gef) {
set $gef_invest_result, 3;
}
else {
set .@win, rand(1,3);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else if (.@win == 2) {
set $alde_invest_result, 3;
}
else {
set $prt_invest_result, 3;
}
}
}
}
else if (.@prt < .@pay) {
if (.@pay > .@alde) {
if (.@pay > .@gef) {
set $pay_invest_result, 3;
}
else if (.@pay < .@gef) {
set $gef_invest_result, 3;
}
else {
set .@wain, rand(1,2);
if (.@win == 1) {
set $pay_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
}
}
else if (.@pay < .@alde) {
if (.@alde > .@gef) {
set $alde_invest_result, 3;
}
else if (.@alde < .@gef) {
set $gef_invest_result, 3;
}
else {
set .@wain, rand(1,2);
if (.@win == 1) {
set $alde_invest_result, 3;
}
else {
set $gef_invest_result, 3;
}
}
}
else {
if (.@alde < .@gef) {
set $gef_invest_result, 3;
}
else if (.@alde > .@gef) {
set .@wain, rand(1,2);
if (.@win == 1) {
set $pay_invest_result, 3;
}
else {
set $alde_invest_result, 3;
}
}
else {
set .@win, rand(1,3);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else if (.@win == 2) {
set $alde_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
}
}
} // prt == pay;
if (.@pay > .@alde) {
if (.@pay > .@gef) {
set .@wain, rand(1,2);
if (.@win == 1) {
set $pay_invest_result, 3;
}
else {
set $prt_invest_result, 3;
}
}
else if (.@pay < .@gef) {
set $gef_invest_result, 3;
} // prt == pay == gef > alde;
set .@win, rand(1,3);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else if (.@win == 2) {
set $prt_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
}
}
else if (.@pay < .@alde) {
if (.@alde > .@gef) {
set $alde_invest_result, 3;
}
else if (.@alde < .@gef) {
set $gef_invest_result, 3;
}
else {
set .@wain, rand(1,2);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else {
set $alde_invest_result, 3;
}
}
} // prt = pay = alde;
if (.@alde > .@gef) {
set .@win, rand(1,3);
if (.@win == 1) {
set $alde_invest_result, 3;
}
else if (.@win == 2) {
set $prt_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
}
else if (.@alde < .@gef) {
set $gef_invest_result, 3;
} // prt = pay = alde = gef;
set .@win, rand(1,4);
if (.@win == 1) {
set $gef_invest_result, 3;
}
else if (.@win == 2) {
set $prt_invest_result, 3;
}
else if (.@win == 3) {
set $alde_invest_result, 3;
}
else {
set $pay_invest_result, 3;
}
}
}
}
}
set $2011_agit_invest, 4;
set $agit_revoting_timer, 0;
hideonnpc "Revoting manager#Invest1";
stopnpctimer;
end;
}
else {
hideonnpc "Revoting manager#Invest1";
stopnpctimer;
}
end;
}
prt_gld,164,98,3 script Revoting manager#Invest2 421,{
set .@invest, $2011_agit_invest;
//-- ÅõÇ¥½Ã°£ÀÌ ¾Æ´Ñµ¥ ÄÑÁ®ÀÖ´Ù. ¾î?--------------------------------------------
if (.@invest < 11) {
mes "[Revoting manager]";
mes "No!, this is not the time to take a revote.";
close2;
hideonnpc "Revoting manager#Invest2";
end;
}
//------------------------------------------------------------------------------
if (checkquest_playtime 7349 == 1) {
mes "[Revoting manager]";
mes "you've already participated to the vote.";
mes "please relax and wait for the result.";
close2;
}
else {
if (checkquest_playtime 7349 == 3) {
// recall_completequest 7349
}
erasequest 7349;
mes "[Revoting manager]";
mes "Would you participate to the vote for choosing place where to connect 'Abyss gate'?";
next;
switch (select("participate to the vote:skip at this time.")) {
case 1:
mes "[Revoting manager]";
mes "you can vote once and you don't need to invest for your choice.";
mes "plesae choose one WOE area.";
next;
if (.@invest == 11) {
switch (select("Valkyrie realm:Green lake")) {
case 1:
mes "[Revoting manager]";
mes "You've voted for Valkyrie realm.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_prt_extra" 1
close2;
break;
case 2:
mes "[Revoting manager]";
mes "You've voted for Green lake.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_pay_extra" 1
close2;
break;
}
}
else if (.@invest == 12) {
switch (select("Valkyrie realm:Luina")) {
case 1:
mes "[Revoting manager]";
mes "You've voted for Valkyrie realm.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_prt_extra" 1
close2;
break;
case 2:
mes "[Revoting manager]";
mes "You've voted for Luina.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_alde_extra" 1
close2;
break;
}
}
else if (.@invest == 13) {
switch (select("Valkyrie realm:Britoniah")) {
case 1:
mes "[Revoting manager]";
mes "You've voted for Valkyrie realm.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_prt_extra" 1
close2;
break;
case 2:
mes "[Revoting manager]";
mes "You've voted for Britoniah.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_gef_extra" 1
close2;
break;
}
}
else if (.@invest == 14) {
switch (select("Luina:Green lake")) {
case 1:
mes "[Revoting manager]";
mes "You've voted for Luina.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_alde_extra" 1
close2;
break;
case 2:
mes "[Revoting manager]";
mes "You've voted for Green lake.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_pay_extra" 1
close2;
break;
}
}
else if (.@invest == 15) {
switch (select("Britoniah:Green lake")) {
case 1:
mes "[Revoting manager]";
mes "You've voted for Britoniah.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_gef_extra" 1
close2;
break;
case 2:
mes "[Revoting manager]";
mes "You've voted for Green lake.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_pay_extra" 1
close2;
break;
}
}
else if (.@invest == 16) {
switch (select("Luina:Britoniah")) {
case 1:
mes "[Revoting manager]";
mes "You've voted for Luina.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_alde_extra" 1
close2;
break;
case 2:
mes "[Revoting manager]";
mes "You've voted for Britoniah.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_gef_extra" 1
close2;
break;
}
}
else if (.@invest == 17) {
switch (select("Valkyrie realm:Green lake:Luina")) {
case 1:
mes "[Revoting manager]";
mes "You've voted for Valkyrie realm.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_prt_extra" 1
close2;
break;
case 2:
mes "[Revoting manager]";
mes "You've voted for Green lake.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_pay_extra" 1
close2;
break;
case 3:
mes "[Revoting manager]";
mes "You've voted for Luina.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_alde_extra" 1
close2;
break;
}
}
else if (.@invest == 18) {
switch (select("Valkyrie realm:Green lake:Britoniah")) {
case 1:
mes "[Revoting manager]";
mes "You've voted for Valkyrie realm.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_prt_extra" 1
close2;
break;
case 2:
mes "[Revoting manager]";
mes "You've voted for Green lake.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_pay_extra" 1
close2;
break;
case 3:
mes "[Revoting manager]";
mes "You've voted for Britoniah.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_gef_extra" 1
close2;
break;
}
}
else if (.@invest == 19) {
switch (select("Valkyrie realm:Luina:Britoniah")) {
case 1:
mes "[Revoting manager]";
mes "You've voted for Valkyrie realm.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_prt_extra" 1
close2;
break;
case 2:
mes "[Revoting manager]";
mes "You've voted for Luina.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_alde_extra" 1
close2;
break;
case 3:
mes "[Revoting manager]";
mes "You've voted for Britoniah.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_gef_extra" 1
close2;
break;
}
}
else if (.@invest == 20) {
switch (select("Luina:Green lake:Britoniah")) {
case 1:
mes "[Revoting manager]";
mes "You've voted for Luina.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_alde_extra" 1
close2;
break;
case 2:
mes "[Revoting manager]";
mes "You've voted for Green lake.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_pay_extra" 1
close2;
break;
case 3:
mes "[Revoting manager]";
mes "You've voted for Britoniah.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_gef_extra" 1
close2;
break;
}
}
else if (.@invest == 21) {
switch (select("Valkyrie realm:Green lake:Luina:Britoniah")) {
case 1:
mes "[Revoting manager]";
mes "You've voted for Valkyrie realm.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_prt_extra" 1
close2;
break;
case 2:
mes "[Revoting manager]";
mes "You've voted for Green lake.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_pay_extra" 1
close2;
break;
case 3:
mes "[Revoting manager]";
mes "You've voted for Luina.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_alde_extra" 1
close2;
break;
case 4:
mes "[Revoting manager]";
mes "You've voted for Britoniah.";
mes "Thanks for voting.";
setquest 7349;
// IncGlobalVar "fund_gef_extra" 1
close2;
break;
}
}
break;
case 2:
mes "[Revoting manager]";
mes "You've canceled the vote.";
close2;
break;
}
}
end;
//------------ Å×½ºÆ®±¸°£
OnInit:
hideonnpc "Revoting manager#Invest2";
end;
OnEnable:
hideoffnpc "Revoting manager#Invest2";
end;
OnDisable:
hideonnpc "Revoting manager#Invest2";
stopnpctimer;
end;
OnNotice_on:
initnpctimer;
end;
OnTimer5000:
// broadcastserver "FF0000" FW_NORMAL 10 0 0 "Cat paw merchant guild Prontera branch manager: As there was no WOE area reached maximum invesment level to connect 'Abyss gate'"
end;
OnTimer8000:
// broadcastserver "FF0000" FW_NORMAL 10 0 0 "Cat paw merchant guild Prontera branch manager: we were about to connect Abyss gate on WOE area where invested most."
end;
OnTimer11000:
// broadcastserver "FF0000" FW_NORMAL 10 0 0 "Cat paw merchant guild Prontera branch manager: however there were area which invested same amount. So we will put them to a vote."
end;
OnTimer14000:
// broadcastserver "FF0000" FW_NORMAL 10 0 0 "Cat paw merchant guild Prontera branch manager: Additional vote will be avaliable for 30 min. you can vote on 'Valkyrie realm' field."
end;
OnTimer20000:
set .@invest, $2011_agit_invest;
if (.@invest == 11) {
set .@notice$, "Cat paw merchant guild Prontera branch manager: the candidate for additional vote are, Valkyrie realm vs Green lake.";
}
else if (.@invest == 12) {
set .@notice$, "Cat paw merchant guild Prontera branch manager: the candidate for additional vote are, Valkyrie realm vs Luina.";
}
else if (.@invest == 13) {
set .@notice$, "Cat paw merchant guild Prontera branch manager: the candidate for additional vote are, Valkyrie realm vs Britoniah.";
}
else if (.@invest == 14) {
set .@notice$, "Cat paw merchant guild Prontera branch manager: the candidate for additional vote are, Green lake vs Luina.";
}
else if (.@invest == 15) {
set .@notice$, "Cat paw merchant guild Prontera branch manager: the candidate for additional vote are, Green lake vs Britoniah.";
}
else if (.@invest == 16) {
set .@notice$, "Cat paw merchant guild Prontera branch manager: the candidate for additional vote are, Luina vs Britoniah.";
}
else if (.@invest == 17) {
set .@notice$, "Cat paw merchant guild Prontera branch manager: the candidate for additional vote are, Valkyrie realm vs Green lake vs Luina.";
}
else if (.@invest == 18) {
set .@notice$, "Cat paw merchant guild Prontera branch manager: the candidate for additional vote are, Valkyrie realm vs Green lake vs Britoniah.";
}
else if (.@invest == 19) {
set .@notice$, "Cat paw merchant guild Prontera branch manager: the candidate for additional vote are, Valkyrie realm vs Luina vs Britoniah.";
}
else if (.@invest == 20) {
set .@notice$, "Cat paw merchant guild Prontera branch manager: the candidate for additional vote are, Luina vs Green lake vs Britoniah.";
}
else if (.@invest == 21) {
set .@notice$, "Cat paw merchant guild Prontera branch manager: the candidate for additional vote are, Valkyrie realm vs Green lake vs Luina vs Britoniah.";
}
// broadcastserver "FF0000" FW_NORMAL 10 0 0 notice
//--- ÀçÅõÇ¥¸¦ ÇÒ °æ¿ì ¿¢½ºÆ®¶ó ºÎºÐ ÅõÀÚ±Ý ÃʱâÈ
set $fund_prt_extra, 0;
set $fund_pay_extra, 0;
set $fund_gef_extra, 0;
set $fund_alde_extra, 0;
set $agit_revoting_timer, 0;
donpcevent "Revoting manager#Invest2::OnEnable";
stopnpctimer;
end;
}
prt_gld,3,2,3 script checking message. 844,{
mes "showing msg now" + GetAgitInvestMsg + ".";
close;
}
sec_in02,15,35,3 script check global Var 124,{
OnAgitInvest:
if (GetAgitInvestMsg == 1) {
set $2011_agit_invest, 1;
donpcevent "#fund_master::OnInvest_start";
}
else if (GetAgitInvestMsg == 2) {
set $2011_agit_invest, 2;
donpcevent "#fund_master::OnInvest_stop";
}
else if (GetAgitInvestMsg == 3) {
donpcevent "#fund_master::OnResult";
}
else if (GetAgitInvestMsg == 0) {
set $2011_agit_invest, 0;
donpcevent "#fund_master::OnReset";
}
end;
//OnClick:
mes "I should quit my steward job.";
close;
//*/
//--------------------------------------------------¾ÆÁöÆ® ÅõÀÚ Ãß°¡ Á¾·á-------
//--------------------------------------------------°ÔÆæÁý»ç ±Þ ȸ»ý------------
}
gefg_cas01,1,3,0 script Brito01 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
//-- °¢ Áö¿ªÀÇ ¸Þ¼¼Áö¸¦ È®ÀÎÇÕ´Ï´Ù.
}
gefg_cas02,1,3,0 script Brito02 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
}
gefg_cas03,1,3,0 script Brito03 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
}
gefg_cas04,1,3,0 script Brito04 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
}
gefg_cas05,1,3,0 script Brito05 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
}
gef_fild13,1,3,0 script Britopill 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
}
payg_cas01,1,3,0 script Green lake01 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
}
payg_cas02,1,3,0 script Green lake02 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
}
payg_cas03,1,3,0 script Green lake03 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
}
payg_cas04,1,3,0 script Green lake04 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
}
payg_cas05,1,3,0 script Green lake05 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
}
pay_gld,1,3,0 script Green lake00 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
}
alde_gld,1,3,0 script Alde00 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
}
aldeg_cas01,1,3,0 script Alde01 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
}
aldeg_cas02,1,3,0 script Alde02 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
}
aldeg_cas03,1,3,0 script Alde03 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
}
aldeg_cas04,1,3,0 script Alde04 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
}
aldeg_cas05,1,3,0 script Alde05 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
}
prtg_cas01,1,3,0 script Valkyrie01 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
}
prtg_cas02,1,3,0 script Valkyrie02 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
}
prtg_cas03,1,3,0 script Valkyrie03 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
}
prtg_cas04,1,3,0 script Valkyrie04 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
}
prtg_cas05,1,3,0 script Valkyrie05 844,{
mes "Now, it is" + GetAgitInvestMsg + "...";
close;
}