keypress (#WIN)
move(0, $_ymax)
WAITMS(700)
getscreen
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "ontop.bmp")
   IF_PICTURE_IN (1100,600, $_xmax,$_ymax, "ontop.bmp")
      print("ontop.bmp found at X=", $_return1, ", Y=", $_return2)
      move($_return1+5, $_return2+5)
      WAITMS(200)
      rclick(-1,-1)
   else
      print("ontop.bmp not found")
   END_IF
END_IF
WAITMS(1500) 
keypress (#up)
keypress (#up)
getscreen
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "redaktor.bmp")
   IF_PICTURE_IN (1100,600, $_xmax,$_ymax, "redaktor.bmp")
      print("redaktor.bmp found at X=", $_return1, ", Y=", $_return2)
      move($_return1+5, $_return2+5)
      WAITMS(200)
      lclick(-1,-1)
   else
      print("redaktor.bmp not found")
   END_IF
END_IF
wait(5)
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "tray.bmp")
   IF_PICTURE_IN (1100,600, $_xmax,$_ymax, "tray.bmp")
      print("tray.bmp found at X=", $_return1, ", Y=", $_return2)
      move($_return1+3, $_return2)
      WAITMS(200)
      lclick(-1,-1)
   else
      print("tray.bmp not found")
   END_IF
END_IF
halt