npc_event_making.txt

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

		if (countitem(733)<1) goto L_SUB_1;
		if (Zeny < 3500) goto L_SUB_1;
		delitem 2275,1;
		delitem 998,50;
		delitem 733,1;
		set Zeny,Zeny-3500;
		mes "[偁傞彜恖]";
		mes "偆乕傓 ! 孨乧堛巘柶嫋偼";
		mes "帩偭偰傞偺偐丠";
		mes "傑偁丄 僽儔僢僋僸儍僢僋偲偄偆";
		mes "搝傎偳偺幚椡偑偁傟偽";
		mes "柶嫋偑側偔偰傕娭學側偄偗偳丅";
		mes "傑丄偄偄偩傠丅 偝偁帩偭偰偄偗両";
		getitem 2273,1;
		close;
	L_SUB_1:
		mes "[偁傞彜恖]";
		mes "偙傜丄 壌偑尵偭偨昁梫昳栚傪傛偍偔妋擣偟偨傑偊丅";
		mes "庒幰偑摢埆偄傛偆偩側 .. 偟偭偐傝偟偨曽偑偄偄偤丄 偆傫?";
		close;
	L_MENU_2:
		if (countitem(2247)<1) goto L_SUB_2;
		if (countitem(916)<300) goto L_SUB_2;
		if (Zeny < 500) goto L_SUB_2;
		delitem 2247,1;
		delitem 916,300;
		set Zeny,Zeny-500;
		mes "[偁傞彜恖]";
		mes "僼僼丅 僙儞僗偁傞偹丄孨丅";
		mes "嵽椏傪媮傔傞偺偑偒偮偦偆偩偭偨傠偆偑丄傗傝峛斻偺偁傞傎偳偺僨僓僀儞偱偼側偄偐丅 偝偁丄帩偭偰偄偗 ..";
		getitem 5018,1;
		close;
	L_SUB_2:
		mes "[偁傞彜恖]";
		mes "偙傜丄壌偑尵偭偨昁梫昳栚傪傛偍偔妋擣偟偨傑偊丅";
		mes "庒幰偑摢埆偄傛偆偩側 .. 偟偭偐傝偟偨曽偑偄偄偤丄 偆傫?";
		close;
	L_MENU_3:
		if (countitem(999)<20) goto L_SUB_3;
		if (countitem(707)<1) goto L_SUB_3;
		if (Zeny < 5000) goto L_SUB_3;
		delitem 999,20;
		delitem 707,1;
		set Zeny,Zeny-5000;
		mes "[偁傞彜恖]";
		mes "偙傟偼偪傚偭偲偄偄儌儞偠傖 ..";
		mes "偄傗側姶偠偑彮偟偁傞偗偳  .. 偦傟側傝偵儐僯乕僋側枴偑偄偄偲巚偆傛丅 孨偼偳偆偐偄 ?";
		mes ".. 婥偵擖偭偨傛偆偩側 .. 偝 丄帩偭偰偄偗 !";
		getitem 2281,1;
		close;
	L_SUB_3:
		mes "[偁傞彜恖]";
		mes "偙傜丄壌偑尵偭偨昁梫昳栚傪傛偍偔妋擣偟偨傑偊丅";
		mes "庒幰偑摢埆偄傛偆偩側 .. 偟偭偐傝偟偨曽偑偄偄偤丄偆傫?";
		close;
	L_MENU_4:
		if (countitem(1019)<120) goto L_SUB_4;
		if (Zeny < 10000) goto L_SUB_4;
		delitem 1019,120;
		set Zeny,Zeny-10000;
		mes "[偁傞彜恖]";
		mes "僼僃僀儓儞偲偄偆懞偵峴偗偽丄妢傪嶌偭偰偔傟傞柤恖偑偄傞 ..";
		mes "偦偺曽偑壌偩偗傪捠偠偰悽偵弌偟偨旕忢偵儐僯乕僋側傾僀僥儉偠傖丅";
		mes "偝偁 ! 帩偭偰偄偗 !";
		getitem 2280,1;
		close;
	L_SUB_4:
		mes "[偁傞彜恖]";
		mes "偙傜丄壌偑尵偭偨昁梫昳栚傪傛偍偔妋擣偟偨傑偊丅";
		mes "庒幰偑摢埆偄傛偆偩側 .. 偟偭偐傝偟偨曽偑偄偄偤丄偆傫?";
		close;
}

//----------------------------------
// 妛惗朮
//----------------------------------

