Alamar
25.12.2001, 13:54
if ($gettok(%temp,2,32) == 353) {
var %cc1 = 1
var %ccm = $numtok(%temp,32)
var %tes1 = $sorttok($gettok(%temp,7-,32),32)
while (%cc1 <= $numtok(%tes1,32)) {
if (@ isin $gettok(%tes1,%cc1,32)) {
if (%opf == $null) {
var %opf = $gettok(%tes1,%cc1,32)
}
else {
var %opf = %opf $+ $chr(32) $+ $gettok(%tes1,%cc1,32)
}
}
elseif (% isin $gettok(%tes1,%cc1,32)) {
if (%hopf == $null) {
var %hopf = $gettok(%tes1,%cc1,32)
}
else {
var %hopf = %hopf $+ $chr(32) $+ $gettok(%tes1,%cc1,32)
}
}
elseif (+ isin $gettok(%tes1,%cc1,32)) {
if (%vopf == $null) {
var %vopf = $gettok(%tes1,%cc1,32)
}
else {
var %vopf = %vopf $+ $chr(32) $+ $gettok(%tes1,%cc1,32)
}
}
else {
if (%nopf == $null) {
var %nopf = $gettok(%tes1,%cc1,32)
}
else {
var %nopf = %nopf $+ $chr(32) $+ $gettok(%tes1,%cc1,32)
}
}
inc %cc1
}
var %cc1 = 1
while (%cc1 <= $numtok(%opf,32)) {
aline -l @ [ $+ [ $gettok(%temp,5,32) ] ] $gettok(%opf,%cc1,32)
inc %cc1
}
var %cc1 = 1
while (%cc1 <= $numtok(%hopf,32)) {
aline -l @ [ $+ [ $gettok(%temp,5,32) ] ] 12 [ $+ [ $gettok(%hopf,%cc1,32) ] ]
inc %cc1
}
var %cc1 = 1
while (%cc1 <= $numtok(%vopf,32)) {
aline -l @ [ $+ [ $gettok(%temp,5,32) ] ] 0 [ $+ [ $gettok(%vopf,%cc1,32) ] ]
inc %cc1
}
var %cc1 = 1
while (%cc1 <= $numtok(%nopf,32)) {
aline -l @ [ $+ [ $gettok(%temp,5,32) ] ] 15 [ $+ [ $gettok(%nopf,%cc1,32) ] ]
inc %cc1
}
aline -l @ [ $+ [ $gettok(%temp,5,32) ] ] [ $+ [ %m.nick ] ]
write logs\ [ $+ [ $gettok(%temp,5,32) ] ] $+ .log Session Started on $asctime
write logs\ [ $+ [ $gettok(%temp,5,32) ] ] $+ .log Channel: [ $+ [ $gettok(%temp,5,32) ] ] Nick: %m.nick
write logs\ [ $+ [ $gettok(%temp,5,32) ] ] $+ .log Server: %m.server
}
--------------------------------------------------------------------
DAs ist meine routine die bei meinem Multi Server Script die nickliste est NAch OPs,HOPS,Voice und dann Regulars sortiert.
Aber ich habe ein kleines Problem.
Sie funktioniert eigentlich nur werden aber, ich weiß nich warum, die ersten 2 nicks jeder kategorie noch einmal unten an die nicklist rangeschrieben.
var %cc1 = 1
var %ccm = $numtok(%temp,32)
var %tes1 = $sorttok($gettok(%temp,7-,32),32)
while (%cc1 <= $numtok(%tes1,32)) {
if (@ isin $gettok(%tes1,%cc1,32)) {
if (%opf == $null) {
var %opf = $gettok(%tes1,%cc1,32)
}
else {
var %opf = %opf $+ $chr(32) $+ $gettok(%tes1,%cc1,32)
}
}
elseif (% isin $gettok(%tes1,%cc1,32)) {
if (%hopf == $null) {
var %hopf = $gettok(%tes1,%cc1,32)
}
else {
var %hopf = %hopf $+ $chr(32) $+ $gettok(%tes1,%cc1,32)
}
}
elseif (+ isin $gettok(%tes1,%cc1,32)) {
if (%vopf == $null) {
var %vopf = $gettok(%tes1,%cc1,32)
}
else {
var %vopf = %vopf $+ $chr(32) $+ $gettok(%tes1,%cc1,32)
}
}
else {
if (%nopf == $null) {
var %nopf = $gettok(%tes1,%cc1,32)
}
else {
var %nopf = %nopf $+ $chr(32) $+ $gettok(%tes1,%cc1,32)
}
}
inc %cc1
}
var %cc1 = 1
while (%cc1 <= $numtok(%opf,32)) {
aline -l @ [ $+ [ $gettok(%temp,5,32) ] ] $gettok(%opf,%cc1,32)
inc %cc1
}
var %cc1 = 1
while (%cc1 <= $numtok(%hopf,32)) {
aline -l @ [ $+ [ $gettok(%temp,5,32) ] ] 12 [ $+ [ $gettok(%hopf,%cc1,32) ] ]
inc %cc1
}
var %cc1 = 1
while (%cc1 <= $numtok(%vopf,32)) {
aline -l @ [ $+ [ $gettok(%temp,5,32) ] ] 0 [ $+ [ $gettok(%vopf,%cc1,32) ] ]
inc %cc1
}
var %cc1 = 1
while (%cc1 <= $numtok(%nopf,32)) {
aline -l @ [ $+ [ $gettok(%temp,5,32) ] ] 15 [ $+ [ $gettok(%nopf,%cc1,32) ] ]
inc %cc1
}
aline -l @ [ $+ [ $gettok(%temp,5,32) ] ] [ $+ [ %m.nick ] ]
write logs\ [ $+ [ $gettok(%temp,5,32) ] ] $+ .log Session Started on $asctime
write logs\ [ $+ [ $gettok(%temp,5,32) ] ] $+ .log Channel: [ $+ [ $gettok(%temp,5,32) ] ] Nick: %m.nick
write logs\ [ $+ [ $gettok(%temp,5,32) ] ] $+ .log Server: %m.server
}
--------------------------------------------------------------------
DAs ist meine routine die bei meinem Multi Server Script die nickliste est NAch OPs,HOPS,Voice und dann Regulars sortiert.
Aber ich habe ein kleines Problem.
Sie funktioniert eigentlich nur werden aber, ich weiß nich warum, die ersten 2 nicks jeder kategorie noch einmal unten an die nicklist rangeschrieben.