Midship platform device machine

Midship device, runs on a script and has a custom animation. Uses trigger volumes :D

http://s68.photobucket.com/albums/i5...=WhatZMTis.flv

Download a not so low res version (bink .exe video):
http://files.filefront.com/WhatZMTis.../fileinfo.html

This is the script but good luck getting it all to work (creating animations, and setting up trigger volumes). :'(

Code:

---

(global boolean balance true)

(script continuous tilt
(if (and (volume_test_objects tilt1 (players)) (volume_test_objects tilt2 (players)) true)
(begin
(set balance false)))
(set balance true))

(script continuous tilt1
(if (and (<= (device_get_position test) .7) (>= (device_get_position test) .3) (= balance false) true)
(begin
(device_set_position test .5))))

(script continuous tilt2
(if (and (> (device_get_position test) .7) (= balance false) true)
(begin
(device_set_position test 1)
(sleep 10)
(device_set_position_immediate test .6))))

(script continuous tilt3
(if (and (< (device_get_position test) .3) (= balance false) true)
(begin
(device_set_position test 0)
(sleep 10)
(device_set_position_immediate test .4))))

(script startup fix
(device_set_position_immediate test .5))

(script continuous rc
(if (and (volume_test_objects rc (players)) (<= (device_get_position test) .7) (>= (device_get_position test) .3) (=  balance true) true)
(begin
(device_set_position test .6))))

(script continuous rc2
(if (and (volume_test_objects rc (players)) (> (device_get_position test) .7) (= balance true) true)
(begin
(device_set_position test 1)
(sleep 10)
(device_set_position_immediate test .6))))

(script continuous rc3
(if (and (volume_test_objects rc (players)) (< (device_get_position test) .3) (= balance true) true)
(begin
(device_set_position test 0)
(sleep 10)
(device_set_position_immediate test .4))))

(script continuous lc
(if (and (volume_test_objects lc (players)) (>= (device_get_position test) .7) (<= (device_get_position test) .3) ( = balance true) true)
(begin
(device_set_position test .4))))

(script continuous lc2
(if (and (volume_test_objects lc (players)) (> (device_get_position test) .7) (= balance true) true)
(begin
(device_set_position test 1)
(sleep 10)
(device_set_position_immediate test .6))))

(script continuous lc3
(if (and (volume_test_objects lc (players)) (< (device_get_position test) .3) (= balance true) true)
(begin
(device_set_position test 0)
(sleep 10)
(device_set_position_immediate test .4))))

(script continuous lr
(if (and (volume_test_objects lr (players)) (< (device_get_position test) .2) (= balance true) true)
(begin
(device_set_position test .2))))

(script continuous lr2
(if (and (volume_test_objects lr (players)) (>= (device_get_position test) .3) (<= (device_get_position test) .7) (= balance true) true)
(begin
(device_set_position test .4)
(sleep 10)
(device_set_position_immediate test 0))))

(script continuous lr3
(if (and (volume_test_objects lr (players)) (> (device_get_position test) .7) (= balance true) true)
(begin
(device_set_position test 1)
(sleep 10)
(device_set_position_immediate test .6))))

(script continuous ll
(if (and (volume_test_objects ll (players)) (>= (device_get_position test) .3) (<= (device_get_position test) .7) (= balance true) true)
(begin
(device_set_position test .3))))

(script continuous ll2
(if (and (volume_test_objects ll (players)) (< (device_get_position test) .2) (= balance true) true)
(begin
(device_set_position test 0)
(sleep 10)
(device_set_position_immediate test .4))))

(script continuous ll3
(if (and (volume_test_objects ll (players)) (> (device_get_position test) .7) (= balance true) true)
(begin
(device_set_position test 1)
(sleep 10)
(device_set_position_immediate test .6))))

(script continuous rr
(if (and (volume_test_objects rr (players)) (<= (device_get_position test) .7) (>= (device_get_position test) .3) (= balance true) true)
(begin
(device_set_position test .7))))

(script continuous rr2
(if (and (volume_test_objects rr (players)) (> (device_get_position test) .7) (= balance true) true)
(begin
(device_set_position test 1)
(sleep 10)
(device_set_position_immediate test .6))))

(script continuous rr3
(if (and (volume_test_objects rr (players)) (< (device_get_position test) .3) (= balance true) true)
(begin
(device_set_position test 0)
(sleep 10)
(device_set_position_immediate test .4))))

(script continuous rl
(if (and (volume_test_objects rl (players)) (<= (device_get_position test) .7) (>= (device_get_position test)  .3) (= balance true) true)
(begin
(device_set_position test .6)
(sleep 10)
(device_set_position_immediate test 1)
(device_set_position test .8))))

(script continuous rl2
(if (and (volume_test_objects rl (players)) (> (device_get_position test) .8) (= balance true) true)
(begin
(device_set_position test .8))))

(script continuous rl3
(if (and (volume_test_objects rl (players)) (< (device_get_position test) .3) (= balance true) true)
(begin
(device_set_position test 0)
(sleep 10)
(device_set_position_immediate test .4)
(device_set_position test .6))))

(script continuous all1
(if (and (not (volume_test_objects all (players))) (<= (device_get_position test) .7) (>= (device_get_position test) .3) true)
(begin
(device_set_position test .5))))

(script continuous all2
(if (and (not (volume_test_objects all (players))) (> (device_get_position test) .7) true)
(begin
(device_set_position test 1)
(sleep 10)
(device_set_position_immediate test .6))))

(script continuous all3
(if (and (not (volume_test_objects all (players))) (< (device_get_position test) .3) true)
(begin
(device_set_position test 0)
(sleep 10)
(device_set_position_immediate test .4))))

---

LEET if you want me to remove this just tell me

o.o Wow, that is a big script. :p

Its cool put pointless.

Not really. The constant motion of Midship's middle platorm could really fuck your aim up and allow for some insane fights.

Like I said on GBX, it's great, but would be better if it bounced a bit when jumped on.

this is pretty cool :D

Quote:

---

Originally Posted by xterohx

Its cool put pointless.

---

Pointless, but part of the map in H2. He has replicated it in a more restricted engine; that's why I like =) (it)

Wha, pretty cool ! :worship:

I like it, it really proves what you can do in CE.

like 2 different bipeds for each team and 2 dif starting weapons :x sh...

nice job random : )

cool, I can't wait to see what else you can do.