MechTech the MMO Development Forum
 
HomeHome  FAQFAQ  SearchSearch  MemberlistMemberlist  UsergroupsUsergroups  RegisterRegister  Log inLog in  

Share | 
 

 Applying for scripter

View previous topic View next topic Go down 
AuthorMessage
plebpl



Posts : 2
Join date : 2008-05-29

PostSubject: Applying for scripter   Fri May 30, 2008 9:42 am

i am fairly good at scripting a very simple untested spell shop script below

Code:

Function Main()
Player = Actor()



A = OpenDialog(Player, Target, "Spell Shop")
DialogOutput(Player, A, "This is where you can buy any spells you desire", 0, 0, 255)
SpellBuy = DialogInput(Player, A, "Heal Spell", "Speed Spell", "Nothing")
 
 If(SpellBuy == 1 && Gold(Player) > 10)
  ChangeGold(Player) - 10
  AddAbility(Player, "Heal Spell", 1)
 ElseIf(SpellBuy == 2 && Gold(Player) > 10)
 ChangeGold(Player) - 10
  AddAbility(Player, "Speed Spell", 1)
 ElseIf(SpellBuy == 3)
DialogOutput(Player, A, "Thank you and remember come again to increse your ability", 0, 0, 255)
CloseDialog(Player, A)

Else
 Output(Player, "Sorry you do not have enough gold", 0, 0, 255)

Return()
End Function
Back to top Go down
View user profile
towcar



Posts : 160
Join date : 2008-05-09
Location : Home

PostSubject: Re: Applying for scripter   Fri May 30, 2008 3:57 pm

Oh cool Some more good work
Back to top Go down
View user profile
Mad_computer_user
Admin


Posts : 155
Join date : 2008-04-13
Location : NZ

PostSubject: Re: Applying for scripter   Fri May 30, 2008 4:32 pm

please use the form in MUST READ section

_________________
Back to top Go down
View user profile
Mad_computer_user
Admin


Posts : 155
Join date : 2008-04-13
Location : NZ

PostSubject: Re: Applying for scripter   Fri May 30, 2008 4:34 pm


_________________
Back to top Go down
View user profile
bloobat



Posts : 75
Join date : 2008-04-21

PostSubject: Re: Applying for scripter   Sat May 31, 2008 12:31 pm

plebpl wrote:
i am fairly good at scripting a very simple untested spell shop script below

Code:

Function Main()
Player = Actor()



A = OpenDialog(Player, Target, "Spell Shop")
DialogOutput(Player, A, "This is where you can buy any spells you desire", 0, 0, 255)
SpellBuy = DialogInput(Player, A, "Heal Spell", "Speed Spell", "Nothing")
 
 If(SpellBuy == 1 && Gold(Player) > 10)
  ChangeGold(Player) - 10
  AddAbility(Player, "Heal Spell", 1)
 ElseIf(SpellBuy == 2 && Gold(Player) > 10)
 ChangeGold(Player) - 10
  AddAbility(Player, "Speed Spell", 1)
 ElseIf(SpellBuy == 3)
DialogOutput(Player, A, "Thank you and remember come again to increse your ability", 0, 0, 255)
CloseDialog(Player, A)

Else
 Output(Player, "Sorry you do not have enough gold", 0, 0, 255)

Return()
End Function

Not to be mean but...
Change the "&&" to +$ Wink A word of advice when it comes to scripting otherwise your script will crash. Plus there are some errors in there, use your server log to find them.
Back to top Go down
View user profile
Sponsored content




PostSubject: Re: Applying for scripter   Today at 2:16 pm

Back to top Go down
 
Applying for scripter
View previous topic View next topic Back to top 
Page 1 of 1
 Similar topics
-
» CPP DISABILITY
» CPP D APPLYING YRS LATER
» Registering on the Forums and applying for Member!

Permissions in this forum:You cannot reply to topics in this forum
Mechanical Technologys :: Job applications-
Jump to: