Code: Select all
regexp -- {NEW SLAP: (.*?) pimp slaps (.*?) with (.*?)} $arg -> by who with
Code: Select all
regexp -- {NEW SLAP: (.*?) pimp slaps (.*?) with (.*?)} $arg -> by who with
Code: Select all
if {$pressure != ""} {
set baro1 "[lindex $pressure 0]in."
set baro2 "[lindex $pressure 12]hPa."
Code: Select all
if {$pressure != ""} {
set baro1 "[lindex $pressure 0]in."
set baro2 "[lindex $pressure 1]hPa."