////////////////////////////////////////////////////////
// FUN WITH YOUR MODEM 
////////////////////////////////////////////////////////

// send something to the modem
send "AT^M"

// wait for answer
waitline
delay 
writeln "Your modem said %lastline%"

// send something more
send "AT $$$^M"

// wait 5 secs. for reply
timeout 5
wait "ERROR"
delay
ifbrk writeln "Your modem didn't say 'ERROR'"
ifnbrk writeln "Your modem said 'ERROR'"

// done
writeln "bye!"
endscript
