Autore |
Messaggio |
Supersonic
Membro Junior
Registrato: 21/07/03 01:05 Messaggi: 11
|
|
problema con $read |
|
ciao a tutti ho un altro problema...
sto cerkando di fare un codice che cerka in un file .txt una determinata parola...se scrivo per esempio !cerca pippo, deve cercare nel file e se la trova manda un msg al nick dicendo ho trovato pippo altrimenti msg nick nn ho trovato pippo...
ho fatto kosi
on *:text:!search*{
set %prova $1-
if ($gettok(%prova,2,32)) { set %provadd $2- }
prova
}
alias prova {
.msg $nick $read(C:\lista.txt, w, *%provadd*)
}
ma nn funge
allora ho inkominciato a fare prove, credo senza senso
alias prova {
var %i = 1
if ($read(C:\lista.txt, w, *%provadd*,1) != $null) {
while (%i <= $read(C:\lista.txt, w, *%provadd*,%i)) {
inc %i
.msg $nick $read(C:\Bot\lista.txt, w, *%provadd*,%i)
}
}
else {
.msg $nick Non ho %provadd
}
}
il code mi risponde -> Non ho %provadd
sapete dirmi dove sbaglio?
|
|
Lun Apr 04, 2005 3:39 am |
|
|
max246
Membro Junior
Registrato: 30/03/05 14:04 Messaggi: 10
|
|
Re: problema con $read |
|
| | ciao a tutti ho un altro problema...
sto cerkando di fare un codice che cerka in un file .txt una determinata parola...se scrivo per esempio !cerca pippo, deve cercare nel file e se la trova manda un msg al nick dicendo ho trovato pippo altrimenti msg nick nn ho trovato pippo...
ho fatto kosi
on *:text:!search*{
set %prova $1-
if ($gettok(%prova,2,32)) { set %provadd $2- }
prova
}
alias prova {
.msg $nick $read(C:\lista.txt, w, *%provadd*)
}
ma nn funge
allora ho inkominciato a fare prove, credo senza senso
alias prova {
var %i = 1
if ($read(C:\lista.txt, w, *%provadd*,1) != $null) {
while (%i <= $read(C:\lista.txt, w, *%provadd*,%i)) {
inc %i
.msg $nick $read(C:\Bot\lista.txt, w, *%provadd*,%i)
}
}
else {
.msg $nick Non ho %provadd
}
}
il code mi risponde -> Non ho %provadd
sapete dirmi dove sbaglio? |
Ciao, sicuro che:
.msg $nick $read(C:\Bot\lista.txt, w, *%provadd*,%i)
ci voglia le "*" ? prova senza, forse con le "*" te lo marca come parola e non come variabile
|
|
Lun Apr 04, 2005 5:49 am |
|
|
Supersonic
Membro Junior
Registrato: 21/07/03 01:05 Messaggi: 11
|
|
Re: problema con $read |
|
| | | | ciao a tutti ho un altro problema...
sto cerkando di fare un codice che cerka in un file .txt una determinata parola...se scrivo per esempio !cerca pippo, deve cercare nel file e se la trova manda un msg al nick dicendo ho trovato pippo altrimenti msg nick nn ho trovato pippo...
ho fatto kosi
on *:text:!search*{
set %prova $1-
if ($gettok(%prova,2,32)) { set %provadd $2- }
prova
}
alias prova {
.msg $nick $read(C:\lista.txt, w, *%provadd*)
}
ma nn funge
allora ho inkominciato a fare prove, credo senza senso
alias prova {
var %i = 1
if ($read(C:\lista.txt, w, *%provadd*,1) != $null) {
while (%i <= $read(C:\lista.txt, w, *%provadd*,%i)) {
inc %i
.msg $nick $read(C:\Bot\lista.txt, w, *%provadd*,%i)
}
}
else {
.msg $nick Non ho %provadd
}
}
il code mi risponde -> Non ho %provadd
sapete dirmi dove sbaglio? |
Ciao, sicuro che:
.msg $nick $read(C:\Bot\lista.txt, w, *%provadd*,%i)
ci voglia le "*" ? prova senza, forse con le "*" te lo marca come parola e non come variabile |
ho risolto ho kambiato totalmente strada...cmq rivedendo adesso il kode forse hai ragione gli * nn servono o forse dovevo fare * $+ %provadd ...
|
|
Mar Apr 05, 2005 2:16 am |
|
|
|
|
Non puoi inserire nuovi argomenti Non puoi rispondere a nessun argomento Non puoi modificare i tuoi messaggi Non puoi cancellare i tuoi messaggi Non puoi votare nei sondaggi
|
|
|