SphereCommunity
Can someone help fix this script - Printable Version

+- SphereCommunity (https://forum.spherecommunity.net)
+-- Forum: Sphere 0.56d (/Forum-Sphere-0-56d)
+--- Forum: Script Help (/Forum-Script-Help)
+--- Thread: Can someone help fix this script (/Thread-Can-someone-help-fix-this-script)



Can someone help fix this script - victorstelzer - 09-04-2012 11:20 AM

The problem enters when they procure. Online option always remains Record with 6 users.

Even more users have already entered
----------------------------------------------------------------------[PLEVEL 1]
online

[FUNCTION online]
IF !(<ISEVENT.e_tutorial>)
sysmessageloc 036,3,1060659,Total,<serv.clients>
sysmessageloc 036,3,1060660,PKs,<totalpks>
sysmessageloc 036,3,1060661,APKs,<totalapks>
IF (<var0.event.current>)
sysmessageloc 036,3,1060662,On event,<eval <var0.event.current>>
ENDIF
sysmessageloc 036,3,1060658,Record,<eval <var0.clirecord>>
sdialog d_online
ELSE
SYSMESSAGE @036,3,1 Voce nao pode usar este comando, enquanto no 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>Jogadores Online
dhtmlgump 150 35 120 20 0 0 <DEF.BFONT_WHITE><SERV.CLIENTS> jogadores online no momento.
LOCAL.AUMENTAR=0
LOCAL.PAGE=1
PAGE 1
FOR 0 <HVAL <SERV.CLIENTS>-1>
IF (<LOCAL.AUMENTAR> > 9)
LOCAL.AUMENTAR=0
button 400 285 015e1 015e5 0 <EVAL <LOCAL.PAGE>+1> 1
LOCAL.PAGE += 1
PAGE <EVAL <LOCAL.PAGE>>
button 360 285 015e3 015e7 0 <EVAL <LOCAL.PAGE>-1> 1
ENDIF
IF (<SERV.CLIENT.<LOCAL._FOR>.UID>)
LOCAL.AUMENTAR += 1
IF (<SERV.CLIENT.<LOCAL._FOR>.ISGM>)
LOCAL.COLOR=55
ELIF (<SERV.CLIENT.<LOCAL._FOR>.ISPK>)
LOCAL.COLOR=36
ELIF (<SERV.CLIENT.<LOCAL._FOR>.ISCRIMINAL>)
LOCAL.COLOR=946
ELSE
LOCAL.COLOR=88
ENDIF
dtext 15 <EVAL (<LOCAL.AUMENTAR>*20)+60> <EVAL <LOCAL.COLOR>> <SERV.CLIENT.<LOCAL._FOR>.NAME>
dtext 170 <EVAL (<LOCAL.AUMENTAR>*20)+60> 1152 Guilda: <SERV.CLIENT.<LOCAL._FOR>.GUILDNAME> - Local: <SERV.CLIENT.<LOCAL._FOR>.REGION.NAME>
ENDIF
ENDFOR

[EOF]


RE: Can someone help fix this script - darksun84 - 09-04-2012 11:11 PM

Why HVAL in the FOR construct ?


RE: Can someone help fix this script - Extreme - 09-05-2012 12:34 AM

This online function is from Cloud_BR.
Why appear always 6 in record?
Because you didn't copy the whole system.
Stop copy, start write.


RE: Can someone help fix this script - Lazarus - 09-05-2012 06:57 AM

(09-05-2012 12:34 AM)Extreme Wrote:  This online function is from Cloud_BR.
Why appear always 6 in record?
Because you didn't copy the whole system.
Stop copy, start write.

He never said that is the owners of the script...
I don't see the problem, I use others users scripts and Im not embarrassing Sad I guess Sad

If the script it's in the web, that... it's just for download. Rly?

=) I support the noobs scripters (Im too). We use others scripts to learn something about it and use in new scripts.


Lazarus.


