(Submission) Some little subs for all.

• 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

[EO] Attaching Problem. by 314piwm
[Today at 10:21:04 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]

• Guests: 21
• Hidden: 0
• Users: 14
• Users Online:

• Back to teeming
• drifter000
• jncoblack15
• BRiM570N3
• 314piwm
• Ertzel
• RavenStar
• Bloodmyst
• yaratemaster
• bunnyphantom
• Blue Fly
• LegendWeaver
• Gamma™
• Mikekan13

[Total Members Voted:]

Yes

2 (100%)

A bit...

0 (0%)

No

0 (0%)

Total Members Voted: 0

Voting closed: August 02, 2006, 07:36:48 AM

Like I promised, I updated it and now it will give you the number of kills...

first paste this on the OnAttack sub: If you dont have the sub, here it is.

Code: [Select]

'******************
Sub OnAttack(index)
'******************
If GetPlayerTarget(index) > 0 and GetPlayerTarget(index) <> index Then
If GetPlayerHP(GetPlayerTarget(index)) <= 0 Then
If GetVar("Accounts/" & GetPlayerName(index) & ".ini", "Players_killed", "Kills") & "" = "" Then
Call Putvar("Accounts/" & GetPlayerName(index) & ".ini", "Players_Killed", "Kills", 1)
End If
End If
End If
End Sub

Ok then paste this sub at the end of your main:

Code: [Select]

'()()()()()()()()()()()()()
'By:Cantinfla(John) 2006(c)
'()()()()()()()()()()()()()
'*******************
 Sub PvPpoints(index)
'*******************

Dim PK
PK=GetVar("Accounts/" & GetPlayerName(index) & ".ini", "Players_killed", "Kills")
Call PlayerMsg(index, "You have a PvP score of "& PK &" kills!", 1)
Call GlobalMsg(index, ""& GetPlayerName(index) &" has a PvP score of "& PK &" Kills!", 4)

End Sub
'()()()()()()()()()()()()()
'By:Cantinfla(John) 2006(c)
'()()()()()()()()()()()()()

And of course dont for get to add this on the commands:

Code: [Select]


Case "/pkpoints"

       Call PvPpoints(index)

Exit Sub

I hope you guys like it.

Cantinfla

Yeah this wasn't a bad script, don't know if it works though.

jakeruston

it doesnt work properly
it will only display your PK status, not your PK score

make it write your PK score to an ini file

DFAx

Lol I forgot about this a long time ago, I'll update it soon.

Cantinfla

aiite thank bro =)
can you write this now, ill implement it imediately

DFAx

Cant now, but as soon as I can I will.

Cantinfla

I take it your trying to learn how to script?

Great job! The comunity needs more scripters!

Tylian!

I'm still a bit of a beginner...but I like scripting
DFAx: Sorry I couldnt do anything right now.

Gah! gtg later all

Cantinfla

Like I promised, I updated it and now it will give you the number of kills...

first paste this on the OnAttack sub: If you dont have the sub, here it is.

Code: [Select]

'******************
Sub OnAttack(index)
'******************
If GetPlayerTarget(index) > 0 and GetPlayerTarget(index) <> index Then
If GetPlayerHP(GetPlayerTarget(index)) <= 0 Then
If GetVar("Accounts/" & GetPlayerName(index) & ".ini", "Players_killed", "Kills") & "" = "" Then
Call Putvar("Accounts/" & GetPlayerName(index) & ".ini", "Players_Killed", "Kills", 1)
End If
End If
End If
End Sub

Ok then paste this sub at the end of your main:

Code: [Select]

'()()()()()()()()()()()()()
'By:Cantinfla(John) 2006(c)
'()()()()()()()()()()()()()
'*******************
 Sub PvPpoints(index)
'*******************

Dim PK
PK=GetVar("Accounts/" & GetPlayerName(index) & ".ini", "Players_killed", "Kills")
Call PlayerMsg(index, "You have a PvP score of "& PK &" kills!", 1)
Call GlobalMsg(index, ""& GetPlayerName(index) &" has a PvP score of "& PK &" Kills!", 4)

End Sub
'()()()()()()()()()()()()()
'By:Cantinfla(John) 2006(c)
'()()()()()()()()()()()()()

And of course dont for get to add this on the commands:

Code: [Select]


Case "/pkpoints"

       Call PvPpoints(index)

Exit Sub

I hope you guys like it. =]

Cantinfla

thx for writing, too lazy to do it myself =)

===========================

Did you even test this?

it doesnt work....and I see a few problems

such as

Code: [Select]

Call GlobalMsg(index, ""& GetPlayerName(index) &" has a PvP score of "& PK &" Kills!", 4)

incorrect parameters


also, is this IF statement even checking anything?

Code: [Select]

If GetVar("Accounts/" & GetPlayerName(index) & ".ini", "Players_killed", "Kills") & "" = "" Then

whats the condition its checking?


first off, make it write to another ini file....second....nvm let me try to write this

DFAx

it'd actually just be easier to hard code it..

DFAx

Ty For This Script, it the first one that worked for me on my first try

danerd100

......dont necropost

Munro

so doe this one work or not< anyone post the working one or not?

Bone

Yes it should work, But please do not necropost - If you have to ask, PM someone that should know if it works or not, and refer them to this topic and ask what you want.

Soljah

Wont work for me, im guessing its because im using the eclipse that has .dat accounts files,someone should rework this so it works with the .dat files.

9sam1

That is a major necro post my good sir.

Bone

Dont Work to me :(

sToRmY

nice script it will come in handy I usly code my own but I have been trying to do this one for ages

Andy2001291

This is a three year old thread. Does that beat the necro-post record?

Xavier Sythe [ZG]