[PLEVEL 1] 

online



[FUNCTION online]

IF !(<ISEVENT.e_tutorial>)

sysmessageloc 036,1060659,Total,<serv.clients>

sysmessageloc 036,1060660,PKs,<totalpks>

sysmessageloc 036,1060661,APKs,<totalapks>

IF (<var0.event.current>)

sysmessageloc 036,1060662,On event,<eval <var0.event.current>>

ENDIF

sysmessageloc 036,1060658,Record,<eval <var0.clirecord>>

sDIALOG d_online

ELSE

SYSMESSAGE @036,3,1 You can't use this command while in the tutorial.

ENDIF



[DIALOG d_online]

220,100

src.closealldialogs

PAGE 0

resizepic 0 0 2620 445 315

resizepic 12 13 5120 420 290

checkertrans 12 13 420 290

dhtmlgump 150 15 120 20 0 0 <DEF.BFONT_WHITE><DEF.BFONT_SIZE7>Players Online

dhtmlgump 150 35 120 20 0 0 <DEF.BFONT_WHITE><SERV.CLIENTS> online players at the moment.

LOCAL.AUMENTAR=0

LOCAL.PAGE=1

PAGE 1

FOR 0 <EVAL <SERV.CLIENTS>-1>

IF (<LOCAL.AUMENTAR> > 9)

LOCAL.AUMENTAR=0

button 400 285 015e1 015e5 0 <EVAL <LOCAL.PAGE>+1> 1

LOCAL.PAGE ++

PAGE <EVAL <LOCAL.PAGE>>

button 360 285 015e3 015e7 0 <EVAL <LOCAL.PAGE>-1> 1

ENDIF

REF1=<SERV.CLIENT.<LOCAL._FOR>.UID>

IF (<REF1.UID>) && (<REF1.UID> != 011be6)

IF ((!(<REF1.ISGM>)) || ((<REF1.ISGM>) && (!(<REF1.FLAGS>&statf_insubstantial))))

LOCAL.AUMENTAR ++

IF (<REF1.ISGM>)

LOCAL.COLOR=55

ELIF (<REF1.ISPK>)

LOCAL.COLOR=36

ELIF (<REF1.ISCRIMINAL>)

LOCAL.COLOR=946

ELSE

LOCAL.COLOR=88

ENDIF

dtext 15 <EVAL (<LOCAL.AUMENTAR>*20)+60> <EVAL <LOCAL.COLOR>> <REF1.NAME>

dtext 170 <EVAL (<LOCAL.AUMENTAR>*20)+60> 1152 Guild: <REF1.GETGUILD>

ENDIF

ENDIF

ENDFOR



[EOF]