opengt
set com 115200n81
set comecho off
set senddelay 0.05
waitquiet 1 0.2

:start
 send "AT!SCACT=0,3^m"
 waitfor 5 "OK"
 if % = 0 goto hangupok
 print "WWAN error. Hangup failed.\r\n"
 exit 1

:hangupok
 print "WWAN connection established.\r\n"
 exit 0