#!hs2


checknews

HamWaitIdle


# intervall for Newspulls
AtClear
AtAdd( checknews, "00:05", "23:55", "1111111", 5, true )
AtExecute
quit


sub checknews
if( RasIsConnected )
 getnews()
else
 print("no connection for pull")
endif
endsub

sub getnews
  HamNewsJobsClear
  HamNewsJobsPostDef
  HamNewsJobsStart
  HamMailExchange
  HamNewsJobsPullDef
  HamNewsJobsStart

  HamWaitIdle
runscript( "newmail.hsc" )

endsub
quit