Jump to content

slap script


ceelen1

Recommended Posts

Posted

if you tell where your admin levels are stored.. or maybe you have an alias.. and for what level you want it to be? and what game, mta:sa or mta0.5? be more specific......

Posted

well i want your script toody the level 1-10 admin system i already tryed to load it but when i use !setlevel (id) 10 it says invalid admin lvl so mayeb u cud give me the link of the admin system 1-10 and then i try again

Posted

okay 1. your link doesnt work anymore and 2. if i type !slap (name) it doesnt work and also if i type !setlevel (name) (1-10 it doesnt work

mayeb ebcause i have mtama.mrc loaded?

Posted

k ty for this ur the best :DDDDDDDDDDDDDDDDDDDD

k my last guestion i have an jail+suspect script the suspect thing work eprfect but nothing happens when i type jail:

on *:SIGNAL:mta.command:{

if ($3 == !jail) {

var %a = $iif($4,$iif($mta.name($1,$4) != Unknown,$4,$mta.getid($1,$4)),$2)

if ((Cop* iswm $mta.skin($1,$2).name) && ($rpg.criminal($1,%a) == $true) && ($2 != %a) && (%a != -1) && ($5 isnum)) {

if (($rpg.area($1,%a) == Jail-Cells) || ($rpg.area($1,%a) == Big-Cell)) {

mta.msg $1 $2 You jailed a criminal. Here's your reward. $100

mta.msg $1 %a Someone in the jail made you drop soap. Poor bastard.

mta.say $1 $mta.name($1,%a) has been jailed for $5 Minutes!

.timer 1 1 mta.msg $1 $2 You have earned $calc(1700 * $rpg.wantedlvl($1,%a)) $+ !

!writeini -n " $+ $scriptdir $+ suspectlist.ini" $mta.name($1,$2) cash $calc($rpg.cash($1,$2) + 100)

!writeini -n " $+ $scriptdir $+ suspectlist.ini" $mta.name($1,%a) criminal 0

!writeini -n " $+ $scriptdir $+ suspectlist.ini" $mta.name($1,%a) Jailed Yes

!.timer 1 $calc($calc($5 * 60) + 1) mta.say $1 $mta.name($1,%a) is now a free man!

!.timer 1 $calc($5 * 60) !writeini -n " $+ $scriptdir $+ suspectlist.ini" $mta.name($1,%a) Jailed No

}

}

}

elseif (!suspect == $3) {

var %a = $iif($4,$iif($mta.name($1,$4) != Unknown,$4,$mta.getid($1,$4)),$2)

if (Cop* iswm $mta.skin($1,$2).name) {

if (%a == -1) mta.msg $1 $2 Error - Absent ID/Name

if (%a == $2) mta.msg $1 $2 Error - Can't suspect yourself

else {

!writeini " $+ $scriptdir $+ suspectlist.ini" List $mta.name($1,%a) 1

!writeini " $+ $scriptdir $+ suspectlist.ini" Reasons $mta.name($1,%a) $iif($5,$5-,No Reason)

mta.say $1 Server: $mta.name($1,%a) has been suspected by $mta.name($1,$2) : Reason: $iif($5,$5-,None)

}

}

else mta.msg $1 $2 Server: You are not a cop.

}

elseif ($3 == !crime) {

var %a = 0,%b

while (%a <= $mta.maxplayers($1)) {

if ($readini($scriptdir $+ suspectlist.ini,list,$mta.name($1,%a)) == 1) {

mta.say $1 Wanted: $mta.name($1,%a) $+ , Reason: $readini($scriptdir $+ suspectlist.ini,reasons,$mta.name($1,%a))

}

inc %a

}

}

elseif (!wanted == $3) {

var %a = 0,%b

while (%a <= $mta.maxplayers($1)) {

if ($readini($scriptdir $+ suspectlist.ini,list,$mta.name($1,%a)) == 1) {

if (!%b) %b = $mta.name($1,%a)

elseif (%b) %b = %b $+ , $mta.name($1,%a)

}

inc %a

}

mta.say $1 Wanted Players: $iif(%b,%b,None)

}

}

on *:SIGNAL:mta.kill:{

if ($readini($scriptdir $+ suspectlist.ini,list,$mta.name($1,$2)) == 1) {

if (Cop* iswm $mta.skin($1,$3).name) {

mta.msg $1 $3 Killed a wanted player and u get 100$ of his bounty.

!writeini rpg.ini cash mta.name($1,$32) $calc($readini(rpg.ini,cash,$mta.name($1,$2)) + 100)

!remini " $+ $scriptdir $+ suspectlist.ini" List $mta.name($1,$2)

!remini " $+ $scriptdir $+ suspectlist.ini" Reasons $mta.name($1,$2)

!writeini rpg.ini cash $mta.name($1,$3) $calc($readini(rpg.ini,cash,$mta.name($1,$3)) + 100)

}

Posted

mods are player with with level from 2 to 5, you cant see the commands ingame as i havent added that.

and your !jail script wont work as it uses aliases missing there, it's kinda a part of a big script which you dont have

Posted

if the link dont work here

*/
alias mta.level !return $iif($readini($mta.dir $+ $1.ini,ID $+ $2,level),$v1,0)
alias mta.spree !return $iif($hget(mta.spree,$mta.name($1,$2)),$v1,0)
alias my.kills !return $iif($readini($scriptdir $+ mta.stats.ini,KILLS,$mta.name($1,$2)),$v1,0)
alias my.deaths !return $iif($readini($scriptdir $+ mta.stats.ini,DEATHS,$mta.name($1,$2)),$v1,0)
alias my.spree !return $iif($readini($scriptdir $+ mta.stats.ini,SPREE,$mta.name($1,$2)),$v1,0)
on *:SIGNAL:mta.command: {
 var %a = $iif($4,$iif($mta.name($1,$4) != Unknown,$4,$mta.getid($1,$4)),$2)
 ;PLAYERS COMMANDS
 if (!admin* iswm $3) {
   var %a = 0,%b,%c
   while (%a <= $mta.maxplayers($1)) {
     if ($mta.level($1,%a) >= 6) %b = $iif(%b,%b $+ $chr(44) $mta.name($1,%a),$mta.name($1,%a)) $+ (Level: $mta.level($1,%a) $+ )
     elseif ($mta.level($1,%a) >= 2) %c = $iif(%c,%c $+ $chr(44) $mta.name($1,%a),$mta.name($1,%a)) $+ (Level: $mta.level($1,%a) $+ )
     !inc %a
   }
   mta.say $1 $iif(%b,Admins: %b,No admins currently present.)
   if (%c) mta.say $1 Moderators: %c
 }
 elseif ($3 == !skin) $iif(%a == -1,mta.msg $1 $2 Error - Absent ID,mta.say $1 $mta.name($1,%a) $+ 's skin: $mta.skin($1,%a).name)
 elseif ($3 == !level) $iif(%a == -1,mta.msg $1 $2 Error - Absent ID,mta.say $1 $mta.name($1,%a) $+ 's level: $mta.level($1,%a))
 elseif ($3 == !ping) $iif(%a == -1,mta.msg $1 $2 Error - Absent ID,mta.say $1 $mta.name($1,%a) $+ 's ping: $mta.ping($1,%a))
 elseif ($3 == !idle) $iif(%a == -1,mta.msg $1 $2 Error - Absent ID,mta.say $1 $mta.name($1,%a) is idle for: $mta.idle($1,%a).time)
 elseif (($3 == !hp) || ($3 == !health)) $iif(%a == -1,mta.msg $1 $2 Error - Absent ID,mta.say $1 $mta.name($1,%a) $+ 's health: $mta.health($1,%a))
 elseif (($3 == !car) || ($3 == !vehicle)) $iif(%a == -1,mta.msg $1 $2 Error - Absent ID,mta.say $1 $iif($mta.vehicle($1,%a).name == foot,$mta.name($1,%a) is currently on foot. Health: $mta.health($1,%a) $+ %,$mta.name($1,%a) is currently $iif($findtok(11 12 13 50,$mta.vehicle($1,%a),1,32),flying,driving) a $mta.vehicle($1,%a).name $+ . $iif($findtok(11 12 13 50,$mta.vehicle($1,%a),1,32),Vehicle,Helicopter) Health: $mta.health($1,%a).vehicle $+ %))
 elseif (!loc* iswm $3) $iif(%a == -1,mta.msg $1 $2 Error - Absent ID,mta.say $1 $mta.name($1,%a) $+ 's location: $mta.area($1,%a))
 elseif ($3 == !time) mta.say $1 Current time: $time($GMT) GMT
 elseif (!count* iswm $3) {
   var %i = 3,%a = 0
   if (($4 isnum) && ($4 <= 5)) %i = $4
   while (%i >= 1) { .timer 1 %a mta.say $1 %i | !dec %i | !inc %a }
   .timer 1 %a mta.say $1 GOGOGO!!!
 }
 elseif ($findtok(!out !in,$3,1,32)) {
   var %a = 0,%b = 0,%c = $findtok(!out !in,$3,1,32)
   while (%a <= $mta.maxplayers($1)) {
     if ($mta.status($1,%a) == %c) %b = %b + 1
     !inc %a
   }
   mta.say $1 There $iif(%b == 1,is,are) %b $iif(%b == 1,player,players) $iif(%c == 1,out,in) game.
 }
 elseif ($3 == !list) {
   if ($findtok(in out,$4,1,32)) {
     var %a = 0,%b,%c,%d
     while (%a <= $mta.maxplayers($1)) {
       if ($4 == in) %b = 2
       elseif ($4 == out) %b = 1
       if ($mta.status($1,%a) == %b) {
         if (!%c) %c = $mta.name($1,%a)
         elseif ($numtok(%c,32) <=  %c = %c $+ , $mta.name($1,%a)
         elseif (!%d) %d = $mta.name($1,%a)
         else %d = %d $+ , $mta.name($1,%a)
       }
       !inc %a
     }
     mta.say $1 $iif(%c,Players $4 $+ -game: %c,There are no Players $4 $+ -Game)
     if (%d) mta.say $1 %d
   }
   else mta.msg $1 $2 Error - Syntax: $3 
 }
 if (!stat* iswm $3) {
   if (%a == -1) mta.msg $1 $2 Error - Absent ID.
   else {
     mta.say $1 Stats for $mta.name($1,%a) - Kills: $mta.kills($1,%a) $+ , Deaths: $mta.deaths($1,%a) $+ , Spree: $mta.spree($1,%a)
     mta.say $1 Overall - Kills: $my.kills($1,%a) $+ , Deaths: $my.deaths($1,%a) $+ , Ratio: $round($calc($my.kills($1,%a) / $my.deaths($1,%a)),4) $+ , Score: $calc($my.kills($1,%a) - $my.deaths($1,%a)) $+ , Best Spree: $my.spree($1,%a)
   }
 } 
 elseif ($mta.level($1,$2) >= 2) {
   if ($mta.level($1,$2) >= 3) {
     if ($mta.level($1,$2) >= 4) {
       if ($mta.level($1,$2) >= 5) {
         if ($mta.level($1,$2) >= 6) {
           if ($mta.level($1,$2) >= 7) {
             if ($mta.level($1,$2) >=  {
               if ($mta.level($1,$2) >= 9) {
                 if ($mta.level($1,$2) >= 10) {
                   ;LEVEL 10 COMMANDS
                   if ($3 == !setlevel) {
                     if (!$5) mta.msg $1 $2 Error - Syntax: !setlevel 
                     elseif (%a == -1) mta.msg $1 $2 Error - Absent ID
                     elseif ($5 !isnum) mta.msg $1 $2 Error - Please enter a numeric admin level.
                     elseif (($5 < 1) || ($5 > 10)) mta.msg $1 $2 Error - $5 is an invalid admin level.
                     elseif ($mta.level($1,%a) == 0) mta.msg $1 $2 Error - $mta.name($1,%a) is not registered with the server
                     else {
                       mta.say $1 $mta.name($1,%a) $+ 's level changed from $mta.level($1,%a) to $5 by $mta.name($1,$2)
                       !writeini " $+ $scriptdir $+ mta.nickserv.ini" $mta.name($1,%a) level $5
                       !writeini " $+ $mta.dir $+ $1.ini" ID $+ %a level $5
                     }
                   }
                   elseif ($3 == !clankick) {
                     mta.say $1 All members of $4 clan kicked by $mta.name($1,$2) $+ ! $iif($5,Reason: $5-,No Reason)
                     var %b = 0
                     while (%b <= $mta.maxplayers($1)) {
                       if (($4 isin $mta.name($1,%b)) && (%b != $2)) mta.kick $1 %b
                       !inc %b
                     }
                   }
                   elseif ($3 == !clanban) {
                     mta.say $1 All members of $4 clan has banned by $mta.name($1,$2) $+ ! $iif($5,Reason: $5-,No Reason)
                     var %b = 0
                     while (%b <= $mta.maxplayers($1)) {
                       if (($4 isin $mta.name($1,%b)) && (%b != $2)) mta.ban $1 %b
                       !inc %b
                     }
                   }
                 }
                 ;LEVEL 9 COMMANDS
                 if ($3 == !subnetban) {
                   if ($2 == %a) mta.msg $1 $2 Error - Can't ban yourself.
                   elseif (%a == -1) mta.msg $1 $2 Error - Absent ID
                   else {
                     var %b = $gettok($mta.ip($1,%a),1-2,46)
                     mta.say $1 $mta.name($1,%a) $+ 's subnet $+(%b $+ .0.0) banned.
                     mta.ban $1 %a
                     mta.addban $1 %b $+ .0.0
                   }
                 }
               }
               ;LEVEL 8 COMMANDS
               if ($3 == !ban) {
                 if (%a == -1) mta.msg $1 $2 Error - Absent ID
                 elseif (%a == $2) mta.msg $1 $2 Error - Can't ban yourself.
                 else {
                   mta.say $1 $mta.name($1,%a) has been banned by $mta.name($1,$2) $+ . $iif($5,Reason: $5-)
                   mta.kick $1 %a $5-
                 }
               }
               elseif ($3 == !addban) {
                 if (*.*.*.* iswm $4) {
                   mta.addban $1 $4
                   mta.say $1 IP ' $+ $4 $+ ' banned.
                 }
               }
             }
             ;LEVEL 7 COMMANDS

           }
           ;LEVEL 6 COMMANDS
           if ($3 == !constant) {
             if ($findtok(off sun cloud rain fog,$4,1,32)) {
               set %constantw $4
               mta.say $1 Constant weather set to: $4
               mta.setweather $1 $replace($4,cloud,1,rain,2,fog,3,sun,0)
             }
           }
         }
         ;LEVEL 5 COMMANDS
         if ($3 == !kick) {
           if (%a == -1) mta.msg $1 $2 Error - Absent ID
           elseif (%a == $2) mta.msg $1 $2 Error - Can't kick yourself.
           else {
             mta.say $1 $mta.name($1,%a) has been kicked by $mta.name($1,$2) $+ . $iif($5,Reason: $5-)
             mta.kick $1 %a
           }
         }
       }
       ;LEVEL 4 COMMANDS
       if ($3 == !slap) {
         if (%a == -1) mta.msg $1 $2 Error - Absent ID
         elseif (%a == $2) mta.msg $1 $2 Error - Can't slap yourself
         else {
           if (($5 isnum) && ($5 <= 5)) .timer $5 0 mta.slap $1 %a
           else mta.slap $1 %a
         }
       }
     }
     ;LEVEL 3 COMMANDS
     if ($3 == !ip) {
       if (%a == -1) mta.msg $1 $2 Error - Absent ID
       else mta.msg $1 $2 $mta.name($1,%a) $+ 's IP: $mta.ip($1,%a)
     }
   }
   ;LEVEL 2 COMMANDS
   if ($3 == !settime) mta.settime $1 $4
   elseif ($findtok(!sun !fog !cloud !rain,$3,1,32)) mta.setweather $1 $replace($3,!cloud,1,!rain,2,!fog,3,!sun,0)

 }
}
on *:SIGNAL:mta.join:{
 if ($findtok(login register admin,$mta.name($1,$2),1,32)) {
   mta.msg $1 $2 Sorry, $+(',$mta.name($1,$2),') is an illegal nick, please change.
   mta.kick $1 $2
 }
 elseif ($readini($scriptdir $+ mta.nickserv.ini,$mta.name($1,$2),level)) {
   var %a = $readini($scriptdir $+ mta.nickserv.ini,$mta.name($1,$2),level)
   if ($mta.ip($1,$2) == $readini($scriptdir $+ mta.nickserv.ini,$mta.name($1,$2),ip)) {
     mta.say $1 $iif(%a >= 6,Admin,$iif(%a >= 2,Moderator,Registered player)) $mta.name($1,$2) auto-logged in. (Status level: %a $+ )
     !writeini " $+ $mta.dir $+ $1.ini" ID $+ $2 level %a
   }
   else {
     mta.msg $1 $2 Nick $+(',$mta.name($1,$2),') is registered with the server. You have 30 seconds to login.
     mta.msg $1 $2 To login type '/msg login '
     $+(.timer,login,$1,$2) 1 30 mta.kick $1 $2
   }
 }
 else mta.msg $1 $2 You can register your nick with the server. To register type '/msg register '
}
on *:SIGNAL:mta.pm:{
 if ($3 == login) {
   if (!$4) mta.msg $1 $2 Error - missing password.
   elseif (($left($4,1) == $chr(60)) && ($right($4,1) == $chr(62))) mta.msg $1 $2 Please enter your pass without <> signs
   elseif ($4 != $readini($scriptdir $+ mta.nickserv.ini,$mta.name($1,$2),password)) mta.msg $1 $2 Wrong password.
   else {
     var %a = $readini($scriptdir $+ mta.nickserv.ini,$mta.name($1,$2),level)
     mta.say $1 $iif(%a >= 6,Admin,$iif(%a >= 2,Moderator,Registered player)) $mta.name($1,$2) logged in. (Status level: %a $+ )
     !writeini " $+ $mta.dir $+ $1.ini" ID $+ $2 level %a
     !writeini " $+ $scriptdir $+ mta.nickserv.ini" $mta.name($1,$2) ip $mta.ip($1,$2)
     $+(.timer,login,$1,$2) off
   }
 }
 elseif ($3 == register) {
   if (!$4) mta.msg $1 $2 Error - missing password.
   elseif (($left($4,1) == $chr(60)) && ($right($4,1) == $chr(62))) mta.msg $1 $2 Please enter your pass without <> signs
   else {
     mta.say $1 $mta.name($1,$2) registered and auto-logged in!
     !writeini " $+ $scriptdir $+ mta.nickserv.ini" $mta.name($1,$2) ip $mta.ip($1,$2)
     !writeini " $+ $scriptdir $+ mta.nickserv.ini" $mta.name($1,$2) password $4
     !writeini " $+ $scriptdir $+ mta.nickserv.ini" $mta.name($1,$2) level 1
     !writeini " $+ $mta.dir $+ $1.ini" ID $+ $2 level 1
   }
 }
}
on *:SIGNAL:mta.part:{
 $+(.timer,login,$1,$2) off
}

;CONSTANT WEATHER CHANGE
on *:SIGNAL:mta.event:{
 if ((%constantw) && (%constantw != off)) {
   if (Weather isin $2-) {
     if ($mta.weather($1) != %constantw) mta.setweather $1 $replace(%constantw,cloud,1,rain,2,fog,3,sun,0)
   }
 }
}

;SPAWN MESSAGES
on *:SIGNAL:mta.spawn:{
 mta.say $1 $mta.name($1,$2) spawned as $mta.skin($1,$2).name
}

;STATS LOG
on *:SIGNAL:mta.kill:{
 if (!$hget(mta.spree)) !hmake mta.spree 100
 if ($3 != $2) {
   !writeini " $+ $scriptdir $+ mta.stats.ini" KILLS $mta.name($1,$3) $calc($my.kills($1,$3) + 1)
   !hadd mta.spree $mta.name($1,$3) $calc($mta.spree($1,$3) + 1)
   if ($mta.spree($1,$3) > $my.spree($1,$3)) !writeini " $+ $scriptdir $+ mta.stats.ini" SPREE $mta.name($1,$3) $calc($my.spree($1,$3) + 1)
 }
 !writeini " $+ $scriptdir $+ mta.stats.ini" DEATHS $mta.name($1,$2) $calc($mta.deaths($1,$2) + 1)
 !hdel mta.spree $mta.name($1,$2)
}
on *:LOAD:{
 if (!$exists($scriptdir $+ mta.nickserv.ini)) {
   var %a = $input(Welcome to the 10 levels Admin-Sytem setup $lf $+ Enter your nickname to login with:,eod,Admin-System by lil_Toady),%b = $input(Enter your password:,eod,Admin-System by lil_Toady),%c = $input(Admin-System configured! $lf $+ Nickname: %a $+ , Password: %b ,o,Admin-System by lil_Toady)
   !writeini " $+ $scriptdir $+ mta.nickserv.ini" %a password %b
   !writeini " $+ $scriptdir $+ mta.nickserv.ini" %a level 10
 }
}

  • 6 months later...
Posted

How do I make myself admin using that script?

EDIT: sorry about double post, the first one i didn't think it went through...

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...