Eclipse
January 05, 2009, 05:55:05 PM *
Welcome, Guest. Please login or register.
Did you miss your activation email?

Login with username, password and session length
News:
 
   Home   Chat Help Rules Arcade Search Calendar Gallery Login Register  
 
 
 
Recent Topics +-
Spike's Adminishness! by ‪‫‬‭‮‪‫‬‭Admiral Refuge
Today at 05:54:59 PM

SnowCap by Kreator
Today at 05:54:54 PM

Merrimint's Website by Kreator
Today at 05:53:46 PM

TE auto Updater by The MrMiguu™ [pizza pretzles]
Today at 05:53:06 PM

scripts? by The MrMiguu™ [pizza pretzles]
Today at 05:52:09 PM

STOP COMPARING EVERYTHING TO RUNESCAPE by The MrMiguu™ [pizza pretzles]
Today at 05:51:17 PM

The New Eclipse Raid on Runscape by Spike
Today at 05:49:00 PM

New sprites for Lostica?! by The Oracle
Today at 05:48:21 PM

Azkanan's Workshop (Graphics) by The Oracle
Today at 05:45:02 PM

stackable items? by The Oracle
Today at 05:33:28 PM

Members Online +-
16 Guests, 26 Users
Jax The Mighty,
Electrokinesis,
The BanHammer! [Thor!],
‪‫‬‭‮‪‫‬‭Admiral Refuge,
Kreator,
The MrMiguu™ [pizza pretzles],
BugSICK,
Echo ♥ Pie,
The Troy,
Reguba,
Maxac,
Ninja-Tech,
Gwendalin,
Leaf [zach],
ʇıunpp ʎqɹıʞ࣭,
calamity,
newman,
grenegg1,
The Oracle,
Spike,
ralir,
Scytho2493,
Darkniz,
DragonFire,
Zuleloan,
Thelettersix
Pages: [1]
  Print  
Author Topic: Mount script  (Read 3240 times)
0 Members and 1 Guest are viewing this topic.
Alzamos
Active Member
***
Offline Offline

Posts: 279


Corro, ergo sum!


View Profile WWW Email
« on: January 24, 2007, 03:16:16 AM »



This was requested by Tivolios:
Under the "Select Case LCase(Trim(TextSay))":
Code: [Select]
   Case "/mount"
If GetVar("Scripts\Charextras\" &GetPlayerName(Index)& ".ini","Mount","IsMounting")="Yes" Then
Call PlayerMsg(Index,"You are already on your horse", 15)
Else
Call PutVar("Scripts\Charextras\" &GetPlayerName(Index)& ".ini","Mount","OriginalSpriteNumber",GetPlayerSprite(Index))
Call PutVar("Scripts\Charextras\" &GetPlayerName(Index)& ".ini","Mount","IsMounting","Yes")
Call SetPlayerSprite(Index, 10)
call sendplayerdata(index)
End if
Exit sub

Case "/dismount"
If GetVar("Scripts\Charextras\" & GetPlayerName(Index) & ".ini","Mount","IsMounting")="No" Then
Call PlayerMsg(Index,"You are already dismounted", 15)
Else
Call PutVar("Scripts\Charextras\" & GetPlayerName(Index) & ".ini","Mount","IsMounting","No")
Call SetPlayerSprite(Index, Getvar("Scripts\Charextras\" & GetPlayerName(Index) & ".ini","Mount", "OriginalSpriteNumber"))
Call sendplayerdata(index)
End if
Exit sub
the Call SetPlayerSprite(Index, 10) part is where you choose what you want to transform into (spritenumber).
Oh and if you want to add strength, defence, or speed just ask, I'll update the post
Oh and I almost forgot:

This script was made by Alzamos (aka Alex) and should not be used outside this topic or outside of this forum, if you wish to post a modified version of this script, please contact me before doing so


Mounting script V2.0: Adds +10 to strength and speed
Code: [Select]
Case "/mount"
If GetVar("Scripts\Charextras\" &GetPlayerName(Index)& ".ini","Mount","IsMounting")="Yes" Then
Call PlayerMsg(Index,"You are already on your horse", 15)
Else
Call PutVar("Scripts\Charextras\" &GetPlayerName(Index)& ".ini","Mount","OriginalSpriteNumber",GetPlayerSprite(Index))
Call Putvar("Scripts\Charextras\" &GetPlayerName(Index)& ".ini","Mount","OriginalStrength", Getplayerstr(index))
Call Putvar("Scripts\Charextras\" &GetPlayerName(Index)& ".ini","Mount","OriginalSpeed", Getplayerspeed(index))
Call Putvar("Scripts\Charextras\" &GetPlayerName(Index)& ".ini","Mount","Originallevel", GetPlayerlevel(Index))
Call PutVar("Scripts\Charextras\" &GetPlayerName(Index)& ".ini","Mount","IsMounting","Yes")
Call Setplayerstr(index, getplayerstr(index) + 10)
Call Setplayerspeed(index, getplayerspeed(index) + 10)
Call SetPlayerSprite(Index, 10)
call sendplayerdata(index)
End if
Exit sub

Case "/dismount"
If GetVar("Scripts\Charextras\" & GetPlayerName(Index) & ".ini","Mount","IsMounting")="No" Then
Call PlayerMsg(Index,"You are already dismounted", 15)
Else
Call PutVar("Scripts\Charextras\" & GetPlayerName(Index) & ".ini","Mount","IsMounting","No")
Call SetPlayerSprite(Index, Getvar("Scripts\Charextras\" & GetPlayerName(Index) & ".ini","Mount", "OriginalSpriteNumber"))
Call Setplayerstr(index, getvar("Scripts\Charextras\" &GetPlayerName(Index)& ".ini","Mount","OriginalStrength"))
Call Setplayerspeed(index, getvar("Scripts\Charextras\" &GetPlayerName(Index)& ".ini","Mount","OriginalSpeed"))
Call setplayerlevel(index, getvar("Scripts\Charextras\" &GetPlayerName(Index)& ".ini","Mount","Originallevel"))
Call sendplayerdata(index)
End if
Exit sub

Then, add under the PlayerLevelUp sub, right below the
Code: [Select]
Call BattleMsg(index, "You have " & GetPlayerPoints(index) & " stat points.", 9, 0) and above the
Code: [Select]
end sub add this:
Code: [Select]
If GetVar("Scripts\Charextras\" &GetPlayerName(Index)& ".ini","Mount","IsMounting")="Yes" Then
Call Putvar("Scripts\Charextras\" &GetPlayerName(Index)& ".ini","Mount","Originallevel", GetPlayerlevel(Index))
tiggilyboo
Aura: The Beginning Owner
Active Member
***
Offline Offline

Posts: 343


View Profile WWW Email
« Reply #1 on: March 30, 2007, 12:23:18 PM »

Would this work for EE gama?
pheXion (Fred)
Veteran
Advanced Member
*
Offline Offline

Posts: 541


Hurry up, and come.


View Profile WWW Email
« Reply #2 on: March 30, 2007, 12:37:19 PM »

All scripts from previous version eclipse works on newest version.
tiggilyboo
Aura: The Beginning Owner
Active Member
***
Offline Offline

Posts: 343


View Profile WWW Email
« Reply #3 on: March 30, 2007, 01:03:04 PM »

ok ty
but i think the Main.ini is different from the versions arnt they?
Tivoilos
Errmm.....
Advanced Member
****
Offline Offline

Posts: 820



View Profile Email
« Reply #4 on: March 30, 2007, 01:18:30 PM »

umm..didn't Alex say not to use this script outside this forum,
robotboy555
Newb
*
Offline Offline

Posts: 8


View Profile Email
« Reply #5 on: October 08, 2007, 12:37:11 PM »

This is a good script but when i say /dismount it changes my level to 4 then back to 99 and my sprite doesn't change back :'(
kenny
Eclipse Gfx/scripter
Advanced Eclipser
*****
Offline Offline

Posts: 1,238


~Good Scripter~


View Profile WWW Email
« Reply #6 on: October 08, 2007, 03:53:41 PM »

I dont think its storing variables correctly since it should be "\scripts\charextras" & getplayername(index) & ".ini"
Uru Wolf
Programmer
Member
****
Offline Offline

Posts: 99


View Profile WWW Email
« Reply #7 on: October 26, 2007, 06:39:37 AM »

Is there a certified EE version for this? I have tryed the code above but it just errors my main.txt
Mystical Fish Man
Self-Proclaimed Eclipse Genius
Newb
*
Offline Offline

Posts: 23


Bill Cosby FTW!!!


View Profile Email
« Reply #8 on: December 03, 2007, 06:57:14 AM »

Hey, about the syntax...
Keep it consistent! It gets confusing when you write stuff like this:
Code: [Select]
call sendplayerdata(index)after writing in this format:
Code: [Select]
Call SetPlayerSprite(Index, 10)And I think it makes a difference when it runs the code, but I may be wrong! :-\
So please change it to Call SendPlayerData(Index)
It will make it look more professional as well.  :o
Thanks,
Mystical Fish Man
Pages: [1]
  Print  
 
 

Powered by EzPortal
Powered by MySQL Powered by PHP Powered by SMF 2.0 Beta 4 | SMF © 2006–2008, Simple Machines LLC | Sitemap Valid XHTML 1.0! Valid CSS!
Page created in 0.404 seconds with 32 queries.