RE: Can someone help fix this script - Mordaunt - 09-05-2012 07:03 AM

(09-04-2012 11:11 PM)darksun84 Wrote:  Why HVAL in the FOR construct ?

To return the UID for use later in the script


RE: Can someone help fix this script - darksun84 - 09-05-2012 07:14 AM

Ah Big Grin

By the way, it's not a shame to use other's people script if they still get the credit of it Big Grin


RE: Can someone help fix this script - Lazarus - 09-05-2012 07:27 AM

Thanks to this post I'd fix mine with this

Code:
dtext 15 <EVAL (<LOCAL.AUMENTAR>*20)+60> <EVAL <LOCAL.COLOR>> <SERV.CLIENT.<LOCAL._FOR>.NAME>
dtext 170 <EVAL (<LOCAL.AUMENTAR>*20)+60> 1152 Guilda: <SERV.CLIENT.<LOCAL._FOR>.GUILDNAME> - Local: <SERV.CLIENT.<LOCAL._FOR>.REGION.NAME>

I just changed it for this:


Code:
dtext 15 <EVAL (<LOCAL.AUMENTAR>*20)+60> <EVAL <LOCAL.COLOR>> <SERV.CLIENT.<LOCAL._FOR>.NAME>
dtext 170 <EVAL (<LOCAL.AUMENTAR>*20)+60> 1152 Guilda: <SERV.CLIENT.<LOCAL._FOR>.<MEMORYFINDTYPE.0400.LINK.name>>  // here the change


And now works my guild view, but... When a player doesn't have a guild, they figure it like: GUILD:0 [Zero]
haha Tongue

Record it's just not working because we need to remake Tongue


RE: Can someone help fix this script - RanXerox - 09-05-2012 08:28 AM

Instead of this:

Code:
dtext 170 <EVAL (<LOCAL.AUMENTAR>*20)+60> 1152 Guilda: <SERV.CLIENT.<LOCAL._FOR>.<MEMORYFINDTYPE.0400.LINK.name>>

try this:

Code:
IF (<SERV.CLIENT.<LOCAL._FOR>.GUILD>)
   dtext 170 <EVAL (<LOCAL.AUMENTAR>*20)+60> 1152 Guilda: <SERV.CLIENT.<LOCAL._FOR>.<MEMORYFINDTYPE.0400.LINK.name>>
ENDIF



RE: Can someone help fix this script - Lazarus - 09-05-2012 12:18 PM

(09-05-2012 08:28 AM)RanXerox Wrote:  Instead of this:

Code:
dtext 170 <EVAL (<LOCAL.AUMENTAR>*20)+60> 1152 Guilda: <SERV.CLIENT.<LOCAL._FOR>.<MEMORYFINDTYPE.0400.LINK.name>>

try this:

Code:
IF (<SERV.CLIENT.<LOCAL._FOR>.GUILD>)
   dtext 170 <EVAL (<LOCAL.AUMENTAR>*20)+60> 1152 Guilda: <SERV.CLIENT.<LOCAL._FOR>.<MEMORYFINDTYPE.0400.LINK.name>>
ENDIF


Rly Thanks! Works Flawless Smile

I'd added another line to complete all.

Code:
IF (<SERV.CLIENT.<LOCAL._FOR>.GUILD>)
   dtext 170 <EVAL (<LOCAL.AUMENTAR>*20)+60> 1152 Guilda: <SERV.CLIENT.<LOCAL._FOR>.<MEMORYFINDTYPE.0400.LINK.name>>
else
dtext 170 <EVAL (<LOCAL.AUMENTAR>*20)+60> 1152 Guilda: -
ENDIF

Just to take a Guild: - For more perfection.

Real thanks to you Smile


Still doesn't have resolve the RECORD. Anyone haves a quicly fix in mind? [like create the function that cloud_Br has been created before?


Thanks again!

[No is my thread but Tongue This works. I love this forum and my players guess too Smile ]