myfriend.gml

来自「在线游戏最新服务器端源代码」· GML 代码 · 共 37 行

<style>
.friendmenu:div{
	name=menu;
	pid=desktop;
	anishow=1;
	clip=0;
	zorder=top;
	OnLButtonUpEnd={<: del=1>};
	autosubpos=vert(3,3,3,3);
	bkimg=color(black);
	oncreate#style={<: xpos=pid.mousexpos;ypos=pid.mouseypos+10;pid=*pid.pid;mousemsg=1;>
		<text src="我的朋友";autopos=1>
		<text src="会面:";autopos=1>
		<text src="邀请";autopos=1>
		<text src="呼叫";autopos=1>
		<text src="留言";autopos=1>
	}
}

.afriend:div{
	size=200,20;
	bkimg=dark(5);
	OnCreate#1={<img pos=10,20;src=$.\..\actimg\man.ale><text xpos=20;src=$[name]，目前位置（台球）>};
	onclick={<:menu del=1><friendmenu></friendmenu>};
	autopos=1;
}
.frienddiv:div{
	size=200,800;
	zorder=top;
	autosubpos=vert(1,1,1,1);
	OnCreate#fly={<: xpos=0;stepto=(200,0,3)>};
	OnCreate#={<afriend name=老谢></<afriend><afriend name=老谢2></<afriend>}
}
</style>

<frienddiv>
</frienddiv>