• Welcome to Vice City Multiplayer.
 

Basic RPG System & Commands

Started by Skirmant, January 06, 2010, 04:04:31 PM

Previous topic - Next topic

0 Members and 2 Guests are viewing this topic.

Print
Go Down Pages1
User actions

Skirmant

January 06, 2010, 04:04:31 PM Last Edit: January 07, 2010, 05:43:28 AM by Skirmant
Since R2 came out I decided to show some scripting begginers how to make basic and somewhat popular RPG commands.
The scripts is GUS based, but I'm sure its not hard to reconvert it to any other.

Add this simple script in the spawn signal.

Code Select
elseif (Police Depot (Washington-Beach) isin $vcmp.area($1)) {
!writeini -n vcmp.skin.ini SKINS $1 Cop
vcmp.msg $1 You spawned as a Cop.
vcmp.setarmour $1 100
}
else {
!writeini -n vcmp.skin.ini SKINS $1 Citizen
vcmp.msg $1 You spawned as a Citizen.
}


(The location depends where your cop skin spawns at)

Code Select
 elseif (!sus iswm $2) {
   if ($vcmp.cmdcheck(!copcmd,%id) == fail) !halt
   elseif ($readini(vcmp.skin.ini,SKINS,%b) == Citizen) vcmp.msg %id You need to be the law to suspect!
   elseif (!$4-) vcmp.msg %id $2 <name> <reason>
   elseif (%a == -1) vcmp.msg %id No such player online!
   elseif (%a == $vcmp.getid(%name)) vcmp.msg %id You can't suspect yourself.
   elseif ($readini(vcmp.skin.ini,SKINS,%a) != Citizen) vcmp.msg %id You can't suspect a cop!
   elseif ($readini(vcmp.wanted.ini,WANTED,$vcmp.name(%a)) == yes) vcmp.msg %id This player is already wanted!
   else {
     vcmp.say $vcmp.name(%b) suspected $vcmp.name(%a) for $4-
     !writeini -n vcmp.wanted.ini WANTED $vcmp.name(%a) yes
   }
 }

Code Select
 elseif (!wanted iswm $2) {
   if ($vcmp.cmdcheck(!copcmd,%id) == fail) !halt
   else {
     var %aa = 0,%bb,%cc,%dd
     while (%aa <= 50) {
       if ($readini(vcmp.wanted.ini,WANTED,$vcmp.name(%aa)) == yes) {
         if (!%bb) %bb = $vcmp.name(%aa) $+
         elseif ($numtok(%bb,32) <= 7) %bb = %bb  $vcmp.name(%aa)
         elseif (!%cc) %cc = $vcmp.name(%aa) $+
         elseif ($numtok(%cc,32) <= 7) %cc = %cc  $vcmp.name(%aa)
         elseif (!%dd) %dd = $vcmp.name(%aa) $+
         elseif ($numtok(%dd,32) <= 7) %dd = %dd  $vcmp.name(%aa)
       }
       !inc %aa
     }
     if (%bb) {
       vcmp.say Wanted players: %bb
       if (%cc) vcmp.say %cc
       if (%dd) vcmp.say %dd
     }
     else vcmp.say Wanted players: none
   }
 }

Replace the content of the kill signal with this final script.

Code Select
 if ($vcmp.name(%killer) == Unknown) !remini vcmp.wanted.ini WANTED $vcmp.name(%victim)
 elseif (($vcmp.name(%victim) != Unknown) && ($vcmp.name(%killer) != Unknown)) {
   if ($readini(vcmp.skin.ini,SKINS,%killer) != Citizen) {
     if ($readini(vcmp.wanted.ini,WANTED,$vcmp.name(%victim)) == yes) {
       vcmp.msg %killer You killed a suspect and got $ $+ 500 as a reward!
       vcmp.cash+ %killer 500    
       !remini vcmp.wanted.ini WANTED $vcmp.name(%victim)
     }
     else vcmp.warn %killer Autowarn Killing an Innocent Civilian
   }
   else {
     !writeini -n vcmp.wanted.ini WANTED $vcmp.name(%killer) yes
     !remini vcmp.wanted.ini WANTED $vcmp.name(%victim)
   }
 }
}


Looks like were done here. Happy role playing  :)
I know advance mIRC, average C++, basic Pawn & Squirrel, very basic Java Script.

Javi

#1
January 08, 2010, 09:33:22 PM
Nice script  :D

MrAcmering

#2
January 09, 2010, 08:03:56 PM
nice  :o


YaY

thijn

#3
January 09, 2010, 10:30:39 PM
not that bad ;)

Ice

#4
September 15, 2010, 03:44:50 PM
Não consigo usar  :o Como eu coloco isso no meu game mode ?

Skirmant

#5
September 15, 2010, 04:35:57 PM
Took me a while to find out that you're talking in Galician...
Quote from: Ice on September 15, 2010, 03:44:50 PM
I can not use: As I put it in my game mode?

