SphereCommunity
Gold Loot - Printable Version

+- SphereCommunity (https://forum.spherecommunity.net)
+-- Forum: Sphere 0.56d (/Forum-Sphere-0-56d)
+--- Forum: Script Help (/Forum-Script-Help)
+--- Thread: Gold Loot (/Thread-Gold-Loot)

Pages: 1 2 3

Gold Loot - Van Glan Bloom - 03-09-2015 09:36 AM

Hello,

I wish you would give me a hand in a script. I'm trying to create a script for the player kills a mob, the money goes directly to the bag of the player.

I have this :

Code:
[EVENTS e_money_collect]

on=@kill
local.tmp=<obj>
obj=<argo.uid>
if (<obj.isevent.e_exp>) || (<obj.baseid>==c_zombie_m)
local.new <new>
loot_corpse
bounce <new>
new=<local.new>
src.sysmessage @09c1 TESTE
return 1
endif

Code:
[FUNCTION loot_corpse]
if (<baseid>==i_gold)
    cont=<src.owner.findlayer.21.uid>
endif


RE: Gold Loot - azmanomer - 03-09-2015 09:39 AM

on @kill
if (<argo.isevent.e_exp>) || (<argo.baseid>==c_zombie_m)
newgold 5000
endif

RE: Gold Loot - Van Glan Bloom - 03-10-2015 12:59 AM

Hello azmanomer,

I know how to add the money after killing a mob, my goal is not that. The purpose of the script afther kill the mob the money go automatly for the bag of the player.

Ex: If the mob have 100 gold in the corpse after the dead, this money go automaticly for the player, The player dont need open the corpse for loot the money

RE: Gold Loot - azmanomer - 03-10-2015 01:29 AM

oh sorry then this could be help;

on @death
IF (<ATTACKER>)
FOR 0 <EVAL <ATTACKER>-1>
IF (<ATTACKER.<dLOCAL._FOR>.DAM>)
REF1=<ATTACKER.<dLOCAL._FOR>>
IF (<REF1.FLAGS>&STATF_PET)
REF1=<REF1.OWNER>
ENDIF
IF (<REF1.ISPLAYER>)
forcont <findlayer.21> 255
if <baseid>==i_gold
cont=<ref1.findlayer.21>
endif
endfor
endif
endif
enfor
endif


This could be help i cant test it right now

RE: Gold Loot - Van Glan Bloom - 03-10-2015 03:26 AM

I go release all my script and maybe you can help. I dont understand what i make wrong. I fixed some bugs but, if i chance someting in the script the bugs come again =/

Code:
//************* Pet Rabbit **************

[chardef c_system_pet_rabbit]
name=Rabbit
id=c_rabbit
CAN=MT_WALK|MT_RUN


on=@create
EVENTS=e_no_money_collect
COLOR=0123
FOOD=100
STR=1
DEX=900
FLAGS=008000001

ON=@Click
message @0035 [Pet Rabbit]

on=@dclick
if !(<ismypet>)
      
SRC.SYSMESSAGE @09c1 The animal must be loyal to you!

return 1

elif (<food> >= 50)
src.dialog d_pet_configuration
return 1
elif (<food> <= 49 )
src.dialog d_pet_configuration_2
return 1
endif

ON=@HIT
RETURN 1

ON=@GETHIT
RETURN 1

ON=@DAMAGE
RETURN 1

ON=@ATTACK
return 1


[ITEMDEF i_system_pet_rabbit]
id=i_pet_rabbit_2
Name=Rabbit
TYPE=t_figurine

ON=@Create
ATTR=attr_newbie
COLOR=0123
MORE1=c_system_pet_rabbit

ON=@dclick
if ( <TOPOBJ.UID> != <SRC.UID> )
    
SRC.SYSMESSAGE @09c1 You must have the item in your pack.
    
return 1

else
SERV.NEWNPC=<more1>
NEW.P=<SRC.P>
NEW.COLOR=<COLOR>
NEW.NAME=<NAME>
NEW.UPDATE
REMOVE
ENDIF

Code:
[dialog d_pet_configuration]
0,0
PAGE 1

resizepic 79 48 2600 343 380
resizepic 141 111 9200 226 22
resizepic 141 139 9200 226 22
resizepic 201 167 9200 166 22
resizepic 201 195 9200 166 22
resizepic 201 223 9200 166 22
resizepic 201 251 9200 166 22
resizepic 201 278 9200 166 22
resizepic 201 306 9200 166 22
resizepic 141 334 9200 226 22
resizepic 141 362 9200 226 31

gumppic 171 72 2440
gumppic 154 76 216
gumppic 340 76 216
gumppic 117 114 9702
gumppic 117 142 9702
gumppic 117 370 9702
gumppic 217 370 2062
gumppic 316 381 2435

dtext 201 73 205 Pet Configuration
dtext 160 112 2947 Owned by
dtext 160 140 2947 Configuration
dtext 220 168 2947 Armors
dtext 220 196 2947 Bags
dtext 220 224 2947 Gold
dtext 220 252 2947 Potions
dtext 220 279 2947 Scrolls
dtext 220 307 2947 Weapons
dtext 160 335 2947 Shrink
dtext 160 368 2947 Energy :
dtext 258 368 2947 <src.targ.food> %

button 165 173 2361 2362 1 0 1
button 165 201 2361 2362 1 0 2
button 165 229 2361 2362 1 0 3
button 165 257 2361 2362 1 0 4
button 165 284 2361 2362 1 0 5
button 165 312 2361 2362 1 0 6
button 184 173 2360 2362 1 0 7
button 184 201 2360 2362 1 0 8
button 184 229 2360 2362 1 0 9
button 184 257 2360 2362 1 0 10
button 184 284 2360 2362 1 0 11
button 184 312 2360 2362 1 0 12
button 117 337 9702 9703 1 0 13


[dialog d_pet_configuration BUTTON]


onbutton=1
if (<src.isevent.e_money_collect>)
    src.sysmessage @09c1 The collector of money already active.
        src.dialog d_pet_configuration
    return 1
elif (<src.isevent.e_no_money_collect>)
    src.events +e_money_collect
        src.events -e_no_money_collect
            src.sysmessage @0044 You active the collector of money.
        src.dialog d_pet_configuration
    return 1
endif




onbutton=7
if (<src.isevent.e_no_money_collect>)
    src.sysmessage @09c1 The collector of money already disabled.
        src.dialog d_pet_configuration
    return 1
elif (<src.isevent.e_money_collect>)
    src.events +e_NO_money_collect
        src.events -e_money_collect
            src.sysmessage @0028 You disabled the collector of money.
        src.dialog d_pet_configuration
    return 1
endif

onbutton=8


onbutton=9


onbutton=10



onbutton=11



onbutton=12


onbutton=13
SERV.NEWITEM=<SRC.TARG.ICON>
NEW.NAME=<SRC.ACT.NAME>
NEW.COLOR=<SRC.ACT.COLOR>
SRC.ACT.MORE1=<SRC.ACT.ID>
SRC.ACT.BOUNCE
SRC.TARG.REMOVE
SRC.SYSMESSAGE <SRC.TARG.NAME> is Shrunk and in your Bag!
REMOVE



[dialog d_pet_configuration_2]
0,0
PAGE 1

resizepic 79 48 2600 343 380
resizepic 141 111 9200 226 22
resizepic 141 139 9200 226 22
resizepic 201 167 9200 166 22
resizepic 201 195 9200 166 22
resizepic 201 223 9200 166 22
resizepic 201 251 9200 166 22
resizepic 201 278 9200 166 22
resizepic 201 306 9200 166 22
resizepic 141 334 9200 226 22
resizepic 141 362 9200 226 31

gumppic 171 72 2440
gumppic 154 76 216
gumppic 340 76 216
gumppic 117 114 9702
gumppic 117 142 9702
gumppic 117 370 9702
gumppic 217 370 2061
gumppic 219 381 2435

dtext 201 73 205 Pet Configuration
dtext 160 112 2947 Owned by
dtext 160 140 2947 Configuration
dtext 220 168 2947 Armors
dtext 220 196 2947 Bags
dtext 220 224 2947 Gold
dtext 220 252 2947 Potions
dtext 220 279 2947 Scrolls
dtext 220 307 2947 Weapons
dtext 160 335 2947 Shrink
dtext 160 368 2947 Energy :
dtext 258 368 2947 <src.targ.food> %

button 165 173 2361 2362 1 0 1
button 165 201 2361 2362 1 0 2
button 165 229 2361 2362 1 0 3
button 165 257 2361 2362 1 0 4
button 165 284 2361 2362 1 0 5
button 165 312 2361 2362 1 0 6
button 184 173 2360 2362 1 0 7
button 184 201 2360 2362 1 0 8
button 184 229 2360 2362 1 0 9
button 184 257 2360 2362 1 0 10
button 184 284 2360 2362 1 0 11
button 184 312 2360 2362 1 0 12
button 117 337 9702 9703 1 0 13


[DIALOG d_pet_configuration_2 BUTTON]

onbutton=1
dialog d_pet_change_name

onbutton=2

onbutton=3
shrink
src.act.bounce
src.sysmessage @09c1 You shrink you pet with sucess
return 1

Code:
[EVENTS e_no_money_collect]  // Add in player


[EVENTS e_money_collect]

on=@kill
local.tmp=<obj>
obj=<argo.uid>
if (<obj.isevent.e_exp>)
forcont <findlayer.21> 255
if <baseid>==i_gold
cont=<ref1.findlayer.21>
src.sysmessage @09c1 Mataste um ZOMBIE
endif
endif


RE: Gold Loot - XuN - 03-17-2015 08:42 PM

This should do it faster:

Code:
ON=@Kill
gold +=<argo.gold>
argo.gold=0


RE: Gold Loot - Van Glan Bloom - 03-17-2015 11:51 PM

You have Help me XuN, Thx =) but, now i have a new problem xD
After i kill the mob, the gold is removed, but not going to bag the player, but to the bank = / The intention was that the money was to bag

