cheatking

``` Sub WarriorSet1() Dim x Dim Index X = 0 Index = 1 Do While X = 0 If GetPlayerClass(Index) = 1 And GetPlayerArmorSlot(Index) = 51 And GetPlayerLegsSlot(Index) = 52 And GetPlayerHelmetSlot(Index) = 53 And GetPlayerNecklaceSlot(Index) = 54 And GetPlayerRingSlot(Index) = 55 And GetPlayerShieldSlot(Index) = 56 And GetPlayerWeaponSlot(Index) = 57 Then Call PlayerMsg(Index, "You feel the energy of your equipped items", 13) Call SetPlayerSTR(Index, GetPlayerSTR(Index) + 10) Call SetPlayerDEF(Index, GetPlayerDEF(Index) + 10) End If If Not GetPlayerArmorSlot(Index) = 51 Or Not GetPlayerLegsSlot(Index) = 52 Or Not GetPlayerHelmetSlot(Index) = 53 Or Not GetPlayerNecklaceSlot(Index) = 54 Or Not GetPlayerRingSlot(Index) = 55 Or Not GetPlayerShieldSlot(Index) = 56 Or Not GetPlayerWeaponSlot(Index) = 57 Then Call PlayerMsg(Index, "You no longer feel the energy of your equipped items", 13) Call SetPlayerSTR(Index, GetPlayerSTR(Index) - 10) Call SetPlayerDEF(Index, GetPlayerDEF(Index) - 10) End If Index = Index + 1 If Index = 100 Then X = 1 End If Loop End Sub ``` did it for you.

@[SB: > Chakkra link=topic=39850.msg388788#msg388788 date=1236225970] > Lol, devogen. > > @Zoso, I'm almost positive that they will not get sued for making their own version of RMXP/RMVX sprites.. > Have you seen one person get actually SUED by enterbrain for using rmxp EVER? I sure havent… > > I say dont worry about it guys. And I still like those sprites.. I wish i could use them. I got a cease and desist letter on one of my projects a while back. Not made with eclipse.

Copy and paste the if so its under the end if. change and to Or add not before each condition edit Call SetPlayerDEF(Index, GetPlayerDEF(Index) + 10) so the + is a -

no problem

lol no prob

you select the item not the part.

Heh thats how I found eclipse :P

In data.ini set paperdoll to 1

``` Sub WarriorSet1() Dim x Dim Index X = 0 Index = 1 Do While X = 0 If GetPlayerClass(Index) = 1 and GetPlayerArmorSlot(Index) = 51 and GetPlayerLegsSlot(Index) = 52 and GetPlayerHelmetSlot(Index) = 53 and GetPlayerNecklaceSlot(Index) = 54 and GetPlayerRingSlot(Index) = 55 and GetPlayerShieldSlot(Index) = 56 and GetPlayerWeaponSlot(Index) = 57 Then Call PlayerMsg(Index, "You feel the energy of your equipped items, 13) Call SetPlayerSTR(Index, GetPlayerSTR(Index) + 10) Call SetPlayerDEF(Index, GetPlayerDEF(Index) + 10) End If Index = Index + 1 If Index = 100 Then X = 1 End If Loop End Sub ``` Just tidyed it up. Ok now in Sub TimedEvent Add Call WarriorSet1() It should work.

Shift and click works for everyone access level 1+ its not a glitch Warning - while you were typing a new reply has been posted. You may wish to review your post. Damb it!

@[SB: > Chakkra link=topic=39709.msg388430#msg388430 date=1236189077] > I would like to resign.. this game is gay.. Meh.. Fine by me.

http://www.google.co.uk/search?q=define%3A+cosplay Cosplay|コスプレ|kosupure, short for "costume play", is basically describing a performing-art behaviour of self-rigging out as a character …

it doesn't increase stats. Yur defence won't rise.

add it abouve the end sub.

now add Dim Index and Dim X under the sub now this gets confusing add: ``` X = 0 Do While X = 0 ' your code Index = Index + 1 if Index = '( Your max players) then X = 1 End If Loop ```

did you make him an admin?

http://www.oracleworks.net/smf

@[NW: > [CUBE] Sean link=topic=39709.msg386701#msg386701 date=1235906610] > Day: 3 > Next Day: 04/03/09 **16:00** GMT

@Ghost: > ohhh i swear to god. if scripting is off i'm going to kill myself. > -EDIT- > Son of a Female Dog. Well guys, it's been a good run…. > *dies* > But seriously, thanks man. I can't believe that was it. > I must've gotten to used to source edits and completely forgot SS had that stupid stipulation... > seriously... when is scripting ever optional?.... > > We should remove that ;) Lol that was fun.

Are you making a NEW character? Using 2.7? Have scripiong on?

ok now instead of having lots of ifs use 'and' ``` Sub Warrior Set 1 If GetPlayerClass(Index) = 1 and GetPlayerArmorSlot(Index) = 51 Then ```

@[NW: > [CUBE] Sean link=topic=39780.msg387735#msg387735 date=1236095189] > Shouldn't "1") be 1) ? > > ``` > Call PutVar("\CharDB\" & GetPlayerName(index) & ".ini", "Stats", "DodgeRate", 1) > ```Fixed for you. Dd you try that? I tryed it and it works so…

Yould have to make a script to call it if you want to check it every second you should get rid of the messages

@Ghost: > I mean I can try but idk if it'll work. It should work either way. I'll give it a try real fast. > > EDIT – Nope. still nothin. It worked for me. Did you make the folder?

@[UK: > Alster link=topic=39823.msg387827#msg387827 date=1236109392] > And space games or western games may need guns. They'll have to be scripted Erm.. just make a gun and set it as bow.