Jump to content

help pls


ceelen1

Recommended Posts

guys i have a problem the admin.mrc from toody isnt owrking i already asked him he said: remove the nickserv.ini unload admin.mrc and then reload well.. that didnt work even when i have it laoded and i type: /msg login (pass) (email). nothing happens.i even tryed to copy the setlevel command from his script to mine but that didnt worked. maybe i have the wron version of mirc? i have mIRC v6.2

all the ! commands arent working i just load the admn system.mrc but it isnt working Note: i run it without mtama.mrc. so it have to work.

i also trye to edit the 1.ini or the nickserv.ini file by typing my data like nick name password and level but still no success.

CAN SOMEONE HELP ME . :!::!::!::!::!::!::!::!:

Link to comment

commands admin system toady:

on *:SIGNAL:mta.command: {

if ($3 = !commands) {

mta.say $1 !kick ,!constant ,!ban

mta.say $1 !addban ,!subnetban , level 10 ONLY:!setlevel ,!clankick ,!clanban

mta.say $1 no level: !admins,!skin ,!level ,!ping ,!idle ,!hp ,!car ,

mta.say $1 !loc ,!time,!count,!in,!out,!list ,!stats .

:DDDDD

Link to comment

you can paste there instead of

    elseif ($findtok(!sun !fog !cloud !rain,$3,1,32)) mta.setweather $1 $replace($3,!cloud,1,!rain,2,!fog,3,!sun,0)

line the following code

  elseif ($3 == !fog) mta.setweather $1 3
 elseif ($3 == !rain) mta.setweather $1 2
 elseif ($3 == !cloud) mta.setweather $1 1
 elseif ($3 == !sun) mta.setweather $1 0

so it must work

Link to comment

look i have this

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) <= 8) %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) >= 8) {

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 ($3 == !fog) mta.setweather $1 3

elseif ($3 == !rain) mta.setweather $1 2

elseif ($3 == !cloud) mta.setweather $1 1

elseif ($3 == !sun) mta.setweather $1 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

}

}

STILL NOT WORKING :(

Link to comment

okay why doesnt this work:

on *:SIGNAL:mta.command:{

if $3 == !brb mta.say $1 $mta.name($1,$2) has set his/her status to away

elseif $3 == !toilet mta.say $1 $mta.name($1,$2) is going to the bathroom/toilet

elseif $3 == !dildo mta.say $1 $mta.name($1,$2) uses his dildo

elseif $3 == !fuckthrouth mta.say $1 $mta.name($1,$2) fucks with a large throuth

elseif $3 == !buyweed mta.say $1 $mta.name($1,$2) buyed some weed

elseif $3 == !fuckthrouth mta.say $1 $mta.name($1,$2) fucks with a large throuth

elseif $3 == !back mta.say $1 $mta.name($1,$2) Is Back!

}

on *:SIGNAL:mta.command: {

if ($3 == !members) {

if (!$4) %mta.event. [ $+ [ $1 ] ] = $read($scriptdir $+ nickserv.txt,$rand(1,$lines($scriptdir $+ nickserv.txt)))

elseif ($4 isnum) %mta.event. [ $+ [ $1 ] ] = $read($scriptdir $+ nickserv.txt,$4)

mta.say $1 members: %mta.event. [ $+ [ $1 ] ]

}

on *:SIGNAL:mta.command:{

if ($3 == !remmember) {

if ($4) {

var %a = 0

while (%a <= $lines($scriptdir $+ nickserv.txt)) {

if ($4 isin $read($scriptdir $+ nickserv.txt,%a)) {

mta.say $1 Member ' $+ $read($scriptdir $+ nickserv.txt,%a) $+ ' removed.

!write -dl $+ %a " $+ $scriptdir $+ nickserv.txt"

}

!inc %a

}

else mta.msg $1 $2 Member not found.

}

else mta.msg $1 $2 Error - Nick missing

}

}

[

Link to comment

1. I have already told you that you can Not have more than 1 same SIGNAL in a script.

2. Dont forget () brackets on if/elseif, like 'if ($3 == !bla) ...'

3. You had a {} brackets mismatch.

4. Your !members command will show a random member or a member on a specified line, not all of them...

w/e:

on *:SIGNAL:mta.command:{
 if ($3 == !brb) mta.say $1 $mta.name($1,$2) has set his/her status to away
 elseif ($3 == !toilet) mta.say $1 $mta.name($1,$2) is going to the bathroom/toilet
 elseif ($3 == !dildo) mta.say $1 $mta.name($1,$2) uses his dildo
 elseif ($3 == !) mta.say $1 $mta.name($1,$2)  with a large throuth
 elseif ($3 == !buyweed) mta.say $1 $mta.name($1,$2) buyed some weed
 elseif ($3 == !back) mta.say $1 $mta.name($1,$2) Is Back!
 elseif ($3 == !members) {
   if (!$4) %mta.event. [ $+ [ $1 ] ] = $read($scriptdir $+ nickserv.txt,$rand(1,$lines($scriptdir $+ nickserv.txt)))
   elseif ($4 isnum) %mta.event. [ $+ [ $1 ] ] = $read($scriptdir $+ nickserv.txt,$4)
   mta.say $1 members: %mta.event. [ $+ [ $1 ] ]
 }
 elseif ($3 == !remmember) {
   if ($4) {
     var %a = 0
     while (%a <= $lines($scriptdir $+ nickserv.txt)) {
       if ($4 isin $read($scriptdir $+ nickserv.txt,%a)) {
         mta.say $1 Member ' $+ $read($scriptdir $+ nickserv.txt,%a) $+ ' removed.
         !write -dl $+ %a " $+ $scriptdir $+ nickserv.txt"
       }
       !inc %a
     }
     else mta.msg $1 $2 Member not found.
   }
   else mta.msg $1 $2 Error - Nick missing
 }
}

Edited by Guest
Link to comment
  • 1 month later...
  • Recently Browsing   0 members

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