alberta_in.gat,59,139,4	script	妛惗朮栮	120,{
	mes "[栮]";
	mes "傗傟傗傟乧 ";
	next;
	mes "[栮]";
	mes "恖惗偲偄偆偺偼嫊偟偄傕傫偠傖偺乧";
	mes "婥帩偪偼庒崰偺傑傑偩偺偵乧 ";
	mes "傗偭傁傝擭偵偼彑偰側偄偠傖偺乧";
	mes "僐儂 !! 僐儂 .. !!";
	next;
	if (countitem(1030)<10) goto L_SUB_1;
	 	menu "屨偺懌棤傪尒偣傞",-,"屨偺懌棤傪妛惗朮偵岎姺偡傞",L_MENU_1,"傗傔傞",L_MENU_2;
 			mes "[栮]";
 			mes "偍偍両偙丄偙傟偑塡偺乧";
 			mes "屨偺懌棤両";
			next;
	 		mes "[栮]";
 			mes "尒傞偩偗偱椡偑桸偄偰偔傞両擋偆偩偗偱寣偑暒偄偰偔傞両";
			mes "傕偟堸傫偩傜丄偍偟傑偄偺90嵨栮傕尦婥墵惙偵側傞両";
			mes "偁偺懌棤偐偄両両両両";
 			mes "偍偍偍偍偍偭偲両偤傂乧偦傟傪傢偟偵偔傟乧憗偔乧";
 			close;
	L_MENU_1:
		if (countitem(1030)<10) goto L_SUB_2;
		if (!(checkweight(5016,1))) goto L_START_1;
			delitem 1030,10;
			getitem 5016,1;
			mes "[栮]";
			mes "偁丄偁傝偑偨偄偠傖両両";
			mes "偙傟偱傢偟傕庒偝偑栠偣傞偐傕偟傟側偄両";
			mes "憗偔堸傑側偔偪傖偩傔偠傖偺乣両 !";
			close;
	L_SUB_2:
 			mes "[栮]";
 			mes "妷両偙偺埆幰両";
 			mes "側偄暔偱閤偦偆偲偡傞偲揤敱偵摉偨傞偠傖両";
 			close;
	L_MENU_2:
		mes "[栮]";
		mes "偍丄偍偄両庒幰両傑丄懸偭偰偔傟両";
		close;
	L_SUB_1:
		 menu "懳榖偡傞",-,"傗傔傞",L_MENU_3;
	 		mes "[栮]";
	 		mes "傛偔暦偔偺偠傖乧壗傛傝寬峃偑堦斣偺偠傖.";
	 		mes "庒偄帪偵懱偵柍棟傪偡傞偲乧擭庢偭偰嬯楯偡傞傕傫偠傖丅";
	 		next;
	 		mes "[栮]";
	 		mes "庒偄崰偺寬峃傪栠偣傞偨傔丄";
			mes "懱偵椙偄偲偄偆暔偼慡晹怘傋偰傒偨偑丄";
	 		mes "寢嬊丄壗傕岠偐偢丄嵿嶻偩偗慡晹巊偭偰偟傑偭偨偺偠傖丅";
	 		next;
	 		mes "[栮]";
	 		mes "傢偟偼傕偆偁偒傜傔偨偠傖偑丄1偮偩偗枹楙偑偁傟偽丄";
	 		mes "崱傑偱傑偩栻偺拞偺栻偱偁傞";
			mes "^3355FF屨偺懌棤^000000 傪堸傔側偐偭偨帠偠傖丅";
 			next;
 			mes "[栮]";
 			mes "暦偄偨帠偼偁傞偐偄丠両屨偺懌棤乧";
 			mes "尒傞偩偗偱椡偑桸偄偰偔傞両擋偆偩偗偱寣偑暒偄偰偔傞両";
			mes "傕偟堸傫偩傜丄偍偟傑偄偺90嵨栮傕尦婥墵惙偵側傞両";
			mes "柤栻偺拞偺柤栻偺偠傖両";
 			next;
 			mes "[栮]";
 			mes "偁偁乧巰偸慜偵偁傟傪10屄堸傓帠偑偱偒傟偽乧";
			mes "偦偺懠偵婅偄側偳側偄偺偠傖乧丅";
 			mes "傕偟扤偐偑屨偺懌棤傪10屄帩偭偰偄傟偽乧傢偟偺桞堦偺嵿嶻丄";
			mes "捛壇偺 ^3355FF妛惗朮^000000 傪偁偘偰傕偐傑傢側偄偺偠傖丅";
			close;
	L_MENU_3:
			mes "[栮]";
			mes "僐儂 !! 僐儂 .. !!";
			mes "偲乧屨乧屨偺乧偁丄懌棤乧僐儂丄僐儂 .. !!";
			close;
	L_START_1:
		mes "[栮]";
		mes "廳検僆乕僶乕偱偡丅";
		close;
}

//----------------------------------
// 妛幰朮
//----------------------------------

prt_in.gat,38,108,4	script	妛幰朮愭惗	53,{
	if (countitem(710)<1) goto L_SUB_1;
	if (countitem(703)<1) goto L_SUB_1;
	if (countitem(704)<1) goto L_SUB_1;
	if (countitem(708)<1) goto L_SUB_1;
	mes "[愭惗]";
	mes "偁傜丄傑偁乧婱曽偑帩偭偰偄傞偦偺壴偼乧";
	next;
	menu "壴傪尒偣傞",-,"壴傪搉偡",L_MENU_1,"傗傔傞",L_MENU_2;
		mes "[愭惗]";
		mes "傗丄傗偼傝乧偦偺壴偼傢偨偔偟偑扵偟偰偄傞4庬椶偺壴偱偡偹乧";
		mes "傢偨偔偟偵偙偺壴傪偔偩偝偄傑偣傫偐乧丠";
		next;
		mes "[愭惗]";
		mes "傕偟丄偔偩偝傞偺側傜乧傢丄傢偨偔偟偺堦斣戝愗側暔傪婱曽偵乧";
		close;
	L_MENU_1:
		if (!(checkweight(5012,1))) goto L_START_1;
		if (countitem(710)<1) goto L_SUB_2;
		if (countitem(703)<1) goto L_SUB_2;
		if (countitem(704)<1) goto L_SUB_2;
		if (countitem(708)<1) goto L_SUB_2;
		delitem 710,1;
		delitem 703,1;
		delitem 704,1;
		delitem 708,1;
		getitem 5012,1;
		mes "[愭惗]";
		mes "杮摉偵偁傝偑偲偆偛偞偄傑偡.惗傑傟偰偐傜偙傫側恊愗側岲堄偼弶傔偰偱偡丅";
		mes "栺懇偲偍傝偵傢偨偔偟偺戝愗側暔傪嵎偟偁偘傑偟傚偆丅";
		mes "傢偨偔偟偑懖嬈偟偨帪偺朮巕偱偡丅傢偨偔偟偺戝愗側捛壇偑巆偭偰偄傞暔偱偡丅";
		mes "偤傂乧庴偗庢偭偰偔偩偝偄乧戝愗偵偟偰偔偩偝偄偹丅";
		close;
	L_SUB_2:
		mes "[愭惗]";
		mes "偁乧傛偔尒偨傜傢偨偔偟偑扵偟偰偄傞壴偱偼偁傝傑偣傫僱乧";
		mes "偼偁乧娫堘偄偱偟偨乧偡傒傑偣傫乧";
		close;
	L_MENU_2:
		close;
	L_SUB_1:
		mes "[愭惗]";
		mes "壴乧偲偄偆暔偼杮摉偵旤偟偄偱偡偹丠";
		next;
		menu "懳榖偡傞",-,"傗傔傞",L_MENU_3;
			mes "[愭惗]";
			mes "梒偄崰丄傢偨偔偟偼桭偨偪偲梀傇帠偑偱偒偢丄曌嫮偽偐傝偺幰偱偟偨丅";
			mes "偦偺帪偑夰偐偟偄偱偡偑乧夨偄偼偁傝傑偣傫丅偦偺戙傢傝丄庒偄偆偪偵慡偰偺崅摍嫵堢傪廗偆帠偑偱偒傑偟偨偐傜偱偡丅";
			next;
			mes "[愭惗]";
			mes "偟偐偟乧桭偨偪偑1恖傕偄側偄偺偼杮摉偵斶偟偄帠偱偟偨丅";
			mes "曌嫮偺帪乧旀傟偰偄傞帪乧傢偨偔偟偺榖偟傪暦偄偰偔傟傞桭偨偪偺懚嵼偑梸偟偐偭偨偺偱偡丅";
			mes "偦偟偰丄偁傞擔傢偨偔偟偼嵟崅偺桭偨偪偲弌夛偭偨偺偱偡丅";
			next;
			mes "[愭惗]";
			mes "扤傕庤傪壛偊側偄壴抎偱旤偟偔惗偊偨堦杮偺壴傪尒偰乧";
			mes "傢偨偔偟偼偦偺壴偲摨偠塣柦傪帩偭偨偙偲傪捈姶偟偨偺偱偡丅";
			next;
			mes "[愭惗]";
			mes "懠偺恖偵偼壗傕側偄堦杮偺壴偵夁偓側偄偐傕抦傟傑偣傫乧偱偡偑丄傢偨偔偟偵偼偲偰傕戝愗側椡偵側偭偰偔傟偨偺偱偡丅";
			mes "傢偨偔偟偑偙偺傛偆偵愭惗偵側傟偨帠傕乧偁偺壴偺偍堿丄偲尵偭偰傕夁尵偱偼偁傝傑偣傫丅";
			next;
			mes "[愭惗]";
			mes "偦偟偰乧傢偨偔偟偼乧偦偺桭偨偪偐傜捀偄偨垽偵楃傪尵偄偨偄偲巚偭偰偄傞偺偱偡丅";
			mes "壴偵偮偄偰偨偔偝傫偺尋媶傪偟偰傢偨偔偟偺挰乧偄偊丄傕偭偲傕偭偲慡悽奅傑偱丄壴偱偄偭傁偄偵偟偨偄偺偱偡丅";
			next;
			mes "[愭惗]";
			mes "偦偺堊偵偼乧偨偔偝傫偺壴偑昁梫偱偡偑乧";
			mes "傢偨偔偟偼弌偐偗偨宱尡偑偁傑傝偵傕側偄偺偱乧擄偟偄偺偱偡乧";
			mes "^3355FF尪憐偺壴^000000 偲 ^3355FF僸僫儗^000000 偲 ^3355FF傾儘僄^000000 偦偟偰 ^3355FF儊儞僩^000000... 偙偺壴傪尒偮偗偰偔偩偝傞偺側傜丄傢偨偔偟偺戝愗側暔傪嵎偟偁偘傑偟傚偆乧";
			close;
	L_MENU_3:
			mes "[愭惗]";
			mes "偄偮偐偼偙偺悽偑壴偱偄偭傁偄偵側傞丄旤偟偄強偵側傞傛偆偵婃挘傝傑偡両";
			close;
	L_START_1:
		mes "[愭惗]";
		mes "廳検僆乕僶乕偱偡丅";
		close;
}

