+- SphereCommunity (https://forum.spherecommunity.net)
+-- Forum: Sphere 0.56d (/Forum-Sphere-0-56d)
+--- Forum: General Help (/Forum-General-Help)
+--- Thread: Cutting up monster bodies (/Thread-Cutting-up-monster-bodies)
RE: Cutting up monster bodies - kn4tseb - 06-07-2014 12:14 AM
will try, ty
it actually did it, thank you, XuN, and Extreme for being such a helpful guys, you both rock! xd
God Bless you.
PD: and i must ask most i can 'till next week cause in the case of Extreme i think we are gonna lose him!!!, Jun 12th i guess?? he might know why xDDD =]
OHH and XuN!! you are spanish!!! you are both both gonna be sooo gone!!!, we will take the Dutch out of the cup at the first round (no offense to dutch people)
RE: Cutting up monster bodies - kn4tseb - 06-07-2014 05:40 AM
okey, one more question, what if i use this inside a Function, do i need to TAG/VAR it?
example:
PHP Code:
on=@TargOn_Item // the corpse to be carved
IF (<ARGO.TYPE> == T_CORPSE) && STRMATCH(*WEAPON*,<TYPE>) // if this is a corpse and is being carved using a sharped weapon
If (<SRC.ISNEARTYPE <argo.type> 2>)
if (<argo.timestamp>)
argo.timestamp=0
f_test
return 1
elseif (<argo.timestamp>==0)
return 0
endif
else
SRC.SYSMESSAGE You must be near the corpse to carve it.
endif
RETURN 1
ENDIF
[FUNCTION f_test]
LOCAL.TARGET = <argo.p>
LOCAL.BLOOD = { i_blood_2 1 i_blood_smear 1 }
SRC.ANIM 11
SERV.NEWITEM <LOCAL.BLOOD>
NEW.ATTR 02
NEW.P <LOCAL.TARGET>
NEW.TIMER 60
NEW.FIX
SERV.NEWITEM i_blood_pool_large
NEW.ATTR 02
NEW.P <LOCAL.TARGET>
NEW.TIMER 60*3
NEW.FIX
Because i believe the SRC changes or something, right?
RE: Cutting up monster bodies - kn4tseb - 06-07-2014 07:41 AM
targetf maybe??
RE: Cutting up monster bodies - Extreme - 06-07-2014 08:20 AM
Nahh, you don't need to make the function outside the @targon_item trigger, only if you will use this function in another place too.
Try this one...
PHP Code:
on=@TargOn_Item
REF1 <SRC.TARG>
IF (<REF1.TYPE> == T_CORPSE) && STRMATCH(*WEAPON*,<TYPE>) // if this is a corpse and is being carved using a sharped weapon
IF (<SRC.DISTANCE <REF1> > 2)
SRC.SYSMESSAGE You must be near the corpse to carve it.
RETURN 1
ENDIF
IF <REF1.TIMESTAMP>
REF1.TIMESTAMP 0
SRC.ANIM 11
SERV.NEWITEM { i_blood_2 1 i_blood_smear 1 }
NEW.P <REF1>
NEW.TIMER 60
NEW.FIX
SERV.NEWITEM i_blood_pool_large
NEW.P <REF1>
NEW.TIMER 60*3
NEW.FIX
RETURN 1
ELSE
SRC.SYSMESSAGE This body is already carved.
RETURN 1
ENDIF
ENDIF
About the world cup, we brazilian are not very happy with it.
We have a lot of social problems, our health and security system is poor.
We have people dieing in hospitals without assistance or things to help the pacients, our doctors are very responsibles to cure people without the right medicines and tools.
There are the bandits who kills cops, kids stealing and killing, but they don't go to jail because they are "young".
Our govern is going communist, they made a harbor in Cuba using our money, and here in Brazil we don't have a harbor like that one.
They willing to make a coup and turn it in a dictatorship...
In october we have the election and something will happen.
In 12th June I'd be with my gf watching this circe
RE: Cutting up monster bodies - kn4tseb - 06-07-2014 11:15 AM
Ty, REF"erence" worked perfectly.
About the WC, i totally understand, we have had same kind of protests in chile for some years, most of them for educational matters... and iam totally aware about how much money have Brazil spent on stadiums and stuffs... which is insane.... but i still think you will get more money than expended and i hope that money is used for people's cares.
neverless brazil is a beautifull country and i'm glad the world cup is gonna be played there... i want only american teams in the quarter finals xDDD (nothing against europeans, asians or africans) but last 2 world cup have had only euro teams @ semi finals xd....
RE: Cutting up monster bodies - Extreme - 06-07-2014 12:02 PM
Hehehe, the point is that FIFA will leave brazil with our money and they will not pay taxes!!!
The things were made with our taxes, the tickets are sold by FIFA and they get all money.
Only the structures will remain here, which they spent 400% more to build hahahahahha.
We are at the bottom of the well
They don't show, but there are a lot of videos on internet showing whats really happening in brazil...
Around the 'new' stadiums, people who lived there, was removed and they don't have any place to live.
@Topic
I'm glad to help. Any question just post it on right section.
RE: Cutting up monster bodies - kn4tseb - 06-07-2014 02:21 PM
ive seen videos, but too few, totally agreed that some people have been trying to hide the TRUE TRUE of what is really happening nearby stadiums.
@Topic
i think this is the right section for all my questions?? xDD i have a last one for today, promise!
how do i get the defname of a corpse?
PHP Code:
<SERV.CHARDEF.<eval <REF1.MOREX>+<REF1.MOREY>>.name>
so it wont work... so it must be something with <Def.
but i am not sure if DEF. is able to be used with SERV.CHARDEF...
do you get my point?
RE: Cutting up monster bodies - kn4tseb - 06-07-2014 05:17 PM
well mates, i share what i was working in, i hope you like the idea, it still needs alot of work and there might be a thousands of ways to improve it, as you must know ive been learning for a couple weeks though so it was very hard. Had a lot of help from EXTREME and XuN, and also took some ideas from RIDING SKILL so i have no credit at all.
PHP Code:
[DEFNAME SKINNING_SYSTEM]
skin_c_dragon 400
skin_c_llama 325
[TYPEDEF T_EVENTS_SKINNER]
on=@TargOn_Item // the corpse to be carved
IF (<ARGO.TYPE> == T_CORPSE) && STRMATCH(*WEAPON*,<TYPE>) // if this is a corpse and is being used a sharped weapon
If (<SRC.ISNEARTYPE <argo.type> 2>)
if (<argo.timestamp>)
argo.timestamp=0
if (<EVAL <DEF.SKIN_C_<SERV.CHARDEF.<eval <ARGO.MOREX>+<ARGO.MOREY>>.name.more1>>> >= <src.skinning>)
f_skinning_try
if (<r<EVAL <DEF.SKIN_C_<SERV.CHARDEF.<eval <ARGO.MOREX>+<ARGO.MOREY>>.name.more1>>>> > <src.skinning>) //success
if (<R5> == 1)
f_skinning_success
if (<src.skilltotal> < <src.skillclass.skillsum>)
if (<src.skinning> < <src.skillclass.<serv.skill.skinning.key>>)
if (<r<src.skinning>> <= 10) // gain skill chance
src.skinning += 1
src.sysmessage @0120, Your skill in Skinning has increased by 0.1%. It is now <src.skinning>%
endif
endif
endif
endif
else
f_skinning_fail
endif
elif (<EVAL <DEF.SKIN_C_<SERV.CHARDEF.<eval <ARGO.MOREX>+<ARGO.MOREY>>.name.more1>>> < <src.skinning>)
f_skinning_try
if (<r<EVAL <DEF.SKIN_C_<SERV.CHARDEF.<eval <ARGO.MOREX>+<ARGO.MOREY>>.name.more1>>>> < <src.skinning>/5) //success
f_skinning_success
if (<src.skilltotal> < <src.skillclass.skillsum>)
if (<src.skinning> < <src.skillclass.<serv.skill.skinning.key>>)
if (<r<src.skinning>> <= 10) // gain skill chance
src.skinning += 1
src.sysmessage @0120, Your skill in Skinning has increased by 0.1%. It is now <src.skinning>%
endif
endif
endif
else
f_skinning_fail
endif
else
return 0
ENDIF
elseif (<argo.timestamp>==0)
return 0
endif
else
SRC.SYSMESSAGE You must be near the corpse to carve it.
endif
RETURN 1
ENDIF
on=@userskills
IF (<SERV.SKILL.<ARGN1>.NAME> == Skinning)
src.sysmessage @0120, Your skill in <Serv.skill.<ARGN1>.Name> has changed, it is now <SRC.<ARGN1>>
ENDIF
[FUNCTION f_skinning_success]
REF1 <SRC.TARG>
ARGS=<SERV.CHARDEF.<eval <REF1.MOREX>+<REF1.MOREY>>.RESOURCES>
WHILE !(<isempty <ARGV[<LOCAL._WHILE>]>>)
SERV.NEWITEM <STREAT <ARGV[<LOCAL._WHILE>]>>,<STRARG <ARGV[<LOCAL._WHILE>]>>
NEW.CONT <REF1> //<SRC.TARG>
ENDWHILE
src.sysmessage You have successfully carved the Corpse!
[FUNCTION f_skinning_fail]
REF1 <SRC.TARG>
ARGS = <SERV.CHARDEF.<eval <REF1.MOREX>+<REF1.MOREY>>.RESOURCES>
SERV.NEWITEM <STREAT <ARGV0>>,<STRARG <ARGV0>>
NEW.CONT <REF1>
src.sysmessage You carve the corpse but find nothing usefull.
[FUNCTION f_skinning_try]
REF1 <SRC.TARG>
LOCAL.BLOOD = { i_blood_2 1 i_blood_smear 1 }
SRC.ANIM 11
SERV.NEWITEM <LOCAL.BLOOD>
NEW.ATTR 02
NEW.P <REF1.p>
NEW.TIMER 60
NEW.FIX
SERV.NEWITEM i_blood_pool_large
NEW.P <REF1.p>
NEW.ATTR 02
NEW.TIMER 60*3
NEW.FIX
[EOF]
i still need info about gaining skillssum and skilltotal is reached, i dont know what happens, and it still needs some work with else's and elseif's
Enjoy!
PD: on=@userskills trigger doesnt work property, i dont know why, so if you can give me a hand, would be awesome.. TY!
UPDATED Jun 7th
RE: Cutting up monster bodies - amonvangrell - 06-08-2014 06:01 AM
this is an interesting collaborative build script, I would love to see it finished properly, please elders scriptwriters help this young lad to conclude his work.
RE: Cutting up monster bodies - kn4tseb - 06-08-2014 08:17 AM
RE organized a bit
now even if failed, first ARGV from the resources string is gotten, mostly for i_ribs_raw
just updated it a bit