Eclipse - Free 2D Mmorpg Maker
September 02, 2010, 10:19:42 PM *
Welcome, Guest. Please login or register.
Did you miss your activation email?

Login with username, password and session length
 
   Home   Shop Arcade chat Login Register  
 
 
   
 
collapse

* No Spam Or Websites

Refresh History
  • Ertzel: So... Anyone with basic/none/limited photoshop or even paint skills want to make some money converting sprites for me?
    Today at 10:07:35 PM
  • Gamma™: weaver why are you oflfine on H&H? :S
    Today at 10:04:26 PM
  • Ertzel: Ya, only one try per knife, my one try failed :(
    Today at 10:00:17 PM
  • LegendWeaver: is it one use?
    Today at 09:43:15 PM
  • Ertzel: Wish I didnt spend my 1k+ credits to buy the stupid knife that failed at stealing Robins credits >.<
    Today at 09:42:42 PM
  • Wraith: ) Kreator!
    Today at 09:06:52 PM
  • Wraith: yes! you were! (in red text
    Today at 09:06:46 PM
  • ToshiroHayate: Kreator!
    Today at 08:25:02 PM
  • Kreator: o_0 Was I supposed to Wraith?
    Today at 08:16:02 PM
  • [Pie] ICT: Don't worry.. I commented.
    Today at 07:55:08 PM
  • Wraith: Ay, kreator, wtf is up with you not posting anything about my new cliffs??
    Today at 07:50:36 PM

* Recent Topics

[EO] Attaching Problem. by Ertzel
[Today at 10:11:57 PM]


Project Vertigo [2d Tile-based Side-Scrolling Engine] by Miguu
[Today at 10:03:22 PM]


Zacaras Empire (Hiring) by Ertzel
[Today at 08:43:54 PM]


custom cliff tiles by ToshiroHayate
[Today at 08:29:15 PM]


.: RPG Kingdom :. by LegendWeaver
[Today at 08:25:20 PM]


What do you think? by [Pie] ICT
[Today at 07:54:54 PM]


[Show Off] Aztec Stuff by [Pie] ICT
[Today at 07:50:07 PM]


So I herd you liek mudkipz by Kreator
[Today at 07:36:52 PM]


Haven and Hearth: Epic Screenshot Thread by Tompwnage™
[Today at 07:14:21 PM]


The Lonliest Star [RP] by DDunit
[Today at 07:09:46 PM]


* Who's Online


Site Author : Topic: Male/Female PD (Difficulty: 2/5)  (Read 3922 times)
0 Members and 1 Guest are viewing this topic.
February 10, 2007, 07:03:00 AM
Active Member
***
User No : 752
Posts: 357
  • 0 credits
  • View Inventory
  • Send Money To ~.:Lidnel:.~
  • Location : Ukraine
    The truth is out there...
    • View Profile
    • WWW


    Non-Scripter [2/5]
    Beginner [2/5]
    Advanced Scripter [1/5]
    Expert [1/5]
    Pro Scripter [1/5]


    This script is very simple. It was created for changing armors to right gender. It works like this: first 100 items - male armors, second 100 - female.

    Sub JoinGame(index)
    Code: [Select]
    Call SetTimer("tmrtest " & index & "," & X, 15)
    Sub TMRTEST(index, Script)
    Code: [Select]
    Case 1
            Dim I
            Dim armor
            I = 1
            armor = GetPlayerArmorSlot(index)
            If armor => 1 Then 'From what item #
                If armor =< 100 Then 'To what item #
                    If GetVar("accounts\" & GetPlayerLogin(index) & ".ini", "CHAR" & GetPlayerCharNum(index), "Sex") = 1 Then '0 - male; 1 - female

                        Do While (I <= 24) 'Something like that I am now mainly busy with PHP
                            If GetPlayerInvItemNum(INDEX, I) = armor then
                                Call SetPlayerInvItemNum(index, I, int(armor)+100)
                                Call SendInventoryUpdate(INDEX, I)
                                Call SendWornEquipment(index)
                                Call SendPlayerData(index)
                                I = 25
                            Else
                                I = I + 1
                             End If
                          Loop
                     End If
                End If
            End If
        End Select
    End Sub
    « Last Edit: February 14, 2007, 07:04:45 AM by Lidnel » Logged


     Collapse Online (FIRST ECLIPSE ISO RPG)  Progress: 70% Maps: 145/150 Items: 10/400 NPC: 60/100 Classes: 6/6 Graphic: 97% GUI: 100%  
    February 14, 2007, 04:42:33 AM
    Global Moderator
    Demi God
    *
    User No : 1712
    Posts: 6821
  • 1292 credits
  • View Inventory
  • Send Money To Stephan
    • View Profile
    Lidnel here try with this:
    Code: [Select]
    Sub TMRTEST(index, Script)
        Case 1
            Dim I
            Dim armor
            I = 1
            armor = GetPlayerArmorSlot(index)
            If armor => 1 Then 'From what item #
                If armor =< 100 Then 'To what item #
                    If GetVar("accounts\" & GetPlayerLogin(index) & ".ini", "CHAR" & GetPlayerCharNum(index), "Sex") = 1 Then '0 - male; 1 - female

                        Do While (I <= 24) 'Something like that I am now mainly busy with PHP
                            If GetPlayerInvItemNum(INDEX, I) = armor then
                                Call SetPlayerInvItemNum(index, I, int(armor)+100)
                                Call SendInventoryUpdate(INDEX, I)
                                Call SendWornEquipment(index)
                                Call SendPlayerData(index)
                                I = 25
                            Else
                                I = I + 1
                             End If
                          Loop
                     End If
                End If
            End If
        End Select
    End Sub
    « Last Edit: February 14, 2007, 04:44:25 AM by Godlord » Logged


    • I do not provide help through the PM-system, e-mail, Skype or MSN, since this is kind of disturbing. I encourage you to make a new topic with proper spelling and grammar in the appropriate board instead, if possible.
    • I can't stand people who act like if they were children, so please don't.
    • I recommend you to read the rules before posting. It might solve conflicts before they actually occur.
    • I also recommend you to find the solution yourself before making a new topic about your issue. Chances are that other people had the same issue as well.
    February 14, 2007, 07:05:27 AM
    Active Member
    ***
    User No : 752
    Posts: 357
  • 0 credits
  • View Inventory
  • Send Money To ~.:Lidnel:.~
  • Location : Ukraine
    The truth is out there...
    • View Profile
    • WWW
    Thanks for edit )
    Logged


     Collapse Online (FIRST ECLIPSE ISO RPG)  Progress: 70% Maps: 145/150 Items: 10/400 NPC: 60/100 Classes: 6/6 Graphic: 97% GUI: 100%  
    February 14, 2007, 10:23:12 AM
    Global Moderator
    Demi God
    *
    User No : 1712
    Posts: 6821
  • 1292 credits
  • View Inventory
  • Send Money To Stephan
    • View Profile
    No problem. I taught that that way stands in my Sadscript tutorial.
    Logged


    • I do not provide help through the PM-system, e-mail, Skype or MSN, since this is kind of disturbing. I encourage you to make a new topic with proper spelling and grammar in the appropriate board instead, if possible.
    • I can't stand people who act like if they were children, so please don't.
    • I recommend you to read the rules before posting. It might solve conflicts before they actually occur.
    • I also recommend you to find the solution yourself before making a new topic about your issue. Chances are that other people had the same issue as well.
    October 30, 2009, 09:30:44 AM
    Newb
    *
    User No : 15284
    Posts: 19
  • 0 credits
  • View Inventory
  • Send Money To xppxdd
    • View Profile
    I try to find in main.txt the "Sub TMRTEST(index, Script) "
    I dont find it!
    help me please!
    Logged
    October 30, 2009, 09:34:21 AM
    Cake Supporter
    Global Moderator
    Teh Uberleet
    *
    User No : 1081
    Posts: 3806
  • 0 credits
  • View Inventory
  • Send Money To Ballie
    • View Profile
    I try to find in main.txt the "Sub TMRTEST(index, Script) "
    I dont find it!
    help me please!

    If it's not in there, Godlord posted one. Just copy and paste his at the bottom of your main.txt.
    Logged

     


    Powered by MySQL Powered by PHP Powered by SMF 2.0 RC3 | SMF © 2006–2010, Simple Machines LLC
    SimplePortal 2.3.1 © 2008-2009, SimplePortal
    Valid XHTML 1.0! Valid CSS!
    Page created in 0.532 seconds with 30 queries.