mainstyle.gml

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

#ifndef MAINSTYLE
#define MAINSTYLE

#define COMMCONNECTLIST "169.254.159.182,169.254.159.182"

<style>
.通讯显示:text{
	pid=desktop;zorder=top;zorder=zorder+8120;
	bk=roundbar(#FFFFCC,6,#000066,-4,-1);
	bk#2=shadow(0,120,1,1,2);
	color=#000070;
	Onsize={<: pos=(pid.width-width-80),(pid.height-20)>};eve=size;
	ifchged(src)={<: eve=size>};
}
.基本通讯:socketc{
	port=10200;debug=1;
	AutoConnectlist=#(COMMCONNECTLIST);
	pid=desktop;
	eve=size;
	timeout=0;
	OnCreate#text={<: ptextid=new 通讯显示{src=正在连接服务器}>};
	OnDestroy={<: ptextid.del=1;>};
	OnAutoConnect={<: ptextid.src="正在连接服务器 $[connectnumleft]";ptextid.show=1;>};
}
.lightballstyle{
 draw=-1:{wv();offsetorg(-22,10);Circlelight(0,0,(90-rdsize)/6+1,#F9FF8F);
//		Circlelight(0,0,(100-rdsize)/7,#660000);
	    torus(0,0,rdsize/5+2,3,R70G95B70);
	    torus2(0,0,rdsize/3,8,R17G25B32);
//   torus2(rdsize/100,rdsize/100,rdsize*15/100+3,9,R7G25B32);
	}
 ctrl#light=loop(rdsize,20,80,5,0);
}
.nolightballstyle{
 draw=null;ctrl#light=null;
}
.mousefire:atomsys{
	pos=0,0;
	size=pid.width,pid.height;
	Onsize={<: size=pid.width,pid.height;>}
	color=#FFCC33;
	hicolor=#FF3300;
	endcolor=#6600AC;
	wind=0,-50;
	newlinefrom=mousexpos,mouseypos;
	OnUpdate={<: newlineto=$[mousepos],2,12,50,10>};
//	OnUpdate={<: newlineto=rand(1000),rand(800),2,12,50,10>};
	mousemsg=1;
	OnLButtonDownEnd={<: newatom=$[mousepos],140,102,120,10><sys playsnd=$.\..\..\sound\mousefire.adm;>};
	canmousemsg=0;
}
.textfire:atomsys{
	clip=0;
	size=pid.width+140,250;
	pos=-20,pid.height-200;
	color=#00FFFF;
	hicolor=#CCFFFF;
	wind=15,-10;
	OnUpdate={<: newatom=rand(width-150)+25,rand(40)+160,3,12,60,10,88>};
}
.linefire:atomsys{
	clip=0;
	color=#00BF0F;
	hicolor=#FCFF0F;
	wind=10,0;
	randforword=0,2;
	OnUpdate={<: newatom=rand(width-40)+20,0,3,12,95,10,98>}:3;
	draw={wv();line(0,0,width,0,#007666);
	 line(0,1,width,1,#004633)}
}
.MenuIcon:text{
 pos=-31,0;font=Webdings,20,20,800;anti=1;color=#CCFFFF;
 src=8;
 filltext={bar(0,0,40,40,#09999F);Circlelight(6,6,13,#FFFFCC);Circlelight(6,6,5,#FFFFFF);};
 bk=shadow(#006666,250,0,0,2);
 clip=0;ctrl=loopt(1,alpha,0,255,12,20);
}
.MenuBtn:Text{
 font=黑体,12,20,800;color=#FFFFFF;anti=1;italic=1;
 ctrl=loopt(1,alpha,0,255,8,40);
 iconsrc=8;
 OnCreate#icon={<: picon=new MenuIcon{src="$[iconsrc]";}>};
 OnMouseOver={<: playsnd=$.\..\..\sound\btnover.adm;bk=roundbar(#2689AF,11,#0066AF,-9,-1);bk#t=shadow(0,255,0,0,2,2);class=lightballstyle>};
 OnmouseOut={<: bk=null;bk#t=null;class=nolightballstyle>};
}
.flyoutclass{
 mutishownum=2;
 Ctrl#1=loopt(1,alpha,190,0,6,10);
 Ctrl#2=loopt(1,mutioffx0,0,-35,1,10);
 Ctrl#3=loopt(1,mutioffx1,0,35,1,10);
}
.TitleText:Text{
 font=黑体,21,42,500;color=#BCFFF0;zorder=top;path=stepin(-1000,0,7);clip=0;
 xp=20;xp2=0;
 ctrl#1=loop(xp,20,350,11,330);
 ctrl#2=loop(xp2,320,50,7,330);
 ctrl#make=loopcmd(-1,1220,330,{<: font=黑体,21,42,500>});
 filltext={Glint(0,0,0,height,0,#BCFFF0);Circlelight(xp,10,60,#EFDC33);Circlelight(xp2,40,90,#00CC66);
	Circlelight(120,-10,80,#6630FF);Circlelight(250,-1,40,#CCFFFF);
	};
 anti=1;pos=292,-32;ctrl=loopt(1,alpha,0,255,8,50);
 OnOut={<: ctrl=null;ctrl#make=null;path=null;class=flyoutclass;>};
}
.kele8copytext:text{
 color=#007686;bk=shadow(#3366FF,120,0,0,3);
 src="版权所有 copyright by IFriend 2001 all.";
 Onsize={<: pos=(pid.width-width)/2,pid.height-23;>};eve=size;path=stepin(0,80,12);
 OnCreate={<linefire pos=-pid.xpos,-5;rect=0,-40,pid.pid.width,40;>};
 OnOut={<: path=stepto(0,80,22);>};
}
.face:div{
	class=dragclass;
	path=stepin(-800,0,2);
	bk=round4_3(#009999,16,#205353);bk#line1=round(#002323,16,1,2,2);
}
.face标题文字:text{
	 font=黑体,12,22;color=#BFFFFF;
	 anti=1;filltext={Glint(0,0,0,30,#BFFFFF,#006633)};
	 bk=shadow(0,80,1,1,1);
	 draw={wv();line(-xpos+20,24,pid.width-xpos-20,24,#006666);
	 line(-xpos+20,25,pid.width-xpos-20,25,0)}
	 OnCreate#snd={<sys playsnd=$.\..\..\sound\facemove.adm;>};
}
.PageText:text{
	font=黑体,14,26,800;color=#FFFFFF;anti=1;italic=1;
	ctrl=loopt(1,alpha,0,255,8,80);
	OnCreate#icon={<MenuIcon>};
	OnMouseOver={<: bk=roundbar(#2689AF,11,#0066AF,-9,-1);bk#t=shadow(0,255,0,0,2,2);class=lightballstyle>};
	OnmouseOut={<: bk=null;bk#t=null;class=nolightballstyle>};

	pageno=0;
	clip=0;
	zorder=top;
	Onunselect={<: bkimg#sel=null;>};
	OnSelect={<: bkimg#sel=roundhalf(#FF0033,11,#CCFFFF,-9,-1);bringtop=1>};
	OnClick={<: pid.eve=Activepage,$[pageno]>};
	OnMouseOver#act={<: pid.ctrl#out=null;pid.eve=viewpage,$[pageno]>};
	OnmouseOut#act={<: pid.ctrl#out=timer(800,unview)>};
}
.PageCtrl:div{
	pid.pagectrl=*id;
	subpagenum=0;
	OnSize={<: size=pid.width,pid.height;>};eve=size;
	OnIn={<: show=1;pos=0,0;path=stepin(800,0);Onpathend=null;>};
	OnOut={<: path=stepto(800,0,10);Onpathend={<: show=0>}>};
	eve=in;

	curpage=0;
	OnNewPage={<: ptrpage[$[subpagenum]]=new $[ep0]{pagename=$[ep1];pctrl=$[id];
		OnMousemove#page={<: pctrl.eve=Activepage,$[subpagenum]>};
		pageno=$[subpagenum];ptable=$[pcurtxt]};>}
	OnAddPage={<: pagetxt[$[subpagenum]]=new PageText{src='$[ep0]';pos=$[ep1],$[ep2];pageno=$[subpagenum]};
		pcurtxt=*pagetxt[$[subpagenum]];
//		ptrpage[$[subpagenum]]=new $[ep3]{pagename=$[ep0];
//			createclass=$[ep3];pageno=$[subpagenum];};
		eve=NewPage,$[ep3],$[ep0];
		ptrpage[$[subpagenum]].ptable=*pagetxt[$[subpagenum]];
		subpagenum=(subpagenum+1);
		eve=activepage,$[subpagenum];>};
	OnActivepage={<: curpage=$[ep0];
		pageno=0;
		while(pageno<subpagenum){
			if=(pageno==curpage)?{pagetxt[pageno].eve=select;
				ptrpage[pageno].show=1;}:{pagetxt[pageno].eve=unselect;ptrpage[pageno].show=0;};
			pageno=(pageno+1);
		}
		>};
	Onviewpage={<: vcurpage=$[ep0];
		pageno=0;
		while(pageno<subpagenum){
			if=(pageno==vcurpage)?{ptrpage[pageno].show=1;}:{ptrpage[pageno].show=0;};
			pageno=(pageno+1);
		}
		>};
	Onunview={<: pageno=0;
		while(pageno<subpagenum){
			if=(pageno==curpage)?{pagetxt[pageno].eve=select;
				ptrpage[pageno].show=1;}:{pagetxt[pageno].eve=unselect;ptrpage[pageno].show=0;};
			pageno=(pageno+1);
		}
		>};
//	testno=0;
//	OnTest={<: eve=Activepage,$[testno];testno=((testno+1)%subpagenum);>};
}

</style>
#ifdef MAINGML
//<face标题文字 pos=EDIT#189,7;src=新用户注册;>
<: include=$.\..\index.gml>
/*
<style>
.体育类Page:div{
 size=100,100;pos=EDIT#260,106;
 bkimg=color(#6666CC);
 
}
.实景聊天page:div{
 size=100,200;pos=EDIT#496,143;
 bkimg=color(#6633FF);
}
</style>
<PageCtrl>
</PageCtrl>
<: pagectrl.eve=AddPage,实景聊天,400,100,体育类Page>
<: pagectrl.eve=AddPage,体育类,411,140,实景聊天page>

<: bkimg=color(0);OnSize={<: enumsub={<: eve=size>}>};eve=size>
*/
#endif
#endif