//----------------------------------
// 巁慺儅僗僋
//----------------------------------

payon_in02.gat,25,71,4	script	巁慺儅僗僋惵擭	86,{
	if (countitem(701)<5) goto L_SUB_1;
		mes "[惵擭]";
		mes "偆偁偁偁偁偁偁両偳偆偟偰傕懯栚偩両";
		mes "偆偆乧搝傜偑壜垽偔尒偊傞両偩丄懯栚偩両";
		next;
		menu "僆儔僆儔傪尒偣傞",-,"僆儔僆儔傪偁偘傞",L_MENU_1,"傗傔傞",L_MENU_2;
			mes "[惵擭]";
			mes "偍偍偍偍偍偍偭偲!!!";
			mes "偙丄偙傟偑僆儔僆儔乧丠両";
			mes "扨搧捈擖偱尵偄傑偡両偦偺僆儔僆儔偲丄杔偺堦斣偺曮暔偲岎姺偟傑偟傚偆両";
			mes "偳丄偳偆偱偡偐丠岎姺偟傑偡偐丠";
			close;
	L_MENU_1:
		if (countitem(701)<5) goto L_SUB_2;
		if (!(checkweight(5004,1))) goto L_START_1;
		delitem 701,5;
		mes "[惵擭]";
		mes "偔偼偼偼偼両傗偭偲庤偵擖傟偨偧両僆儔僆儔両乮嫨傇乯";
		mes "偟偭偮偙偄搻宄傗傠偆傔両慡晹傗偭偮偗偰傗傞両乮擱偊傞乯";
		next;
		mes "[惵擭]";
		mes "偼偁...偼偁...";
		mes "傏丄杔偑偪傚偭偲嫽暠偟偨傛偆偱偡偹.偆乧栺懇偳偍傝偵杔偺曮暔傪搉偟傑偡丅";
		next;
		getitem 5004,1;
		mes "[惵擭]";
		mes "偙傟傪婄偵偟偰懅傪偟偨傜乧偄偮偱傕偳偙偱傕憉夣側懅偑偱偒傞暔偱偡丅";
		mes "慜偵丄嫏巘偺巇帠傪偟偨帪丄奀偐傜庤偵擖傟偨暔偱偡丅";
		mes "杔偵偼戝愗側暔偩偑丄杔傪彆偗偰偔傟偨楃偲偟偰帩偭偰偔偩偝偄丅";
		next;
		mes "[惵擭]";
		mes "偔偼偼偼偼両偲傝偁偊偢丄偝偭偦偔偙偺僆儔僆儔傪巊偭偰傒偨偄傫偱偡両";
		close;
	L_SUB_2:
		close;
	L_MENU_2:
		mes "[惵擭]";
		mes "偔偆偆偆偆乧搻宄傪捛偄暐偆帠偑偱偒側偗傟偽乧";
		mes "杔偵巆偝傟偨摴偼搻宄傪垽偡傞帠偟偐側偄乧偔偆偆偆偆乧";
		close;
	L_SUB_1:
		mes "[惵擭]";
		mes "偆偁偁偁偁偁両傕偆丄傕偆偨偔偝傫偩両";
		mes "偙偺搻宄傔両両両両両";
		next;