mirror of
https://github.com/polserver/polserver
synced 2026-08-13 08:23:08 -04:00
* Allow custom boat control script defined in boat item descriptor * Rename boat.setpilot to boat.set_pilot
14 lines
345 B
Text
14 lines
345 B
Text
use os;
|
|
program start_boat( param )
|
|
var ev, listener := start_script( ":testboat:boat", param );
|
|
|
|
// The default control script starts forwards events from the boat control
|
|
// script to the created listener.
|
|
|
|
while ( param )
|
|
if ( ev := wait_for_event(10) )
|
|
listener.sendevent( ev );
|
|
endif
|
|
endwhile
|
|
return 1;
|
|
endprogram
|