npc_event_momotaro.txt

传奇3源程序, 用vc开发的

//=====================================================================
//MOMOTAROevent
//=====================================================================
amatsu.gat,223,235,4	script	弌斉幮怑堳	763,{
	if (event_momo == 10) goto Lfin;
	if ((event_momo >= 1) && (event_momo <= 4)) goto Lget;
	mes "[弌斉幮怑堳]";
	mes "偙傫偵偪偼乣";
	mes "懞偵戙乆揱傢傞愄榖偺傒傪";
	mes "埖偆巹偳傕^009CFF僣儖僇儊弌斉幮^000000偱偼";
	mes "榁庒抝彈傪栤傢偢恖婥偺愄榖";
	mes "^009CFF<儌儌僞儘>^000000傪側傫偲乧乧";
	next;
	mes "[弌斉幮怑堳]";
	mes "昐枩晹両敪峴偡傞偙偲偑";
	mes "偱偒偨傫偱偡丅";
	mes "偦偺婰擮偵丄^3163FF儌儌僞儘懱尡娰^000000傪";
	mes "愝棫偟傑偟偨丅";
	next;
	mes "[弌斉幮怑堳]";
	mes "幚嵺儌儌僞儘榖偺庡恖岞偵側偭偰";
	mes "彫婼傪戅帯偱偒偪傖偆偺偱偡丅";
	mes "宨昳傕偁傝傑偡傛両";
	next;
	menu "儌儌僞儘偭偰壗丠",-,"偤傂懱尡偟偨偄偱偡両",L1,"巹偼朲偟偄偺偱乧乧",L2;
		mes "[弌斉幮怑堳]";
		mes "両 儌儌僞儘榖傪抦傜側偄側傫偰";
		mes "棳峴偵撦姶側偍恖偱偡偹乧乧";
		mes "偦傟偱偼巹偑偍榖偟傑偟傚偆乧乧";
		next;
		mes "[弌斉幮怑堳]";
		mes "愄乆丄擭榁偄偨晇晈偑曢傜偟偰";
		mes "偄傑偟偨乧乧晇晈偼偲偰傕拠偑";
		mes "椙偐偭偨偺偱偡偑丄巕嫙偑";
		mes "偄側偐偭偨偺偱偡乧乧";
		next;
		mes "[弌斉幮怑堳]";
		mes "偁傞擔丄偍攌偝傫偑愳偱愻戵偟偰";
		mes "偄傞偲丄戝偒側搷偑棳傟偰偒偨偺偱偡丅";
		mes "偡偖偵搷傪堷偒忋偘偰丄壠偵婣偭偰";
		mes "偍栮偝傫偲妱偭偰傒傞偲乧乧";
		mes "偦偺拞偐傜側傫偲両";
		mes "愒傫朧偑尰傟偨偺偱偡丅";
		next;
		mes "[弌斉幮怑堳]";
		mes "偍栮偝傫偲偍攌偝傫偼偨偄偦偆";
		mes "傃偭偔傝偟傑偟偨偑丄偦偺愒傫朧傪";
		mes "帺暘偨偪偺巕偲偟偰堢偰傞偙偲偵";
		mes "偟偨偺偱偡丅";
		next;
		mes "[弌斉幮怑堳]";
		mes "偦偺巕偼偡偔偡偔偲堢偪丄";
		mes "悢擔屻偵偼傕偆丄偡偭偐傝";
		mes "偨偔傑偟偄彮擭偵側偭偨偺偱偡丅";
		next;
		mes "[弌斉幮怑堳]";
		mes "偦偺巕偺柤慜偼<儌儌僞儘>";
		mes "偲柤偯偗傜傟丄摉帪懞恖傪";
		mes "嬯偟傔偰偄偨彫婼傪戅帯偡傞";
		mes "偨傔偵椃偵弌偨偺偱偡乧乧";
		next;
		mes "[弌斉幮怑堳]";
		mes "摴拞偱夛偭偨^3163FF墡丄璩丄將^000000傪";
		mes "拠娫偵偟偰丄偲偆偲偆嵟屻偵偼";
		mes "傒偛偲彫婼傪戅帯偟偰";
		mes "偍栮偝傫偲偍攌偝傫偲岾偣偵";
		mes "曢傜偟偨偦偆側乧乧 -姰-";
		next;
		mes "[弌斉幮怑堳]";
		mes "偳偆偱偡丠";
		mes "昐枩晹偺偍傕偟傠偝偼両";
		close;
L1:
		mes "[弌斉幮怑堳]";
		mes "傓両埿惃偺椙偄偍曽偱偡偹両";
		mes "巹傑偱尦婥偵側傝偦偆偱偡丅";
		mes "偱偼丄偙偺怽崬彂傊婰擖傪乧乧";
		next;
		mes "[弌斉幮怑堳]";
		mes "乧乧";
		mes "乧乧傆傓傆傓乧乧";
		mes "乧乧偼偄両椙偄偱偡両";
		mes "偦傟偱偼憗懍乧乧";
		mes "<儌儌僞儘懱尡娰>!!";
		mes "妝偟傫偱偒偰偔偩偝偄";
		next;
		warp "ama_test",52,35;
		end;
L2:
		mes "[弌斉幮怑堳]";
		mes "宨昳傕弌傞傫偱偡偑乧乧(儃僜僢)";
		close;
Lget:
	mes "[弌斉幮怑堳]";
	mes "偳偆偱偡丄妝偟傫偱偄偨偩偗";
	mes "傑偟偨偐丠";
	mes "傂偭偦傝偲弨旛偟偰偒偨";
	mes "懱尡娰偱偡偑丄彮偟偱傕";
	mes "妝偟偄帪娫傪夁偛偣偰偄偨偩偗";
	mes "偨傜岾偄偱偡丅";
	next;
	if (event_momo == 1) getitem 627,1;
	if (event_momo == 2) getitem 629,1;
	if (event_momo == 3) getitem 625,1;
//傾儉儉僩惉岟屻晄柧
	if (event_momo == 4) getitem 629,1;
	set event_momo,10;
	mes "[弌斉幮怑堳]";
	mes "偱偼丄巹偳傕偑梡堄偟偨慹昳傪";
	mes "恑掓偄偨偟傑偟傚偆丅";
	mes "崱屻偲傕愄榖偑";
	mes "峀偔垽偝傟傑偡傛偆偵乧乧";
	close;
Lfin:
	mes "[弌斉幮怑堳]";
	mes "椙偄揤婥偱偡偹偉乧乧";
	mes "偙傫側擔偼晍抍傪姳偟偨偔側傝傑偡丅";
	close;
}
//=====================================================================
ama_test.gat,52,44,4	script	懸婡幒扴摉幰	109,{
	mes "[僒僩僔]";
	mes "<儌儌僞儘懱尡娰>偵";
	mes "傛偆偙偦両";
	next;
	mes "[僒僩僔]";
	mes "巹偼<儌儌僞儘懱尡娰>偺";
	mes "峊幒扴摉丄僒僩僔偲怽偟傑偡丅";
	next;
	mes "[僒僩僔]";
	mes "尦乆偼弌斉幮偱摥偄偰偄偨";
	mes "偺偱偡偑乧乧恖偑懌傝側偔偰";
	mes "媫偵攈尛偝傟偰偟傑偄傑偟偨乧乧";
	mes "偱傕丄傛偐偭偨偱偡両";
	mes "偙傫側傆偆偵傏乕偭偲偟側偑傜";
	mes "挧愴偡傞恖傪尒暔偱偒傞傫偱偡偐傜丅";
	next;
	mes "[僒僩僔]";
	mes "乧乧";
	mes "偄傗偄傗丄忕択偱偡傛乧乧";
	mes "(娋傪偸偖偆)";
	next;
	mes "[僒僩僔]";
	mes "偱偼丄懱尡娰偵偮偄偰";
	mes "偛愢柧傪偝偟偁偘傑偡丅";
	next;
	mes "[僒僩僔]";
	mes "堦墳丄儌儌僞儘偺榖偵偮偄偰偼";
	mes "奜偺怑堳偐傜巉偭偰傑偡傛偹丠";
	next;
	menu "偼偄",L1,"偄偄偊",-;
		mes "[峊幒扴摉]";
		mes "偁傫偱偡偲丠";
		mes "偙偙傑偱棃偰榖傪抦傜側偄偲丠";
		mes "乧乧";
		mes "儌儌僞儘僼傽儞偲偟偰";
		mes "擣傔傞偙偲偼偱偒傑偣傫側乧乧";
		next;
		mes "[峊幒扴摉]";
		mes "奜偺怑堳偐傜榖傪暦偄偰偒側偝偄丅";
		mes "偦傟偐傜偱偡乧乧";
		mes "偝傛偆側傜乣";
		next;
		warp "amatsu.gat",223,230;
		end;
L1:
		mes "[僒僩僔]";
		mes "傆傆乧乧";
		mes "儌儌僞儘偺榖偼丄巹偳傕偺";
		mes "弌斉幮偺帺枬嶌偱偡両";
		mes "嵟崅寙嶌偱偟傚偆丠";
		mes "僴僴僴僢!!!";
		next;
		mes "[僒僩僔]";
		mes "乧乧僼儉僼儉";
		next;
		mes "[僒僩僔]";
		mes "懱尡娰偺儖乕儖偼娙扨偱偡丅";
		mes "拞偵擖偭偰儌儌僞儘偺傛偆偵";
		mes "桬傑偟偔!!! 彫婼傪戅帯偡傟偽";
		mes "椙偄傫偱偡丅";
		mes "偦偆丄桬傑偟偔!!!!! 偱偡丅";
		next;
		mes "[僒僩僔]";
		mes "偦偟偰丄拲堄帠崁偑";
		mes "嶰偮偁傝傑偡丅";
		next;
		mes "[僒僩僔]";
		mes "堦偮栚丄";
		mes "摉懱尡娰偼堦搙偱傕僋儕傾偝傟傞偲";
		mes "傑偨擖傞偙偲偑偱偒傑偣傫丅";
		mes "偦偺揰偵婥傪偮偗偰偔偩偝偄丅";
		next;
		mes "[僒僩僔]";
		mes "擇偮栚丄";
		mes "懱尡娰撪偵偼儁僢僩傪";
		mes "楢傟偰偄偐側偄偱偔偩偝偄丅";
		mes "傕偟儁僢僩傪楢傟偰偄傜偭偟傖偭偨傜";
		mes "棏偵曄偊偰偐傜偍擖傝偔偩偝偄丅";
		next;
		mes "[僒僩僔]";
		mes "嵟屻偺拲堄帠崁丄";
		mes "懱尡娰偼堦恖偁偨傝6暘娫";
		mes "偺惂尷帪娫偑偁傝傑偡丅";
		next;
		mes "[僒僩僔]";
		mes "偝偀丄偦傟偱偼峊幒僠儍僢僩偵";
		mes "擖偭偰弴斣傪偍懸偪偔偩偝偄丅";
		mes "寬摤傪婩傝傑偡!!!";
		close;
OnInit:
	waitingroom "懱尡娰峊幒",1,"懸婡幒扴摉幰::OnMax";
	end;
OnMax:
	warpwaitingpc "ama_test.gat",50,83;
	disablenpc "懸婡幒扴摉幰";
	disablenpc "娗棟恖";
	enablenpc "偍攌偝傫";
	enablenpc "偍栮偝傫";
	initnpctimer "roomt";
	end;
}
ama_test.gat,50,93,4	script	偍攌偝傫	761,{
Onstart:
	mes "[偍攌偝傫]";
	mes "僼僅乕乕!?";
	next;
	mes "[偍攌偝傫]";
	mes "偍栮偝傫丄";
	mes "巹偺偍嬥丄偳偙傊偄偭偨偐";
	mes "抦傜側偄偐偄丠";
	next;
	mes "[偍栮偝傫]";
	mes "攌偝傫傗乧乧懞挿條偑尵偆偵偼丄";
	mes "偙偺偛傠彫婼偑恖偐傜偍嬥傪";
	mes "搻傓傛偆偵側偭偰懞拞戝憶偓";
	mes "側傫偠傖傛乧乧";
	next;
	mes "[偍攌偝傫]";
	mes "僉傿傿傿乧乧両";
	next;
	mes "[偍栮偝傫]";
	mes "偦偙偐偟偙偱偦偺榖偱帩偪偒傝偠傖乧乧";
	next;
	mes "[偍栮偝傫]";
	mes "偦偙偱儌儌僞儘傛乧乧";
	next;
	mes "[偍栮偝傫]";
	mes "偍慜傕抦偭偰偄傞傛偆偵";
	mes "偙偙偺楢拞偼壈昦幰偽偐傝偱";
	mes "彫婼傪戅帯偡傞椡傕側偄乧乧";
	mes "儌儌僞儘丄偍傑偊偵棅傒偨偄";
	mes "偺偠傖乧乧";
	next;
	mes "[偍攌偝傫]";
	mes "儌儌僞儘乧乧";
	mes "偙偺攌偑偍慜偺偨傔偵偲";
	mes "^3355ff偙偺悽偱堦斣旤枴偟偄愒億乕僔儑儞";
	mes "傪帩偨偣偰傗傝偨偐偭偨偑乧乧";
	mes "慡晹嶌傞偺傪幐攕偟偰偟傕偆偨乧乧^000000";
	next;
	mes "[偍攌偝傫]";
	mes "偡傑側偄偹乧乧儌儌僞儘傗乧乧";
	next;
	mes "[偍攌偝傫丒偍栮偝傫]";
	mes "偦傟偱偼棅傫偩偧乧乧";
	disablenpc "偍攌偝傫";
	disablenpc "偍栮偝傫";
	set @mobdie,0;
	monster "ama_test.gat",47,101,"彫婼",1110,1,"mobcount";
	monster "ama_test.gat",51,101,"彫婼",1110,1,"mobcount";
	monster "ama_test.gat",55,101,"彫婼",1110,1,"mobcount";
	monster "ama_test.gat",55,97,"彫婼",1110,1,"mobcount";
	monster "ama_test.gat",55,93,"彫婼",1110,1,"mobcount";
	monster "ama_test.gat",53,91,"彫婼",1110,1,"mobcount";
	monster "ama_test.gat",49,91,"彫婼",1110,1,"mobcount";
	monster "ama_test.gat",45,96,"彫婼",1110,1,"mobcount";
	monster "ama_test.gat",45,99,"彫婼",1110,1,"mobcount";
	close;
}
ama_test.gat,49,93,4	script	偍栮偝傫	766,{
	close;
}
ama_test.gat,50,100,4	script	娗棟恖	762,{
	mes "[娗棟恖]";
	mes "儂儂僢傗傞側乧乧";
	mes "巹偼偙偙偺娗棟恖傪偟偰偍傞偑乧乧";
	mes "偍偸偟偨偩傕偺偱偼側偄側丠";
	mes "側偐側偐嬃偄偨偧丅";
	next;
	mes "[娗棟恖]";
	mes "榖偺拞偺儌儌僞儘偑";
	mes "偙偺悽偵尰傟傞偲偼側両";
	mes "儂儂儂儂儂両";
	next;
	menu "梋桾偱偟偨偹",L1,"偔偩傜側偄乧乧",L2;
L1:
	mes "[娗棟恖]";
	mes "儂僢儂僢儂乧乧";
	mes "偁傑傝挷巕偵忔傞偱側偄乧乧";
	mes "巹偑偍偸偟傎偳偺帪偼";
	mes "彫婼側偳巜偱寉偔傂偹偭偰";
	mes "偔傟偨傢乧乧儂儂儂乧乧";
	next;
	mes "[娗棟恖]";
	mes "乧乧";
	mes "忕択偠傖丅";
	next;
	mes "[娗棟恖]";
	mes "偦傟偠傖丄儌儌僞儘懱尡娰傪";
	mes "妝偟傫偱偔傟偨偐側丠";
	mes "嵟弶偵夛偭偨怑堳偲榖偣偽";
	mes "変乆偑梡堄偟偨宨昳偲偔傟傞偩傠偆丅";
	next;
	mes "[娗棟恖]";
	mes "壗偼偲傕偁傟丄偦偺嫮偒怱傪";
	mes "幐偆側偐傟両";
	next;
	set event_momo,1;
	stopnpctimer "roomt";
	disablenpc "娗棟恖";
	enablenpc "懸婡幒扴摉幰";
	warp "amatsu.gat",223,230;
	end;
L2:
	mes "[娗棟恖]";
	mes "!!!!!";
	mes "乧乧儂乧儂儂儂乧乧";
	mes "偍傕偟傠偄搝偩側乧乧";
	mes "傛偟乧乧";
	mes "巹偐傜堦偮採埬偑偁傞丅";
	next;
	mes "[娗棟恖]";
	mes "杮棃側傜崱偡偖偍慜傪";
	mes "扏偒弌偡偲偙傠偩偑乧乧";
	mes "偍偸偟偺杮摉偺幚椡偑抦傝偨偄";
	mes "偐傜側乧乧儂儂儂丅";
	mes "傑傞偱巹偺庒偐傝偟崰傪尒傞傛偆偩丅";
	mes "儂儂儂儂僢";
	next;
	mes "[娗棟恖]";
	mes "偳偆偩丠巹偐傜堦搙婡夛傪";
	mes "梌偊傛偆丅堦搙挧愴偟偨傜";
	mes "^3355ff擇搙偲挧愴偱偒側偄^000000偑乧乧";
	mes "師偼偍偸偟偱傕擄偟偄偩傠偆丅";
	next;
	menu "傕偆廩暘偱偡",L2_1,"挧愴偟偰傒傑偡",L2_2;
L2_1:
	mes "[娗棟恖]";
	mes "儂儂乧乧";
	mes "偍偸偟傕慜偺愴偄偱旀傟偰偍傞偐丅";
	mes "傑偀偄偄乧乧儌儌僞儘懱尡娰偼妝偟傫偱偔傟偨偐側丠";
	mes "嵟弶偵夛偭偨怑堳偲榖偣偽";
	mes "変乆偑梡堄偟偨宨昳傪偔傟傞偩傠偆丅";
	next;
	mes "[娗棟恖]";
	mes "壗偼偲傕偁傟丄偦偺嫮偒怱傪";
	mes "幐偆側偐傟両";
	next;
	set event_momo,2;
	stopnpctimer "roomt";
	disablenpc "娗棟恖";
	enablenpc "懸婡幒扴摉幰";
	warp "amatsu.gat",223,230;
	end;
L2_2:
	mes "[娗棟恖]";
	mes "儂儂儂丄傑偡傑偡婥偵擖偭偨偧両";
	mes "嵟屻偺寛愴偩丅";
	mes "偍偸偟偺幚椡傪堚姸側偔";
	mes "敪婗偡傞傛偆偵両";
	monster "ama_test.gat",35,103,"婼",1301,1,"mobcount2";
	monster "ama_test.gat",56,111,"婼",1301,1,"mobcount2";
	monster "ama_test.gat",40,91,"婼",1301,1,"mobcount2";
	disablenpc "娗棟恖";
	set event_momo,3;
	close;
Onstart:
	mes "[娗棟恖]";
	mes "儂儂乧乧";
	close;
}
//=======================================MobCount===============================-
ama_test.gat,0,1,0	script	mobcount	-1,{
	if (@mobdie == 8) goto Lfin;
	set @mobdie,@mobdie+1;
	set @mobrand,rand(4);
	if (@mobrand == 1) goto Lrand2;
	if (@mobrand == 2) goto Lrand3;
	if (@mobrand == 3) goto Lrand4;
Lrand1:
	areaannounce "ama_test.gat",30,78,68,120,"DOKEBI: 僆儔偼僫僯儌僔僥僫僀両",8;end;
Lrand2:
	areaannounce "ama_test.gat",30,78,68,120,"DOKEBI: 僑儊儞僫僒僀僑儊儞僫僒僀",8;end;
Lrand3:
	areaannounce "ama_test.gat",30,78,68,120,"DOKEBI: 傾乕乕乧",8;end;
Lrand4:
	areaannounce "ama_test.gat",30,78,68,120,"DOKEBI: 晄堄懪偪偐乕乧",8;end;
Lfin:
	areaannounce "ama_test.gat",30,78,68,120,"DOKEBI: 僑僆僆僆僆乧乧",8;
	enablenpc "娗棟恖";
	doevent "娗棟恖::Onstart";
	end;
}
//=======================================MobCount2==============================-
ama_test.gat,50,101,0	script	mobcount2	-1,{
	if (@mobdie2 == 2) goto Lfin;
	set @mobdie2,@mobdie2+1;
	areaannounce "ama_test.gat",30,78,68,120,"AMMUT: 偖偍偍偍偍乧",8;end;
Lfin:
	set event_momo,4;
	stopnpctimer "roomt";
	enablenpc "懸婡幒扴摉幰";
	warp "amatsu.gat",223,230;
	end;
}
//=======================================TIMER==================================-
ama_test.gat,50,102,0	script	roomt	-1,{
	close;

OnTimer1000:
	mapannounce "ama_test.gat","崱偐傜惂尷帪娫偼俇暘娫偱偡丅",8;
	end;
OnTimer180000:
	mapannounce "ama_test.gat","偁偲嶰暘偱偡丅",8;
	end;
OnTimer300000:
	mapannounce "ama_test.gat","偁偲堦暘丅",8;
	end;
OnTimer360000:
	mapannounce "ama_test.gat","僺- 僺- 僺- 帩偪帪娫偑柍偔側傝傑偟偨丅",8;
	end;
OnTimer360500:
	disablenpc "娗棟恖";
	enablenpc "懸婡幒扴摉幰";
	areawarp "ama_test.gat",30,78,68,120,"amatsu.gat",223,230;
	stopnpctimer "roomt";
	end;
}