Shamusworld >> Repos - jk1/blob - zell/base/scripts/jk1/shipmove.txt

   1 //Generated by BehavEd\r
   2 \r
   3 rem ( "comment" );\r
   4 \r
   5 affect ( "shipmover", /*@AFFECT_TYPE*/ FLUSH )\r
   6 {\r
   7         use ( "shipnoise" );\r
   8         use ( "shipalarm" );\r
   9         do ( "move" );\r
  10         wait ( 4000.000 );\r
  11         use ( "shipfield" );\r
  12         wait ( 5000.000 );\r
  13         use ( "shipnoise2" );\r
  14         wait ( 500.000 );\r
  15         use ( "shipnoise" );\r
  16         do ( "move2" );\r
  17         wait ( 1000.000 );\r
  18         use ( "shipfield" );\r
  19 \r
  20         task ( "move" )\r
  21         {\r
  22                 move ( < 4160.000 1120.000 1984.000 >, < 0.000 0.000 0.000 >, 20000.000 );\r
  23                 wait ( 1000.000 );\r
  24                 rotate ( < 0.000 -5.000 0.000 >, 2000.000 );\r
  25                 wait ( 2000.000 );\r
  26                 rotate ( < 0.000 5.000 0.000 >, 2000.000 );\r
  27                 wait ( 2000.000 );\r
  28                 rotate ( < 0.000 20.000 0.000 >, 3000.000 );\r
  29                 wait ( 3000.000 );\r
  30                 rotate ( < 0.000 180.000 0.000 >, 7000.000 );\r
  31         }\r
  32 \r
  33 \r
  34         task ( "move2" )\r
  35         {\r
  36                 move ( < 4160.000 0.000 1984.000 >, < 0.000 0.000 0.000 >, 2000.000 );\r
  37                 rotate ( < 0.000 180.000 0.000 >, 10000.000 );\r
  38         }\r
  39 \r
  40 }\r
  41 \r
  42 \r
  43 affect ( "shipdoor8", /*@AFFECT_TYPE*/ FLUSH )\r
  44 {\r
  45         wait ( 8000.000 );\r
  46         do ( "move8" );\r
  47 \r
  48         task ( "move8" )\r
  49         {\r
  50                 move ( $tag( "shipdoortag1", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
  51                 wait ( 1000.000 );\r
  52                 move ( $tag( "shipdoortag2", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
  53                 wait ( 1000.000 );\r
  54                 move ( $tag( "shipdoortag3", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
  55                 wait ( 1000.000 );\r
  56                 move ( $tag( "shipdoortag4", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
  57                 wait ( 1000.000 );\r
  58                 move ( $tag( "shipdoortag8a", ORIGIN)$, < 0.000 0.000 0.000 >, 9000.000 );\r
  59         }\r
  60 \r
  61 }\r
  62 \r
  63 \r
  64 affect ( "shipdoor7", /*@AFFECT_TYPE*/ FLUSH )\r
  65 {\r
  66         wait ( 9000.000 );\r
  67         do ( "move7" );\r
  68 \r
  69         task ( "move7" )\r
  70         {\r
  71                 move ( $tag( "shipdoortag1", ORIGIN)$, < 0.000 0.000 0.000 >, 2000.000 );\r
  72                 wait ( 2000.000 );\r
  73                 move ( $tag( "shipdoortag2", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
  74                 wait ( 1000.000 );\r
  75                 move ( $tag( "shipdoortag3", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
  76                 wait ( 1000.000 );\r
  77                 move ( $tag( "shipdoortag4", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
  78                 wait ( 1000.000 );\r
  79                 move ( $tag( "shipdoortag7a", ORIGIN)$, < 0.000 0.000 0.000 >, 8000.000 );\r
  80         }\r
  81 \r
  82 }\r
  83 \r
  84 \r
  85 affect ( "shipdoor6", /*@AFFECT_TYPE*/ FLUSH )\r
  86 {\r
  87         wait ( 10000.000 );\r
  88         do ( "move6" );\r
  89 \r
  90         task ( "move6" )\r
  91         {\r
  92                 move ( $tag( "shipdoortag1", ORIGIN)$, < 0.000 0.000 0.000 >, 3000.000 );\r
  93                 wait ( 3000.000 );\r
  94                 move ( $tag( "shipdoortag2", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
  95                 wait ( 1000.000 );\r
  96                 move ( $tag( "shipdoortag3", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
  97                 wait ( 1000.000 );\r
  98                 move ( $tag( "shipdoortag4", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
  99                 wait ( 1000.000 );\r
 100                 move ( $tag( "shipdoortag6a", ORIGIN)$, < 0.000 0.000 0.000 >, 7000.000 );\r
 101         }\r
 102 \r
 103 }\r
 104 \r
 105 \r
 106 affect ( "shipdoor5", /*@AFFECT_TYPE*/ FLUSH )\r
 107 {\r
 108         wait ( 11000.000 );\r
 109         do ( "move5" );\r
 110 \r
 111         task ( "move5" )\r
 112         {\r
 113                 move ( $tag( "shipdoortag1", ORIGIN)$, < 0.000 0.000 0.000 >, 4000.000 );\r
 114                 wait ( 4000.000 );\r
 115                 move ( $tag( "shipdoortag2", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
 116                 wait ( 1000.000 );\r
 117                 move ( $tag( "shipdoortag3", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
 118                 wait ( 1000.000 );\r
 119                 move ( $tag( "shipdoortag4", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
 120                 wait ( 1000.000 );\r
 121                 move ( $tag( "shipdoortag5a", ORIGIN)$, < 0.000 0.000 0.000 >, 6000.000 );\r
 122         }\r
 123 \r
 124 }\r
 125 \r
 126 \r
 127 affect ( "shipdoor4", /*@AFFECT_TYPE*/ FLUSH )\r
 128 {\r
 129         wait ( 12000.000 );\r
 130         do ( "move4" );\r
 131 \r
 132         task ( "move4" )\r
 133         {\r
 134                 move ( $tag( "shipdoortag1", ORIGIN)$, < 0.000 0.000 0.000 >, 5000.000 );\r
 135                 wait ( 5000.000 );\r
 136                 move ( $tag( "shipdoortag2", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
 137                 wait ( 1000.000 );\r
 138                 move ( $tag( "shipdoortag3", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
 139                 wait ( 1000.000 );\r
 140                 move ( $tag( "shipdoortag4", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
 141                 wait ( 1000.000 );\r
 142                 move ( $tag( "shipdoortag4a", ORIGIN)$, < 0.000 0.000 0.000 >, 5000.000 );\r
 143         }\r
 144 \r
 145 }\r
 146 \r
 147 \r
 148 affect ( "shipdoor3", /*@AFFECT_TYPE*/ FLUSH )\r
 149 {\r
 150         wait ( 13000.000 );\r
 151         do ( "move3" );\r
 152 \r
 153         task ( "move3" )\r
 154         {\r
 155                 move ( $tag( "shipdoortag1", ORIGIN)$, < 0.000 0.000 0.000 >, 6000.000 );\r
 156                 wait ( 6000.000 );\r
 157                 move ( $tag( "shipdoortag2", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
 158                 wait ( 1000.000 );\r
 159                 move ( $tag( "shipdoortag3", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
 160                 wait ( 1000.000 );\r
 161                 move ( $tag( "shipdoortag4", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
 162                 wait ( 1000.000 );\r
 163                 move ( $tag( "shipdoortag3a", ORIGIN)$, < 0.000 0.000 0.000 >, 4000.000 );\r
 164         }\r
 165 \r
 166 }\r
 167 \r
 168 \r
 169 affect ( "shipdoor2", /*@AFFECT_TYPE*/ FLUSH )\r
 170 {\r
 171         wait ( 14000.000 );\r
 172         do ( "move2" );\r
 173 \r
 174         task ( "move2" )\r
 175         {\r
 176                 move ( $tag( "shipdoortag1", ORIGIN)$, < 0.000 0.000 0.000 >, 7000.000 );\r
 177                 wait ( 7000.000 );\r
 178                 move ( $tag( "shipdoortag2", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
 179                 wait ( 1000.000 );\r
 180                 move ( $tag( "shipdoortag3", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
 181                 wait ( 1000.000 );\r
 182                 move ( $tag( "shipdoortag4", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
 183                 wait ( 1000.000 );\r
 184                 move ( $tag( "shipdoortag2a", ORIGIN)$, < 0.000 0.000 0.000 >, 3000.000 );\r
 185         }\r
 186 \r
 187 }\r
 188 \r
 189 \r
 190 affect ( "shipdoor1", /*@AFFECT_TYPE*/ FLUSH )\r
 191 {\r
 192         wait ( 15000.000 );\r
 193         do ( "move1" );\r
 194 \r
 195         task ( "move1" )\r
 196         {\r
 197                 move ( $tag( "shipdoortag1", ORIGIN)$, < 0.000 0.000 0.000 >, 8000.000 );\r
 198                 wait ( 8000.000 );\r
 199                 move ( $tag( "shipdoortag2", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
 200                 wait ( 1000.000 );\r
 201                 move ( $tag( "shipdoortag3", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
 202                 wait ( 1000.000 );\r
 203                 move ( $tag( "shipdoortag4", ORIGIN)$, < 0.000 0.000 0.000 >, 1000.000 );\r
 204                 wait ( 1000.000 );\r
 205                 move ( $tag( "shipdoortag1a", ORIGIN)$, < 0.000 0.000 0.000 >, 2000.000 );\r
 206         }\r
 207 \r
 208 }\r
 209 \r