Jump to content

BetaDevil

Members
  • Posts

    153
  • Joined

  • Last visited

Everything posted by BetaDevil

  1. House, I have a problem with your script, there's already one in the list and your script won't work perfect with GUS, 'cause there are already !yes and !no commands in that. Same with Santi, already one in the list.
  2. I will update the list later this day, with several things like the GUS + RPG.
  3. on *:SIGNAL:mta.connect: { !.timer 0 500 mta.text $1 Message !.timer 0 550 mta.text $1 Message2 }
  4. has it been enabled in mtaserver.conf?
  5. it would take more time to develop MTA:DM after it, and in that time they will think of new features , so don't do it!
  6. on *:SIGNAL:mta.command: { if ($3 == !shutdown) { if ($mta.level($1,$2) == 5) || ($gus.level($1,$2) == 10) mta.shutdown $1 else mta.pm $1 $2 Error - You need a higer level for this command! } } I made it for GUS and RCON
  7. check it with Map Syntax, maps with [NRS] have no respawn or something.
  8. BetaDevil

    !rank script

    on *:SIGNAL:mta.join:{ !writeini " $+ $scriptdir $+ mta.rank.ini" RANKS $mta.nick($1,$2) $calc($readini($scriptdir $+ mta.rank.ini,RANKS,$mta.nick($1,$2)) + 1) mta.rank $1 $2 } on *:SIGNAL:mta.command:{ var %a = $iif($4,$iif($mta.nick($1,$4) != $null,$4,$iif($mta.getid($1,$4),$v1,-1)),$2) if ($3 == !rank) { if (%a == -1) mta.pm $1 $2 Error - Absent ID else mta.rank $1 %a } } alias mta.rank { var %rank = $readini($scriptdir $+ mta.rank.ini,RANKS,$mta.nick($1,$2)) if (%rank >= 35) mta.text $1 $mta.nick($1,$2) $+ 's rank is: 8. Murderer elseif (%rank >= 30) mta.text $1 $mta.nick($1,$2) $+ 's rank is: 7. Dangerous Killer elseif (%rank >= 25) mta.text $1 $mta.nick($1,$2) $+ 's rank is: 6. Smooth Agent elseif (%rank >= 20) mta.text $1 $mta.nick($1,$2) $+ 's rank is: 5. Profressional elseif (%rank >= 15) mta.text $1 $mta.nick($1,$2) $+ 's rank is: 4. Wannabe Professional elseif (%rank >= 10) mta.text $1 $mta.nick($1,$2) $+ 's rank is: 3. Amateur elseif (%rank >= 5) mta.text $1 $mta.nick($1,$2) $+ 's rank is: 2. Wannebe Amateur elseif (%rank >= 1) mta.text $1 $mta.nick($1,$2) $+ 's rank is: 1. Newbie }
  9. which admin system are you using?
  10. BetaDevil

    Hello

    how did you get them?
  11. It won't! EDIT: Let's guess the next Tutorial release date?
  12. thx, I didn't notice there was a new one...
  13. added it now lil Toady finally finished his script
  14. BetaDevil

    question

    at MTAmA Port = 25602 Client Port = 25600 or turn on AdminServer in configuration-file
  15. oh lol, I forgot that one
  16. at every event you have parameters. at mta.command and stuff like that: $1 is the serverid $2 is the playerid $3 is the command $4 is the word after $3 $5 is the word after $4 $4- picks $4 $5 $6 and all the following if they are there.
  17. that's not it try: if ($3 == !restartmap) mta.startrace $mta.race($1,$2)
  18. how many maps do you have, the most ppl have to many maps on their server for MTAmA to handle.
  19. BetaDevil

    [SA] Scripts

    Here a list with some scripts for MTAmA4. Full Packages General Use Scripts x16 Finall by Tommis Public Release Script 1.1 by Scooby Public Gambling Script 1.0 by Scooby GUS Extended by Tommis, CoZ & BetaDevil GUS Extended will show an update-message at start-up, deny it! Small Scripts Deathmatch Script by BetaDevil alias mta.end { if (%cplayers == 1) { var %a = 0 while (%a < $mta.server($1).cmax) { if (!$mta.dead($1,%a)) { mta.text $1 $mta.nick($1,%a) is winner! mta.freeze $1 %a !halt } !inc %a } } } on *:SIGNAL:mta.startrace: { set %cplayers $mta.server($1).players } on *:SIGNAL:mta.part: { if (!$mta.dead($1,$2)) set %cplayers $calc(%cplayers - 1) mta.end $1 $2 } on *:SIGNAL:mta.death: { set %cplayers $calc(%cplayers - 1) mta.end $1 $2 } on *:SIGNAL:mta.connect: { set %cplayers 0 } Points Script by BetaDevil & lil Toady on *:SIGNAL:mta.command:{ var %a = $iif($4,$iif($mta.nick($1,$4) != $null,$4,$mta.getid($1,$4)),$2) if ($3 == !points) { if (%a == -1) mta.text $1 Error - Absent ID else mta.text $1 $mta.nick($1,%a) has got $iif($readini($scriptdir $+ points.ini,POINTS,$mta.ip($1,%a)),$v1,0) points. } } on *:SIGNAL:mta.finish: { if ($mta.rank($1,$2) <5>= 2) var %score = $replacex($mta.rank($1,$2),1,5,2,4,3,3,4,2,5,1), %position = $replace($mta.rank($1,$2),1,first,2,second,3,third,4,fourth,5,fifth) else var %score = $replacex($mta.rank($1,$2),1,2), %position = $replace($mta.rank($1,$2),1,first) mta.text $1 $mta.nick($1,$2) came %position $+ , and earned %score points! !writeini " $+ $scriptdir $+ points.ini" POINTS $mta.ip($1,$2) $iif($readini($scriptdir $+ points.ini,POINTS,$mta.ip($1,$2)),$calc($v1 + %score),%score) } } Trace Script by lil Toady, ported for SA by Scooby on *:SIGNAL:mta.command:{ var %a = $iif((!$4),$2,$iif($mta.getid($1,* $+ $4 $+ *),$v1,$2)) if ($3 == !trace) my.trace $1 %a } alias my.trace { set %my.trace $1 $2 if (!$sock(my.trace $+ $mta.ip($1,$2))) sockopen my.trace $+ $mta.ip($1,$2) www.completewhois.com 80 } on *:SOCKOPEN:my.trace*:{ tokenize 32 %my.trace if ($sockerr > 0) { sockclose $sockname mta.text $1 Trace: An error has occured. } else { sockwrite -n $sockname GET /cgi2/rbl_lookup.cgi?query= $+ $mta.ip($1,$2) $+ &display=whois HTTP/1.1 sockwrite -n $sockname User-Agent: MSIE 6.0 sockwrite -n $sockname Host: www.completewhois.com sockwrite $sockname $crlf } } on *:SOCKCLOSE:my.trace*:{ unset %tr.* } on *:SOCKREAD:my.trace*:{ var %t sockread %t if (country-rirdata isin %t) { tokenize 32 %my.trace mta.text $1 $mta.nick($1,$2) ( $+ $mta.ip($1,$2) $+ ) - Location: $gettok(%t,2-,58) sockclose $sockname } } Votekick Script by lil Toady on *:SIGNAL:mta.command:{ var %a = $iif($iif($4,$iif($mta.nick($1,$4),$4,$mta.getid($1,$4)),$2),$v1,-1) if ($3 == !votekick) { if (%vote.nick. [ $+ [ $1 ] ] != $null) mta.pm $1 $2 Another votekick is running: $mta.nick($1,%vote.nick. [ $+ [ $1 ] ]) elseif ($mta.server($1).players < 3) mta.pm $1 $2 Error - There should be at least 3 players in the server to start a votekick. elseif (%a == -1) mta.pm $1 $2 Error - Absent ID/Name elseif (%a == $2) mta.pm $1 $2 Error - Can't votekick yourself else { set %vote.nick. [ $+ [ $1 ] ] %a unset %vote.voters. [ $+ [ $1 ] ] mta.text $1 Votekick "!vote" if u want that $mta.nick($1,%a) should be kicked. [ $round($calc($mta.server($1).players / 2),0) votes needed] [1 minute] .timervote [ $+ [ $1 ] ] 1 60 mta.cancel.votekick $1 } } elseif ($3 == !vote) { if ((%vote.nick. [ $+ [ $1 ] ] == $null) || (%vote.nick. [ $+ [ $1 ] ] !isnum)) mta.pm $1 $2 No votekick is currently running. elseif ($findtok(%vote.voters. [ $+ [ $1 ] ],$2,1,32)) mta.pm $1 $2 $mta.nick($1,$2) $+ , You have already voted. else { set %vote.voters. [ $+ [ $1 ] ] %vote.voters. [ $+ [ $1 ] ] $2 if ($numtok(%vote.voters. [ $+ [ $1 ] ],32) >= $round($calc($mta.server($1).players / 2),0)) { mta.text $1 $mta.nick($1,%vote.nick. [ $+ [ $1 ] ]) Vote limit reached, $mta.nick($1,%vote.nick. [ $+ [ $1 ] ]) is out! mta.kick $1 %vote.nick. [ $+ [ $1 ] ] unset %vote.nick. [ $+ [ $1 ] ] unset %vote.voters. [ $+ [ $1 ] ] .timervote [ $+ [ $1 ] ] off } else mta.text $1 $numtok(%vote.voters. [ $+ [ $1 ] ],32) votes for $mta.nick($1,%vote.nick. [ $+ [ $1 ] ]) [ $+ $calc($round($calc($mta.server($1).players / 2),0) - $numtok(%vote.voters. [ $+ [ $1 ] ],32)) more votes needed] [ $+ $timer(vote [ $+ [ $1 ] ]).secs seconds left] } } } on *:SIGNAL:mta.part:{ if ($2 = %vote.nick. [ $+ [ $1 ] ]) mta.cancel.votekick $1 } alias mta.cancel.votekick { mta.text $1 Vote kick cancelled: $mta.nick($1,%vote.nick. [ $+ [ $1 ] ]) unset %vote.nick. [ $+ [ $1 ] ] unset %vote.voters. [ $+ [ $1 ] ] } Wordsban Script by Scooby on *:SIGNAL:mta.command: { if (($3 == !banword) || ($3 == !unbanword)) { pgs.banword $1- } elseif ($3 == !banwords) mta.text $1 There are currently $lines(pgs.banwords.txt) banned words } alias pgs.banword { if ($mta.level($1,$2) < 5) mta.pm $1 $2 Error: Level 5 Admins Only! elseif ($3 == !banword) { if (!$4) mta.pm $1 $2 Error: !banword else { var %a = 1,%b = $lines(pgs.banwords.txt) while (%a <= %b) { if ($4 iswm $read(pgs.banwords.txt,%a)) { mta.pm $1 $2 Error: Word Already Banned! !halt } !inc %a } !write pgs.banwords.txt $4 mta.text $1 $+(',$4,') added to banned words list } } elseif ($3 == !unbanword) { if (!$4) mta.pm $1 $2 Error: !unbanword else { var %a = 1,%b = $lines(pgs.banwords.txt) while (%a <= %b) { if ($4 iswm $read(pgs.banwords.txt,%a)) { !write -ds $+ $4 pgs.banwords.txt mta.text $1 $+(',$4,') removed from banned words list %a = $calc(%b + 2) } !inc %a } if (%a == $calc(%b + 1)) mta.pm $1 $2 Error: $4 Is Not Banned. } } } alias pgs.bannedwords { var %a = 1,%b = $3-,%c = $lines(pgs.banwords.txt) while (%a <= %c) { if ($read(pgs.banwords.txt,%a) iswm %b) { ;punsihment for use of a banned word mta.pm $1 $2 $+(',$read(pgs.banwords.txt,%a),') Is A Banned Word! Muted For 60 Secs mta.mute $1 $2 .timerunmute $+ $2 1 60 mta.unmute $1 $2 %a = %c } !inc %a } } on *:SIGNAL:mta.text: { pgs.bannedwords $1- }
  20. I only know I made it and you're banned
  21. that has nothing to do with this, and there is another topic in the forum with this today, use Search!
  22. do it like this:!writeini -n " $+ $scriptdir $+ players.ini" PLAYERS $calc(players+1) or this !writeini -n " $+ $scriptdir $+ players.ini" PLAYERS $gus.add(players,1)
  23. do you have it in mta.mrc or in a seperate file?
×
×
  • Create New...