Si|ent Posted June 4, 2004 Author Share Posted June 4, 2004 Thats simple. just do a /timermsg 0 900 mta.say 1 blah blah 0 = repeat infinately, 900 = seconds delay between repeats (15 minutes) 1 = server in slot one Just add it to your mirc perform list. You can run as many as required just give them different names. /timerrules /timeradvert /timerhelp etc Link to comment
Chewd Posted June 4, 2004 Share Posted June 4, 2004 thank you for a fast reply Mr. Bump.. much appreicatd especially for one who doesn't know the first thing about scripting. Also... (off the subject) I thought I read somewhere that you made most (if not all) of the other game modes for mta and was wondering if your considering making anymore in the future? Sure you've had lots of suggestins made already and not looking for specifics... just curious if your going to persue that anymore. Thanxs.. Chewd Link to comment
andeh Posted June 4, 2004 Share Posted June 4, 2004 hi there are so many scripts now servers are starting to flood.. is there a way the script could pm? E.G someone says !stats and scripts PM to the person thx Link to comment
fastphp Posted June 4, 2004 Share Posted June 4, 2004 Hi all sorry for my bad english I have vrote a script en these is counting the visits of a visitor ; Visitor Counter alias mta.join { set %visits ($readini("MTAStats.ini",visits,$mta.name( $1 , $2 )) + 1) writeini -n "MTAStats.ini" visits $mta.name( $1 , $2 ) %visits mta.say $1 Welcome $mta.name($1,$2) this is your ($readini("MTAstats.ini",visits,$mta.name( $1 , $2 ))) visit here. } You can also update you stats Place this code in trou your stats Server visits: ($readini("MTAstats.ini",visits,$mta.name( $1 , $2 )) Ill hope my code is usefull to others Grz Michael Link to comment
Si|ent Posted June 4, 2004 Author Share Posted June 4, 2004 I thought I read somewhere that you made most (if not all) of the other game modes for mta Not sure what you mean by that, if you mean the mtama scripts then no, I didn't make them. Aeron did, i just told him exactly what id like them to do and how and why and he did his magic If you mean in mta itself then we don't really have gamemodes implemented as yet, they are to come in the future, unless u count stunt mode which i was responsible for yes. Link to comment
[RT]kooper Posted June 5, 2004 Share Posted June 5, 2004 i had an idea for a decent script which i cant be bothered makin at the mo cos im a bit busy at the moment, so i thought one of you pro script ppl can probably do it in about 10 seconds, so here goes... you vote for a specific person to be manhunt, and same rules apply but it turns off when you win/loose, thats it Link to comment
Oli Posted June 5, 2004 Share Posted June 5, 2004 took about 4 mins actually lol... ill send u later today m8 Link to comment
Aeron Posted June 5, 2004 Share Posted June 5, 2004 Hmmz i think we need a scripts archive... any one who can script php? Link to comment
=TmM= DuffBeer Posted June 5, 2004 Share Posted June 5, 2004 I'm sure there is ready made scripts for this type of forum. Link to comment
vass69 Posted June 5, 2004 Share Posted June 5, 2004 some1 really should make a syte with scripts then split them into categories and it would be easier than searching a thread with 30 pages Link to comment
fastphp Posted June 5, 2004 Share Posted June 5, 2004 Hi i have make a mistake The script what i have post yesterday is notworking ; Visitor Counter alias mta.join { set %visits ($readini("MTAStats.ini",visits,$mta.name( $1 , $2 )) + 1) writeini -n "MTAStats.ini" visits $mta.name( $1 , $2 ) %visits mta.say $1 Welcome $mta.name($1,$2) this is your ($readini("MTAstats.ini",visits,$mta.name( $1 , $2 ))) visit here. } Here is the script what is working ; Visitor Counter alias mta.join { set %visits $calc($readini("MTAStats.ini",visits,$mta.name($1,$2)) + 1) writeini -n "MTAStats.ini" visits $mta.name($1,$2) %visits mta.say $1 Welcome $mta.name($1,$2) this is your $calc($readini("MTAstats.ini",visits,$mta.name( $1 , $2 ))) visit here. } Grz Michael Link to comment
vass69 Posted June 5, 2004 Share Posted June 5, 2004 Hi i have make a mistakeThe script what i have post yesterday is notworking ; Visitor Counter alias mta.join { set %visits ($readini("MTAStats.ini",visits,$mta.name( $1 , $2 )) + 1) writeini -n "MTAStats.ini" visits $mta.name( $1 , $2 ) %visits mta.say $1 Welcome $mta.name($1,$2) this is your ($readini("MTAstats.ini",visits,$mta.name( $1 , $2 ))) visit here. } Here is the script what is working ; Visitor Counter alias mta.join { set %visits $calc($readini("MTAStats.ini",visits,$mta.name($1,$2)) + 1) writeini -n "MTAStats.ini" visits $mta.name($1,$2) %visits mta.say $1 Welcome $mta.name($1,$2) this is your $calc($readini("MTAstats.ini",visits,$mta.name( $1 , $2 ))) visit here. } Grz Michael hehe u should try the scripts before posting Link to comment
fastphp Posted June 5, 2004 Share Posted June 5, 2004 Yea i know but it was working on my server when i post him here ill check it but i have post the wrong script (the not working one) But it's now working Grz Michael Link to comment
vass69 Posted June 5, 2004 Share Posted June 5, 2004 Yea i know but it was working on my server when i post him here ill check it but i have post the wrong script (the not working one) But it's now working Grz Michael whats ur server? i mean where Link to comment
fastphp Posted June 5, 2004 Share Posted June 5, 2004 My server is in the netherlands (groningen) Link to comment
andeh Posted June 5, 2004 Share Posted June 5, 2004 } alias mta.part { %isoc. [ $+ [ $1 ] $+ . $+ [ $2 ] ] = false set %isoc. [ $+ [ $1 ] $+ . $+ [ $2 ] ] false } alias mta.text { if ( ([OC] isin $mta.name($1,$2)) && ( $3 == !setping ) ) { mta.say $1 $mta.name($1,$2) set the max ping to $4 set %max $4 } } alias checkpings { set %server 0 if ( %max == $null ) echo -a Maximum ping not set, pingkick off set %ping_counter $calc( %ping_counter + 1 ) if ( %ping_counter > 12 ) { set %ping_counter 0 } ; Check all servers ( 1 - 8 ) while ( %server < 9 ) { ; Check if server is online if ( %online. [ $+ [ %server ] ] == true ) { ; Check player 0 - 26 set %playerid 0 while ( %playerid < 27 ) { set %ping. [ $+ [ %server ] $+ . $+ [ %playerid ] $+ . $+ [ %ping_counter ] ] $mta.ping( %server , %playerid ) set %dummy 0 set %totalping 0 ; Bereken gemiddelde ping while ( %dummy < 13 ) { inc %totalping %ping. [ $+ [ %server ] $+ . $+ [ %playerid ] $+ . $+ [ %dummy ] ] inc %dummy 1 } set %averageping. [ $+ [ %server ] $+ . $+ [ %playerid ] ] $round($calc( %totalping / 13 ) , 0 ) ;echo -a %averageping. [ $+ [ %server ] $+ . $+ [ %playerid ] ] if ( %averageping. [ $+ [ %server ] $+ . $+ [ %playerid ] ] > %max ) { echo -a %server Kicking $mta.name( %server, %playerid ) for a ping of %averageping. [ $+ [ %server ] $+ . $+ [ %playerid ] ] , maximum is %max if ( %isoc. [ $+ [ %server ] $+ . $+ [ %playerid ] ] == false || !%isoc. [ $+ [ %server ] $+ . $+ [ %playerid ] ] ) { mta.say %server Kicking $mta.name( %server, %playerid ) for ping > %max mta.kick %server %playerid unset %averageping. [ $+ [ %server ] $+ . $+ [ %playerid ] ] unset %ping. [ $+ [ %server ] $+ . $+ [ %playerid ] $+ ] * } } ;echo -a %server - %playerid - %averageping. [ $+ [ %server ] $+ . $+ [ %playerid ] ] inc %playerid 1 } } inc %server 1 } unset %server } oli made me this script for [OC]-Clan server but it don't seem to work please help me Link to comment
vass69 Posted June 5, 2004 Share Posted June 5, 2004 } alias mta.part { %isoc. [ $+ [ $1 ] $+ . $+ [ $2 ] ] = false set %isoc. [ $+ [ $1 ] $+ . $+ [ $2 ] ] false } alias mta.text { if ( ([OC] isin $mta.name($1,$2)) && ( $3 == !setping ) ) { mta.say $1 $mta.name($1,$2) set the max ping to $4 set %max $4 } } alias checkpings { set %server 0 if ( %max == $null ) echo -a Maximum ping not set, pingkick off set %ping_counter $calc( %ping_counter + 1 ) if ( %ping_counter > 12 ) { set %ping_counter 0 } ; Check all servers ( 1 - 8 ) while ( %server < 9 ) { ; Check if server is online if ( %online. [ $+ [ %server ] ] == true ) { ; Check player 0 - 26 set %playerid 0 while ( %playerid < 27 ) { set %ping. [ $+ [ %server ] $+ . $+ [ %playerid ] $+ . $+ [ %ping_counter ] ] $mta.ping( %server , %playerid ) set %dummy 0 set %totalping 0 ; Bereken gemiddelde ping while ( %dummy < 13 ) { inc %totalping %ping. [ $+ [ %server ] $+ . $+ [ %playerid ] $+ . $+ [ %dummy ] ] inc %dummy 1 } set %averageping. [ $+ [ %server ] $+ . $+ [ %playerid ] ] $round($calc( %totalping / 13 ) , 0 ) ;echo -a %averageping. [ $+ [ %server ] $+ . $+ [ %playerid ] ] if ( %averageping. [ $+ [ %server ] $+ . $+ [ %playerid ] ] > %max ) { echo -a %server Kicking $mta.name( %server, %playerid ) for a ping of %averageping. [ $+ [ %server ] $+ . $+ [ %playerid ] ] , maximum is %max if ( %isoc. [ $+ [ %server ] $+ . $+ [ %playerid ] ] == false || !%isoc. [ $+ [ %server ] $+ . $+ [ %playerid ] ] ) { mta.say %server Kicking $mta.name( %server, %playerid ) for ping > %max mta.kick %server %playerid unset %averageping. [ $+ [ %server ] $+ . $+ [ %playerid ] ] unset %ping. [ $+ [ %server ] $+ . $+ [ %playerid ] $+ ] * } } ;echo -a %server - %playerid - %averageping. [ $+ [ %server ] $+ . $+ [ %playerid ] ] inc %playerid 1 } } inc %server 1 } unset %server } oli made me this script for [OC]-Clan server but it don't seem to work please help me seems the pass is missing in the [oc] part My server is in the netherlands (groningen)'im gonna visit ya and look at ur scripts Link to comment
Oli Posted June 5, 2004 Share Posted June 5, 2004 i purposefully did that, its just so OC ppl dont get kicked by it, not an admin script. I think ive found the prob anyways. Link to comment
Oli Posted June 6, 2004 Share Posted June 6, 2004 Here are several additions to the !ban script that most people use. These additions have the following features: !ban - logs the reason, date, time, ip and banner in an ini. !unban - checks the ini and unbans if they were banned. !banned - checks if has been banned and returns the reason, date, time and banner details. If a player is banned and then rejoins with the same name there is a warning saying they were banned. If a person joins with the same 2 or 3 parts of the ip of a banned person then the scrips warns of who was banned in that subnet. (this is basically a subnet warning for banned people, regardless of name). If a player is banned and then unbanned there is a warning of rejoining that they were unbanned by the name of the unbanner. This script is very useful for warning of people using proxies to get around bans as the admin is instantly aware of the details and can check the ip's further. alias mta.join { if ( $read(subnet.txt,w,$gettok($mta.ip($1,$2),1-2,46) ) ) { set %subnet $read(subnet.txt,w,$gettok($mta.ip($1,$2),1-2,46) ) set %network $gettok($mta.ip($1,$2),1-3,46) set %bannedname $readini( "MTAwarn.ini", subnets, %subnet ) set %bannedip $gettok($readini( "MTAwarn.ini", bannedip, %bannedname ),1-3,46) if ( %bannedip == %network ) { mta.say $1 Warning: $mta.name($1,$2) - First 3 ip groups match $readini( "MTAwarn.ini", subnets, %subnet ) $+ , who was banned. } else { mta.say $1 Warning: $mta.name($1,$2) - First 2 ip groups match $readini( "MTAwarn.ini", subnets, %subnet ) $+ , who was banned. } unset %subnet unset %network unset %bannedname unset %bannedip } elseif ( $readini( "MTAwarn.ini", main, $mta.name($1,$2) ) == 4 ) { mta.say $1 Warning: $mta.name($1,$2) has been previously banned. } elseif ( $readini( "MTAwarn.ini", main, $mta.name($1,$2) ) == 5 ) { mta.say $1 Warning: $mta.name($1,$2) was previously banned, but was unbanned by $readini( "MTAwarn.ini", unbanned, $mta.name($1,$2) ) } } alias mta.text { if ($3 == !ban && %isadmin. [ $+ [ $1 ] $+ . $+ [ $2 ] ] == true ) { if ( $mta.name($1,$mta.getid($1,$4)) == unknown ) { mta.say $1 $mta.name( $1 , $2 ) $+ : Error - unable to ban absent ID. } else { if ($5 != $null) { mta.say $1 $mta.name( $1 , $mta.getid($1,$4) ) ( $+ $mta.ip( $1 , $mta.getid($1,$4) ) $+ ) is banned by $mta.name( $1 , $2 ) $+ . Reason: $5- set %kicks $calc($readini("MTAScript.ini",kicks,$mta.name( $1 , $2 )) + 1) writeini -n "MTAScript.ini" kicks $mta.name( $1 , $2 ) %kicks echo -a Server $1 : $mta.name( $1 , $2 ) kicked nr. %kicks writeini "MTAwarn.ini" main $mta.name($1,$mta.getid($1,$4)) 4 writeini "MTAwarn.ini" banreasons $mta.name($1,$mta.getid($1,$4)) $5- $date $time $mta.name($1,$2) writeini "MTAwarn.ini" bannedip $mta.name($1,$mta.getid($1,$4)) $mta.ip($1,$mta.getid($1,$4)) $date $time $mta.name($1,$2) writeini "MTAwarn.ini" subnets $gettok($mta.ip($1,$mta.getid($1,$4)),1-2,46) $mta.name($1,$mta.getid($1,$4)) write subnet.txt $gettok($mta.ip($1,$mta.getid($1,$4)),1-2,46) mta.ban $1 $mta.getid($1,$4) } else { mta.say $1 $mta.name( $1 , $mta.getid($1,$4) ) ( $+ $mta.ip( $1 , $mta.getid($1,$4) ) $+ ) is banned by $mta.name( $1 , $2 ) set %kicks $calc($readini("MTAScript.ini",kicks,$mta.name( $1 , $2 )) + 1) writeini -n "MTAScript.ini" kicks $mta.name( $1 , $2 ) %kicks echo -a Server $1 : $mta.name( $1 , $2 ) kicked nr. %kicks writeini "MTAwarn.ini" main $mta.name($1,$mta.getid($1,$4)) 4 writeini "MTAwarn.ini" banreasons $mta.name($1,$mta.getid($1,$4)) some reason $date $time $mta.name($1,$2) writeini "MTAwarn.ini" bannedip $mta.name($1,$mta.getid($1,$4)) $mta.ip($1,$mta.getid($1,$4)) $date $time $mta.name($1,$2) writeini "MTAwarn.ini" subnets $gettok($mta.ip($1,$mta.getid($1,$4)),1-2,46) $mta.name($1,$mta.getid($1,$4)) write subnet.txt $gettok($mta.ip($1,$mta.getid($1,$4)),1-2,46) mta.ban $1 $mta.getid($1,$4) } } } elseif (($3 == !unban) && %isadmin. [ $+ [ $1 ] $+ . $+ [ $2 ] ] == true ) { if ($4 != $null) { if ( $readini( "MTAwarn.ini", bannedip, $4 )) { set %unban $gettok($readini( "MTAwarn.ini", bannedip, $4 ),1-2,46) mta.say $1 $mta.name($1,$2) $+ : UnBanned $4 mta.unban $1 $readini( "MTAwarn.ini", bannedip, $4 ) writeini "MTAwarn.ini" main $4 5 writeini "MTAwarn.ini" unbanned $4 $mta.name($1,$2) remini "MTAwarn.ini" banreasons $4 remini "MTAwarn.ini" bannedip $4 remini "MTAwarn.ini" subnets %unban write -ds [ $+ [ %unban ] ] subnet.txt unset %unban } else { mta.say $1 $mta.name($1,$2) $+ : Error - $4 is not banned. } } else { mta.say $1 $mta.name($1,$2) $+ : Syntax: !unban } } elseif ($3 == !banned) { if ($4 != $null) { if ( $readini( "MTAwarn.ini", bannedip, $4 )) { mta.say $1 $4 has been banned at this server. mta.say $1 Deatils: $readini( "MTAwarn.ini", banreasons, $4- ) } elseif ( $readini( "MTAwarn.ini", main, $4 ) == 5) { mta.say $1 $4 was banned, but was then unbanned by $readini( "MTAwarn.ini", unbanned, $4 ) } else { mta.say $1 $4 has not been banned at this server. } } else { mta.say $1 $mta.name($1,$2) $+ : Error - Syntax: !banned } } } kooper, here is your script. Manhunt that runs only once when active. You can select players aswell, do !mh player from admin. It has a vote on function for players aswell. They type !manhunt and if half the ppl vote for it then it turns on. Here is the script: alias mh { if ($2 isnum) { if ($2 == 0) { mta.say $1 $mta.name($1,% [ $+ [ $1 ] ]) survived for 10 mins! } else { mta.say $1 $mta.name($1,% [ $+ [ $1 ] ]) you must survive for $2 more mins! .timermh $+ $1 1 60 mh $1 $calc($2 - 1) } } if ($2 == on) { mh.pick $1 .timermh $+ $1 1 60 mh $1 9 mta.say $1 ManHunt has begun! mta.say $1 $mta.name($1,% [ $+ [ $1 ] ]) is the fugitive, find and kill him! } if ($2 == player) { if ( $3 != $null ) { if ( $mta.name($1,$3) == unknown ) { mta.say $1 Player $3 not present } else { % [ $+ [ $1 ] ] = $3 .timermh $+ $1 1 60 mh $1 9 mta.say $1 ManHunt has begun! mta.say $1 $mta.name($1,% [ $+ [ $1 ] ]) is the fugitive, find and kill him! } } } if ($2 == off) { unset % [ $+ [ $1 ] ] mta.say $1 ManHunt stopped! .timermh $+ $1 off } } alias mh.pick { if ($mta.players($1) <= 3) { mta.say $1 ManHunt stopped! To few players! unset % [ $+ [ $1 ] ] .timermh $+ $1 off halt } else { % [ $+ [ $1 ] ] = 30 while (!$ini($+($scriptdir,$1,.ini),ID $+ % [ $+ [ $1 ] ])) { % [ $+ [ $1 ] ] = $rand(0,25) } return } } alias mta.admin { if (!mh == $2) mh $1 $3 } alias mta.join { if (% [ $+ [ $1 ] ]) { mta.say $1 Hello $mta.name($1,$2) Server is running in Manhunt mode, find and kill $mta.name($1,% [ $+ [ $1 ] ]) ! } } alias mta.part { if (% [ $+ [ $1 ] ] == $2) { mta.say $1 $mta.name($1,% [ $+ [ $1 ] ]) gives up! mh.pick $1 mta.say $1 $mta.name($1,% [ $+ [ $1 ] ]) is now the fugitive, kill him! .timermh $+ $1 1 60 mh $1 9 } } alias mta.text { ;$1 = Server ;$2 = Player ID ;$3- = Text if ( $3 == !manhunt ) { mh.voteon $1- } elseif ( $3 == !mh ) { mh.vote $1- } } alias mta.kill { if (% [ $+ [ $1 ] ] == $2) { if (($3 == % [ $+ [ $1 ] ]) || ($3 >= 254)) { mta.say $1 $mta.name($1,% [ $+ [ $1 ] ]) couldn't take the pressure! mh.pick $1 mta.say $1 $mta.name($1,% [ $+ [ $1 ] ]) is now the fugitive, kill him! .timermh $+ $1 1 60 mh $1 } elseif ($3 <= 253) { % [ $+ [ $1 ] ] = $3 mta.say $1 $mta.name($1,$3) killed the fugitive! mta.say $1 $mta.name($1,$3) is now the fugitive, find and kill him! .timermh $+ $1 1 60 mh $1 9 } } } alias mh.cancel{ mta.say $1 Not enough people voted for Manhunt to be on. Manhunt Stopped. unset %vote.voters. [ $+ [ $1 ] ] unset %mhon } alias mh.voteon { if ( %mhon == on ) { mta.say $1 Manhunt vote is already running } else { set %mhon on set %vote.voters. [ $+ [ $1 ] ] $null mta.say $1 Manhunt: "!mh" if u think that Manhunt should be activated. [ $calc($left($did(mta,$1 $+ 21),2) / 2) votes needed][60 sec] .timervote [ $+ [ $1 ] ] 1 60 mh.cancel $1 } } alias mh.vote { if ( %mhon == on ) { if ($2 !isin %vote.voters. [ $+ [ $1 ] ]) { %vote.voters. [ $+ [ $1 ] ] = %vote.voters. [ $+ [ $1 ] ] $2 mta.say $1 $numtok(%vote.voters. [ $+ [ $1 ] ],32) votes for Manhunt to be on! if ($numtok(%vote.voters. [ $+ [ $1 ] ],32) >= $calc($left($did(mta,$1 $+ 21),2) / 2)) { mta.say $1 !mh on unset %vote.voters. [ $+ [ $1 ] ] unset %mhon .timervote [ $+ [ $1 ] ] off } } else mta.say $1 $mta.name($1,$2) You have already voted } else { mta.say $1 Manhunt vote not running. } } hope it works ok, i havnt tested it too much so im not sure of everything. Can anyone let me know if they have a problem with these advanced banning features, as this script was taken out of my larger script so isnt tested individually. Link to comment
[RT]kooper Posted June 6, 2004 Share Posted June 6, 2004 thanks alot oli i will do some testing on it but im sure it will be fine i will be running it on the [RT] server so if anyone wants to see it in action it will be there or msn me thanks again oli Link to comment
[RT]kooper Posted June 6, 2004 Share Posted June 6, 2004 Hmmz i think we need a scripts archive... any one who can script php? if you want a site setting up i can set up a phpbb2 forum on my site and get a .tk for it and when i have time probably set up a site thats a bit better than phpbb2 tell me what you think ppl or email/msn if its a yes Link to comment
(cc)Rambo Posted June 6, 2004 Share Posted June 6, 2004 Hmmmm I dont know how to script can someone send me a script.mrc file with all scripts plz im searching for a long time : Link to comment
vass69 Posted June 6, 2004 Share Posted June 6, 2004 Hmmz i think we need a scripts archive... any one who can script php? if you want a site setting up i can set up a phpbb2 forum on my site and get a .tk for it and when i have time probably set up a site thats a bit better than phpbb2 tell me what you think ppl or email/msn if its a yes we dont need a forum, we need a site/archive Hmmmm I dont know how to script can someone send me a script.mrc file with all scripts plz im searching for a long time : u need to set them together urself cos we aint got them all in 1 scripts are too diferent to put them all together Link to comment
Oli Posted June 6, 2004 Share Posted June 6, 2004 u need to set them together urself cos we aint got them all in 1scripts are too diferent to put them all together what u talking about??... mine r all in 1, like 130KB of them.. Link to comment
[RT]kooper Posted June 6, 2004 Share Posted June 6, 2004 if you just want a site for scripts to be on, in catagories etc you can do that in html but for ppl to post their scripts on its just gona turn into a forum anyway Link to comment
Recommended Posts