Advertisement
Guest User

Untitled

a guest
Aug 29th, 2016
69
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.24 KB | None | 0 0
  1. //SET STARTDAY
  2. SET STARTYEAR TO 1.
  3. SET STARTDAY TO 185.
  4. SET STARTHOUR TO 0.
  5. SET STARTMIN TO 15.
  6. SET STARTSEC TO 01.
  7.  
  8. declare function waitstart {
  9. declare parameter STARTYEAR.
  10. declare parameter STARTDAY.
  11. declare parameter STARTHOUR.
  12. declare parameter STARTMIN.
  13. declare parameter STARTSEC.
  14. PrtLog("LAUNCH SCHEDULED TO: Y:"+STARTYEAR+" D:"+STARTDAY+" - "+STARTHOUR+":"+STARTMIN+":"+STARTSEC).
  15. PrtLog("Waiting...").
  16. UNTIL TIME:YEAR = STARTYEAR {
  17. PrtMissParam().
  18. }.
  19. PrtLog("DATE OF LAUNCH (YEAR) REACHED: "+STARTYEAR).
  20. UNTIL TIME:DAY = STARTDAY {
  21. PrtMissParam().
  22. }.
  23. PrtLog("DATE OF LAUNCH (DAY) REACHED: "+STARTDAY).
  24. IF WARP > 6 {
  25. SET WARP TO 6.
  26. }.
  27. UNTIL TIME:HOUR = STARTHOUR {
  28. PrtMissParam().
  29. }.
  30. PrtLog("DATE OF LAUNCH (HOUR) REACHED: "+STARTHOUR).
  31. IF WARP > 4 {
  32. SET WARP TO 4.
  33. }.
  34. UNTIL TIME:MINUTE = STARTMIN -10 {
  35. PrtMissParam().
  36. }.
  37. PrtLog("DATE OF LAUNCH (MINUTE) REACHED: "+STARTMIN).
  38. SET WARP TO 0.
  39. UNTIL round(TIME:SECOND,0) = STARTSEC {
  40. PrtMissParam().
  41. }.
  42. PrtLog("DATE OF LAUNCH (MINUTE) REACHED: "+STARTSEC).
  43. }.
  44.  
  45. //and then countdown.
  46.  
  47. //PrtMissParam = to show some parameter of the mission, and launchvehicle stats like fuel, etc.. extra libary
  48. //PrtLog = write it to the screen at the right position and a file
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement