on *:INPUT:#:{
haltdef
say $upndown($1-)
}