QuoteEscoita. Pola maneira que está falando que eu estou empezando a idea de que está a usar pawno, aínda que este script foi feito para o mIRC. Noutras palabras, o seu bo como un exemplo, pero non pode usalo directamente a menos que estea a usar mIRC para o servidor.

I know advance mIRC, average C++, basic Pawn & Squirrel, very basic Java Script.

Robd

#6
November 05, 2010, 10:14:15 PM
nice
Hello, this is Robd from the past.
If you are seeing this I have either posted something stupid, forgotten something, started a stupid topic, or a combination of the three.

Please forgive us for this mistake.

Regards, management

Gamer

#7
April 16, 2011, 10:07:37 PM
Quote from: Skirmant on January 06, 2010, 04:04:31 PM
Since R2 came out I decided to show some scripting begginers how to make basic and somewhat popular RPG commands.
The scripts is GUS based, but I'm sure its not hard to reconvert it to any other.

Add this simple script in the spawn signal.

Code Select
elseif (Police Depot (Washington-Beach) isin $vcmp.area($1)) {
!writeini -n vcmp.skin.ini SKINS $1 Cop
vcmp.msg $1 You spawned as a Cop.
vcmp.setarmour $1 100
}
else {
!writeini -n vcmp.skin.ini SKINS $1 Citizen
vcmp.msg $1 You spawned as a Citizen.
}


(The location depends where your cop skin spawns at)

Code Select
 elseif (!sus iswm $2) {
   if ($vcmp.cmdcheck(!copcmd,%id) == fail) !halt
   elseif ($readini(vcmp.skin.ini,SKINS,%b) == Citizen) vcmp.msg %id You need to be the law to suspect!
   elseif (!$4-) vcmp.msg %id $2 <name> <reason>
   elseif (%a == -1) vcmp.msg %id No such player online!
   elseif (%a == $vcmp.getid(%name)) vcmp.msg %id You can't suspect yourself.
   elseif ($readini(vcmp.skin.ini,SKINS,%a) != Citizen) vcmp.msg %id You can't suspect a cop!
   elseif ($readini(vcmp.wanted.ini,WANTED,$vcmp.name(%a)) == yes) vcmp.msg %id This player is already wanted!
   else {
     vcmp.say $vcmp.name(%b) suspected $vcmp.name(%a) for $4-
     !writeini -n vcmp.wanted.ini WANTED $vcmp.name(%a) yes
   }
 }

Code Select
 elseif (!wanted iswm $2) {
   if ($vcmp.cmdcheck(!copcmd,%id) == fail) !halt
   else {
     var %aa = 0,%bb,%cc,%dd
     while (%aa <= 50) {
       if ($readini(vcmp.wanted.ini,WANTED,$vcmp.name(%aa)) == yes) {
         if (!%bb) %bb = $vcmp.name(%aa) $+
         elseif ($numtok(%bb,32) <= 7) %bb = %bb  $vcmp.name(%aa)
         elseif (!%cc) %cc = $vcmp.name(%aa) $+
         elseif ($numtok(%cc,32) <= 7) %cc = %cc  $vcmp.name(%aa)
         elseif (!%dd) %dd = $vcmp.name(%aa) $+
         elseif ($numtok(%dd,32) <= 7) %dd = %dd  $vcmp.name(%aa)
       }
       !inc %aa
     }
     if (%bb) {
       vcmp.say Wanted players: %bb
       if (%cc) vcmp.say %cc
       if (%dd) vcmp.say %dd
     }
     else vcmp.say Wanted players: none
   }
 }

Replace the content of the kill signal with this final script.

Code Select
 if ($vcmp.name(%killer) == Unknown) !remini vcmp.wanted.ini WANTED $vcmp.name(%victim)
 elseif (($vcmp.name(%victim) != Unknown) && ($vcmp.name(%killer) != Unknown)) {
   if ($readini(vcmp.skin.ini,SKINS,%killer) != Citizen) {
     if ($readini(vcmp.wanted.ini,WANTED,$vcmp.name(%victim)) == yes) {
       vcmp.msg %killer You killed a suspect and got $ $+ 500 as a reward!
       vcmp.cash+ %killer 500    
       !remini vcmp.wanted.ini WANTED $vcmp.name(%victim)
     }
     else vcmp.warn %killer Autowarn Killing an Innocent Civilian
   }
   else {
     !writeini -n vcmp.wanted.ini WANTED $vcmp.name(%killer) yes
     !remini vcmp.wanted.ini WANTED $vcmp.name(%victim)
   }
 }
}


Looks like were done here. Happy role playing  :)

[Error] -This scripts is  mySQLite(mIRC)

thijn

#8
April 21, 2011, 09:27:21 PM
what the fuck are you talking about??
There is no such thing as MySQLite (mIRC)
You only have mySQL, sqlite and mIRC >.<

And this is a script for mIRC, ONLY..

Print
Go Up Pages1
User actions