scenario = "Sending triggers to NIC";
begin;
text { caption = "Hello world!"; font_size = 24; } hello;
picture {
text hello;
x = 0; y = 100;
} hello_pic;
trial {
picture hello_pic;
time = 0;
} hello_trial;
begin_pcl;
bool isConnected = false;
# socket creation
socket s = new socket();
hello.set_caption( "Connecting to trigger server..." );
hello.redraw();
hello_trial.set_duration( 1000 );
hello_trial.present();
# Connect to the NIC server. The example assumes that NIC runs
# on the same computer as Presentation. Change "localhost" by the IP or
# computer's name where NIC is running. The NIC server runs on port 1234.
# The time-out at 5 secs (5000 ms) can be changed according to your needs.
# 8 bits for the codification and no ecryption.
isConnected = s.open( "localhost", 1234, 5000,
socket::ANSI , socket::UNENCRYPTED );
if isConnected == true
then
hello_trial.set_duration( 3000 );
loop
int i = 1
until
i > 50
begin
hello.set_caption( "Sending trigger # " + string( i ) );
hello.redraw();
# The NIC server process a trigger whenever it receives
# a string with the following format:
# xxx
# where xxx is any number different from zero.
s.send("" + string( i ) + "");
hello_trial.present();
i = i + 1
end
else
hello.set_caption( "Time out connecting to the server" );
hello.redraw();
hello_trial.present();
end