Hei alle sammen, enda ett Release.
Merk: Den Generelle Ide er fra PandaCL, og jeg gjorde Scriptinga. :)
så Creds går til
PandaCL og for IDeen og oversettelse til Dansk.
Dette scriptet er bare scriptet basic, uten noe extra funksjoner eller eventer.
Kommandoer: !search XonX <tilleggsinformasjon> eller
.search XonX <tilleggsinformasjon> - ex. .search 2on2 Server on - skill low
!stop - Stopper din søgning.
!cw - Viser en liste over folk der søger Match
on *:load: {
set %cw.channel $?="Kanal? ex. #dinkanal"
}
on *:text:*:%cw.channel: {
if ($1 == !search) || ($1 == .search) {
if ($read(fight.txt,s,$nick)) {
notice $nick Du har allerede en søgning igang. Stop den ved at skrive !stop
}
else {
if ($left($2,1) isnum) && ($right($2,1) isnum) && ($mid($2,2,2) == on) {
write fight.txt $nick Søger efter $2-
msg $chan $+ $nick $+ Søger efter $+ $2 $+ $iif($3,( $+ $3- $+ ), )
}
else {
notice $nick Fejl, du skal skrive antal modstandere ex. !search 2on2
}
}
}
if ($1 == !stop) {
if ($read(fight.txt,s,$nick)) {
write -ds $+ $nick fight.txt
notice $nick Færdig
msg $chan $+ $nick $+ har fundet sin kamp - GL & HF
}
else {
notice $nick Du søger ikke efter en kamp
}
}
if ($1 == !cw) {
if ($read(fight.txt,1)) {
var %x 1
while ($read(fight.txt,%x)) {
var %cw.msg %cw.msg - $+ $gettok($read(fight.txt,%x),1,32) $+ $gettok($read(fight.txt,%x),2-3,32) $+ $gettok($read(fight.txt,%x),4,32) $+ $iif($gettok($read(fight.txt,%x),5,32),( $+ $gettok($read(fight.txt,%x),5-,32) $+ ), )
inc %x
}
notice $nick %cw.msg
}
else {
notice $nick Der er ingen der søger kamp, du kan starte en søgning ved at skrive !search <XonX>
}
}
}