Code: Select all
set number1 [string map -nocase {"." ""} "2.200.000.000"]
set number2 [string map -nocase {"." ""} "6.210.000 "]
if {$number1 > $number2} {
true
} else {
false
}
Code: Select all
set number1 [string map -nocase {"." ""} "2.200.000.000"]
set number2 [string map -nocase {"." ""} "6.210.000 "]
if {$number1 > $number2} {
true
} else {
false
}
Code: Select all
set ::mainchan "#channel"
bind msgm - * msg:mainchan
proc msg:mainchan {nick host hand arg} {
puthelp "PRIVMSG $::mainchan "$nick Query: $arg"
puthelp "PRIVMSG $nick :Sorry I'm a Eggdrop..."
}