home *** CD-ROM | disk | FTP | other *** search
/ CD Action 39 / cdactioncoverdisc39b.iso / Demo1 / Peacemaker / Gui / Brfwidg.DAT < prev    next >
Text File  |  1999-03-10  |  4KB  |  132 lines
  1. FSTPC 5
  2.  
  3. # THE MISSION BRIEFING (AND IN-FLIGHT MAP) SCREEN
  4.  
  5. #====================================================================================================================
  6. # HELICOPTER SELECTION
  7.  
  8. Bitmap clup
  9. (:area 0 0 20 20 :parent brfgui :sub_path brief :file cycle_la.sur)
  10. Bitmap cldown
  11. (:area 0 0 20 20 :parent brfgui :sub_path brief :file cycle_lb.sur)
  12. Bitmap clhi
  13. (:area 0 0 20 20 :parent brfgui :sub_path brief :file cycle_lc.sur)
  14.  
  15. Bitmap crup
  16. (:area 0 0 20 20 :parent brfgui :sub_path brief :file cycle_ra.sur)
  17. Bitmap crdown
  18. (:area 0 0 20 20 :parent brfgui :sub_path brief :file cycle_rb.sur)
  19. Bitmap crhi
  20. (:area 0 0 20 20 :parent brfgui :sub_path brief :file cycle_rc.sur)
  21.  
  22. # cycle back through available helis
  23. State3 cycleleft
  24. (:area 33 20 20 20 :parent brfgui :up clup :down cldown :high clhi :cursor high :trans :layer 1
  25. (:MLButtonDown 1
  26. 1 GUI_play clicksnd 0)
  27. (:MLButtonClk 1
  28. 1 cycle_heli maingui 0))
  29.  
  30. # cycle forwards through available helis
  31. State3 cycleright
  32. (:area 233 20 20 20 :parent brfgui :up crup :down crdown :high crhi :cursor high :trans :layer 1
  33. (:MLButtonDown 1
  34. 1 GUI_play clicksnd 0)
  35. (:MLButtonClk 1
  36. 1 cycle_heli maingui 1))
  37.  
  38. Bitmap helibmp
  39. (:area 0 0 234 100 :parent brfgui :sub_path brief :file aircrft1.sur)
  40. sRegion helipic
  41. (:area 26 49 234 100 :parent brfgui :graphic helibmp :layer 1)
  42.  
  43. #====================================================================================================================
  44. # BRIEFING - NB USE TEXTWIN BUT NO BUTTONS
  45.  
  46. # scroll up
  47. sRegion brfupbut
  48. (:area 26 199 234 10 :parent brfgui :trans :active_area :cursor uparrows :disabled :layer 1)
  49. # scroll down
  50. sRegion brfdnbut
  51. (:area 26 319 234 10 :parent brfgui :trans :active_area :cursor downarrows :disabled :layer 1)
  52. # pageup button
  53. sRegion brfpupbut
  54. (:area 26 199 234 10 :parent brfgui :trans :active_area :cursor uparrows :disabled :layer 1)
  55. # pagedown button
  56. sRegion brfpdnbut
  57. (:area 26 319 234 10 :parent brfgui :trans :active_area :cursor uparrows :disabled :layer 1)
  58.  
  59. TextWin brieftext
  60. (:area 29 201 231 268 :parent brfgui :trans :font fontc :buttons brfupbut brfdnbut brfpupbut brfpdnbut :layer 1)
  61.  
  62. #====================================================================================================================
  63. # MAP
  64. Bitmap mapbmp
  65. (:area 0 0 340 340 :parent brfgui :sub_path brief :file mapa1.sur)
  66. sRegion briefmap
  67. (:area 274 49 340 340 :parent brfgui :graphic mapbmp :layer 1)
  68.  
  69. #====================================================================================================================
  70. # ACCEPT BRIEF
  71. State3 acceptbrief
  72. (:area 307 423 119 38 :parent brfgui :up butup :down butdown :high buthi :cursor high :trans :active_area :layer 1
  73. (:MLButtonDown 1
  74. 1 GUI_play clicksnd 0)
  75. (:MLButtonClk 2
  76. 0 GUI_Enter simwin
  77. 0 fly_mission maingui))
  78.  
  79. # MAIN SCREEN
  80. State3 cancelbrief
  81. (:area 476 423 119 38 :parent brfgui :up butup :down butdown :high buthi :cursor high :trans :active_area :layer 1
  82. (:MLButtonDown 1
  83. 1 GUI_play clicksnd 0)
  84. (:MLButtonClk 2
  85. 0 GUI_Enter maingui
  86. 0 init_missions maingui))
  87.  
  88. #====================================================================================================================
  89. # CAMPAIGN BRIEFING GRAPHIC
  90. Group cbrfgrp
  91. (:area 0 0 0 0 :parent brfgui)
  92.  
  93. Bitmap cbrfbmp
  94. (:area 0 0 640 480 :parent cbrfgrp :sub_path camp :file camp.sur)
  95. sRegion campbrf
  96. (:area 0 0 640 480 :parent cbrfgrp :graphic cbrfbmp)
  97.  
  98. # scroll up
  99. sRegion cbrfupbut
  100. (:area 28 51 584 15 :parent cbrfgrp :trans :active_area :cursor uparrows :layer 2
  101. (:MLButtonDown 1
  102. 1 GUI_play clicksnd 0)
  103. (:MLButtonClk 1
  104. 1 text_but cbrftext 0))
  105.  
  106. # scroll down
  107. sRegion cbrfdnbut
  108. (:area 28 415 584 15 :parent cbrfgrp :trans :active_area :cursor downarrows :layer 2
  109. (:MLButtonDown 1
  110. 1 GUI_play clicksnd 0)
  111. (:MLButtonClk 1
  112. 1 text_but cbrftext 1))
  113.  
  114. # pageup button
  115. sRegion cbrfpupbut
  116. (:area 28 51 584 15 :parent cbrfgrp :trans :active_area :cursor uparrows :layer 2)
  117. # pagedown button
  118. sRegion cbrfpdnbut
  119. (:area 28 415 584 15 :parent cbrfgrp :trans :active_area :cursor uparrows :layer 2)
  120.  
  121. TextWin cbrftext
  122. (:area 28 51 584 380 :parent cbrfgrp :trans :font fontc :buttons cbrfupbut cbrfdnbut cbrfpupbut cbrfpdnbut :layer 2)
  123.  
  124. State3 continuebrf
  125. (:area 261 433 119 38 :parent cbrfgrp :up butup :down butdown :high buthi :cursor high :trans :active_area :layer 2
  126. (:MLButtonDown 1
  127. 1 GUI_play clicksnd 0)
  128. (:MLButtonClk 1
  129. 0 GUI_disable cbrfgrp))
  130.  
  131. Paths 0 0
  132.