181
mIRC/pawn Scripting / Re: Ban in game or irc error sasan
« on: July 07, 2008, 09:14:11 pm »
Ok
This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
alias vcmp.ban {
vcmp.adminchat ** Banning $$vcmp.hgetname($vcmp.nameid($1)) $iif($2,Reason: $2-,)
!writeini -n vcmp.baninfo.ini Admin: [ $chr(91) $nick $chr(93) ] Banned: [ $chr(91) $vcmp.hgetname($vcmp.nameid($1)) $chr(93) ] Reason: [ $chr(91) $2- $chr(93) ] Date: [ $date ] TimeBan: [ $chr(91) $time $chr(93) ] IP: [ $chr(91) $vcmp.hgetip($vcmp.nameid($1)) $chr(93)
.timer. $+ $$vcmp.nameid($1) $+ .ban -m 1 250 vcmp.command ban $$vcmp.nameid($1) ]
}
elseif ($1 == !banlist) msg $nick $read($scriptdirvcmp.bans.ini,%a)
elseif ($1 == !banlist) {
var %a = 1
while (%a <= 100) {
msg $nick $read($scriptdirvcmp.baninfo.ini,%a)
inc %a
}
}
elseif ($2 == !ban) {
if ($hget(vcmp,loggedin. $+ %id) < 3) { vcmp.adminmsg %id You Must Be Admin Level 2 Or Higher To Attempt This Command. }
else {
if ($vcmp.nameid($3) == $null) vcmp.adminmsg %id Error: Invalid ID.
else {
if ($hget(vcmp,loggedin. $+ %id) < $hget(vcmp,loggedin. $+ $vcmp.nameid($3))) { vcmp.adminmsg %id You can't ban someone higher level admin than you... }
else vcmp.ban $3
}
}
}
$+($chr(91),FUNC HERE,$chr(93))
Add thing wich u want to show beetwen that codes like
$+($chr(91),$vcmp.name(%a),$chr(93))
!writeini -n vcmp.baninfo.ini Admin: [ $chr(91) $nick $chr(93) ] Banned: [ $chr(91) $vcmp.hgetname($vcmp.nameid($1)) $chr(93) ] Reason: [ $chr(91) $2- $chr(93) ] Date: [ $date ] TimeBan: [ $chr(91) $time $chr(93) ] IP: [ $chr(91) $vcmp.hgetip($vcmp.nameid($1)) $chr(93)
.timer. $+ $$vcmp.nameid($1) $+ .ban -m 1 250 vcmp.command ban $$vcmp.nameid($1) ]
<Marcispeems> [Admin:]
<Marcispeems> ~=TanaX01 ] Banned: [KFD]RAMB0 Reason: Test Date: 03/07/2008 TimeBan: 22:36:14 IP: 74.225.167.13
** Admin: [ TanaX01 ] Banned : [ [KFD]Ramb0 ] Reason: [ test ] Date: [ 03/07/2008 ] Timeban: [ 22:21:19 ] IP: [ 190.47.194.45 ]
[Lara]
1215111506=201.11.202.164 banned ]
elseif ($1 == !banlist) {
var %a = 1
while (%a <= 100) {
msg $nick $read($scriptdirvcmp.bans.ini,%a)
inc %a
}
}
<Marcispeems> [KFD]Rackball: !getcar39
<Marcispeems> [KFD]Rackball: !getcar 39
<Marcispeems> panguino: pues fui ala casa de un amigo
<Marcispeems> panguino: Xd
<Marcispeems> [KFD]Rackball: o
<Marcispeems> [1][KFD]Rackball: !getcar39
<Marcispeems> [1][KFD]Rackball: !getcar 39
<Marcispeems>
- panguino: pues fui ala casa de un amigo
<Marcispeems>
- panguino: Xd
<Marcispeems> [1][KFD]Rackball: o