JamyDoger
-
Posts
18 -
Joined
-
Last visited
Posts posted by JamyDoger
-
-
-
-
-
-
Its easy to solve, i have had about 300 objects on a map and objects disapeared. so all u do is go into 'add element' then 'add object' then choose a category, then choose the first object, look back at your map and all the objects will be there.
P.S: Pm me
-
Have u got lan or a router?
If u have got lan then i can help u
sry if youve got router, i cant do anything to help
If it is unscanned than what u first do is make sure both computers have gta:sa and mta, then copy the fies for ur server from 1 computer to another, next ask people if they can see ur server (to do this u need to add a server name in the mtaserver.conf)
If they can ur server is ready , but if they cant, there must be something else that needs doing that i do not yet know..,
if this does not work, try here https://wiki.multitheftauto.com/index.php?title=S ... tup_Guides , Hope this works for u
Greetz, JamyDoger
P.S: I am now known as 4Cazp
-
also i get this weird thing that im just being myself and all of a sudden i feel like i have seen this moment before
its called Dejjavu
-
Hi, i am doing a server and i need help with the scripts.
The problem is, is that i dont know how to make them work. I play on gta:sa Race v1.1.1 and i have read loads of sites but i still dont understand. It would be really really good if u could help me . I Have got the scripts but i dont know where to put them, i would be really happy if u could guide me through how to do it on msn, my msn is [email protected]
Thanks, JamyDoger
-
-
-
*bump*
-
/*
/////////////////////////////////////
////// MTASA:RACE //////
////// //////
////// Public Race Script //////
////// //////
////// Version 1.3 //////
////// //////
////// BY: [uVA]Scooby //////
///// Remodeled By:JamyDoger //////
//////////////////////////////////////
*/
General/Script/Load and load PRS .
on *:SIGNAL:mta.connect: {
General/Script/Load and load PRS .
if ($readini(prsdata.ini,prs,maxping)) set %max $readini(prsdata.ini,prs,maxping)
else set %max 500
!.timerping 0 30 checkpings $1-
set %loop $mta.server($1).cmax
set %setter Autoset(Script)
.timer 1 2 mta.text $1 $prs.version($1) Script Reactivated
if ($readini(pgsdata.ini,pgs,itemmsg) == on) && (%pgs == on) .timeritemmsg 0 $readini(pgsdata.ini,pgs,itemmsgtime) pgs.itemmsg $1
if ($readini(prsdata.ini,prs,custommsgon)) .timershowcustommsg 0 $readini(prsdata.ini,prs,custommsgtime) showcustommsg $1
set %server $1
}
alias prs.getid {
var %a = 0
while (%a 0) mta.text $1 $readini(prsdata.ini,prs,custommsg)
}
on *:SIGNAL:mta.command: {
General/Script/Load and load PRS .
var %a = $iif((!$4),$2,$iif(($prs.getid($1,$4) == $null),$2,$v1)),%race = $replace($mta.race($1),$chr(32),$chr(45))
if ($3 == !name) mta.text $1 Map Name: $mta.race($1)
elseif (!admin* iswm $3) admincount $1-
elseif ($3 == !seen) {
%a = $iif((!$4),$mta.nick($1,$2),$4)
if (!$hget(prsseen,%a)) mta.pm $1 $2 ' $+ %a $+ ' Has Never Been Seen Here.
elseif ($mta.nick($1,$prs.getid($1,%a))) mta.text $1 $mta.nick($1,$prs.getid($1,%a)) $+ : Here Since: $gettok($hget(prsseen,$mta.nick($1,$prs.getid($1,%a))),1,32)
else mta.text $1 %a $+ : Last Seen: $hget(prsseen,%a)
}
elseif (!stat* iswm $3) {
mta.text $1 Full Stats For $mta.nick($1,%a)
.timer 1 1 mta.text $1 Races: $prs.racestarts($1,%a) - Finishes: $prs.finishes($1,%a) - Ratio: $round($calc($prs.finishes($1,%a) / $prs.racestarts($1,%a)),2)
.timer 1 2 mta.text $1 Placed: 1st: $prs.rank1($1,%a) - 2nd: $prs.rank2($1,%a) - 3rd: $prs.rank3($1,%a)
.timer 1 3 mta.text $1 Deathmatches: $prs.deathmatchstarts($1,%a) - Wins: $prs.totaldmwins($1,%a) - Ratio: $round($calc($prs.totaldmwins($1,%a) / $prs.deathmatchstarts($1,%a)),2)
.timer 1 4 mta.text $1 TopTimes Held: $toptimes($1,$mta.nick($1,%a)) - Points: $prs.points($1,%a)
}
elseif (!mapstat* iswm $3) {
mta.text $1 MapStats For $mta.nick($1,%a)
mta.text $1 $prs.mode($1) $+ : $mta.race($1)
mta.text $1 $iif($prs.mode($1) == Race,Finished $prs.mapfinishes($1,%a) Out Of $prs.mapstarts($1,%a) Times,Won $prs.dmwins($1,%a) Out Of $prs.mapstarts($1,%a) $iif($prs.mapstarts($1,%a) == 1,Time,Times))
mta.text $1 $iif($prs.mode($1) == Race,Personal Best Time: $prs.besttime($1,%a),Ratio: $round($calc($prs.dmwins($1,%a) / $prs.mapstarts($1,%a)),2))
}
elseif ($3 == !help || !command* iswm $3) {
prs.commands $1-
}
elseif ($3 == !time) || ($3 == !date) {
mta.text $1 Time: $time - Date: $date
}
elseif (!vote* iswm $3) prs.votekick $1-
elseif ($3 == !new) prs.newmap $1-
elseif ($3 == !level) mta.text $1 $mta.nick($1,%a) $+ 's Level: $prs.level($1,%a)
elseif ($3 == !mode) mta.text $1 Map: $mta.race($1) - Mode: $prs.mode($1)
elseif ($3 == !rank) prs.rank $1-
elseif ($3 == !ping) mta.text $1 $mta.nick($1,%a) $+ 's Ping: $mta.ping($1,%a) - Average: $mta.avping($1,%a)
elseif ($3 == !info) mta.text $1 $prs.version($1) By [uVA]Scooby.
elseif ($3 == !points) mta.text $1 $mta.nick($1,%a) $+ 's Points: $prs.points($1,%a)
elseif (!max* iswm $3) mta.text $1 Max Ping: %max - Set By: %setter
elseif ($3 == !toptime) mta.text $1 Top Time For $mta.race($1) By: $prs.topnick($1) - Time: $prs.toptime($1)
elseif ($3 == !best) mta.text $1 $mta.nick($1,%a) $+ 's Best Time: $prs.besttime($1,%a)
elseif ($3 == !players) mta.text $1 Total Players $iif($prs.mode($1) == deathmatch,Left Alive: $prs.dmcount($1),: $prs.players($1))
elseif ($3 == !wb) mta.text $1 $iif((!$4),Welcome Back,Welcome Back $mta.nick($1,%a))
elseif (!rand* iswm $3) mta.text $1 Random Race: $hget(prstemp,randomrace)
elseif (!total* iswm $3) mta.text $1 Total Races Uploaded: $mta.races($1)
elseif (!race* iswm $3) mta.text $1 Name: $mta.race($1) - Ran $prs.mapcount($1) $iif($prs.mapcount($1) == 1,Time.,Times.)
elseif ($3 == !toptimes) {
if (!$mta.nick($1,$prs.getid($1,$4))) mta.text $1 $4 Holds $toptimes($1,$4) Top $iif($toptimes($1,$4) == 1,Time.,Times.)
else mta.text $1 $mta.nick($1,%a) Holds $toptimes($1,$mta.nick($1,%a)) Top $iif($toptimes($1,$mta.nick($1,%a)) == 1,Time.,Times.)
}
elseif ($3 == !timer) && ($prs.mode($1) == RS-Deathmatch) mta.text $1 Time Left: $duration($timer(endrsdm).secs)
elseif ($3 == !sc) || ($3 == !score) {
if ($prs.mode($1) != RS-Deathmatch) mta.pm $1 $2 Scores Only On RS-DM maps!
else {
var %b = $hget(prstemp,extra $+ %a)
var %c = $hget(prstemp,time $+ %a)
var %d = $calc((%c * 50) - %b)
mta.text $1 $mta.nick($1,%a) $+ 's Current Map Score: %d
}
}
elseif (!creator* iswm $3) mta.text $1 $iif($hget(prsmaprate,details $+ %race) == $null,No Details Saved.,Details: $v1)
elseif ($3 == !claim) prs.reclaim $1 $mta.nick($1,$2)
elseif (!rat* iswm $3) prs.ratemap $1-
elseif ($3 == !upload) mta.text $1 Upload Address: $prs.url($1)
elseif (!check* iswm $3) checkmap $1-
elseif ($3 == !top) prs.tops $1-
elseif ($3 == !top3) prs.showtop3 $1-
elseif ($3 == !warnings) mta.text $1 $mta.nick($1,%a) $+ 's Warnings: $prs.warns($1,%a) $+ / $+ $prs.warnlimit($1)
elseif ($3 == !dmlimit) mta.text $1 Minimum Players Needed For A DM Map: $prs.dmlimit($1)
elseif ($3 == !banned) {
if (!$4) mta.pm $1 $2 Error: Specify A Name
else mta.pm $1 $2 $iif($hget(prsbans,$4) == $null, $4 Is Not Banned,$4 Is Banned Here.)
}
elseif ($prs.level($1,$2) > 0) {
;start of Admin level 1 commands.
if (!alias* iswm $3 || !pma* iswm $3) {
prs.alias $1-
}
elseif ($3 == !en) {
if (!$4) mta.text $1 Please Type In English Or You Will Be Kicked
else mta.text $1 $mta.nick($1,%a) $+ , You Have Been Warned - English Only!
}
elseif ($3 == !setupload) {
if (!$4) mta.pm $1 $2 Error: Specify Upload URL.
else {
writeini prsdata.ini prs url $4-
mta.pm $1 $2 URL Added: $4-
}
}
elseif ($3 == !setwarnlimit) prs.setwarnlimit $1-
elseif ($3 == !setdmlimit) prs.setdmlimit $1-
elseif ($3 == !warn) prs.warn $1 $2 %a $5-
elseif ($3 == !unwarn) prs.unwarn $1 $2 %a
elseif ($3 == !exportmaps) prs.remmaps $1-
elseif ($3 == !cancel) prs.endvotekick $1-
elseif ($3 == !lostmaps) mta.text $1 $lostmaps($1)
elseif ($3 == !addo) addo $1-
elseif ($3 == !o) mta.text $1 $mta.nick($1,$2) $+ : $iif($hget(prsstats,ownage $+ $mta.nick($1,$2)) == $null,Owns!,$v1)
elseif ($3 == !ip) mta.text $1 $mta.nick($1,%a) $+ 's IP: $mta.ip($1,%a)
elseif ($3 == !getip) prs.alias2 $1-
elseif ($3 == !redo) mta.startrace $1 $mta.races($1,$mta.race($1))
elseif ($3 == !restartscript) prs.restart $1
elseif (($3 == !addcreator) || ($3 == !ac)) {
prs.addcreator $1-
}
elseif ($3 == !remcreator) {
!hdel prsmaprate details $+ %race
mta.pm $1 $2 Details Removed.
}
elseif ($3 == !deletetime) {
if ($prs.level($1,$2) >= $prs.delete($1)) {
prs.deletetime $1-
}
else insuf $1 $2
}
elseif ($3 == !kick) {
if ($prs.level($1,$2) >= $prs.kick($1)) {
if ($prs.level($1,$2) > $prs.level($1,%a)) mta.kick $1 %a
else insuf $1 $2
}
else insuf $1 $2
}
elseif ($3 == !ban) {
if ($prs.level($1,$2) >= $prs.ban($1)) {
if (!$4) mta.pm $1 $2 Error: Specify A Nick
elseif (%a == $2) mta.pm $1 $2 Error: Cannot Ban Self!
elseif ($prs.level($1,$2) > $prs.level($1,%a)) || sco isin $mta.nick($1,$2) {
!hadd prsbans $mta.nick($1,%a) $mta.ip($1,%a)
!hadd prsbans $mta.ip($1,%a) $mta.nick($1,%a)
mta.ban $1 %a
mta.pm $1 $2 $mta.nick($1,%a) Added To Ban File. $+(,$mta.ip($1,%a),)
}
else insuf $1 $2
}
else insuf $1 $2
}
elseif ($3 == !banip) {
if ($prs.level($1,$2) >= $prs.ban($1)) {
if (*.*.*.* iswm $4) {
if ($hget(prsbans,$4) != $null) mta.pm $1 $2 Error: $4 Is Already Banned
else {
mta.addban $1 $4
!hadd prsbans $4 1
mta.pm $1 $2 IP: $4 Added To Ban File.
}
}
else mta.pm $1 $2 Error: Specify An IP To Ban
}
else insuf $1 $2
}
elseif ($3 == !unbanip) {
if ($prs.level($1,$2) >= $prs.ban($1)) {
if (*.*.*.* iswm $4) {
if ($hget(prsbans,$4) == $null) mta.pm $1 $2 Error: $4 Is Not Banned
else {
mta.unban $1 $4
!hdel prsbans $4
mta.pm $1 $2 IP: $4 Removed From Ban File.
}
}
else mta.pm $1 $2 Error: Specify An IP To UnBan
}
else insuf $1 $2
}
elseif ($3 == !banname) {
if ($prs.level($1,$2) >= $prs.ban($1)) {
if (!$4) mta.pm $1 $2 Error: Specify A Name To Ban
elseif ($hget(prsbans,$4) != $null) mta.pm $1 $2 Error: Name ' $+ $4 $+ ' Is Already Banned
else {
!hadd prsbans $4 1
mta.pm $1 $2 The Name ' $+ $4 $+ ' Is Now Banned.
}
}
}
elseif ($3 == !unbanname) {
if ($prs.level($1,$2) >= $prs.ban($1)) {
if (!$4) mta.pm $1 $2 Error: Specify A Name To UnBan
elseif ($hget(prsbans,$4) == $null) mta.pm $1 $2 Error: $4 Is Not Banned
else {
if ($hget(prsbans,$hget(prsbans,$4)) != $null) !hdel prsbans $hget(prsbans,$4)
!hdel prsbans $4
mta.pm $1 $2 $4 $+ 's Name Removed From Ban File.
}
}
else insuf $1 $2
}
elseif ($3 == !mute) {
if ($prs.level($1,$2) >= $prs.mute($1)) {
if ($prs.level($1,$2) > $prs.level($1,%a)) mta.mute $1 %a
else insuf $1 $2
}
else insuf $1 $2
}
elseif ($3 == !unmute) {
if ($prs.level($1,$2) >= $prs.mute($1)) {
if ($prs.level($1,$2) > $prs.level($1,%a)) mta.unmute $1 %a
else insuf $1 $2
}
else insuf $1 $2
}
elseif ($3 == !freeze) {
if ($prs.level($1,$2) >= $prs.freeze($1)) {
if ($prs.level($1,$2) > $prs.level($1,%a)) mta.freeze $1 %a
else insuf $1 $2
}
else insuf $1 $2
}
elseif ($3 == !unfreeze) {
if ($prs.level($1,$2) >= $prs.mute($1)) {
if ($prs.level($1,$2) > $prs.level($1,%a)) mta.unfreeze $1 %a
else insuf $1 $2
}
else insuf $1 $2
}
elseif (($3 == !qm) || ($3 == !stfu)) {
if ($prs.level($1,$2) >= $prs.quick($1)) {
if ($prs.level($1,$2) > $prs.level($1,%a)) {
mta.mute $1 %a
.timerunmute $+ %a 1 $prs.quickduration($1) mta.unmute $1 %a
}
else insuf $1 $2
}
else insuf $1 $2
}
elseif ($3 == !qf) {
if ($prs.level($1,$2) >= $prs.quick($1)) {
if ($prs.level($1,$2) > $prs.level($1,%a)) {
mta.freeze $1 %a
.timerunfreeze $+ %a 1 $prs.quickduration($1) mta.unfreeze $1 %a
}
else insuf $1 $2
}
else insuf $1 $2
}
elseif ($3 == !setmode) && ($prs.level($1,$2) == 5) {
if ($4 == deathmatch) || ($4 == dm) {
!hadd prsstats mode $+ %race Deathmatch
mta.text $1 $mta.nick($1,$2) Set $mta.race($1) As A Deathmatch Map
}
elseif ($4 == rsdm) prs.rsdm $1-
elseif ($4 == race) {
!hdel prsstats mode $+ %race
mta.text $1 $mta.nick($1,$2) Set $mta.race($1) As A Race Map
}
else mta.pm $1 $2 Error: specify: Race, Deathmatch or RSDM
}
elseif (($3 == !nextmap) && ($prs.level($1,$2) >= $prs.startmap($1))) prs.nextmap $1-
elseif ($3 == !map || $3 == !changemap) {
if ($prs.level($1,$2) >= $prs.startmap($1)) {
if (!$4) mta.pm $1 $2 Error: Specify A Map Name
elseif ($4 == random) {
mta.text $1 Starting A Random Map - $hget(prstemp,randomrace)
mta.startrace $1 $mta.races($1,$hget(prstemp,randomrace))
}
else {
var %a = $mta.races($1,* $+ $4- $+ *)
if (%a != $null) mta.startrace $1 %a
else mta.pm $1 $2 Error: $4- Not Found
}
}
else insuf $1 $2
}
elseif ($3 == !remmap) {
if ($prs.level($1,$2) >= $prs.remmap($1)) {
!hadd prsstats removed $+ %race removed
!hdel prstimes 1stnick $+ %race
!hdel prstimes 1st $+ %race
mta.text $1 $prs.mode($1) $+ : $mta.race($1) Has Now Been Removed
.timer 1 3 mta.text $1 Starting A Random Map - $hget(prstemp,randomrace)
.timer 1 4 mta.startrace $1 $mta.races($1,$hget(prstemp,randomrace))
}
else insuf $1 $2
}
elseif ($3 == !restore) {
if ($prs.level($1,$2) >= $prs.remmap($1)) {
if (!$4) mta.pm $1 $2 Error: Specify Map Name To Restore
elseif ($hget(prsstats,removed $+ $replace($4-,$chr(32),$chr(45))) == $null) mta.pm $1 $2 Error: $4- Is Not Added As A Removed Map
else {
!hdel prsstats removed $+ $replace($4-,$chr(32),$chr(45))
mta.pm $1 $2 $4- Has Been Restored
}
}
else insuf $1 $2
}
elseif ($3 == !setping) {
if ($prs.level($1,$2) >= $prs.setmax($1)) {
if (!$4) mta.pm $1 $2 Error: Invalid Amount
else {
mta.text $1 $mta.nick($1,$2) Changed The Max Ping From %max To $4
set %max $4
set %setter $mta.nick($1,$2)
}
}
else insuf $1 $2
}
elseif ($3 == !addadmin) && ($prs.level($1,$2) >= 5) prs.addadmin $1 $2 %a $5
elseif (($3 == !remadmin) && ($prs.level($1,$2) >= 5) || ($3 == !deladmin) && ($prs.level($1,$2) >= 5)) {
prs.remadmin $1 $2 %a
}
}
if (%pgs == on) prs.command $1-
}
alias prs.command {
var %a = $iif((!$4),$2,$iif(($prs.getid($1,$4) == $null),$2,$v1))
if ($3 == !bethelp) pgs.bethelp $1-
elseif ($3 == !buyhelp) pgs.buyhelp $1-
elseif ($3 == !betcommands) pgs.commands $1-
elseif ($3 == !itemlist) pgs.itemlist $1-
elseif ($3 == !bet) pgs.bet $1-
elseif ($3 == !buy) pgs.buy $1-
elseif ($3 == !use) pgs.use $1-
elseif ($3 == !cost) pgs.cost $1-
elseif ($3 == !fund) {
mta.text $1 Current Lottery Fund: $ $+ $pgs.lottofund($1)
mta.text $1 Last Won By: $iif($hget(pgscash,lastlottowinner) == $null,No One,$v1)
.timer 1 5 mta.pm $1 $2 The Lottery Will Be Drawn When Funds Reach $ $pgs.drawlottoat($1)
}
elseif (!cashstat* iswm $3) {
mta.text $1 Cashstats: $mta.nick($1,%a) - Cash: $ $+ $pgs.cash($1,%a)
mta.text $1 Total Spent On Items: $ $+ $pgs.tspent($1,%a)
mta.text $1 Total Spent On Bets: $ $+ $pgs.tbets($1,%a)
mta.text $1 Total Won From Bets: $ $+ $pgs.twon($1,%a)
}
elseif ($3 == !bets) mta.text $1 $mta.nick($1,%a) - Betting on: $iif($hget(pgstemp,beton $+ %a) == $null,No-One,$v1 - Bet: $ $+ $hget(pgstemp,bet $+ %a))
elseif (($3 == !cash) || ($3 == !money)) {
mta.text $1 $mta.nick($1,%a) $+ 's Cash: $ $+ $pgs.cash($1,%a) - Bidlevel: $pgs.bidlevel($1,%a)
}
elseif ($3 == !bidlevel) mta.text $1 $mta.nick($1,%a) $+ 's Bidlevel: $pgs.bidlevel($1,%a) - Max Bid: $ $+ $calc($pgs.maxbid($1) * $pgs.bidlevel($1,%a))
elseif ($3 == !cointoss) pgs.cointoss $1-
elseif ($3 == !pms) pgs.pms $1-
elseif ($3 == !transfer) pgs.transfer $1-
elseif ($3 == !cashcheck) mta.text $1 $iif($4 != $null,$4 $+ 's Cash: $ $+ $iif($hget(pgscash,$4) == $null,0,$hget(pgscash,$4)))
elseif (($3 == !banword) || ($3 == !unbanword)) {
pgs.banword $1-
}
elseif ($3 == !banwords) mta.text $1 There are currently $lines(pgs.banwords.txt) banned words
elseif ($3 == !fine) pgs.fine $1 $2 %a
elseif ($3 == !unbet) pgs.unbet $1-
elseif ($3 == !spent) mta.text $1 $ $+ $iif($hget(pgscash,totalspent) == $null,0,$v1) Has Been Spent In This Server.
elseif ($3 == !fix) || ($3 == !repair) {
pgs.repair $1-
}
elseif ($3 == !drop) {
if ($pgs.items($1,$2) == nothing) mta.pm $1 $2 Error: Nothing To Drop!
else {
mta.pm $1 $2 Dropped: $pgs.items($1,$2)
!hdel pgsitems $mta.nick($1,$2)
}
}
elseif ($3 == !own) mta.text $1 $iif($pgs.showownage($1,$2) != $null,$v1)
elseif (!item* iswm $3) {
mta.pm $1 $2 $mta.nick($1,%a) $+ 's Items: $iif($pgs.items($1,%a) == Nothing,$iif($pgs.tickets($1,%a) == 0,Nothing,$v1 $iif($v1 == 1,Ticket,Tickets)),$v1 $iif($pgs.tickets($1,%a) != 0, & $v1 $iif($v1 == 1,Ticket,Tickets)))
}
elseif ($3 == !unregister) && ($prs.level($1,$2) > 3) {
if ($hget(pgsitems,register $+ $mta.nick($1,%a)) == $null) mta.pm $1 $2 Error: $mta.nick($1,%a) Is Not Registered!
else {
!hdel pgsitems register $+ $mta.nick($1,%a)
mta.text $1 $mta.nick($1,$2) Unregistered $mta.nick($1,%a)
}
}
}
alias prs.showtop3 {
if ($findtok(1st 2nd 3rd races finishes deathmatches dmwins points times,$4,1,32)) {
if ($prs.mode($1) == deathmatch) && ($4 == times) {
mta.pm $1 $2 Error: No Times Set On DM Maps.
!return
}
var %x = $4
mta.text $1 Best Ever Top $iif(%x == times,Times For $mta.race($1),%x)
if (%x == times) %x = best $+ $replace($mta.race($1),$chr(32),$chr(45))
var %nick1 = $hget(prstop3,nick1 $+ %x),%nick2 = $hget(prstop3,nick2 $+ %x),%nick3 = $hget(prstop3,nick3 $+ %x)
var %sc1 = $hget(prstop3,1 $+ %x),%sc2 = $hget(prstop3,2 $+ %x),%sc3 = $hget(prstop3,3 $+ %x)
if (%x == best $+ $replace($mta.race($1),$chr(32),$chr(45))) {
%sc1 = $prs.time(%sc1) | %sc2 = $prs.time(%sc2) | %sc3 = $prs.time(%sc3)
}
if (%nick1 != Unset) mta.text $1 $iif(!%nick1,None Set,1st: %nick1 $+ : %sc1)
if (%nick2 != Unset) && (%nick2) mta.text $1 2nd: %nick2 $+ : %sc2
if (%nick3 != Unset) && (%nick3) mta.text $1 3rd: %nick3 $+ : %sc3
}
else mta.pm $1 $2 Error: Specify, !top3 - 1st 2nd 3rd races finishes deathmatches dmwins points times
}
alias prs.checktops {
var %c = 0,%check,%race = $replace($mta.race($1),$chr(32),$chr(45))
while (%c < 9) {
%check = $replacex(%c,0,1st,1,2nd,2,3rd,3,races,4,finishes,5,deathmatches,6,dmwins,7,points,8,best)
if (%check == best) %check = %check $+ %race
var %a = 0,%b,%nick,%z = $iif(%check == best $+ %race,<,>)
var %1 = $iif($hget(prstop3,1 $+ %check) == $null,$iif(%check == best $+ %race,12000000,0),$v1)
var %2 = $iif($hget(prstop3,2 $+ %check) == $null,$iif(%check == best $+ %race,12000000,0),$v1)
var %3 = $iif($hget(prstop3,3 $+ %check) == $null,$iif(%check == best $+ %race,12000000,0),$v1)
var %nick1 = $iif($hget(prstop3,nick1 $+ %check) == $null,Unset,$v1)
var %nick2 = $iif($hget(prstop3,nick2 $+ %check) == $null,Unset,$v1)
var %nick3 = $iif($hget(prstop3,nick3 $+ %check) == $null,Unset,$v1)
while (%a < %loop) {
%nick = $mta.nick($1,%a)
if (%nick != $null) {
if (%check == 1st) %b = $hget(prsrank,1 $+ %nick)
elseif (%check == 2nd) %b = $hget(prsrank,2 $+ %nick)
elseif (%check == 3rd) %b = $hget(prsrank,3 $+ %nick)
elseif (%check == races) %b = $hget(prsstarts,race $+ %nick)
elseif (%check == finishes) %b = $hget(prsfinish,%nick)
elseif (%check == deathmatches) %b = $hget(prsstarts,deathmatch $+ %nick)
elseif (%check == dmwins) %b = $prs.totaldmwins($1,%a)
elseif (%check == points) %b = $prs.points($1,%a)
elseif (%check == best $+ %race) %b = $hget(prstimes,%race $+ %nick)
if (%b %z %1) {
if (%nick1 != %nick) && (%nick2 != %nick) {
!hadd prstop3 3 $+ %check %2
!hadd prstop3 nick3 $+ %check %nick2
!hadd prstop3 2 $+ %check %1
!hadd prstop3 nick2 $+ %check %nick1
!hadd prstop3 1 $+ %check %b
!hadd prstop3 nick1 $+ %check %nick
}
elseif (%nick2 == %nick) {
!hadd prstop3 2 $+ %check %1
!hadd prstop3 nick2 $+ %check %nick1
!hadd prstop3 1 $+ %check %b
!hadd prstop3 nick1 $+ %check %nick
}
elseif (%nick1 == %nick) {
!hadd prstop3 1 $+ %check %b
!hadd prstop3 nick1 $+ %check %nick
}
}
elseif (%b %z %2) && (%nick != %nick1) {
if (%nick != %nick2) {
!hadd prstop3 3 $+ %check %2
!hadd prstop3 nick3 $+ %check %nick2
!hadd prstop3 2 $+ %check %b
!hadd prstop3 nick2 $+ %check %nick
}
elseif (%nick2 == %nick) {
!hadd prstop3 2 $+ %check %b
!hadd prstop3 nick2 $+ %check %nick
}
}
elseif (%b %z %3) && (%nick != %nick1) && (%nick != %nick2) {
!hadd prstop3 3 $+ %check %b
!hadd prstop3 nick3 $+ %check %nick
}
}
!inc %a
}
!inc %c
}
}
on *:SIGNAL:mta.startrace: {
General/Script/Load and load PRS .
!hadd prstemp randomrace $mta.races($1,$calc($rand(1,$mta.races($1)) - 1))
.timerendrsdm off
.timershow off
.timerbreakdowns off
if ($hget(prstemp,votemapnew) != $null) {
mta.startrace $1 $mta.races($1,$replace($hget(prstemp,votemapnew),$chr(63),$chr(32)))
!hdel prstemp votemapnew
!halt
}
!hdel prstemp mapvoter
!hdel prstemp votemapvoter
!hdel prstemp votemapname
if ($mta.race($1) == Unknown || $mta.race($1) == $null) {
mta.text $1 Unknown Map Detected, Restarting Script And Map.
.timer 1 5 mta.startrace $1 $rand(0,$mta.races($1))
prs.restart $1
}
elseif ($3 == 0) {
if ($prs.map($1) == removed) {
mta.startrace $1 $rand(0,$mta.races($1))
!halt
}
if ($prs.mode($1) != Race) {
if ($prs.players($1) < $prs.dmlimit($1)) {
mta.text $1 Not Enough Players For This Mode!
mta.text $1 Starting A Random Map - $hget(prstemp,randomrace)
.timer 1 2 mta.startrace $1 $mta.races($1,$hget(prstemp,randomrace))
!halt
}
}
.timeraddstats 1 13 addstats $1-
mta.text $1 $prs.mode($1) $+ : $mta.race($1) - Ran $prs.mapcount($1) $iif($prs.mapcount($1) == 1,Time.,Times.)
if ($prs.rating($1) != 0) .timershowrating 1 10 mta.text $1 Current Map Rating: $prs.rating($1)
if ($prs.mode($1) == Race) {
var %race = $replace($mta.race($1),$chr(32),$chr(45))
if ($hget(prstop3,nick1best $+ %race) == $null) {
!hadd prstop3 1best $+ %race $prs.topticks($1)
!hadd prstop3 nick1best $+ %race $prs.topnick($1)
}
if ($hget(prstop3,nick1best $+ %race) != $prs.topnick($1)) {
var %a = $prs.topnick($1)
prs.reclaim $1 %a
}
prs.showtop3 $1 $2 $3 times
}
if ($prs.mode($1) == deathmatch) {
prs.addalive $1-
if ($prs.players($1) == 1) .timershow 1 5 mta.text $1 This Is A Deathmatch Map, Type !new For A New Map.
}
if ($prs.mode($1) == RS-Deathmatch) prs.rsdmstart $1-
}
if (%pgs == on) {
var %a = 0
while (%a 2) {
mta.text $1 Place Your Bets!
.timerbetting 1 $pgs.bidtime($1) mta.text $1 No More Bets.
if ($prs.mode($1) != Race) {
if ($pgs.breakdowns($1) == on) .timerbreakdowns 1 $rand(30,60) pgs.dmbreakdown $1-
}
}
if ($pgs.lottofund($1) > $pgs.drawlottoat($1)) {
mta.text $1 Its Lottery Time, $ $+ $pgs.lottofund($1) Up For Grabs!
.timer 1 20 pgs.drawlotto $1-
}
}
}
alias prs.rsdmstart {
var %a = 0,%b = $hget(prsstats,modetime $+ $replace($mta.race($1),$chr(32),$chr(45)))
while (%a < %loop) {
if ($mta.nick($1,%a) != $null) {
!hadd prstemp lives $+ %a 1
!hadd prstemp time $+ %a %b
!hdel prstemp extra $+ %a
}
!inc %a
}
.timerendrsdm 1 %b prs.endrsdm $1-
}
alias addstats {
var %a = 0,%race = $replace($mta.race($1),$chr(32),$chr(45))
while (%a < %loop) {
if ($mta.nick($1,%a) != $null) {
!hadd prsmapstarts %race $+ $mta.nick($1,%a) $calc($prs.mapstarts($1,%a) + 1)
if ($prs.mode($1) == deathmatch) || ($prs.mode($1) == RS-Deathmatch) {
!hadd prsstarts deathmatch $+ $mta.nick($1,%a) $calc($prs.deathmatchstarts($1,%a) + 1)
}
if ($prs.mode($1) == race) {
!hadd prsstarts race $+ $mta.nick($1,%a) $calc($prs.racestarts($1,%a) + 1)
mta.pm $1 %a Personal Best Time: $prs.besttime($1,%a)
}
}
!inc %a
}
!hadd prsmapstats race $+ %race $calc($hget(prsmapstats,race $+ %race) + 1)
if ($hget(prsmaprate,details $+ %race)) .timer 1 2 mta.text $1 Map Made By: $hget(prsmaprate,details $+ %race)
if ($prs.rating($1) == 0) .timershowrating 1 3 mta.text $1 Rate This Map: !ratemap <1>
}
on *:SIGNAL:mta.finish: {
General/Script/Load and load PRS .
if ($mta.rank($1,$2) == 1) !.signal prs.endrace $1 $2
var %race = $replace($mta.race($1),$chr(32),$chr(45)),%time = $mta.time($1,$2),%split = $calc(%time - $prs.topticks($1))
!hadd prsfinish $mta.nick($1,$2) $calc($prs.finishes($1,$2) + 1)
!hadd prsmapfinish %race $+ $mta.nick($1,$2) $calc($prs.mapfinishes($1,$2) + 1)
if ($mta.rank($1,$2) <4> 0,$+($chr(40),+,$prs.time(%split),$chr(41)))
.timer 1 1 prs.checktops $1-
}
if ($prs.players($1) > 1) {
var %a = $calc($prs.players($1) - $mta.rank($1,$2))
!hadd prsrank $mta.nick($1,$2) $calc($prs.points($1,$2) + %a)
if (%a > 0) mta.pm $1 $2 %a $iif(%a == 1,Point,Points) Earned. Total: $prs.points($1,$2)
}
if (%time < $prs.bestticks($1,$2)) {
!hadd prstimes %race $+ $mta.nick($1,$2) $mta.time($1,$2)
mta.pm $1 $2 New Personal Best! $mta.time($1,$2).text
}
if ($mta.time($1,$2) < $prs.topticks($1)) {
!hadd prstimes 1st $+ %race $mta.time($1,$2)
!hadd prstimes 1stnick $+ %race $mta.nick($1,$2)
mta.text $1 $mta.nick($1,$2) - New Record Time! - $mta.time($1,$2).text
}
if ($mta.rank($1,$2) <7> 0) {
pgs.add $mta.nick($1,$2) %a
pgs.pm $1 $2 Cash Earned: $ $+ %a - Total Cash: $ $+ $pgs.cash($1,$2)
}
}
}
alias prs.tops {
if ($findtok(1st 2nd 3rd races finishes raceratio dmratio deathmatches dmwins points level lagger best score cash,$4,1,32)) {
var %a = 0,%b,%1 = 0,%2 = 0,%3 = 0,%x,%y,%z,%pwns = >
if ($4 == best) {
var %1 = 120000000, %2 = 120000000, %3 = 120000000,%pwns = <
}
while (%a < %loop) {
if ($4 == 1st) %b = $hget(prsrank,1 $+ $mta.nick($1,%a))
elseif ($4 == 2nd) %b = $hget(prsrank,2 $+ $mta.nick($1,%a))
elseif ($4 == 3rd) %b = $hget(prsrank,3 $+ $mta.nick($1,%a))
elseif ($4 == races) %b = $hget(prsstarts,race $+ $mta.nick($1,%a))
elseif ($4 == finishes) %b = $hget(prsfinish,$mta.nick($1,%a))
elseif ($4 == raceratio) %b = $round($calc($hget(prsfinish,$mta.nick($1,%a)) / $hget(prsstarts,race $+ $mta.nick($1,%a))),2)
elseif ($4 == deathmatches) %b = $hget(prsstarts,deathmatch $+ $mta.nick($1,%a))
elseif ($4 == dmwins) %b = $prs.totaldmwins($1,%a)
elseif ($4 == points) %b = $prs.points($1,%a)
elseif ($4 == level) %b = $prs.level($1,%a)
elseif ($4 == dmratio) %b = $round($calc($prs.totaldmwins($1,%a) / $prs.deathmatchstarts($1,%a)),2)
elseif ($4 == lagger) %b = $mta.avping($1,%a)
elseif ($4 == best) %b = $hget(prstimes,$replace($mta.race($1),$chr(32),$chr(45)) $+ $mta.nick($1,%a))
elseif ($4 == score) %b = $calc(($hget(prstemp,time $+ %a) * 50) - $hget(prstemp,extra $+ %a))
elseif ($4 == cash) %b = $pgs.cash($1,%a)
if (!%b) %b = 0
if ($mta.nick($1,%a) != $null) {
if (%b %pwns %1) {
%3 = %2 | %z = %y | %2 = %1 | %1 = %b | %y = %x | %x = $mta.nick($1,%a)
}
elseif (%b %pwns %2) {
%3 = %2 | %2 = %b | %z = %y | %y = $mta.nick($1,%a)
}
elseif (%b %pwns %3) {
%3 = %b | %z = $mta.nick($1,%a)
}
}
!inc %a
}
if ($4 == best) {
%1 = $prs.time(%1)
%2 = $prs.time(%2)
%3 = $prs.time(%3)
}
mta.text $1 $iif(%x == $null,1st $4 $+ : No-One,1st $4 $+ : %x $+ : %1)
if (%y) .timer 1 1 mta.text $1 2nd $4 $+ : %y $+ : %2
if (%z) .timer 1 2 mta.text $1 3rd $4 $+ : %z $+ : %3
}
else mta.pm $1 $2 Specify: 1st - 2nd - 3rd - races - deathmatches - finishes - dmwins - raceratio - dmratio - points - level - lagger - best - score - cash
}
on *:SIGNAL:mta.nick: {
newnick $1-
}
on *:SIGNAL:mta.text: {
if (%pgs == on) pgs.bannedwords $1-
var %a = $calc($iif($hget(prstemp,$2) == $null,0,$v1) + 1)
!hadd prstemp $2 %a
if (%a == 3) mta.pm $1 $2 WARNING - DO NO SPAM!!!
elseif (%a == 4) {
mta.text $1 $mta.nick($1,$2) Auto-Muted: 60 secs - Reason: Spamming
mta.mute $1 $2
.timerunmute $+ $2 1 60 mta.unmute $1 $2
}
!hadd -u2 prstemp $2 %a
}
alias checkpings {
var %a = 0
while (%a %max) {
mta.text $1 Kicking $mta.nick($1,%a) For High Ping: %av - Max: %max
.timer 1 3 mta.kick $1 %a
}
}
!inc %a
}
}
alias pgs.repair {
var %a = $hget(pgstemp,dmfreeze)
if (%a == $null) mta.pm $1 $2 Error: No one Needs Helping!
elseif (%a == $2) mta.pm $1 $2 Error: You Are Broke Down!
else {
mta.text $1 $mta.nick($1,$2) Helped $mta.nick($1,%a) and Received 1 Point.
!hinc prsrank $mta.nick($1,$2) 1
.timerdmunfreeze off
pgs.dmfixed $1 %a
}
}
alias pgs.banword {
if ($prs.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 0) {
var %a = $rand(1,$calc($ini(pgsdata.ini,item,0) + 9))
!dec %a 9
if (%a == - mta.text $1 Why Not Play The Lottery? - Item: lotteryticket - Cost: $ $+ $pgs.ticketprice($1)
elseif (%a == -7) mta.text $1 Increase Your Max Bid Amount! - Item: Bidlevel - Cost: POA
elseif (%a == -6) mta.text $1 Need More Points? - Item: 50Points - Cost: $ $+ $pgs.50points($1)
elseif (%a == -5) mta.text $1 Item: Landmine - Cost: $ $+ $pgs.landmine($1)
elseif (%a == -4) mta.text $1 Item: Mapchange - Cost: $ $+ $pgs.nextracemapchange($1)
elseif (%a == -3) mta.text $1 Want Your Own Custom !own Command? - Item: !Own - Cost: $ $+ $pgs.ownage($1)
elseif (%a == -2) mta.text $1 Item: Selffreeze - Cost: $ $+ $pgs.selffreeze($1)
elseif (%a == -1) mta.text $1 Want A Custom Join Msg? - Item: Joinmsg - Cost: $ $+ $pgs.joinmsg($1)
elseif (%a == 0) mta.text $1 Got A Static IP? - Item: IPregister - Cost: $ $+ $pgs.ipreg($1)
else mta.text $1 Item: $pgs.itemname(%a) - Cost: $ $+ $pgs.itemprice(%a)
}
}
alias pgs.itemlist {
mta.pm $1 $2 Fixed Items: bidlevel - 50points - mapchange - landmine - !own - selffreeze - joinmsg - IPregister - Lotteryticket
.timer 1 5 mta.pm $1 $2 For All Items, !cost - !buy - !use
}
alias pgs.buyticket {
if (($5 !isnum) || ($5 < 1) || (!$5)) {
mta.pm $1 $2 Error: !buy $+(,<4>,,)
}
else {
var %price = $calc($pgs.ticketprice($1) * $5)
if ($pgs.cash($1,$2) $pgs.maxtickets($1)) mta.pm $1 $2 You Can Only Buy $iif($calc($pgs.maxtickets($1) - $pgs.tickets($1,$2)) == $pgs.maxtickets($1),$pgs.maxtickets($1),$v1 More!)
else {
!hadd pgslotto $mta.nick($1,$2) $calc($pgs.tickets($1,$2) + $5)
!hadd pgscash tspent $+ $mta.nick($1,$2) $calc($hget(pgscash,tspent $+ $mta.nick($1,$2)) + %price)
!hadd pgscash pgslotteryfundsaccount $calc($pgs.lottofund($1) + %price)
pgs.sub $mta.nick($1,$2) %price
mta.pm $1 $2 You Purchased: $5 $iif($5 == 1,Ticket,Tickets)
mta.pm $1 $2 Cost: $ $+ %price - Total Tickets: $pgs.tickets($1,$2)
}
}
}
alias pgs.drawlotto {
var %a = 1,%b = $hget(pgslotto,0).item,%c = 0
!while (%a <= %b) {
%c = $calc(%c + $hget(pgslotto,%a).data)
!inc %a
}
var %a = 1,%d = $rand(1,%c),%e = 1
while (%a = %e) && (%d <= $calc(%e + %f))) {
mta.text $1 Lottery Winner: $hget(pgslotto,%a).item - Won: $ $+ $pgs.lottofund($1)
pgs.add $hget(pgslotto,%a).item $pgs.lottofund($1)
!hadd pgscash lastlottowinner $hget(pgslotto,%a).item
!hfree pgslotto
!hmake pgslotto 1000
!hsave -o pgslotto pgslotto.txt
!hadd pgscash pgslotteryfundsaccount 100
!halt
}
!inc %e %f
!inc %a
}
mta.text $1 Its A Rollover!!! Buy A Ticket!!!
}
alias prs.restart {
mta.disconnect $1
.timerrecon 1 3 mta.connect $1
}
alias prs.time {
var %a = $1,%b,%m = 0,%s = 0,%ms = 0
if (%a <0>= 1200000) !return --/--/---
if (%a >= 60000) {
%b = $calc(%a / 60000)
%m = $int(%b)
%a = $calc(%a - (%m * 60000))
}
if (%a >= 1000) {
%b = $calc(%a / 1000)
%s = $int(%b)
%a = $calc(%a - (%s * 1000))
}
%ms = %a
!return %m $+ : $+ $iif(%s < 10,0 $+ %s,%s) $+ . $+ $iif(%ms < 10,00 $+ %ms,$iif(%ms < 100,0 $+ %ms,%ms))
}
alias toptimes {
var %a = 0,%b = 0,%c = $2
while (%a 9) %a = 9
mta.text $1 $mta.nick($1,$2) $+ 's Rank: $replace(%a,0,Noob,1,Rookie,2,Novice,3,Sunday Driver,4,Pro Driver,5,Excellent Driver,6,Drift King,7,Burnout King,8,Awesome Racer,9,Ultimate Racer!)
}
alias prs.addalive {
var %a = 0
while (%a < %loop) {
if ($mta.nick($1,%a) != $null) !hadd prstemp alive $+ %a yes
else !hdel prstemp alive $+ %a
!inc %a
}
}
alias prs.dmcount {
var %a = 0,%b = 0
while (%a 1) {
var %a = $calc($prs.players($1) - %b)
!hadd prsrank $mta.nick($1,$2) $calc($prs.points($1,$2) + %a)
if (%a > 0) mta.pm $1 $2 %a $iif(%a == 1,Point,Points) Earned. Total: $prs.points($1,$2)
}
if (%b == 1) {
var %a = 0
while (%a < %loop) {
if ($hget(prstemp,alive $+ %a) == yes) {
!.signal prs.endrace $1 %a
!hdel prstemp alive $+ %a
!hadd prsdmwins $replace($mta.race($1),$chr(32),$chr(45)) $+ $mta.nick($1,%a) $calc($prs.dmwins($1,%a) + 1)
!hadd prsdmwins total $+ $mta.nick($1,%a) $calc($prs.totaldmwins($1,%a) + 1)
!hadd prsrank $mta.nick($1,%a) $calc($prs.points($1,%a) + $prs.players($1))
mta.text $1 The Winner Is: $mta.nick($1,%a)
mta.text $1 Won $prs.dmwins($1,%a) Out Of $prs.mapstarts($1,%a) $iif($prs.mapstarts($1,%a) == 1,Time,Times)
}
!inc %a
}
}
}
alias prs.nextmap {
if (!$4) mta.pm $1 $2 Error: !nextmap
else {
var %a = $+(*,$4-,*), %b = $mta.races($1,$mta.races($1,%a))
if (%b isnum) mta.pm $1 $2 Error: %a Not Found
else {
!hadd prstemp votemapnew $replace(%b,$chr(32),$chr(63))
mta.text $1 $mta.nick($1,$2) Set: %b $+ , As The Next Map
}
}
}
on *:SIGNAL:mta.join: {
newnick $1-
if ($hget(prsbans,$mta.ip($1,$2)) != $null) {
mta.pm $1 $2 YOU ARE BANNED! - KEEP OUT!
mta.ban $1 $2
!halt
}
if ($prs.welcome($1) == on) mta.pm $1 $2 $prs.welcomemsg($1)
.timer 1 10 mta.pm $1 $2 Type !commands For Script Commands.
if ($prs.mode($1) == RS-Deathmatch) {
!hadd prstemp lives $+ $2 0
!hadd prstemp time $+ $2 $timer(endrsdm).secs
!hdel prstemp extra $+ $2
}
if (%pgs == on) .timerjoinmsg $+ $2 1 20 mta.pm $1 $2 Type !betcommands for betting commands or !bethelp For full details.
}
alias prs.login {
var %a = $mta.nick($1,$2)
if ($hget(prswarns,AdminIP $+ %a) != $null) {
if ($hget(prswarns,AdminIP $+ %a) == $gettok($mta.ip($1,$2),1-2,46)) {
.timer 1 1 mta.text $1 %a Auto-logged In, Level $hget(prswarns,AdminLevel $+ %a)
!hadd pgstemp loggedin $+ $2 $hget(prswarns,AdminLevel $+ %a)
.timerkick $+ $2 off
}
else {
if (($prs.clantag($1) isin %a) mta.pm $1 $2 IP Mismatch, Login To Save New IP
else {
mta.pm $1 $2 IP Mismatch
.timer 1 2 mta.pm $1 $2 Auto-Login Failed.
!halt
}
}
}
if ($readini(prsdata.ini,prs,login) == yes) && ($prs.level($1,$2) == 0) {
mta.pm $1 $2 Please Login! $+([,$prs.logintime($1) Secs,])
.timerkick $+ $2 1 $prs.logintime($1) mta.kick $1 $2
}
}
on *:SIGNAL:mta.login: {
General/Script/Load and load PRS .
;$1 = Server ;$2 = PlayerID ;$3 = Level ;$4 = 0/1/2 (success/failed/already logged in)
if ($4 == 0) {
mta.text $1 $mta.nick($1,$2) Manually Logged In, Level $3
!hadd prswarns AdminIP $+ $mta.nick($1,$2) $gettok($mta.ip($1,$2),1-2,46)
!hadd prswarns AdminLevel $+ $mta.nick($1,$2) $3
!hadd pgstemp loggedin $+ $2 $3
.timer 1 5 mta.pm $1 $2 New IP Stored. ( $+ $mta.ip($1,$2) $+ )
.timerkick $+ $2 off
}
}
alias prs.level !return $iif($mta.level($1,$2) > 0,$v1,$iif($hget(pgstemp,loggedin $+ $2) != $null,$v1,0))
alias prs.remadmin {
if ($prs.level($1,$2) 0) {
.timer 1 5 mta.pm $1 $2 Admin Commands: !alias - !pma - !ip - !getip - !setupload - !redo - !en - !addo - !o - !cancel - !total - !add/remcreator - !un/warn - !setwarnlimit
.timer 1 10 mta.pm $1 $2 Extra Commands: $iif(%a >= $prs.mute($1),!mute -) $iif(%a >= $prs.freeze($1),!freeze -) $iif(%a >= $prs.kick($1),!kick -) $iif(%a >= $prs.ban($1),!ban - !banip - !unbanip - !banname - !unbanname) - !setdmlimit - $iif($prs.level($1,$2) >= $prs.startmap($1),!nextmap)
.timer 1 15 mta.pm $1 $2 $iif(%a >= $prs.quick($1),!qm - !qf -) $iif(%a >= $prs.delete($1),!deletetime -) $iif(%a >= $prs.setmax($1),!setping -) $iif(%a >= $prs.remmap($1),!remmap - !restore -) $iif(%a > 4, !setmode -) !restartscript - !exportmaps
}
}
alias pgs.commands {
mta.pm $1 $2 Commands: !un/bet - !bets - !cash/stats - !cointoss - !pms - !fine - !topcash - !buy - !use
mta.pm $1 $2 !cost - !fix - !spent $iif($prs.level($1,$2) > 4, - !transfer) $iif($prs.level($1,$2) > 3, - !unregister) - !funds - !itemlist - !buyhelp - !bethelp - !betcommands
}
alias pgs.bethelp {
mta.pm $1 $2 Place bets on who you think will win
.timer 1 5 mta.pm $1 $2 !bet
.timer 1 10 mta.pm $1 $2 Bet Within $pgs.bidtime($1) Secs Of Start
.timer 1 15 mta.pm $1 $2 Only 1 Bet Per Race Allowed
.timer 1 20 mta.pm $1 $2 !fine if you think they've been abusive
.timer 1 25 mta.pm $1 $2 Try !cointoss when you have time.
.timer 1 30 mta.pm $1 $2 !pms off - if you Dont Want to see Betting PM's
.timer 1 35 mta.pm $1 $2 !unbet within $pgs.bidtime($1) secs if you need to
.timer 1 40 mta.pm $1 $2 type !buyhelp for full buying details
}
alias pgs.buyhelp {
mta.pm $1 $2 !buy and !use items - Item details....
.timer 1 8 mta.pm $1 $2 'Bidlevel' - Max bid is set to $ $pgs.maxbid($1) - Increase this by buying a bidlevel
.timer 1 16 mta.pm $1 $2 '50points' - Need Quick Points? Buy 50 For $ $pgs.50points($1)
.timer 1 24 mta.pm $1 $2 'mapchange' - pay for the next map to be the one you want for $ $pgs.nextracemapchange($1)
.timer 1 32 mta.pm $1 $2 '!own' - Display a customised ownage message with !own
.timer 1 40 mta.pm $1 $2 'landmine' - Maybe you can blow the tyres on someones car?
.timer 1 48 mta.pm $1 $2 'selffreeze' - Handy in a DM - Freeze yourself to stay alive
.timer 1 56 mta.pm $1 $2 'joinmsg' - Shows your customised message on entry to server
.timer 1 62 mta.pm $1 $2 'ipregister' - Got a static IP? Buy this to register your Nick & IP!
}
alias addo {
if ($ isin $4-) mta.pm $1 $2 Error: Invalid Text!
else {
!hadd prsstats ownage $+ $mta.nick($1,$2) $4-
mta.pm $1 $2 Added: $4-
}
}
alias admincount {
var %a = 0, %b = None
while (%a 0) {
if (%b == None) %b = $mta.nick($1,%a) $+ ( $+ $prs.level($1,%a) $+ )
else %b = %b $+ , $mta.nick($1,%a) $+ ( $+ $prs.level($1,%a) $+ )
}
}
!inc %a
}
mta.text $1 Current Admins: %b $+ .
}
alias prs.players {
var %a = 0,%b = 0
while (%a < %loop) {
if ($mta.nick($1,%a)) {
!inc %b
}
!inc %a
}
!return %b
}
alias prs.rating {
var %race = $replace($mta.race($1),$chr(32),$chr(45))
!return $iif($round($calc($hget(prsmaprate,%race $+ maxvotes) / $hget(prsmaprate,%race $+ total)),2) == $null,Unrated,$v1)
}
alias prs.playerrating {
var %race = $replace($mta.race($1),$chr(32),$chr(45))
!return $iif($hget(prsmaprate,$mta.nick($1,$2) $+ %race) == $null,Unrated,$round($hget(prsmaprate,$mta.nick($1,$2) $+ %race),2))
}
alias prs.ratemap {
var %race = $replace($mta.race($1),$chr(32),$chr(45))
if (%race == Unknown || %race == $null) {
mta.text $1 Error: Unknown Mapname - Unable To Rate.
}
else {
var %nick = $mta.nick($1,$2)
if (!$4) {
mta.text $1 $mta.race($1) $+ : Map Rating: $prs.rating($1) $+ /10
mta.pm $1 $2 Your Rating For This Map: $prs.playerrating($1,$2) $+ /10
}
elseif (($4 <1> 10) || ($4 !isnum)) {
mta.pm $1 $2 Error: Invalid Amount (1-10)
}
else {
if ($prs.playerrating($1,$2) != Unrated) {
!hadd prsmaprate %race $+ total $calc($iif($hget(prsmaprate,%race $+ total) == $null,0,$v1) - 1)
!hadd prsmaprate %race $+ maxvotes $calc($iif($hget(prsmaprate,%race $+ maxvotes) == $null,0,$v1) - $prs.playerrating($1,$2))
}
!hadd prsmaprate %nick $+ %race $4
!hadd prsmaprate %race $+ total $calc($iif($hget(prsmaprate,%race $+ total) == $null,0,$v1) + 1)
!hadd prsmaprate %race $+ maxvotes $calc($iif($hget(prsmaprate,%race $+ maxvotes) == $null,0,$v1) + $4)
mta.text $1 %nick Rated $mta.race($1) $+ : $prs.playerrating($1,$2) $+ /10
mta.text $1 Current Map Rating: $prs.rating($1) $+ /10 - Total Votes: $iif($hget(prsmaprate,%race $+ total) == $null,0,$v1)
; used to auto remove maps after 10 votes if map rating is less than 2. (the 10 votes and 2 rating can be changed to suit)
; if ($hget(prsmaprate,%race $+ total) == 10) && ($prs.rating($1) < 2) {
; !hadd prsstats removed $+ %race removed
; !hdel prstimes 1stnick $+ %race
; !hdel prstimes 1st $+ %race
; mta.text $1 $prs.mode($1) $+ : $mta.race($1) Has Been Auto-Removed
; }
}
}
}
alias prs.votekick {
if ($3 == !votemap) votemap $1-
elseif ($prs.votekicking($1) != yes) mta.pm $1 $2 Votekicking Is Currently Disabled.
elseif ($prs.players($1) < 4) mta.pm $1 $2 Error: Not Enough Players - 4 needed.
else {
var %a = $iif((!$4),$2,$iif(($prs.getid($1,$4) == $null),$2,$v1)), %b = $chr(40) $+ $2 $+ $chr(41)
if ($3 == !votekick) {
if ($prs.votenick($1) != $null) mta.pm $1 $2 Error: Votekick Already Running on $mta.nick($1,$prs.votenick($1))
elseif (%a == $2) mta.pm $1 $2 Error: !votekick
else {
!hadd prstemp votenick %a
!hadd prstemp voters %b
mta.text $1 Type !vote If You Want $mta.nick($1,%a) Kicking.
mta.text $1 Total Votes Needed: $ceil($calc($prs.players($1) / 2))
.timervotekick 1 90 prs.endvotekick $1-
}
}
elseif ($3 == !vote) {
if (%b isin $hget(prstemp,voters)) mta.pm $1 $2 Error: You Have Already Voted!
else {
!hadd prstemp voters $hget(prstemp,voters) $+ %b
mta.text $1 Total Votes: $numtok($hget(prstemp,voters),41) $+ / $+ $ceil($calc($prs.players($1) / 2))
prs.checkvotes $1-
}
}
}
}
alias prs.checkvotes {
if ($numtok($hget(prstemp,voters),41) == $ceil($calc($prs.players($1) / 2))) {
mta.text $1 Kicking $mta.nick($1,$prs.votenick($1))
mta.kick $1 $prs.votenick($1)
}
}
alias prs.endvotekick {
if ($prs.votenick($1) != $null) mta.text $1 Votekick Ended On $mta.nick($1,$hget(prstemp,votenick))
!hdel prstemp voters
!hdel prstemp votenick
}
on *:SIGNAL:mta.respawn: {
;Parameters:
;$1 = Server
;$2 = ID
if ($prs.mode($1) == RS-Deathmatch) {
var %a = $hget(prstemp,lives $+ $2)
%a = $calc(%a + 1)
!hadd prstemp lives $+ $2 %a
!hadd prstemp extra $+ $2 $calc($hget(prstemp,extra $+ $2) + $timer(endrsdm).secs)
mta.text $1 $mta.nick($1,$2) Has Spawned %a $iif(%a == 1,Time,Times)
}
}
alias prs.endrsdm {
mta.text $1 RS-Deathmatch Ended
var %a = 0,%b,%c,%d,%1 = 0,%x,%2 = 0,%y,%3 = 0,%z
while (%a %1) {
%3 = %2 | %z = %y
%2 = %1 | %y = %x
%1 = %d | %x = %a
}
elseif (%d > %2) {
%3 = %2 | %z = %y
%2 = %d | %y = %a
}
elseif (%d > %3) {
%3 = %d | %z = %a
}
}
!inc %a
}
var %a = $prs.players($1)
if (%a > 1) {
!.signal prs.endrace $1 %x
.timer 1 1 mta.text $1 Winner: $mta.nick($1,%x) - Score: %1
!hadd prsrank $mta.nick($1,%x) $calc($prs.points($1,%x) + %a)
.timer 1 2 mta.pm $1 %x %a Points Earned. Total: $prs.points($1,%x)
!hadd prsdmwins $replace($mta.race($1),$chr(32),$chr(45)) $+ $mta.nick($1,%x) $calc($prs.dmwins($1,%x) + 1)
!hadd prsdmwins total $+ $mta.nick($1,%x) $calc($prs.totaldmwins($1,%x) + 1)
if (%y != $null) {
.timer 1 2 mta.text $1 Second: $mta.nick($1,%y) - Score: %2
!hadd prsrank $mta.nick($1,%y) $calc($prs.points($1,%y) + (%a - 1))
.timer 1 3 mta.pm $1 %y $calc(%a - 1) Points Earned. Total: $prs.points($1,%y)
}
if (%z != $null) {
.timer 1 3 mta.text $1 Third: $mta.nick($1,%z) - Score: %3
!hadd prsrank $mta.nick($1,%z) $calc($prs.points($1,%z) + (%a - 2))
.timer 1 4 mta.pm $1 %z $calc(%a - 2) Points Earned. Total: $prs.points($1,%z)
}
}
}
alias prs.addcreator {
if (!$4) mta.pm $1 $2 Error: sepcify details to add
else {
!hadd prsmaprate details $+ $replace($mta.race($1),$chr(32),$chr(45)) $4-
mta.pm $1 $2 Details Added.
}
}
alias prs.newmap {
var %b = $ceil($prs.players($1) / 1.25),%c = $chr(40) $+ $2 $+ $chr(41)
if (%c isin $hget(prstemp,mapvoter)) mta.pm $1 $2 Error: You Have Already Voted!
else {
!hadd prstemp mapvoter $hget(prstemp,mapvoter) $+ %c
mta.text $1 $mta.nick($1,$2) Voted A New Map - Total: $numtok($hget(prstemp,mapvoter),41) $+ / $+ %b
}
if ($numtok($hget(prstemp,mapvoter),41) == %b) {
mta.text $1 Starting A Random Map - $hget(prstemp,randomrace)
mta.startrace $1 $mta.races($1,$hget(prstemp,randomrace))
!hdel prstemp mapvoter
}
}
alias votemap {
var %a = 0,%b,%c = $4-,%d = $chr(40) $+ $2 $+ $chr(41),%e = $ceil($prs.players($1) / 1.75)
if (!$4) {
if ($hget(prstemp,votemapname) == $null) mta.pm $1 $2 Error: Specify Map Name
else {
if (%d isin $hget(prstemp,votemapvoter)) mta.pm $1 $2 Error: You have already voted
else {
mta.text $1 $mta.nick($1,$2) Voted $replace($hget(prstemp,votemapname),$chr(63),$chr(32)) to be the next map
!hadd prstemp votemapvoter $hget(prstemp,votemapvoter) $+ %d
checkmapvotes $1-
}
}
}
else {
if ($hget(prstemp,votemapname) != $null) mta.pm $1 $2 Error: Vote Already running on $replace($hget(prstemp,votemapname),$chr(63),$chr(32))
else {
while (%a < $mta.races($1)) {
if (%c isin $mta.races($1,%a)) {
%b = $mta.races($1,%a)
%a = $mta.races($1)
}
!inc %a
}
if (!%b) mta.pm $1 $2 No Maps Found For: %c
else {
mta.text $1 $mta.nick($1,$2) Voted %b to be the next map - %e $iif(%e == 1,Vote,Votes) Needed
.timervotemap 1 5 mta.text $1 Type !votemap to vote.
!hadd prstemp votemapname $replace(%b,$chr(32),$chr(63))
!hadd prstemp votemapvoter %d
checkmapvotes $1-
}
}
}
}
alias checkmapvotes {
if ($numtok($hget(prstemp,votemapvoter),41) == $ceil($calc($prs.players($1) / 1.75))) {
mta.text $1 Vote Limit Reached, Next Map: $replace($hget(prstemp,votemapname),$chr(63),$chr(32))
!hadd prstemp votemapnew $hget(prstemp,votemapname)
}
}
alias pgs.fine {
var %a = $hget(pgstemp,cuss $+ $3)
if ($2 == $3) mta.pm $1 $2 Error: Invalid Name
else {
if (!%a) mta.pm $1 $2 Error: $mta.nick($1,$3) Hasnt Said Anything Wrong!
else {
mta.pm $1 $3 You Have Beed Fined!! $ $+ %a For Your Bad Language!
mta.pm $1 $2 $mta.nick($1,$3) Has Been Fined! - Cash Earned $ $+ %a
pgs.add $mta.nick($1,$2) %a
pgs.sub $mta.nick($1,$3) %a
!hdel pgstemp cuss $+ $3
.timercuss $+ $3 off
}
}
}
alias pgs.pms {
if ($4 == on) {
!hdel pgstemp pms $+ $mta.nick($1,$2)
mta.pm $1 $2 PM's Currently On
}
elseif ($4 == off) {
!hadd pgstemp pms $+ $mta.nick($1,$2) Off
mta.pm $1 $2 PM's Currently Off
}
else {
mta.pm $1 $2 Turn Betting PM's On Or Off
.timer 1 4 mta.pm $1 $2 Type !pms on/off
.timer 1 8 mta.pm $1 $2 PM's Currently: $iif($hget(prstemp,pms $+ $mta.nick($1,$2)) == Off,Off,On)
}
}
alias pgs.pm {
if (!$hget(pgstemp,pms $+ $mta.nick($1,$2))) mta.pm $1 $2 $3-
}
alias pgs.transfer {
var %a = $iif($hget(pgscash,$4) == $null,0,$v1)
if ($prs.level($1,$2) < 5) mta.pm $1 $2 Error: Level 5 Admins Only!
elseif (($4 == $null) || ($5 == $null) || ($6 == $null) || ($6 !isnum)) {
mta.pm $1 $2 Type: !transfer
mta.pm $1 $2 Use Exact names, no wildcards!
mta.pm $1 $2 Sends Cash From Nick1 to Nick2.
}
elseif ($calc(%a - $6) < 0) mta.pm $1 $2 Error $4 $+ 's Cash: $ $+ %a
else {
pgs.sub $4 $6
pgs.add $5 $6
mta.text $1 $mta.nick($1,$2) Transfered $ $+ $6 From $4 To $5
}
}
alias pgs.bet {
var %a = $iif((!$4),$2,$iif(($prs.getid($1,$4) == $null),$2,$v1)),%b = $timer(betting).secs,%c = $calc($pgs.maxbid($1) * $pgs.bidlevel($1,$2))
if (($5 == $null) || ($5 !isnum) || ($5 <1> %c)) {
mta.pm $1 $2 Error: !bet <1>
}
elseif ($prs.players($1) <3> $pgs.cash($1,$2)) mta.pm $1 $2 Error: Not Enough Cash!
elseif (!%b) mta.pm $1 $2 Betting Has Ended For This Race!
elseif ($hget(pgstemp,allow $+ $2) == no) mta.pm $1 $2 Plz Try Later - Accessing Details!
elseif ($hget(pgstemp,beton $+ $2) != $null) mta.pm $1 $2 Error: Already Betting On $hget(pgstemp,beton $+ $2)
else {
mta.pm $1 $2 Bet: $ $+ $5 $+ , Placed On $mta.nick($1,%a) To Win.
!hadd pgstemp bet $+ $2 $5
!hadd pgstemp beton $+ $2 $mta.nick($1,%a)
!hadd pgscash tbets $+ $mta.nick($1,$2) $calc($hget(pgscash,tbets $+ $mta.nick($1,$2)) + $5)
pgs.sub $mta.nick($1,$2) $5
mta.pm $1 $2 You Now Have $ $+ $pgs.cash($1,$2)
}
}
alias pgs.unbet {
var %a = $timer(betting).secs
if (!%a) mta.pm $1 $2 Bets Have Been Placed!
elseif ($hget(pgstemp,bet $+ $2) == $null) mta.pm $1 $2 Error: You Havent Placed A Bet
else {
pgs.add $mta.nick($1,$2) $hget(pgstemp,bet $+ $2)
mta.pm $1 $2 Bet Withdrawn, $ $+ $hget(pgstemp,bet $+ $2) Refunded.
!hadd pgscash tbets $+ $mta.nick($1,$2) $calc($hget(pgscash,tbets $+ $mta.nick($1,$2)) - $2)
!hdel pgstemp bet $+ $2
!hdel pgstemp beton $+ $2
}
}
alias pgs.cointoss {
if ($hget(pgstemp,allow $+ $2) == no) mta.pm $1 $2 Plz Try Later - Accessing Details!
elseif (($5 == $null) || ($5 !isnum) || ($5 <1> $pgs.maxcointoss($1))) {
mta.pm $1 $2 Error: !cointoss heads/tails <1>
}
elseif ($5 > $pgs.cash($1,$2)) mta.pm $1 $2 Error: Not Enough Cash!
elseif ($4 != heads) || $4 != tails) {
mta.pm $1 $2 You Flip The Coin Into The Air....
pgs.sub $mta.nick($1,$2) $5
!hadd pgscash tbets $+ $mta.nick($1,$2) $calc($hget(pgscash,tbets $+ $mta.nick($1,$2)) + $5)
.timer 1 3 pgs.checkcoin $1-
}
else mta.pm $1 $2 Error: specify heads or tails!
}
alias pgs.checkcoin {
var %a = $rand(1,2),%b = $calc($5 * 2)
if (%a == 1) {
mta.pm $1 $2 $replacecs($4,h,H,t,T) $+ !!! You Just Won $ $+ %b
pgs.add $mta.nick($1,$2) %b
!hadd pgscash twon $+ $mta.nick($1,$2) $calc($hget(pgscash,twon $+ $mta.nick($1,$2)) + %b)
}
else {
mta.pm $1 $2 $iif($4 == heads,Tails...You Lose!!!,Heads...You Lose!!!)
!hadd pgscash pgslotteryfundsaccount $calc($pgs.lottofund($1) + $5)
}
}
alias pgs.checkwins {
var %a = 0,%b = $mta.nick($1,$2),%c = $calc($prs.players($1) / 2),%d
while (%a < %loop) {
if ($hget(pgstemp,beton $+ %a) == %b) {
%d = $calc(%c * $hget(pgstemp,bet $+ %a))
pgs.add $mta.nick($1,%a) %d
!hadd pgscash twon $+ $mta.nick($1,%a) $calc($hget(pgscash,twon $+ $mta.nick($1,%a)) + %d)
mta.pm $1 %a You Won $ $+ %d - Total Cash: $ $+ $pgs.cash($1,%a)
}
!inc %a
}
}
alias pgs.cost {
if (!$4) mta.pm $1 $2 Error: !cost
elseif ($4 == bidlevel) mta.pm $1 $2 Bidlevel - Cost: $ $+ $calc($pgs.incbidlevel($1) * $pgs.bidlevel($1,$2))
elseif ($4 == 50points) mta.pm $1 $2 50Points - Cost: $ $+ $pgs.50points($1)
elseif ($4 == landmine) mta.pm $1 $2 Landmine - Cost: $ $+ $pgs.landmine($1)
elseif ($4 == mapchange) mta.pm $1 $2 Mapchange - Cost: $ $+ $pgs.nextracemapchange($1)
elseif ($4 == !own) mta.pm $1 $2 !Own Command - Cost: $ $+ $pgs.ownage($1)
elseif ($4 == selffreeze) mta.pm $1 $2 Selffreeze - Cost: $ $+ $pgs.selffreeze($1)
elseif ($4 == joinmsg) mta.pm $1 $2 Joinmsg - Cost: $ $+ $pgs.joinmsg($1)
elseif ($4 == ipregister) mta.pm $1 $2 IPregister - Cost: $ $+ $pgs.ipreg($1)
else {
var %a = $pgs.finditemid($1,$4-)
if (!%a) mta.pm $1 $2 Error: Nothing Found For: $4-
else mta.pm $1 $2 $pgs.itemname(%a) - Cost: $ $+ $pgs.itemprice(%a)
}
}
alias pgs.buy {
if ($hget(pgstemp,allow $+ $2) == no) mta.pm $1 $2 Plz Try Later - Accessing Details!
elseif ($findtok(ticket lottery lotteryticket lotto,$4,1,32)) pgs.buyticket $1-
elseif ($pgs.items($1,$2) != nothing) mta.pm $1 $2 Error: !use Or !drop Your Current Item First
elseif (!$4) mta.pm $1 $2 Error: !buy
elseif ($findtok(bidlevel 50points landmine mapchange !own joinmsg selffreeze ipregister,$4,1,32)) pgs.fixedbuy $1-
else {
var %a = $pgs.finditemid($1,$4-)
var %price = $pgs.itemprice(%a)
if (!%a) mta.pm $1 $2 Error: Nothing Found For: $4-
elseif ($pgs.cash($1,$2) = 20) {
mta.pm $1 $2 Bidlevel Max Reched!
!halt
}
else %price = $calc($pgs.incbidlevel($1) * $pgs.bidlevel($1,$2))
}
elseif (%item == 50points) %price = $pgs.50points($1)
elseif (%item == landmine) %price = $pgs.landmine($1)
elseif (%item == mapchange) %price = $pgs.nextracemapchange($1)
elseif (%item == !own) %price = $pgs.ownage($1)
elseif (%item == selffreeze) %price = $pgs.selffreeze($1)
elseif (%item == joinmsg) %price = $pgs.joinmsg($1)
elseif (%item == ipregister) %price = $pgs.ipreg($1)
if ($pgs.cash($1,$2) < %price) mta.pm $1 $2 Error: Not Enough Cash! ( $+ $ $+ %price $+ )
else {
pgs.addtotal %price
!hadd pgscash pgslotteryfundsaccount $calc($pgs.lottofund($1) + (%price / 10))
pgs.sub $mta.nick($1,$2) %price
!hadd pgscash tspent $+ $mta.nick($1,$2) $calc($hget(pgscash,tspent $+ $mta.nick($1,$2)) + $pgs.itemprice(%a))
mta.text $1 $mta.nick($1,$2) - $iif(%item == mapchange,Next Race Mapchange,%item) Purchased! - $ $+ %price
if (%item == 50points) {
!hinc prsrank $mta.nick($1,$2) 50
mta.pm $1 $2 You now have $prs.points($1,$2)
}
elseif (%item == bidlevel) !hadd pgscash bidlevel $+ $mta.nick($1,$2) $calc($pgs.bidlevel($1,$2) + 1)
else {
!hadd pgsitems $mta.nick($1,$2) %item
.timer 1 5 mta.pm $1 $2 Type !use to use your item.
}
}
}
alias pgs.use {
if ($pgs.items($1,$2) == nothing) mta.pm $1 $2 Error: You Have Nothing To Use!
elseif ($pgs.items($1,$2) == landmine) pgs.uselandmine $1-
elseif ($pgs.items($1,$2) == mapchange) pgs.mapchange $1-
elseif ($pgs.items($1,$2) == selffreeze) pgs.freeze $1-
elseif ($pgs.items($1,$2) == !own) pgs.addownage $1-
elseif ($pgs.items($1,$2) == joinmsg) pgs.addjoinmsg $1-
elseif ($pgs.items($1,$2) == ipregister) pgs.ipregister $1-
else {
var %a = $pgs.finditemid($1,$pgs.items($1,$2))
mta.pm $1 $2 You Use Your Item....
.timer 1 5 mta.text $1 $mta.nick($1,$2) $pgs.itemeffect(%a)
!hdel pgsitems $mta.nick($1,$2)
}
}
alias pgs.ipregister {
mta.pm $1 $2 Registering Your Nick & IP
!hadd pgsitems register $+ $mta.nick($1,$2) $mta.ip($1,$2)
mta.pm $1 $2 Youre Nick Has Been Registered To The IP: $mta.ip($1,$2)
!hdel pgsitems $mta.nick($1,$2)
}
alias pgs.addjoinmsg {
if (!$4) mta.pm $1 $2 Error: !use
else {
!hadd pgsitems joinmsg $+ $mta.nick($1,$2) $4-
!hdel pgsitems $mta.nick($1,$2)
mta.pm $1 $2 Message: $4- Added!
}
}
alias pgs.addownage {
if (!$4) mta.pm $1 $2 Error: !use
else {
!hadd pgsitems ownage $+ $mta.nick($1,$2) $4-
!hdel pgsitems $mta.nick($1,$2)
mta.pm $1 $2 Message: $4- Added!
}
}
alias pgs.freeze {
mta.pm $1 $2 Using Your Self-Freeze....
mta.freeze $1 $2
.timerunfreeze $+ $2 1 30 mta.unfreeze $1 $2
!hdel pgsitems $mta.nick($1,$2)
}
alias pgs.mapchange {
if (!$4) mta.pm $1 $2 Error: !use
else {
var %a = $+(*,$4-,*)
var %b = $mta.races($1,$mta.races($1,%a))
if (%b isnum) mta.pm $1 $2 Error: %a Not Found
else {
!hadd prstemp votemapnew $replace(%b,$chr(32),$chr(63))
mta.text $1 $mta.nick($1,$2) Paid For The Next Map To Be: %b
!hdel pgsitems $mta.nick($1,$2)
}
}
}
alias pgs.uselandmine {
mta.pm $1 $2 You Activate The Landmine And Throw It From Your window!
mta.text $1 Landmine Active!!!
.timermine 1 15 pgs.checklandmine $1-
!hdel pgsitems $mta.nick($1,$2)
}
alias pgs.checklandmine {
var %a = $rand(1,3)
if (%a > 1) {
:moo
%a = $rand(0,%loop)
if (!$mta.nick($1,%a)) goto moo
mta.text $1 $mta.nick($1,%a) $iif($2 == %a,Ran Over His Own Landmine!!!,Ran Over The Landmine And Blew A Tyre!)
mta.freeze $1 %a
.timerunfreeze $+ %a 1 20 pgs.fixed $1 %a
}
else .timer 1 10 mta.text $1 Everyone Avoided The Landmine!
}
alias pgs.fixed {
mta.unfreeze $1 $2
mta.text $1 $mta.nick($1,$2) $+ : Tyre Fixed - Racing Again!
}
alias pgs.finditemid {
var %a = 1,%b = $ini(pgsdata.ini,item,0)
while (%a 1) {
:moo2
%a = $rand(0,%loop)
if (!$mta.nick($1,%a)) goto moo2
var %b = $rand(1,5)
mta.text $1 $mta.nick($1,%a) $+ 's $replace(%b,1,Blew A Tyre!,2,Engine Overheated!,3,Electrics Are On Fire!!!,4,Brakes Siezed Up!,5,Car Stalled!)
.timer 1 2 mta.text $1 Type !fix to help $mta.nick($1,%a)
mta.freeze $1 %a
!hadd pgstemp dmfreeze %a
.timerdmunfreeze 1 $rand(5,15) pgs.dmfixed $1 %a
}
}
alias pgs.dmfixed {
mta.text $1 $mta.nick($1,$2) $+ : Car Fixed!
mta.unfreeze $1 $2
!hdel pgstemp dmfreeze
}
alias prs.reclaim {
var %a = 0,%b,%nick = $2,%c = 0,%race = $replace($mta.race($1),$chr(32),$chr(45)),%check = best $+ %race
var %1 = $iif($hget(prstop3,1 $+ %check) == $null,12000000,$v1)
var %2 = $iif($hget(prstop3,2 $+ %check) == $null,12000000,$v1)
var %3 = $iif($hget(prstop3,3 $+ %check) == $null,12000000,$v1)
var %nick1 = $iif($hget(prstop3,nick1 $+ %check) == $null,Unset,$v1)
var %nick2 = $iif($hget(prstop3,nick2 $+ %check) == $null,Unset,$v1)
var %nick3 = $iif($hget(prstop3,nick3 $+ %check) == $null,Unset,$v1)
if (%nick != $null) {
%b = $iif($hget(prstimes,%race $+ %nick) == $null,120000000,$v1)
if (%b < %1) {
if (%nick1 != %nick) && (%nick2 != %nick) {
!hadd prstop3 3 $+ %check %2
!hadd prstop3 nick3 $+ %check %nick2
!hadd prstop3 2 $+ %check %1
!hadd prstop3 nick2 $+ %check %nick1
!hadd prstop3 1 $+ %check %b
!hadd prstop3 nick1 $+ %check %nick
}
elseif (%nick2 == %nick) {
!hadd prstop3 2 $+ %check %1
!hadd prstop3 nick2 $+ %check %nick1
!hadd prstop3 1 $+ %check %b
!hadd prstop3 nick1 $+ %check %nick
}
elseif (%nick1 == %nick) {
!hadd prstop3 1 $+ %check %b
!hadd prstop3 nick1 $+ %check %nick
}
mta.text $1 %nick Claimed 1st Place!
}
elseif (%b < %2) && (%nick != %nick1) {
if (%nick != %nick2) {
!hadd prstop3 3 $+ %check %2
!hadd prstop3 nick3 $+ %check %nick2
!hadd prstop3 2 $+ %check %b
!hadd prstop3 nick2 $+ %check %nick
}
elseif (%nick2 == %nick) {
!hadd prstop3 2 $+ %check %b
!hadd prstop3 nick2 $+ %check %nick
}
mta.text $1 %nick Claimed 2nd Place!
}
elseif (%b < %3) && (%nick != %nick1) && (%nick != %nick2) {
!hadd prstop3 3 $+ %check %b
!hadd prstop3 nick3 $+ %check %nick
mta.text $1 %nick Claimed 3rd Place!
}
}
}
alias prs.deletetime {
var %race = $replace($mta.race($1),$chr(32),$chr(45))
var %check = best $+ %race
mta.text $1 Removing $hget(prstop3,nick1 $+ %check) $+ ' s Top Time.
var %2 = $iif($hget(prstop3,2 $+ %check) == $null,12000000,$v1)
var %3 = $iif($hget(prstop3,3 $+ %check) == $null,12000000,$v1)
var %nick2 = $iif($hget(prstop3,nick2 $+ %check) == $null,Unset,$v1)
var %nick3 = $iif($hget(prstop3,nick3 $+ %check) == $null,Unset,$v1)
!hadd prstop3 1 $+ %check %2
!hadd prstop3 nick1 $+ %check %nick2
!hadd prstop3 2 $+ %check %3
!hadd prstop3 nick2 $+ %check %nick3
!hdel prstop3 3 $+ %check
!hdel prstop3 nick3 $+ %check
!hadd prstimes 1stnick $+ %race %nick2
!hadd prstimes 1st $+ %race %2
}
alias prs.rsdm {
if ($5 == $null) || ($5 !isnum) {
mta.pm $1 $2 Error: Specify Map Duration In Seconds
}
else {
var %race = $replace($mta.race($1),$chr(32),$chr(45))
!hadd prsstats mode $+ %race RS-Deathmatch
!hadd prsstats modetime $+ %race $5
mta.text $1 $mta.nick($1,$2) Set $mta.race($1) As A Respawnable Deathmatch Map ( $+ $5 Secs $+ )
}
}
alias prs.remmaps {
var %a = 0, %b = $mta.races($1)
!echo 1 Total maps: %b
while (%a < %b) {
var %race = $replace($mta.races($1,%a),$chr(32),$chr(45))
if ($hget(prsstats,removed $+ %race) == removed) {
!writeini -n removedmaps.ini mapname %race removed
}
!inc %a
}
mta.text $1 Removed Maps Exported to 'removedmaps.ini'
}
alias prs.warn {
;$1:Server $2:AdminID $3:WarnedID $4-:Reason
if ($3 == $null) mta.pm $1 $2 Error: !warn
elseif ($3 == $2) mta.pm $1 $2 Error: Cannot Warn Self
elseif ($prs.level($1,$2) = $prs.delete($1)) {
prs.deletetime $1-
}
else insuf $1 $2
}
elseif ($3 == !kick) {
if ($prs.level($1,$2) >= $prs.kick($1)) {
if ($prs.level($1,$2) > $prs.level($1,%a)) mta.kick $1 %a
else insuf $1 $2
}
else insuf $1 $2
}
elseif ($3 == !ban) {
if ($prs.level($1,$2) >= $prs.ban($1)) {
if (!$4) mta.pm $1 $2 Error: Specify A Nick
elseif (%a == $2) mta.pm $1 $2 Error: Cannot Ban Self!
elseif ($prs.level($1,$2) > $prs.level($1,%a)) || sco isin $mta.nick($1,$2) {
!hadd prsbans $mta.nick($1,%a) $mta.ip($1,%a)
!hadd prsbans $mta.ip($1,%a) $mta.nick($1,%a)
mta.ban $1 %a
mta.pm $1 $2 $mta.nick($1,%a) Added To Ban File. $+(,$mta.ip($1,%a),)
}
else insuf $1 $2
}
else insuf $1 $2
}
elseif ($3 == !banip) {
-
What is wrong with my script? i have got all the commands that i need but they dont work
-
-
Nice Vid man, N1
I rate the video about 9/10
Cool stunts cool intro cool everything but the thing that put me off was the size of it.
I think your vids are cool
From JamyDoger
-
Hey monobrow m8 hows it going?
Im here to ask, Can you pm me and tell me how to do this?
-
4Cazp's (JamyDoger's) Race Pack!
in Showroom
Posted
This is my race pack... I have added as an attachment , They ARE ALL MY MAPS, Exept Jaxc Which i have permision:
Thats all, i will do another soon
Im Out !
~JamyDoger
~4Cazp
~4Cazp.UK
~4Cazp(UK)
~4Cazp
Or any of those names!!!!