indexold.gml

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

<style>
.playbtn:img{
 src=$.\playbtn.gif#mask,2,1;
 OnMouseOver={<: bkimg=shadow(白,230,0,0,4,2)>};
 OnMouseOut={<: bkimg=null>};
 OnLButtonDown={<: bkimg=shadow(黄,230,0,0,3)>};
 OnLButtonUp={<: bkimg=null;event=click>};
 OnClick={<: pid.mci.pause=frame;frame=1-pid.mci.pause>}
}
.stopbtn:img{
 src=$.\stopbtn.gif#mask;
 OnMouseOver={<: bkimg=shadow(白,230,0,0,4,2)>};
 OnMouseOut={<: bkimg=null>};
 OnLButtonDown={<: bkimg=shadow(黄,230,0,0,3)>};
 OnLButtonUp={<: bkimg=null;event=click>};
 OnClick={<: pid.mci.stop=1;pid.playbtnid.frame=0>}
}
.PosBtn:img{
	src=$.\posimg.gif#mask;pos=10,224;
	cursor=movel2;
	TrParam=lowpos(pid.mci,playpos,0,pid.mci.len,52,175);
	OnMouseOver={<: bkimg=shadow(白,230,0,0,3,2)>};
	OnMouseOut={<: bkimg=null>};
	OnLButtonDown={<: TrParam=follow_mouse>};
	OnLButtonUp={<: TrParam=normal;bkimg=null>};
}
.ValBtn:img{
	src=$.\volbtn.gif#mask;
	pos=102,242;
	cursor=movel;
	TrParam=lowpos(pid.mci,vol,0,1000,102,45);
//	TrParam=vertpos(pid.mci,vol,0,1000,200,45);
	OnMouseOver={<: bkimg=shadow(白,230,0,0,3,2)>};
	OnMouseOut={<: bkimg=null>};
	OnLButtonDown={<: cursor=movel2;TrParam=follow_mouse;bkimg=shadow(黄,230,0,0,2)>};
	OnLButtonUp={<: cursor=movel;TrParam=normal;bkimg=null>}
}
.MTV:div{
	pid=desktop;zoder=top;zoder=zoder+10;
    size=268,268;mci=0;bkimg=$.\bd.gif#mask;pos=10,10;class=dragclass;playbtnid=0;
	cursor=move;
	draw=1:{textout(22,7,$[mci.curtime]-$[mci.totaltime],lightgreen)}>
	OnCreate#in={<MCIWnd pos=14,30;
			OnCreate={<: src=$.\music.asf;size=240,184;
			vol=400;><: pid.mci=*id>};>
		<playbtn pos=10,228;oncreate={<: pid.playbtnid=$[id];frame=pid.mci.pause>};>
		<stopbtn pos=46,238>
		<PosBtn><ValBtn>
		<TextBtn src=X;pos=250,5;Onclick={<: pid.lock=0;pid.del=1>}>
	}
}
</style>