Code:
[EVENTS e_money_collect]

on=@kill
gold +=<argo.gold>
argo.gold=0
f_money_collect <eval <tag.value>>
src.sysmessage @09c1 Mataste um ZOMBIE
return 0


[function f_money_collect]
if (<eval <argo>> > 65000)
    src.newitem i_gold
            src.act.amount <argo>
        src.act.bounce
    return 0
endif


RE: Gold Loot - darksun84 - 03-18-2015 12:13 AM

TRy with newgold

PHP Code:
ON=@Kill
newgold <argo.gold>
argo.gold = 0 
//f_money_collect <eval <tag.value>> You don't need it anymore, newgold already "re-groups" the gold if the  amount is over 65k
return 0 


RE: Gold Loot - XuN - 03-18-2015 06:10 AM

(03-18-2015 12:13 AM)darksun84 Wrote:  TRy with newgold

That will do it Smile

RE: Gold Loot - Van Glan Bloom - 03-18-2015 11:33 PM

Thx Darksun84 you have decided my problem =)

Now in the same script i have a little bug in shrink the pet. When unshrink the pet, it does not recognize the player as its owner. I creat this :

Code:
[FUNCTION petshrink]
NEWITEM=i_memory_system_pet_rabbit
EQUIP=<ACT>

[ITEMDEF i_memory_system_pet_rabbit]
DEFNAME=i_memory_system_pet_rabbit
NAME=Memory sYSTEM pET rABBIT
ID=i_memory
TYPE=t_eq_script

ON=@CREATE
ATTR=attr_move_never|attr_invis

ON=@EQUIP
TARGET= @09c1 To whom do you wish to duel?

ON=@TARGON_CHAR
if (<src.targ.id>==c_system_pet_rabbit)
serv.newitem=i_system_pet_rabbit
new.name=<src.targ.name>
new.color=<src.targ.color>
new.tag.id=<src.targ.baseid>
new.tag.str=<src.targ.str>
new.tag.dex=<src.targ.dex>
new.tag.food=<src.targ.food>
new.tag.dono=<uid>
new.cont=<ref1.uid>
src.new.bounce
new.type=t_pet_rabbit_fix
src.targ.remove
endif
return 1

[TYPEDEF t_pet_rabbit_fix]
ON=@Dclick
if ( <TOPOBJ.UID> != <SRC.UID> )
    
src.sysmessage @09c1 You must have the item in your pack.
    
return 1

else
serv.newnpc=c_system_pet_rabbit
new.color=<color>
new.str=<tag.str>
new.dex=<tag.dex>
new.name=<name>
new.food=<tag.food>
remove
return 1
endif