| 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
|
|
|
