|..:: root_sys-iRC v4.0.1 Beta 1 "rootSektor" Auto-Oper v1.0 Pre-beta ::..|
|..:: Made for r-iRC v2.0 (mIRC 6.35) ::...____|
___|
.. ____ ..
.. _____*_______ ..
.. _______________ ..
.. ______*___________ ..
.. *****______*____ ..
.. __________*__*__ ..
.. **________ ..
.. ______*______ ..
.. _____*___________ ..
.. ________**____ ..
.. ___ ..
.. _______ ..
.. __(Alaska Skriptz)___ ..
Goes into Remotes section. ^.^
; .. ____________________________________________________ ..
; .. ________________*_*_*_*______*_*____*_*_____________ ..
; .. _______________*_*__*_*______*_*___*_*______________ ..
; .. ______________*_*____*_*_____*_*__*_*_______________ ..
; .. _____________*_********_*____*_*_*_*________________ ..
; .. ____________*_*________*_*___*_*_*_*________________ ..
; .. ___________*_*__________*_*__*_*__*_*_______________ ..
; .. __________*_*____________*_*_*_*___*_*______________ ..
; .. _________*_*_________________*_*____*_*_____________ ..
; .. ________*_*__________________*_*_____*_*____________ ..
; .. ______________________________________*_*___________ ..
; .. _______________________________________*_*__________ ..
; .. __________________(Alaska Skriptz)___________________ ..
on *:LOAD: {
echo -a You are using...
echo -a rootSektor - Auto-Oper v1.0 Pre-Beta
echo -a By (Alaska Skriptz)
}
on *:CONNECT: {
if (($AK.getoper($server).server) || ($AK.Getoper($server).network)) { scid $cid $MyOper($server) }
}
alias MakeOper {
writeini MyOper.ini $server Password $2
writeini MyOper.ini $server Login $1
if ($network) { writeini MyOper.ini All Network $addtok($MyOpNetworks,$network,9) | echo -a Network Auto-Oper Added. }
writeini MyOper.ini All Server $addtok($MyOperServers,$server,9)
echo -a Server Auto-Oper added.
}
alias -l AK.oper { return $readini(MyOper.ini,$1,$prop) }
alias -l MyOper { return oper $readini(MyOper.ini,$1,Login) $readini(MyOper.ini,$1,Password) }
alias -l AK.Getoper {
if ($prop) {
if ($prop == server) {
if ($1 isin $readini(MyOper.ini,$iif($2,$2,All),Server)) { return $true }
else { return $false }
}
elseif (($prop == network) || ($prop == net)) {
if ($1 isin $readini(MyOper.ini,$iif($2,$2,All),Network)) { return $true }
else { return $false }
}
elseif (($prop == Oper) || ($prop == Login)) { return $iif($readini(MyOper.ini,$1,Login),$v1,$null) }
elseif (($prop == Pass) || ($prop == Password) { return $iif($readini(MyOper.ini,$1,Password),$v1,$null) }
}
elseif (!$prop) {
if ($1) && ($2) {
if ($readini(MyOper.ini,$1,$2) { return $true }
else { return $false }
}
else { return $null | echo -a Error: Not enough parameters. }
}
}
alias -l AKroot {
say ____________________________________________________
say ________________*_*_*_*______*_*____*_*_____________
say _______________*_*__*_*______*_*___*_*______________
say ______________*_*____*_*_____*_*__*_*_______________
say _____________*_********_*____*_*_*_*________________
say ____________*_*________*_*___*_*_*_*________________
say ___________*_*__________*_*__*_*__*_*_______________
say __________*_*____________*_*_*_*___*_*______________
say _________*_*_________________*_*____*_*_____________
say ________*_*__________________*_*_____*_*____________
say ______________________________________*_*___________
say _______________________________________*_*__________
say (Alaska Skriptz)
}
alias Skriptz { AKroot }
menu * {
(Alaska Skriptz)
.Info
.. ____________________________________________________
.. ________________*_*_*_*______*_*____*_*_____________
.. _______________*_*__*_*______*_*___*_*______________
.. ______________*_*____*_*_____*_*__*_*_______________
.. _____________*_********_*____*_*_*_*________________
.. ____________*_*________*_*___*_*_*_*________________
.. ___________*_*__________*_*__*_*__*_*_______________
.. __________*_*____________*_*_*_*___*_*______________
.. _________*_*_________________*_*____*_*_____________
.. ________*_*__________________*_*_____*_*____________
.. ______________________________________*_*___________
.. _______________________________________*_*__________
.. (Alaska Skriptz)
. -
.Add Entry:MakeOper $$?"Login Password?"
}
menu channel,query {
(Alaska Skriptz)
.-
.Advertise:/say I am using rootSektor - Auto-Oper v1.0 Pre-Beta by (Alaska Skriptz)
}
O.o SPAM much try this lol
ON *:CONNECT: {
if ($readini(operlogins.ini,details,$network)) { oper $readini(operlogins.ini,details,$network) }
}
menu * {
.Oper Logins
..Add Oper Logins: writeini operlogins.ini details $network $$?"Username Password"
..Del Oper Login: remini operlogins.ini details $$?"Network to delete"
}
number one this doesnt spam any one
Thanks to PuNkTuReD for helping me with that script ages ago... WORKS GREAT DUDE :D
NOTE could do it with $server instead of $network dependant on where you speak and if it has a network ID
Bug
alias MakeOper {
writeini MyOper.ini $server Password $2
writeini MyOper.ini $server Login $1
if ($network) { writeini MyOper.ini All Network $addtok($MyOpNetworks,$network,9) | echo -a Network Auto-Oper Added. }
writeini MyOper.ini All Server $addtok($MyOperServers,$server,9)
echo -a Server Auto-Oper added.
}
on that you need $writeini
so it will look like this
alias MakeOper {
$writeini MyOper.ini $server Password $2
$writeini MyOper.ini $server Login $1
if ($network) { writeini MyOper.ini All Network $addtok($MyOpNetworks,$network,9) | echo -a Network Auto-Oper Added. }
writeini MyOper.ini All Server $addtok($MyOperServers,$server,9)
echo -a Server Auto-Oper added.
}
Jethro_ i was straight forward i told straight from the begining the signiture is more of a spam
nobody in their right mind would wana use a script that would avertise such a big signiture on any irc channel.
the code it self is cool to me theres nothing special about it i do my own coding and no i do no share my code unless its with my best friends on irc
all i was mearly stating is exactly what Gummo said too much spam
but anyhow this is a pointless argument ;) have a good day
Generally speaking, if people have a constructive criticism to make, they should make one clearly and straightforwardly...rather than make a hint or rhetorical signification of what others have made for their codes. There's no egotism involved here unless you're rather insecure about your own comments on someone's script.
Lol
what ever rocks your boat
look i didnt say your code is wrong or right all i said is ppl that are server admins and dont know irc commands to do their own code then they dont deserver the status for one two who cares if its your company if i wana use it i would to use it with out having to spam if you had to put (amsg scripted by AK Skriptz) i would accept that as its clean and still representing your signiture and last but not least yes i can modify
but why the hell should in it will take me less time to code one then to copy and delete this ........ ;)
anyhow good like with the spamming am sure you get alot off ppl using your scripts
;)
Gummo I Totaly Agree With You The Spam Is just @#$#%@#^@#^@#%^@#%!@
He Might As Well Just Put
Script
just Type /spam
alias spam {
amsg ____
amsg _____*_______
amsg _______________
amsg ______*___________
amsg *****______*____
amsg __________*__*__
amsg **________
amsg ______*______
amsg _____*___________
amsg ________**____
amsg ___
amsg _______
amsg (Alaska Skriptz)
}
