The following warnings occurred:
Warning [2] Use of undefined constant SAPI_NAME - assumed 'SAPI_NAME' (this will throw an Error in a future version of PHP) - Line: 3388 - File: inc/functions.php PHP 7.4.33-nmm7 (Linux)
File Line Function
/inc/functions.php 3388 errorHandler->error
/showthread.php 116 build_archive_link
Warning [2] Use of undefined constant IN_ARCHIVE - assumed 'IN_ARCHIVE' (this will throw an Error in a future version of PHP) - Line: 3331 - File: inc/functions.php PHP 7.4.33-nmm7 (Linux)
File Line Function
/inc/functions.php 3331 errorHandler->error
/inc/functions.php 3324 build_forum_breadcrumb
/showthread.php 195 build_forum_breadcrumb
Warning [2] Use of undefined constant IN_ARCHIVE - assumed 'IN_ARCHIVE' (this will throw an Error in a future version of PHP) - Line: 3331 - File: inc/functions.php PHP 7.4.33-nmm7 (Linux)
File Line Function
/inc/functions.php 3331 errorHandler->error
/showthread.php 195 build_forum_breadcrumb






Post Reply 
 
Thread Rating:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Can someone help fix this script
Author Message
victorstelzer
Journeyman
*

Posts: 80
Likes Given: 0
Likes Received: 0 in 0 posts
Joined: Jun 2012
Reputation: 0



Post: #1
Can someone help fix this script
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]
09-04-2012 11:20 AM
Find all posts by this user Like Post Quote this message in a reply
darksun84
Sir Spamalot
****

Posts: 1,687
Likes Given: 245
Likes Received: 162 in 151 posts
Joined: Mar 2012
Reputation: 35



Post: #2
RE: Can someone help fix this script
Why HVAL in the FOR construct ?
09-04-2012 11:11 PM
Find all posts by this user Like Post Quote this message in a reply
Extreme
Grandmaster Poster
***

Posts: 1,141
Likes Given: 217
Likes Received: 90 in 77 posts
Joined: May 2012
Reputation: 20

SphereCommunity

Post: #3
RE: Can someone help fix this script
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.

STEPS BEFORE CREATE A THREAD
- Check the revisions log;
- Use the search button and use the keywords of your problem;
- Check the WIKI;
- Create a thread.
09-05-2012 12:34 AM
Find all posts by this user Like Post Quote this message in a reply
Lazarus
Master
**

Posts: 352
Likes Given: 11
Likes Received: 7 in 6 posts
Joined: Jun 2012
Reputation: 1

Hybris Ultima Online

Post: #4
RE: Can someone help fix this script
(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.

[Image: 2hy9q0y.png]
09-05-2012 06:57 AM
Visit this user's website Find all posts by this user Like Post Quote this message in a reply
Mordaunt
Super Moderator
****

Posts: 1,237
Likes Given: 26
Likes Received: 55 in 43 posts
Joined: Mar 2012
Reputation: 35



Post: #5
RE: Can someone help fix this script
(09-04-2012 11:11 PM)darksun84 Wrote:  Why HVAL in the FOR construct ?

To return the UID for use later in the script

[Image: 2nis46r.jpg]
09-05-2012 07:03 AM
Visit this user's website Find all posts by this user Like Post Quote this message in a reply
darksun84
Sir Spamalot
****

Posts: 1,687
Likes Given: 245
Likes Received: 162 in 151 posts
Joined: Mar 2012
Reputation: 35



Post: #6
RE: Can someone help fix this script
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
09-05-2012 07:14 AM
Find all posts by this user Like Post Quote this message in a reply
Lazarus
Master
**

Posts: 352
Likes Given: 11
Likes Received: 7 in 6 posts
Joined: Jun 2012
Reputation: 1

Hybris Ultima Online

Post: #7
RE: Can someone help fix this script
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

[Image: 2hy9q0y.png]
09-05-2012 07:27 AM
Visit this user's website Find all posts by this user Like Post Quote this message in a reply
RanXerox
Master
**

Posts: 550
Likes Given: 1
Likes Received: 12 in 9 posts
Joined: Dec 2010
Reputation: 19



Post: #8
RE: Can someone help fix this script
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
09-05-2012 08:28 AM
Find all posts by this user Like Post Quote this message in a reply
Lazarus
Master
**

Posts: 352
Likes Given: 11
Likes Received: 7 in 6 posts
Joined: Jun 2012
Reputation: 1

Hybris Ultima Online

Post: #9
RE: Can someone help fix this script
(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 ]

[Image: 2hy9q0y.png]
(This post was last modified: 09-05-2012 12:19 PM by Lazarus.)
09-05-2012 12:18 PM
Visit this user's website Find all posts by this user Like Post Quote this message in a reply
Post Reply 


Forum Jump:


User(s) browsing this thread: 3 Guest(s)