npc.gml

在线游戏最新服务器端源代码

<style>
.拉客说明:div{
	anishow=1;
	zorder=top;zorder=zorder+1;
	OnLButtonDownEnd={<: del=1>};
	autosubpos=vert(3,3,3,3);
	bkimg=dark(5);
	oncreate#style={<text src="您好，有什么需要帮助的吗";autopos=1>
		<text src="小店是一个";autopos=1>
		<text src="小店简介";autopos=1>
		<text src="小店新闻";autopos=1>
		<text src="小店名人";autopos=1>
		//<text src=$[roomname];xpos=100;ypos=16>
	}
}

.拉客:human{//其他人
	pid=主地图;
	autozorder=1;
	type='man';
	mutisrc=walk('$.\..\actimg\女招待.ale',12);//人物形象
	OnGo={<: walk=gotopos($[ep0],$[ep1],80,10);>};

	onRandgo={<: walk=gotopos(rand(100)+startx,rand(100)+starty,31,8)>};
	OnWalkEnd={<: paramctrl=timer(rand(5000)+1000,randgo)>
		<flychattxt chatfrom=$[id];src=$[roomname]>
	};

	On显示人数=showpersons(id,roomname);

	OnWalkErr={<: eve=randgo;>};

	OnCreate={<: pos=startx,starty;eve=randgo;eve=显示人数;>}

	OnClick#1={<: eve=go,&desktop.msgobj.xpos,&desktop.msgobj.ypos-40>
		<拉客说明 pid=$[pid];pos=$[pos];mousemsg=1>
		<img pid=$[pid];src=$.\..\images\light2.ale;anishow=1;pos=$[pid.mousepos];paramctrl=loopt(1,frame,0,framemax-1,1,20,del);zorder=top;zorder=zorder+1>
	};

	OnMouseOver={<: bkimg=shadow(#0000FF,255,0,0,3,1);>}
	OnMouseOut={<: bkimg=null;>}

}
</style>

<script>
function showpersons(id,rname)
{
	//$GX.Cmd("<:"+id+" paramctrl#显示人数=timer(rand(8000)+2000,显示人数)>"+"<flychattxt chatfrom="+id+";src=快来，有"+manlist[rname]+"个朋友在等你呢>");
}
</script>