Main.st 1.3 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364
  1. PROGRAM _INIT
  2. (* Insert code here *)
  3. Shutdown_picture := 'Media/Shutdown.jpg';
  4. END_PROGRAM
  5. PROGRAM _CYCLIC
  6. gDO_doppelt_lasern;
  7. gDI_keiner_Stoerung_Laser;
  8. gDI_Laser_fertig;
  9. gDO_Start_Laser;
  10. gMerker_Shutdown;
  11. IF VK_Start = TRUE THEN
  12. gMerker_Motoren_ein := TRUE;
  13. VK_Start := FALSE;
  14. END_IF
  15. IF VK_Stop = TRUE THEN
  16. gMerker_Motoren_ein := FALSE;
  17. VK_Stop := FALSE;
  18. END_IF
  19. IF gMerker_Motoren_ein = TRUE THEN
  20. gDO_Motor_K1 := TRUE;
  21. gDO_Motor_K2 := TRUE;
  22. gDO_Motor_K3 := TRUE;
  23. gDO_Motor_K4 := TRUE;
  24. gDO_Motor_K5 := TRUE;
  25. gDO_Motor_K6 := TRUE;
  26. gDO_Motor_K7 := TRUE;
  27. gDO_Motor_K8 := TRUE;
  28. END_IF
  29. IF gMerker_Motoren_ein = FALSE THEN
  30. gDO_Motor_K1 := FALSE;
  31. gDO_Motor_K2 := FALSE;
  32. gDO_Motor_K3 := FALSE;
  33. gDO_Motor_K4 := FALSE;
  34. gDO_Motor_K5 := FALSE;
  35. gDO_Motor_K6 := FALSE;
  36. gDO_Motor_K7 := FALSE;
  37. gDO_Motor_K8 := FALSE;
  38. END_IF
  39. IF gMerker_Shutdown = TRUE THEN
  40. Shutdown_URL := 'https://centurio.evva.com/services/healthmonitor/shutdown/all.php';
  41. Shutdown_picture := 'Media/Shutdown_done.jpg';
  42. ELSIF gMerker_Shutdown = FALSE THEN //Only for having the possibility in the Online-mode of Automation Studio; no Widget on the panel-PC
  43. Shutdown_URL := '';
  44. Shutdown_picture := 'Media/Shutdown.jpg';
  45. END_IF
  46. END_PROGRAM
  47. PROGRAM _EXIT
  48. (* Insert code here *)
  49. END_PROGRAM