linia 161:
Code:
set temp(list)[list next voice helped "" noidle "" skip "" put "" list ""]
inlocuiesti cu:
Code:
set temp(list)[list n v h "" b "" s "" p "" l ""]
linia 167:
Code:
bind pub $next(flag) .$temp(1) next:$temp(2)
inlocuiesti cu:
Code:
bind pub $next(flag) $temp(1) next:$temp(2)
linia 219:
Code:
proc next:voice {nick uhost handle chan arg} {
inlocuiesti cu:
Code:
proc next:v {nick uhost handle chan arg} {
linia 264:
Code:
proc next:helped {nick uhost handle chan arg} {
inlocuiesti cu:
Code:
proc next:h {nick uhost handle chan arg} {
linia 301:
Code:
proc next:noidle {nick uhost handle chan arg} {
inlocuiesti cu:
Code:
proc next:b {nick uhost handle chan arg} {
linia 346:
Code:
proc next:skip {nick uhost handle chan arg} {
inlocuiesti cu:
Code:
proc next:s {nick uhost handle chan arg} {
linia 367:
Code:
proc next:put {nick uhost handle chan arg} {
inlocuiesti cu:
Code:
proc next:p {nick uhost handle chan arg} {
linia 394:
Code:
proc next:list {nick uhost handle chan arg} {
inlocuiesti cu:
Code:
proc next:l {nick uhost handle chan arg} {
acestea au fost pt a avea comenzi gen:
n h b l p s.
Pentru notice pe consola adaugi linia:
Code:
putserv "NOTICE #consola :mesajul tau"
(sau puthelp in loc de putserv nu ma pricep la limbaj si nu cunosc diferenta dintre cele doua comenzi dar stiu ca fac acelas lucru)
dupa linia 185 adica:
Code:
putserv "NOTICE $nick :$temp(post)"
sau versiunea simpla poti copia tcl`ul de
aici