rem optik ein aus mit USB steuerung print 1 @title optik ein-aus usb print 2 set_autostart 1 print 3 while 1 print 4 p=get_usb_power print 5 sleep 200 if p=0 then print 6 print "usb power = " p print 7 set_record 1 print 8 :shot print 9 shoot print 10 goto "shot" print 11 endif print 12 wend print 13 end