npc_event_doll.txt

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

//11-29夛榖姰惉
alberta.gat,117,134,8	script	偪傃偭偙	96,{
	if (Sex == 1) goto LStartM;
LStartF:
	mes "[偪傃偭偙]";
	mes "偍偹偉偪傖傫丄偙傫偵偪偼両";
	mes "偹偉偹偉丄偍巓偪傖傫偼";
	mes "偸偄偖傞傒偑岲偒丠";
	mes "偁偨偟丄偸偄偖傞傒偑戝岲偒側偺丅";
	next;
	mes "[偪傃偭偙]";
	mes "偁偨偟丄怴偟偄偸偄偖傞傒偑梸偟偄丅";
	mes "崱搙偺偍抋惗擔偵僷僷偑攦偭偰";
	mes "偔傟傞偺丅";
	next;
	menu "偄偄偹乕",L1,"偸偄偖傞傒偁偘傛偆偐丠",L2;
LStartM:
	mes "[偪傃偭偙]";
	mes "偍偵偄偪傖傫丄偙傫偵偪偼両";
	mes "傓乕丄偍孼偪傖傫偼抝偩偐傜";
	mes "偸偄偖傞傒偼岲偒偠傖側偄偐側丠";
	mes "偁偨偟丄偸偄偖傞傒偑戝岲偒側偺丅";
	next;
	mes "[偪傃偭偙]";
	mes "偁偨偟丄怴偟偄偸偄偖傞傒偑梸偟偄丅";
	mes "崱搙偺偍抋惗擔偵僷僷偑攦偭偰";
	mes "偔傟傞偺丅";
	next;
	menu "偄偄偹乕",L1,"偸偄偖傞傒偁偘傛偆偐丠",L2;
L1:
		mes "[偪傃偭偙]";
		mes "偳傫側偸偄偖傞傒偑偄偄偐側乣";
		mes "偦偆偩両僒儖恖宍偑梸偟偄側乕";
		mes "偲偭偰傕偐傢偄偄偲巚偆偺丅";
		close;
L2:
		mes "[偪傃偭偙]";
		mes "偊丠";
			if (Sex == 0) mes "偍偹偉偪傖傫偑偔傟傞偺丠";
			if (Sex == 1) mes "偍偵偄偪傖傫偑偔傟傞偺丠";
		mes "偸偄偖傞傒傪丠";
		mes "傗偭偨乕両";
		mes "偳傫側偸偄偖傞傒傪";
		mes "偔傟傞偺偐側両丠";
		next;
		menu "億儕儞恖宍",L21,"僠儑儞僠儑儞恖宍",L22,"僂僒僊偝傫",L23,"僶僢僞恖宍",L24,"僗億傾恖宍",L25,"僆僔儕僗恖宍",L26,"僶僼僅儊僢僩恖宍",L27,"僞僰僉恖宍",L28,"僒儖恖宍",L29;
//==============================================
L21:
	if (countitem(741)<1) goto LEnd;
	mes "[偪傃偭偙]";
	mes "傫両億儕儞恖宍偼偁偨偟傕";
	mes "帩偭偰傞偗偳丄";
		if (Sex == 0) mes "偦傟偱傕偍偹偉偪傖傫偑";
		if (Sex == 1) mes "偦傟偱傕偍偵偄偪傖傫偑";
	mes "偔傟傞傫側傜戝帠偵偡傞両";
	mes "億儕儞恖宍丄傆傢傆傢乣";
	next;
	mes "[偪傃偭偙]";
	mes "偍偐偊偟偵丄偁偨偟偐傜";
		if (Sex == 0) mes "偍偹偉偪傖傫偵";
		if (Sex == 1) mes "偍偵偄偪傖傫偵";
	mes "僾儗僛儞僩偁偘傞両";
	mes "傎傜丄塀偟偰偍偄偨僉儍儞僨傿丅";
	next;
	delitem 741,1;
	getitem 529,1;
	mes "[偪傃偭偙]";
	mes "僿僿僢";
	mes "偨偔偝傫怘傋傞偲儅儅偵幎傜傟傞偐傜丄";
		if (Sex == 0) mes "偍偹偉偪傖傫偵傕偁偘傞丅";
		if (Sex == 1) mes "偍偵偄偪傖傫偵傕偁偘傞丅";
	mes "偸偄偖傞傒偁傝偑偲偹両";
	close;
//==============================================
L22:
	if (countitem(742)<1) goto LEnd;
	mes "[偪傃偭偙]";
	mes "偊乧乧 僠儑儞僠儑儞乧乧";
	mes "恖宍乧乧";
	next;
	mes "[偪傃偭偙]";
		if (Sex == 0) mes "偆乕 偣偭偐偔偍偹偉偪傖傫偑";
		if (Sex == 1) mes "偆乕 偣偭偐偔偍偵偄偪傖傫偑";
	mes "偔傟傞傫偩偐傜戝帠偵偟側偒傖乧乧";
	next;
	mes "[偪傃偭偙]";
		if (Sex == 0) mes "偼偄丄偍偹偉偪傖傫";
		if (Sex == 1) mes "偼偄丄偍偵偄偪傖傫";
	mes "僐儗偁偘傞丅";
	next;
	delitem 742,1;
	getitem 530,1;
	mes "[偪傃偭偙]";
	mes "偨偔偝傫怘傋傞偲拵帟偵側傞偐傜";
		if (Sex == 0) mes "偍偹偉偪傖傫傕";
		if (Sex == 1) mes "偍偵偄偪傖傫傕";
	mes "偪傚偭偲偢偮怘傋偰偹丅";
	mes "偁傝偑偲偆乧乧";
	next;
	mes "[偪傃偭偙]";
	mes "(僠儑儞僠儑儞乧乧 傇偮傇偮)";
	close;
//==============================================
L23:
	if (countitem(740)<1) goto LEnd;
	mes "[偪傃偭偙]";
	mes "偆傢乕両僂僒僊偝傫偩両";
	mes "偙傟偐傢偄偄両";
		if (Sex == 0) mes "偍偹偉偪傖傫丄偁傝偑偲偆両";
		if (Sex == 1) mes "偍偵偄偪傖傫丄偁傝偑偲偆両";
	next;
	mes "[偪傃偭偙]";
	mes "傆偐傆偐乣";
		if (Sex == 0) mes "偦偆偩両偍偹偉偪傖傫偵傕";
		if (Sex == 1) mes "偦偆偩両偍偵偄偪傖傫偵傕";
	mes "僾儗僛儞僩偁偘傞両";
	mes "偊偭偲乧乧偁偭偨両";
	mes "偼偄偳偆偧両";
	next;
	delitem 740,1;
	getitem 530,1;
	mes "[偪傃偭偙]";
	mes "偙傟偼僒儞僞偝傫偵傕傜偭偨";
	mes "僉儍儞僨傿側傫偩傛乣";
		if (Sex == 0) mes "偍偹偉偪傖傫傕怘傋偰傒偰丅";
		if (Sex == 1) mes "偍偵偄偪傖傫傕怘傋偰傒偰丅";
	mes "偆偝偓偝傫偁傝偑偲偆両";
	mes "枅擔書偄偰怮傞乣";
	close;
//==============================================
L24:
	if (countitem(752)<1) goto LEnd;
	mes "[偪傃偭偙]";
	mes "偁丄僶僢僞恖宍偩丅";
	mes "儘僢僇偺偸偄偖傞傒偩偹乣";
	mes "挼偹偰偄傞偺偼寵偄偩偗偳丄";
	mes "偸偄偖傞傒偼偐傢偄偄偹丅";
	next;
	mes "[偪傃偭偙]";
	mes "偁傝偑偲偆乣";
		if (Sex == 0) mes "偁偨偟傕偍偹偉偪傖傫偵壗偐偁偘傞丅";
		if (Sex == 1) mes "偁偨偟傕偍偵偄偪傖傫偵壗偐偁偘傞丅";
	mes "偁偨偟偺偍偠偄偪傖傫偵傕傜偭偨傕偑";
	mes "偁偭偨偐側乧乧";
	next;
	delitem 752,1;
	getitem 532,7;
	mes "[偪傃偭偙]";
	mes "偆偪偵偄偭傁偄偁傞偐傜";
		if (Sex == 0) mes "偍偹偉偪傖傫偵傕偍偡偦傢偗乣";
		if (Sex == 1) mes "偍偵偄偪傖傫偵傕偍偡偦傢偗乣";
	mes "偸偄偖傞傒偁傝偑偲両";
	close;
//==============================================
L25:
	if (countitem(743)<1) goto LEnd;
	mes "[偪傃偭偙]";
	mes "偆偉偉乧乧";
	mes "僉僲僐偩乧乧";
	mes "偄偮傕儅儅偵僉僲僐傕怘傋側偝偄偭偰";
	mes "偍偙傜傟偰傞偺乧乧";
	next;
	mes "[偪傃偭偙]";
	mes "偱傕丄偸偄偖傞傒側傜偐傢偄偄偐傜";
	mes "傕傜偆乕丅僉僲僐偼怘傋側偄偗偳乧乧";
	mes "偁偨偟傕壗偐僾儗僛儞僩偡傞偹丅";
	next;
	delitem 743,1;
	getitem 538,5;
	mes "[偪傃偭偙]";
	mes "偙傟丄儅儅偑嶌偭偨偺";
		if (Sex == 0) mes "偍偹偉偪傖傫傕偳偆偧両";
		if (Sex == 1) mes "偍偵偄偪傖傫傕偳偆偧両";
	next;
	mes "[偪傃偭偙]";
	mes "偸偄偖傞傒偁傝偑偲乣";
	close;
//==============================================
L26:
	if (countitem(751)<1) goto LEnd;
	mes "[偪傃偭偙]";
	mes "偙傢偄傛乕両";
	mes "偙傫側偸偄偖傞傒丄弶傔偰尒傞乧乧";
	next;
	mes "[偪傃偭偙]";
	mes "傔偢傜偟偄偐傜僷僷偵傕";
	mes "尒偣偰偁偘偨偄両";
		if (Sex == 0) mes "偠傖偀丄偍偹偉偪傖傫偵偼";
		if (Sex == 1) mes "偠傖偀丄偍偵偄偪傖傫偵偼";
	mes "偙傟偁偘傞両";
	next;
	delitem 751,1;
	getitem 522,2;
	mes "[偪傃偭偙]";
	mes "儅儅偵撪弿偱怷偵擖偭偨傜";
	mes "偙傫側幚傪尒偮偗偨偺丅";
	mes "擇偮偁偘傞偐傜丄";
		if (Sex == 0) mes "儃乕僀僼儗儞僪偲怘傋偰偹両";
		if (Sex == 1) mes "僈乕儖僼儗儞僪偲怘傋偰偹両";
	mes "僄僿僿乧乧";
	close;
//==============================================
L27:
	if (countitem(750)<1) goto LEnd;
	mes "[偪傃偭偙]";
	mes "傊乣両";
	mes "偙傫側偺弶傔偰尒偨両";
	mes "偐傢偄偄偗偳側傫偐偙傢偄偹丅";
	next;
	mes "[偪傃偭偙]";
	mes "偒傟偄側偸偄偖傞傒";
	mes "傕傜偭偪傖偭偨偐傜丄";
		if (Sex == 0) mes "偍偹偉偪傖傫偵傕壗偐偁偘傞乣";
		if (Sex == 1) mes "偍偵偄偪傖傫偵傕壗偐偁偘傞乣";
	next;
	delitem 750,1;
	getitem 526,2;
	mes "[偪傃偭偙]";
	mes "偙傟偼傢偨偟偑昦婥偵側偭偨帪";
	mes "僷僷偑偔傟偨偺丅";
	mes "崱偼尦婥偩偐傜";
		if (Sex == 0) mes "偍偹偉偪傖傫偵偁偘傞乣";
		if (Sex == 1) mes "偍偵偄偪傖傫偵偁偘傞乣";
	next;
	mes "[偪傃偭偙]";
	mes "偸偄偖傞傒丄偁傝偑偲偆両";
	close;
//==============================================
L28:
	if (countitem(754)<1) goto LEnd;
	mes "[偪傃偭偙]";
	mes "偁丄僞僰僉恖宍偩乣";
	mes "僗儌乕僉乕偼寵偄偩偗偳";
	mes "偸偄偖傞傒偼偐傢偄偄偹両";
	next;
	mes "[偪傃偭偙]";
	mes "偐傢偄偄側乣";
		if (Sex == 0) mes "偍偹偉偪傖傫丄偁傝偑偲両";
		if (Sex == 1) mes "偍偵偄偪傖傫丄偁傝偑偲両";
	next;
	delitem 754,1;
	getitem 539,3;
	mes "[偪傃偭偙]";
	mes "偍偽偁偪傖傫偺庤嶌傝働乕僉偁偘傞両";
		if (Sex == 0) mes "偍偹偉偪傖傫偼";
		if (Sex == 1) mes "偍偵偄偪傖傫偼";
	mes "娒偄傕偺偒傜偄丠";
	mes "偙傟丄偍偄偟偄偐傜怘傋偰傒偰乣";
	next;
	mes "[偪傃偭偙]";
	mes "偐傢偄偄偸偄偖傞傒丄偁傝偑偲両";
	close;
//==============================================
L29:
	if (countitem(753)<1) goto LEnd;
	mes "[偪傃偭偙]";
	mes "傢乕!!!";
	mes "偍僒儖偝傫偩両偐傢偄偄乣";
		if (Sex == 0) mes "偍偹偉偪傖傫丄杮摉偵偁傝偑偲両";
		if (Sex == 1) mes "偍偵偄偪傖傫丄杮摉偵偁傝偑偲両";
	mes "偙傟梸偟偐偭偨偺乣";
	next;
	mes "[偪傃偭偙]";
	mes "偐傢偄偄側乣";
		if (Sex == 0) mes "偦偆偩両偍偹偉偪傖傫偵";
		if (Sex == 1) mes "偦偆偩両偍偵偄偪傖傫偵";
	mes "偍楃偟偨偄偺丅";
	next;
	delitem 753,1;
	getitem 608,1;
	mes "[偪傃偭偙]";
	mes "偙傟偼僷僷偲懠偺懞偵峴偔搑拞偵";
	mes "廍偭偨偺丅壗偐偺庬傒偨偄丅";
	mes "偍偆偪偺掚偵杽傔偰傕";
	mes "偪偭偲傕夎偑弌側偄偐傜";
		if (Sex == 0) mes "偍偹偉偪傖傫偵偁偘傞両";
		if (Sex == 1) mes "偍偵偄偪傖傫偵偁偘傞両";
	next;
	mes "[偪傃偭偙]";
	mes "偸偄偖傞傒丄偁傝偑偲両";
	close;
//==============================================
LEnd:
	mes "[偪傃偭偙]";
		if (Sex == 0) mes "偆偦偮偒両偍偹偉偪傖傫";
		if (Sex == 1) mes "偆偦偮偒両偍偵偄偪傖傫";
	mes "偸偄偖傞傒帩偭偰側偄偱偟傚両";
	mes "(僾僀僢)";
	close;
}