// begin of wsclient.pl code file. // begin of unit wsclient code. final class wsclient_main_0 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: main case 0: m.allocate (1); //m.success = m.end_head (); break; case 1: // goal: text_area(_G438) m.put_y_value (0,1); /* 'BrowserTextArea' */ m.call (dlplib.text_area_1); /*6*/ break; case 2: // goal: set_output(_G438) m.put_y_value (0,1); /* 'BrowserTextArea' */ m.call (dlplib.set_output_1); /*6*/ break; case 3: // goal: wsclient m.deallocate (); m.exec (1); /* wsclient_0 */ break; case 4: m.end_rule (); break; } // switch return m.success; } // wsclient:main/0 exec() // wsclient:main/0 decls. // end of wsclient:main/0 decls. public boolean init (DLP m) { return true; } // wsclient:main/0 init() } // wsclient:main/0 final class wsclient_wsclient_0 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: wsclient case 0: m.allocate (2); //m.success = m.end_head (); break; case 1: // goal: format('Load the game ...~n') m.put_atom (data__1__0,1); m.call (dlplib.format_1); /*6*/ break; case 2: // goal: loadURL(url) m.put_z_value (0,1); /* url */ m.call (17) /*2*/; /* loadURL_1 */ break; case 3: // goal: format('the game will start in 5 seconds,~n') m.put_atom (data__2__0,1); m.call (dlplib.format_1); /*6*/ break; case 4: // goal: format('the total playing time is ~w seconds,~n', [time_limit]) m.put_atom (data__3__0,1); m.put_list (2); m.set_z_value (6); /* time_limit */ m.set_nil (); m.call (dlplib.format_2); /*6*/ break; case 5: // goal: sleep(5000) m.put_int (5000,1); m.call (dlplib.sleep_1); /*6*/ break; case 6: // goal: format('joining the game ...~n') m.put_atom (data__4__0,1); m.call (dlplib.format_1); /*6*/ break; case 7: // goal: set_field(wsclient, clock, time_limit) m.put_atom (wsclient__0,1); m.put_atom (clock__0,2); m.put_z_value (6,3); /* time_limit */ m.call (dlplib.set_field_3); /*6*/ break; case 8: // goal: new(wsclock_pulse_client, _G480) m.put_atom (wsclock_pulse_client__0,1); m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.new_2); /*6*/ break; case 9: // goal: new(ball_client(ball, time_limit), _G486) m.put_struct (ball_client__2,1); m.set_atom (ball__0); m.set_z_value (6); /* time_limit */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.new_2); /*6*/ break; case 10: // goal: new(soccerPlayerClientAgent(goalKeeper1, time_limit), _G495) m.put_struct (soccerPlayerClientAgent__2,1); m.set_atom (goalKeeper1__0); m.set_z_value (6); /* time_limit */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.new_2); /*6*/ break; case 11: // goal: new(soccerPlayerClientAgent(goalKeeper2, time_limit), _G504) m.put_struct (soccerPlayerClientAgent__2,1); m.set_atom (goalKeeper2__0); m.set_z_value (6); /* time_limit */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.new_2); /*6*/ break; case 12: // goal: new(soccerPlayerClientAgent(blue8, time_limit), _G513) m.put_struct (soccerPlayerClientAgent__2,1); m.set_atom (blue8__0); m.set_z_value (6); /* time_limit */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.new_2); /*6*/ break; case 13: // goal: new(soccerPlayerClientAgent(blue7, time_limit), _G522) m.put_struct (soccerPlayerClientAgent__2,1); m.set_atom (blue7__0); m.set_z_value (6); /* time_limit */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.new_2); /*6*/ break; case 14: // goal: new(soccerPlayerClientAgent(red2, time_limit), _G531) m.put_struct (soccerPlayerClientAgent__2,1); m.set_atom (red2__0); m.set_z_value (6); /* time_limit */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.new_2); /*6*/ break; case 15: // goal: _G539='a computer' m.put_y_value (1,1); /* 'ClientHost' */ m.put_atom (data__5__0,2); m.call (dlplib.op_eq_2); /*6*/ break; case 16: // goal: assign_nlv_term(this, nreg, 3, 'a computer') m.put_this (1); m.put_nreg (2); m.put_int (3,3); m.put_atom (data__5__0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 17: // goal: code_base_host(_G551) m.put_y_value (0,1); /* 'ServerHost' */ m.call (dlplib.code_base_host_1); /*6*/ break; case 18: // goal: assign_nlv_term(this, nreg, 4, _G551) m.put_this (1); m.put_nreg (2); m.put_int (4,3); m.put_y_value (0,4); /* 'ServerHost' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 19: // goal: wsclient(_G539, _G551, server_port) m.put_y_value (1,1); /* 'ClientHost' */ m.put_y_value (0,2); /* 'ServerHost' */ m.put_z_value (7,3); /* server_port */ m.call (2) /*2*/; /* wsclient_3 */ break; case 20: // goal: true m.deallocate (); m.exec (dlplib.true_0); break; case 21: m.end_rule (); break; } // switch return m.success; } // wsclient:wsclient/0 exec() // wsclient:wsclient/0 decls. public SymbolDescriptor data__1__0; public SymbolDescriptor data__2__0; public SymbolDescriptor data__3__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor sl_sr__0; public SymbolDescriptor data__4__0; public SymbolDescriptor wsclient__0; public SymbolDescriptor clock__0; public SymbolDescriptor wsclock_pulse_client__0; public SymbolDescriptor ball_client__2; public SymbolDescriptor ball__0; public SymbolDescriptor soccerPlayerClientAgent__2; public SymbolDescriptor goalKeeper1__0; public SymbolDescriptor goalKeeper2__0; public SymbolDescriptor blue8__0; public SymbolDescriptor blue7__0; public SymbolDescriptor red2__0; public SymbolDescriptor data__5__0; // end of wsclient:wsclient/0 decls. public boolean init (DLP m) { data__1__0 = m.define_symbol ("Load the game ...~n".intern(), 0); data__2__0 = m.define_symbol ("the game will start in 5 seconds,~n".intern(), 0); data__3__0 = m.define_symbol ("the total playing time is ~w seconds,~n".intern(), 0); op__dot__2 = m.define_symbol (".".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); data__4__0 = m.define_symbol ("joining the game ...~n".intern(), 0); wsclient__0 = m.define_symbol ("wsclient".intern(), 0); clock__0 = m.define_symbol ("clock".intern(), 0); wsclock_pulse_client__0 = m.define_symbol ("wsclock_pulse_client".intern(), 0); ball_client__2 = m.define_symbol ("ball_client".intern(), 2); ball__0 = m.define_symbol ("ball".intern(), 0); soccerPlayerClientAgent__2 = m.define_symbol ("soccerPlayerClientAgent".intern(), 2); goalKeeper1__0 = m.define_symbol ("goalKeeper1".intern(), 0); goalKeeper2__0 = m.define_symbol ("goalKeeper2".intern(), 0); blue8__0 = m.define_symbol ("blue8".intern(), 0); blue7__0 = m.define_symbol ("blue7".intern(), 0); red2__0 = m.define_symbol ("red2".intern(), 0); data__5__0 = m.define_symbol ("a computer".intern(), 0); return true; } // wsclient:wsclient/0 init() } // wsclient:wsclient/0 final class wsclient_wsclient_3 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: wsclient(_G432, _G433, _G434) case 0: m.allocate (3); //m.success = m.get_y_value (2,1); /* ClientHost */ m.get_y_value (1,2); /* ServerHost */ m.get_y_value (0,3); /* ServerPort */ m.end_head (); break; case 1: // goal: assign_nlv_term(this, nreg, 2, _G432) m.put_this (1); m.put_nreg (2); m.put_int (2,3); m.put_y_value (2,4); /* 'ClientHost' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 2: // goal: gg_client_loop(_G432, _G433, _G434) m.put_y_value (2,1); /* 'ClientHost' */ m.put_y_value (1,2); /* 'ServerHost' */ m.put_y_value (0,3); /* 'ServerPort' */ m.deallocate (); m.exec (18); /* gg_client_loop_3 */ break; case 3: m.end_rule (); break; } // switch return m.success; } // wsclient:wsclient/3 exec() // wsclient:wsclient/3 decls. // end of wsclient:wsclient/3 decls. public boolean init (DLP m) { return true; } // wsclient:wsclient/3 init() } // wsclient:wsclient/3 final class wsclient_client_request_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: client_request(_G432) case 0: m.try_me_else (5); m.allocate (2); //m.success = m.get_y_value (1,1); /* Request */ m.end_head (); break; case 1: // goal: client_name=unknown m.put_z_value (1,1); /* client_name */ m.put_atom (unknown__0,2); m.call (dlplib.op_eq_2); /*6*/ break; case 2: // goal: _G432=[register, soccer, _G455] m.put_list (10); m.set_y_value (0); /* 'From' */ m.set_nil (); m.put_list (11); m.set_atom (soccer__0); m.set_x_value (10); /* 'Xtmp' */ m.put_y_value (1,1); /* 'Request' */ m.put_list (2); m.set_atom (register__0); m.set_x_value (11); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 3: // goal: _G455=from(client_host, client_addr) m.put_y_value (0,1); /* 'From' */ m.put_struct (from__2,2); m.set_z_value (2); /* client_host */ m.set_z_value (3); /* client_addr */ m.deallocate (); m.exec (dlplib.op_eq_2); break; case 4: m.end_rule (); break; // head: client_request(_G4152) case 5: m.retry_me_else (10); m.allocate (1); //m.success = m.get_y_value (0,1); /* Request */ m.end_head (); break; case 6: // goal: set_field(client_name, position(0, 0, 0)) m.put_z_value (1,1); /* client_name */ m.put_struct (position__3,2); m.set_float (0f); m.set_float (0f); m.set_float (0f); m.call (dlplib.set_field_2); /*6*/ break; case 7: // goal: set_field(client_name, rotation(0, 0, 0, 0)) m.put_z_value (1,1); /* client_name */ m.put_struct (rotation__4,2); m.set_float (0f); m.set_float (0f); m.set_float (0f); m.set_float (0f); m.call (dlplib.set_field_2); /*6*/ break; case 8: // goal: local_processing(_G4152) m.put_y_value (0,1); /* 'Request' */ m.deallocate (); m.exec (12); /* local_processing_1 */ break; case 9: m.end_rule (); break; // head: client_request(_G7340) case 10: m.trust_or_fail (); m.allocate (1); //m.success = m.get_x_varia (10,1); /* Request */ m.end_head (); break; case 11: // goal: _G7340=[unregister, soccer, [_G7360]] m.put_list (11); m.set_y_value (0); /* 'User' */ m.set_nil (); m.put_list (12); m.set_x_value (11); /* 'Xtmp' */ m.set_nil (); m.put_list (13); m.set_atom (soccer__0); m.set_x_value (12); /* 'Xtmp' */ m.put_x_value (10,1); /* 'Request' */ m.put_list (2); m.set_atom (unregister__0); m.set_x_value (13); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 12: // goal: client_ident(_G7360) m.put_y_value (0,1); /* 'User' */ m.deallocate (); m.exec (15); /* client_ident_1 */ break; case 13: m.end_rule (); break; } // switch return m.success; } // wsclient:client_request/1 exec() // wsclient:client_request/1 decls. public SymbolDescriptor unknown__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor register__0; public SymbolDescriptor soccer__0; public SymbolDescriptor sl_sr__0; public SymbolDescriptor from__2; public SymbolDescriptor position__3; public SymbolDescriptor rotation__4; public SymbolDescriptor unregister__0; // end of wsclient:client_request/1 decls. public boolean init (DLP m) { unknown__0 = m.define_symbol ("unknown".intern(), 0); op__dot__2 = m.define_symbol (".".intern(), 2); register__0 = m.define_symbol ("register".intern(), 0); soccer__0 = m.define_symbol ("soccer".intern(), 0); sl_sr__0 = m.define_symbol ("[]".intern(), 0); from__2 = m.define_symbol ("from".intern(), 2); position__3 = m.define_symbol ("position".intern(), 3); rotation__4 = m.define_symbol ("rotation".intern(), 4); unregister__0 = m.define_symbol ("unregister".intern(), 0); return true; } // wsclient:client_request/1 init() } // wsclient:client_request/1 final class wsclient_client_chat_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: client_chat(_G432, _G433) case 0: m.allocate (4); //m.success = m.get_y_value (3,1); /* Recipient */ m.get_y_value (2,2); /* Text */ m.end_head (); break; case 1: // goal: get_field(wsclient, name, _G443) m.put_atom (wsclient__0,1); m.put_atom (name__0,2); m.put_y_value (1,3); /* 'ClientName' */ m.call (dlplib.get_field_3); /*6*/ break; case 2: // goal: _G448=[tell, text, [user(client_host, _G443), [_G432], _G433]] m.put_list (10); m.set_y_value (3); /* 'Recipient' */ m.set_nil (); m.put_list (11); m.set_y_value (2); /* 'Text' */ m.set_nil (); m.put_struct (user__2,12); m.set_z_value (2); /* client_host */ m.set_y_value (1); /* 'ClientName' */ m.put_list (13); m.set_x_value (10); /* 'Xtmp' */ m.set_x_value (11); /* 'Xtmp' */ m.put_list (14); m.set_x_value (12); /* 'Xtmp' */ m.set_x_value (13); /* 'Xtmp' */ m.put_list (15); m.set_x_value (14); /* 'Xtmp' */ m.set_nil (); m.put_list (16); m.set_atom (text__0); m.set_x_value (15); /* 'Xtmp' */ m.put_y_value (0,1); /* 'TellMessage' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (16); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 3: // goal: set_queue(_G443, _G448) m.put_y_value (1,1); /* 'ClientName' */ m.put_y_value (0,2); /* 'TellMessage' */ m.deallocate (); m.exec (dlplib.set_queue_2); break; case 4: m.end_rule (); break; } // switch return m.success; } // wsclient:client_chat/2 exec() // wsclient:client_chat/2 decls. public SymbolDescriptor wsclient__0; public SymbolDescriptor name__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor tell__0; public SymbolDescriptor text__0; public SymbolDescriptor user__2; public SymbolDescriptor sl_sr__0; // end of wsclient:client_chat/2 decls. public boolean init (DLP m) { wsclient__0 = m.define_symbol ("wsclient".intern(), 0); name__0 = m.define_symbol ("name".intern(), 0); op__dot__2 = m.define_symbol (".".intern(), 2); tell__0 = m.define_symbol ("tell".intern(), 0); text__0 = m.define_symbol ("text".intern(), 0); user__2 = m.define_symbol ("user".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); return true; } // wsclient:client_chat/2 init() } // wsclient:client_chat/2 final class wsclient_server_reply_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: server_reply(_G432) case 0: m.try_me_else (7); m.allocate (6); //m.success = m.get_x_varia (10,1); /* ReplyTerm */ m.cut_level (4); m.end_head (); break; case 1: // goal: _G432=[tell, position, _G449] m.put_list (11); m.set_y_value (5); /* 'Data' */ m.set_nil (); m.put_list (12); m.set_atom (position__0); m.set_x_value (11); /* 'Xtmp' */ m.put_x_value (10,1); /* 'ReplyTerm' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (12); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 2: // goal: _G449=[user(_G461, _G462), position(_G467, _G468, _G469)] m.put_struct (position__3,13); m.set_y_value (2); /* 'X' */ m.set_y_value (1); /* 'Y' */ m.set_y_value (0); /* 'Z' */ m.put_struct (user__2,14); m.set_v_varia (); /* 'Unknown' */ m.set_y_value (3); /* 'Name' */ m.put_list (16); m.set_x_value (13); /* 'Xtmp' */ m.set_nil (); m.put_y_value (5,1); /* 'Data' */ m.put_list (2); m.set_x_value (14); /* 'Xtmp' */ m.set_x_value (16); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 3: // goal: client_name\=_G462 m.put_z_value (1,1); /* client_name */ m.put_y_value (3,2); /* 'Name' */ m.call (dlplib.op_neq_2); /*6*/ break; case 4: // goal: ! m.cut_body (4); break; case 5: // goal: setSFVec3f(_G462, set_position, _G467, _G468, _G469) m.put_y_value (3,1); /* 'Name' */ m.put_atom (set_position__0,2); m.put_y_value (2,3); /* 'X' */ m.put_y_value (1,4); /* 'Y' */ m.put_y_value (0,5); /* 'Z' */ m.deallocate (); m.exec (19); /* setSFVec3f_5 */ break; case 6: m.end_rule (); break; // head: server_reply(_G6702) case 7: m.retry_me_else (14); m.allocate (4); //m.success = m.get_x_varia (10,1); /* ReplyTerm */ m.cut_level (2); m.end_head (); break; case 8: // goal: _G6702=[tell, text, _G6719] m.put_list (11); m.set_y_value (3); /* 'Message' */ m.set_nil (); m.put_list (12); m.set_atom (text__0); m.set_x_value (11); /* 'Xtmp' */ m.put_x_value (10,1); /* 'ReplyTerm' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (12); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 9: // goal: _G6719=[user(_G6731, _G6732), _G6734, _G6737] m.put_list (13); m.set_y_value (0); /* 'Text' */ m.set_nil (); m.put_struct (user__2,14); m.set_v_varia (); /* 'Unknown' */ m.set_y_value (1); /* 'Name' */ m.put_list (16); m.set_v_varia (); /* 'Unknown' */ m.set_x_value (13); /* 'Xtmp' */ m.put_y_value (3,1); /* 'Message' */ m.put_list (2); m.set_x_value (14); /* 'Xtmp' */ m.set_x_value (16); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 10: // goal: ! m.cut_body (2); break; case 11: // goal: show_chat_text(_G6732, _G6737) m.put_y_value (1,1); /* 'Name' */ m.put_y_value (0,2); /* 'Text' */ m.call (10) /*2*/; /* show_chat_text_2 */ break; case 12: // goal: true m.deallocate (); m.exec (dlplib.true_0); break; case 13: m.end_rule (); break; // head: server_reply(_G11381) case 14: m.retry_me_else (21); m.allocate (7); //m.success = m.get_x_varia (10,1); /* ReplyTerm */ m.cut_level (5); m.end_head (); break; case 15: // goal: _G11381=[tell, rotation, _G11398] m.put_list (11); m.set_y_value (6); /* 'Data' */ m.set_nil (); m.put_list (12); m.set_atom (rotation__0); m.set_x_value (11); /* 'Xtmp' */ m.put_x_value (10,1); /* 'ReplyTerm' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (12); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 16: // goal: _G11398=[user(_G11410, _G11411), rotation(_G11416, _G11417, _G11418, _G11419)] m.put_struct (rotation__4,13); m.set_y_value (3); /* 'X' */ m.set_y_value (2); /* 'Y' */ m.set_y_value (1); /* 'Z' */ m.set_y_value (0); /* 'R' */ m.put_struct (user__2,14); m.set_v_varia (); /* 'Unknown' */ m.set_y_value (4); /* 'Name' */ m.put_list (16); m.set_x_value (13); /* 'Xtmp' */ m.set_nil (); m.put_y_value (6,1); /* 'Data' */ m.put_list (2); m.set_x_value (14); /* 'Xtmp' */ m.set_x_value (16); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 17: // goal: client_name\=_G11411 m.put_z_value (1,1); /* client_name */ m.put_y_value (4,2); /* 'Name' */ m.call (dlplib.op_neq_2); /*6*/ break; case 18: // goal: ! m.cut_body (5); break; case 19: // goal: setRotation(_G11411, _G11416, _G11417, _G11418, _G11419) m.put_y_value (4,1); /* 'Name' */ m.put_y_value (3,2); /* 'X' */ m.put_y_value (2,3); /* 'Y' */ m.put_y_value (1,4); /* 'Z' */ m.put_y_value (0,5); /* 'R' */ m.deallocate (); m.exec (20); /* setRotation_5 */ break; case 20: m.end_rule (); break; // head: server_reply(_G17305) case 21: m.retry_me_else (29); m.allocate (10); //m.success = m.get_x_varia (10,1); /* ReplyTerm */ m.cut_level (8); m.end_head (); break; case 22: // goal: _G17305=[tell, position_and_rotation, _G17322] m.put_list (11); m.set_y_value (9); /* 'Data' */ m.set_nil (); m.put_list (12); m.set_atom (position_and_rotation__0); m.set_x_value (11); /* 'Xtmp' */ m.put_x_value (10,1); /* 'ReplyTerm' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (12); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 23: // goal: _G17322=[user(_G17334, _G17335), position(_G17340, _G17341, _G17342), rotation(_G17347, _G17348, _G17349, _G17350)] m.put_struct (rotation__4,13); m.set_y_value (3); /* 'XR' */ m.set_y_value (2); /* 'YR' */ m.set_y_value (1); /* 'ZR' */ m.set_y_value (0); /* 'RR' */ m.put_struct (position__3,14); m.set_y_value (7); /* 'X' */ m.set_y_value (6); /* 'Y' */ m.set_y_value (5); /* 'Z' */ m.put_list (15); m.set_x_value (13); /* 'Xtmp' */ m.set_nil (); m.put_struct (user__2,16); m.set_v_varia (); /* 'Unknown' */ m.set_y_value (4); /* 'Name' */ m.put_list (18); m.set_x_value (14); /* 'Xtmp' */ m.set_x_value (15); /* 'Xtmp' */ m.put_y_value (9,1); /* 'Data' */ m.put_list (2); m.set_x_value (16); /* 'Xtmp' */ m.set_x_value (18); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 24: // goal: client_name\=_G17335 m.put_z_value (1,1); /* client_name */ m.put_y_value (4,2); /* 'Name' */ m.call (dlplib.op_neq_2); /*6*/ break; case 25: // goal: ! m.cut_body (8); break; case 26: // goal: setSFVec3f(_G17335, set_position, _G17340, _G17341, _G17342) m.put_y_value (4,1); /* 'Name' */ m.put_atom (set_position__0,2); m.put_y_value (7,3); /* 'X' */ m.put_y_value (6,4); /* 'Y' */ m.put_y_value (5,5); /* 'Z' */ m.call (19) /*2*/; /* setSFVec3f_5 */ break; case 27: // goal: setRotation(_G17335, _G17347, _G17348, _G17349, _G17350) m.put_y_value (4,1); /* 'Name' */ m.put_y_value (3,2); /* 'XR' */ m.put_y_value (2,3); /* 'YR' */ m.put_y_value (1,4); /* 'ZR' */ m.put_y_value (0,5); /* 'RR' */ m.deallocate (); m.exec (20); /* setRotation_5 */ break; case 28: m.end_rule (); break; // head: server_reply(_G24886) case 29: m.retry_me_else (36); m.allocate (3); //m.success = m.get_x_varia (10,1); /* ReplyTerm */ m.cut_level (2); m.end_head (); break; case 30: // goal: _G24886=[reply, update, [_G24906, _G24909]] m.put_list (11); m.set_y_value (0); /* 'Message' */ m.set_nil (); m.put_list (12); m.set_y_value (1); /* 'Count' */ m.set_x_value (11); /* 'Xtmp' */ m.put_list (13); m.set_x_value (12); /* 'Xtmp' */ m.set_nil (); m.put_list (14); m.set_atom (update__0); m.set_x_value (13); /* 'Xtmp' */ m.put_x_value (10,1); /* 'ReplyTerm' */ m.put_list (2); m.set_atom (reply__0); m.set_x_value (14); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 31: // goal: ! m.cut_body (2); break; case 32: // goal: assign_nlv_term(this, nreg, 5, _G24906) m.put_this (1); m.put_nreg (2); m.put_int (5,3); m.put_y_value (1,4); /* 'Count' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 33: // goal: print_server_queue_size(client_name, _G24906) m.put_z_value (1,1); /* client_name */ m.put_y_value (1,2); /* 'Count' */ m.call (11) /*2*/; /* print_server_queue_size_2 */ break; case 34: // goal: server_reply(_G24909) m.put_y_value (0,1); /* 'Message' */ m.deallocate (); m.exec (5); /* server_reply_1 */ break; case 35: m.end_rule (); break; // head: server_reply(_G29544) case 36: m.retry_me_else (43); m.allocate (3); //m.success = m.get_x_varia (10,1); /* ReplyTerm */ m.cut_level (2); m.end_head (); break; case 37: // goal: _G29544=[tell, move_player, _G29561] m.put_list (11); m.set_y_value (0); /* 'Data' */ m.set_nil (); m.put_list (12); m.set_atom (move_player__0); m.set_x_value (11); /* 'Xtmp' */ m.put_x_value (10,1); /* 'ReplyTerm' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (12); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 38: // goal: _G29561=[user(_G29573, _G29574), _G29576, _G29579, _G29582, _G29585, _G29588, _G29591, _G29594] m.put_list (13); m.set_v_varia (); /* 'Unknown' */ m.set_nil (); m.put_list (15); m.set_v_varia (); /* 'Unknown' */ m.set_x_value (13); /* 'Xtmp' */ m.put_list (17); m.set_v_varia (); /* 'Unknown' */ m.set_x_value (15); /* 'Xtmp' */ m.put_list (19); m.set_v_varia (); /* 'Unknown' */ m.set_x_value (17); /* 'Xtmp' */ m.put_list (21); m.set_v_varia (); /* 'Unknown' */ m.set_x_value (19); /* 'Xtmp' */ m.put_list (23); m.set_v_varia (); /* 'Unknown' */ m.set_x_value (21); /* 'Xtmp' */ m.put_struct (user__2,25); m.set_v_varia (); /* 'Unknown' */ m.set_y_value (1); /* 'Player' */ m.put_list (27); m.set_v_varia (); /* 'Unknown' */ m.set_x_value (23); /* 'Xtmp' */ m.put_y_value (0,1); /* 'Data' */ m.put_list (2); m.set_x_value (25); /* 'Xtmp' */ m.set_x_value (27); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 39: // goal: ! m.cut_body (2); break; case 40: // goal: set_queue(_G29574, [move_player, _G29561]) m.put_list (29); m.set_y_value (0); /* 'Data' */ m.set_nil (); m.put_y_value (1,1); /* 'Player' */ m.put_list (2); m.set_atom (move_player__0); m.set_x_value (29); /* 'Xtmp' */ m.call (dlplib.set_queue_2); /*6*/ break; case 41: // goal: sleep(100) m.put_int (100,1); m.deallocate (); m.exec (dlplib.sleep_1); break; case 42: m.end_rule (); break; // head: server_reply(_G36394) case 43: m.retry_me_else (50); m.allocate (3); //m.success = m.get_x_varia (10,1); /* ReplyTerm */ m.cut_level (2); m.end_head (); break; case 44: // goal: _G36394=[tell, run_and_trace, _G36411] m.put_list (11); m.set_y_value (0); /* 'Data' */ m.set_nil (); m.put_list (12); m.set_atom (run_and_trace__0); m.set_x_value (11); /* 'Xtmp' */ m.put_x_value (10,1); /* 'ReplyTerm' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (12); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 45: // goal: _G36411=[user(_G36423, _G36424), _G36426, _G36429, _G36432, _G36435, _G36438, _G36441, _G36444, _G36447] m.put_list (13); m.set_v_varia (); /* 'Unknown' */ m.set_nil (); m.put_list (15); m.set_v_varia (); /* 'Unknown' */ m.set_x_value (13); /* 'Xtmp' */ m.put_list (17); m.set_v_varia (); /* 'Unknown' */ m.set_x_value (15); /* 'Xtmp' */ m.put_list (19); m.set_v_varia (); /* 'Unknown' */ m.set_x_value (17); /* 'Xtmp' */ m.put_list (21); m.set_v_varia (); /* 'Unknown' */ m.set_x_value (19); /* 'Xtmp' */ m.put_list (23); m.set_v_varia (); /* 'Unknown' */ m.set_x_value (21); /* 'Xtmp' */ m.put_list (25); m.set_v_varia (); /* 'Unknown' */ m.set_x_value (23); /* 'Xtmp' */ m.put_struct (user__2,27); m.set_v_varia (); /* 'Unknown' */ m.set_y_value (1); /* 'Player' */ m.put_list (29); m.set_v_varia (); /* 'Unknown' */ m.set_x_value (25); /* 'Xtmp' */ m.put_y_value (0,1); /* 'Data' */ m.put_list (2); m.set_x_value (27); /* 'Xtmp' */ m.set_x_value (29); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 46: // goal: ! m.cut_body (2); break; case 47: // goal: set_queue(_G36424, [run_and_trace, _G36411]) m.put_list (31); m.set_y_value (0); /* 'Data' */ m.set_nil (); m.put_y_value (1,1); /* 'Player' */ m.put_list (2); m.set_atom (run_and_trace__0); m.set_x_value (31); /* 'Xtmp' */ m.call (dlplib.set_queue_2); /*6*/ break; case 48: // goal: sleep(100) m.put_int (100,1); m.deallocate (); m.exec (dlplib.sleep_1); break; case 49: m.end_rule (); break; // head: server_reply(_G43713) case 50: m.retry_me_else (55); m.allocate (1); //m.success = m.get_x_varia (10,1); /* ReplyTerm */ m.cut_level (0); m.end_head (); break; case 51: // goal: _G43713=none m.put_x_value (10,1); /* 'ReplyTerm' */ m.put_atom (none__0,2); m.call (dlplib.op_eq_2); /*6*/ break; case 52: // goal: ! m.cut_body (0); break; case 53: // goal: true m.deallocate (); m.exec (dlplib.true_0); break; case 54: m.end_rule (); break; // head: server_reply(_G46132) case 55: m.retry_me_else (60); m.allocate (2); //m.success = m.get_x_varia (10,1); /* ReplyTerm */ m.cut_level (1); m.end_head (); break; case 56: // goal: _G46132=[tell, kick_ball, _G46149] m.put_list (11); m.set_y_value (0); /* 'Data' */ m.set_nil (); m.put_list (12); m.set_atom (kick_ball__0); m.set_x_value (11); /* 'Xtmp' */ m.put_x_value (10,1); /* 'ReplyTerm' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (12); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 57: // goal: ! m.cut_body (1); break; case 58: // goal: set_queue(ball, [kick_ball, _G46149]) m.put_list (13); m.set_y_value (0); /* 'Data' */ m.set_nil (); m.put_atom (ball__0,1); m.put_list (2); m.set_atom (kick_ball__0); m.set_x_value (13); /* 'Xtmp' */ m.deallocate (); m.exec (dlplib.set_queue_2); break; case 59: m.end_rule (); break; // head: server_reply(_G49520) case 60: m.retry_me_else (65); m.allocate (2); //m.success = m.get_x_varia (10,1); /* ReplyTerm */ m.cut_level (1); m.end_head (); break; case 61: // goal: _G49520=[tell, move_ball, _G49537] m.put_list (11); m.set_y_value (0); /* 'Data' */ m.set_nil (); m.put_list (12); m.set_atom (move_ball__0); m.set_x_value (11); /* 'Xtmp' */ m.put_x_value (10,1); /* 'ReplyTerm' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (12); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 62: // goal: ! m.cut_body (1); break; case 63: // goal: set_queue(ball, [move_ball, _G49537]) m.put_list (13); m.set_y_value (0); /* 'Data' */ m.set_nil (); m.put_atom (ball__0,1); m.put_list (2); m.set_atom (move_ball__0); m.set_x_value (13); /* 'Xtmp' */ m.deallocate (); m.exec (dlplib.set_queue_2); break; case 64: m.end_rule (); break; // head: server_reply(_G14063) case 65: m.retry_me_else (71); m.allocate (3); //m.success = m.get_x_varia (10,1); /* ReplyTerm */ m.cut_level (2); m.end_head (); break; case 66: // goal: _G14063=[tell, ball_position, _G14077] m.put_list (11); m.set_y_value (0); /* 'Data' */ m.set_nil (); m.put_list (12); m.set_atom (ball_position__0); m.set_x_value (11); /* 'Xtmp' */ m.put_x_value (10,1); /* 'ReplyTerm' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (12); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 67: // goal: _G14077=[_G14086, position(_G14092, _G14093, _G14094)] m.put_struct (position__3,13); m.set_v_varia (); /* 'Unknown' */ m.set_v_varia (); /* 'Unknown' */ m.set_v_varia (); /* 'Unknown' */ m.put_list (17); m.set_x_value (13); /* 'Xtmp' */ m.set_nil (); m.put_y_value (0,1); /* 'Data' */ m.put_list (2); m.set_y_value (1); /* 'Ball' */ m.set_x_value (17); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 68: // goal: ! m.cut_body (2); break; case 69: // goal: set_queue(_G14086, [ball_position, _G14077]) m.put_list (18); m.set_y_value (0); /* 'Data' */ m.set_nil (); m.put_y_value (1,1); /* 'Ball' */ m.put_list (2); m.set_atom (ball_position__0); m.set_x_value (18); /* 'Xtmp' */ m.deallocate (); m.exec (dlplib.set_queue_2); break; case 70: m.end_rule (); break; // head: server_reply(_G18356) case 71: m.retry_me_else (76); m.allocate (2); //m.success = m.get_x_varia (10,1); /* ReplyTerm */ m.cut_level (1); m.end_head (); break; case 72: // goal: _G18356=[tell, game_score, _G18373] m.put_list (11); m.set_y_value (0); /* 'Score' */ m.set_nil (); m.put_list (12); m.set_atom (game_score__0); m.set_x_value (11); /* 'Xtmp' */ m.put_x_value (10,1); /* 'ReplyTerm' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (12); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 73: // goal: ! m.cut_body (1); break; case 74: // goal: set_score_board(_G18373) m.put_y_value (0,1); /* 'Score' */ m.deallocate (); m.exec (16); /* set_score_board_1 */ break; case 75: m.end_rule (); break; // head: server_reply(_G21557) case 76: m.retry_me_else (87); m.allocate (8); //m.success = m.get_x_varia (10,1); /* ReplyTerm */ m.cut_level (6); m.end_head (); break; case 77: // goal: _G21557=[reply, accept, [_G21577, _G21580, _G21583, _G21586]] m.put_list (11); m.set_y_value (1); /* 'Others' */ m.set_nil (); m.put_list (12); m.set_y_value (2); /* 'GameScore' */ m.set_x_value (11); /* 'Xtmp' */ m.put_list (13); m.set_y_value (7); /* 'BallPosition' */ m.set_x_value (12); /* 'Xtmp' */ m.put_list (14); m.set_y_value (0); /* 'UserName' */ m.set_x_value (13); /* 'Xtmp' */ m.put_list (15); m.set_x_value (14); /* 'Xtmp' */ m.set_nil (); m.put_list (16); m.set_atom (accept__0); m.set_x_value (15); /* 'Xtmp' */ m.put_x_value (10,1); /* 'ReplyTerm' */ m.put_list (2); m.set_atom (reply__0); m.set_x_value (16); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 78: // goal: _G21580=position(_G21595, _G21596, _G21597) m.put_y_value (7,1); /* 'BallPosition' */ m.put_struct (position__3,2); m.set_y_value (5); /* 'XB' */ m.set_y_value (4); /* 'YB' */ m.set_y_value (3); /* 'ZB' */ m.call (dlplib.op_eq_2); /*6*/ break; case 79: // goal: ! m.cut_body (6); break; case 80: // goal: setPosition(ball, _G21595, _G21596, _G21597) m.put_atom (ball__0,1); m.put_y_value (5,2); /* 'XB' */ m.put_y_value (4,3); /* 'YB' */ m.put_y_value (3,4); /* 'ZB' */ m.call (21) /*2*/; /* setPosition_4 */ break; case 81: // goal: set_score_board(_G21583) m.put_y_value (2,1); /* 'GameScore' */ m.call (16) /*2*/; /* set_score_board_1 */ break; case 82: // goal: new(soccerPlayerUser_client(me, time_limit, _G21577), _G21619) m.put_struct (soccerPlayerUser_client__3,1); m.set_atom (me__0); m.set_z_value (6); /* time_limit */ m.set_y_value (0); /* 'UserName' */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.new_2); /*6*/ break; case 83: // goal: enable_others(_G21586) m.put_y_value (1,1); /* 'Others' */ m.call (6) /*2*/; /* enable_others_1 */ break; case 84: // goal: enable_clientname(_G21577) m.put_y_value (0,1); /* 'UserName' */ m.call (7) /*2*/; /* enable_clientname_1 */ break; case 85: // goal: assign_nlv_term(this, nreg, 1, _G21577) m.put_this (1); m.put_nreg (2); m.put_int (1,3); m.put_y_value (0,4); /* 'UserName' */ m.deallocate (); m.exec (dlplib.assign_nlv_term_4); break; case 86: m.end_rule (); break; // head: server_reply(_G29727) case 87: m.retry_me_else (93); m.allocate (2); //m.success = m.get_x_varia (10,1); /* ReplyTerm */ m.cut_level (1); m.end_head (); break; case 88: // goal: _G29727=[tell, new_player, [_G29747]] m.put_list (11); m.set_y_value (0); /* 'UserName' */ m.set_nil (); m.put_list (12); m.set_x_value (11); /* 'Xtmp' */ m.set_nil (); m.put_list (13); m.set_atom (new_player__0); m.set_x_value (12); /* 'Xtmp' */ m.put_x_value (10,1); /* 'ReplyTerm' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (13); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 89: // goal: client_name\=_G29747 m.put_z_value (1,1); /* client_name */ m.put_y_value (0,2); /* 'UserName' */ m.call (dlplib.op_neq_2); /*6*/ break; case 90: // goal: ! m.cut_body (1); break; case 91: // goal: enable_newplayer(_G29747) m.put_y_value (0,1); /* 'UserName' */ m.deallocate (); m.exec (8); /* enable_newplayer_1 */ break; case 92: m.end_rule (); break; // head: server_reply(_G33366) case 93: m.retry_me_else (99); m.allocate (2); //m.success = m.get_x_varia (10,1); /* ReplyTerm */ m.cut_level (1); m.end_head (); break; case 94: // goal: _G33366=[tell, unregister, [_G33386]] m.put_list (11); m.set_y_value (0); /* 'UserName' */ m.set_nil (); m.put_list (12); m.set_x_value (11); /* 'Xtmp' */ m.set_nil (); m.put_list (13); m.set_atom (unregister__0); m.set_x_value (12); /* 'Xtmp' */ m.put_x_value (10,1); /* 'ReplyTerm' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (13); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 95: // goal: client_name\=_G33386 m.put_z_value (1,1); /* client_name */ m.put_y_value (0,2); /* 'UserName' */ m.call (dlplib.op_neq_2); /*6*/ break; case 96: // goal: ! m.cut_body (1); break; case 97: // goal: disenable_player(_G33386) m.put_y_value (0,1); /* 'UserName' */ m.deallocate (); m.exec (9); /* disenable_player_1 */ break; case 98: m.end_rule (); break; // head: server_reply(_G37005) case 99: m.retry_me_else (105); m.allocate (2); //m.success = m.get_x_varia (10,1); /* ReplyTerm */ m.cut_level (1); m.end_head (); break; case 100: // goal: _G37005=[tell, browser_exit, [_G37025]] m.put_list (11); m.set_y_value (0); /* 'UserName' */ m.set_nil (); m.put_list (12); m.set_x_value (11); /* 'Xtmp' */ m.set_nil (); m.put_list (13); m.set_atom (browser_exit__0); m.set_x_value (12); /* 'Xtmp' */ m.put_x_value (10,1); /* 'ReplyTerm' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (13); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 101: // goal: client_name\=_G37025 m.put_z_value (1,1); /* client_name */ m.put_y_value (0,2); /* 'UserName' */ m.call (dlplib.op_neq_2); /*6*/ break; case 102: // goal: ! m.cut_body (1); break; case 103: // goal: disenable_player(_G37025) m.put_y_value (0,1); /* 'UserName' */ m.deallocate (); m.exec (9); /* disenable_player_1 */ break; case 104: m.end_rule (); break; // head: server_reply(_G40674) case 105: m.retry_me_else (109); m.allocate (1); //m.success = m.get_x_varia (10,1); /* ReplyTerm */ m.cut_level (0); m.end_head (); break; case 106: // goal: _G40674=shutdown m.put_x_value (10,1); /* 'ReplyTerm' */ m.put_atom (shutdown__0,2); m.call (dlplib.op_eq_2); /*6*/ break; case 107: // goal: ! m.cut_tail (0); m.deallocate (); break; case 108: m.end_rule (); break; // head: server_reply(_G43008) case 109: m.retry_me_else (113); m.allocate (1); //m.success = m.get_x_varia (10,1); /* ReplyTerm */ m.cut_level (0); m.end_head (); break; case 110: // goal: _G43008=getChatMessage m.put_x_value (10,1); /* 'ReplyTerm' */ m.put_atom (getChatMessage__0,2); m.call (dlplib.op_eq_2); /*6*/ break; case 111: // goal: ! m.cut_tail (0); m.deallocate (); break; case 112: m.end_rule (); break; // head: server_reply(_G45432) case 113: m.trust_or_fail (); //m.success = m.get_x_varia (10,1); /* ReplyTerm */ m.end_head (); break; case 114: // goal: format('~n~w : SKIPPING UNKNOWN SERVER REPLY : ~w~n', [this, _G45432]) m.put_list (11); m.set_x_value (10); /* 'ReplyTerm' */ m.set_nil (); m.put_atom (data__6__0,1); m.put_list (2); m.set_this (); m.set_x_value (11); /* 'Xtmp' */ m.exec (dlplib.format_2); break; case 115: m.end_rule (); break; } // switch return m.success; } // wsclient:server_reply/1 exec() // wsclient:server_reply/1 decls. public SymbolDescriptor op__dot__2; public SymbolDescriptor tell__0; public SymbolDescriptor position__0; public SymbolDescriptor sl_sr__0; public SymbolDescriptor user__2; public SymbolDescriptor position__3; public SymbolDescriptor set_position__0; public SymbolDescriptor text__0; public SymbolDescriptor rotation__0; public SymbolDescriptor rotation__4; public SymbolDescriptor position_and_rotation__0; public SymbolDescriptor reply__0; public SymbolDescriptor update__0; public SymbolDescriptor move_player__0; public SymbolDescriptor run_and_trace__0; public SymbolDescriptor none__0; public SymbolDescriptor kick_ball__0; public SymbolDescriptor ball__0; public SymbolDescriptor move_ball__0; public SymbolDescriptor ball_position__0; public SymbolDescriptor game_score__0; public SymbolDescriptor accept__0; public SymbolDescriptor soccerPlayerUser_client__3; public SymbolDescriptor me__0; public SymbolDescriptor new_player__0; public SymbolDescriptor unregister__0; public SymbolDescriptor browser_exit__0; public SymbolDescriptor shutdown__0; public SymbolDescriptor getChatMessage__0; public SymbolDescriptor data__6__0; public SymbolDescriptor this__0; // end of wsclient:server_reply/1 decls. public boolean init (DLP m) { op__dot__2 = m.define_symbol (".".intern(), 2); tell__0 = m.define_symbol ("tell".intern(), 0); position__0 = m.define_symbol ("position".intern(), 0); sl_sr__0 = m.define_symbol ("[]".intern(), 0); user__2 = m.define_symbol ("user".intern(), 2); position__3 = m.define_symbol ("position".intern(), 3); set_position__0 = m.define_symbol ("set_position".intern(), 0); text__0 = m.define_symbol ("text".intern(), 0); rotation__0 = m.define_symbol ("rotation".intern(), 0); rotation__4 = m.define_symbol ("rotation".intern(), 4); position_and_rotation__0 = m.define_symbol ("position_and_rotation".intern(), 0); reply__0 = m.define_symbol ("reply".intern(), 0); update__0 = m.define_symbol ("update".intern(), 0); move_player__0 = m.define_symbol ("move_player".intern(), 0); run_and_trace__0 = m.define_symbol ("run_and_trace".intern(), 0); none__0 = m.define_symbol ("none".intern(), 0); kick_ball__0 = m.define_symbol ("kick_ball".intern(), 0); ball__0 = m.define_symbol ("ball".intern(), 0); move_ball__0 = m.define_symbol ("move_ball".intern(), 0); ball_position__0 = m.define_symbol ("ball_position".intern(), 0); game_score__0 = m.define_symbol ("game_score".intern(), 0); accept__0 = m.define_symbol ("accept".intern(), 0); soccerPlayerUser_client__3 = m.define_symbol ("soccerPlayerUser_client".intern(), 3); me__0 = m.define_symbol ("me".intern(), 0); new_player__0 = m.define_symbol ("new_player".intern(), 0); unregister__0 = m.define_symbol ("unregister".intern(), 0); browser_exit__0 = m.define_symbol ("browser_exit".intern(), 0); shutdown__0 = m.define_symbol ("shutdown".intern(), 0); getChatMessage__0 = m.define_symbol ("getChatMessage".intern(), 0); data__6__0 = m.define_symbol ("~n~w : SKIPPING UNKNOWN SERVER REPLY : ~w~n".intern(), 0); this__0 = m.define_symbol ("this".intern(), 0); return true; } // wsclient:server_reply/1 init() } // wsclient:server_reply/1 final class wsclient_enable_others_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: enable_others([]) case 0: m.try_me_else (2); //m.success = m.get_nil (1); m.cut_neck (); m.end_head (); break; case 1: m.end_fact (); break; // head: enable_others([_G1915|_G1916]) case 2: m.trust_or_fail (); m.allocate (2); //m.success = m.get_list (1); m.uni_x_varia (10); /* OtherInfo */ m.uni_y_value (0); /* List */ m.end_head (); break; case 3: // goal: _G1915=user(_G1924, _G1925) m.put_x_value (10,1); /* 'OtherInfo' */ m.put_struct (user__2,2); m.set_v_varia (); /* 'Unknown' */ m.set_y_value (1); /* 'OtherName' */ m.call (dlplib.op_eq_2); /*6*/ break; case 4: // goal: enable_newplayer(_G1925) m.put_y_value (1,1); /* 'OtherName' */ m.call (8) /*2*/; /* enable_newplayer_1 */ break; case 5: // goal: enable_others(_G1916) m.put_y_value (0,1); /* 'List' */ m.deallocate (); m.exec (6); /* enable_others_1 */ break; case 6: m.end_rule (); break; } // switch return m.success; } // wsclient:enable_others/1 exec() // wsclient:enable_others/1 decls. public SymbolDescriptor sl_sr__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor user__2; // end of wsclient:enable_others/1 decls. public boolean init (DLP m) { sl_sr__0 = m.define_symbol ("[]".intern(), 0); op__dot__2 = m.define_symbol (".".intern(), 2); user__2 = m.define_symbol ("user".intern(), 2); return true; } // wsclient:enable_others/1 init() } // wsclient:enable_others/1 final class wsclient_enable_clientname_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: enable_clientname(_G81) case 0: m.allocate (2); //m.success = m.get_y_value (1,1); /* UserName */ m.end_head (); break; case 1: // goal: set_field(wsclient, name, _G81) m.put_atom (wsclient__0,1); m.put_atom (name__0,2); m.put_y_value (1,3); /* 'UserName' */ m.call (dlplib.set_field_3); /*6*/ break; case 2: // goal: _G96=setUserName(_G81) m.put_y_value (0,1); /* 'Term' */ m.put_struct (setUserName__1,2); m.set_y_value (1); /* 'UserName' */ m.call (dlplib.op_eq_2); /*6*/ break; case 3: // goal: set_queue(script, queue, _G96) m.put_atom (script__0,1); m.put_atom (queue__0,2); m.put_y_value (0,3); /* 'Term' */ m.call (dlplib.set_queue_3); /*6*/ break; case 4: // goal: true m.deallocate (); m.exec (dlplib.true_0); break; case 5: m.end_rule (); break; } // switch return m.success; } // wsclient:enable_clientname/1 exec() // wsclient:enable_clientname/1 decls. public SymbolDescriptor wsclient__0; public SymbolDescriptor name__0; public SymbolDescriptor setUserName__1; public SymbolDescriptor script__0; public SymbolDescriptor queue__0; // end of wsclient:enable_clientname/1 decls. public boolean init (DLP m) { wsclient__0 = m.define_symbol ("wsclient".intern(), 0); name__0 = m.define_symbol ("name".intern(), 0); setUserName__1 = m.define_symbol ("setUserName".intern(), 1); script__0 = m.define_symbol ("script".intern(), 0); queue__0 = m.define_symbol ("queue".intern(), 0); return true; } // wsclient:enable_clientname/1 init() } // wsclient:enable_clientname/1 final class wsclient_enable_newplayer_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: enable_newplayer(_G81) case 0: m.allocate (2); //m.success = m.get_y_value (1,1); /* Name */ m.end_head (); break; case 1: // goal: setSFInt32(_G81, whichChoice, 0) m.put_y_value (1,1); /* 'Name' */ m.put_atom (whichChoice__0,2); m.put_int (0,3); m.call (22) /*2*/; /* setSFInt32_3 */ break; case 2: // goal: _G96=addPlayerName(_G81) m.put_y_value (0,1); /* 'Term' */ m.put_struct (addPlayerName__1,2); m.set_y_value (1); /* 'Name' */ m.call (dlplib.op_eq_2); /*6*/ break; case 3: // goal: set_queue(script, queue, _G96) m.put_atom (script__0,1); m.put_atom (queue__0,2); m.put_y_value (0,3); /* 'Term' */ m.deallocate (); m.exec (dlplib.set_queue_3); break; case 4: m.end_rule (); break; } // switch return m.success; } // wsclient:enable_newplayer/1 exec() // wsclient:enable_newplayer/1 decls. public SymbolDescriptor whichChoice__0; public SymbolDescriptor addPlayerName__1; public SymbolDescriptor script__0; public SymbolDescriptor queue__0; // end of wsclient:enable_newplayer/1 decls. public boolean init (DLP m) { whichChoice__0 = m.define_symbol ("whichChoice".intern(), 0); addPlayerName__1 = m.define_symbol ("addPlayerName".intern(), 1); script__0 = m.define_symbol ("script".intern(), 0); queue__0 = m.define_symbol ("queue".intern(), 0); return true; } // wsclient:enable_newplayer/1 init() } // wsclient:enable_newplayer/1 final class wsclient_disenable_player_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: disenable_player(_G81) case 0: m.allocate (2); //m.success = m.get_y_value (1,1); /* Name */ m.end_head (); break; case 1: // goal: setSFInt32(_G81, whichChoice, -1) m.put_y_value (1,1); /* 'Name' */ m.put_atom (whichChoice__0,2); m.put_int (-1,3); m.call (22) /*2*/; /* setSFInt32_3 */ break; case 2: // goal: _G96=removePlayerName(_G81) m.put_y_value (0,1); /* 'Term' */ m.put_struct (removePlayerName__1,2); m.set_y_value (1); /* 'Name' */ m.call (dlplib.op_eq_2); /*6*/ break; case 3: // goal: set_queue(script, queue, _G96) m.put_atom (script__0,1); m.put_atom (queue__0,2); m.put_y_value (0,3); /* 'Term' */ m.deallocate (); m.exec (dlplib.set_queue_3); break; case 4: m.end_rule (); break; } // switch return m.success; } // wsclient:disenable_player/1 exec() // wsclient:disenable_player/1 decls. public SymbolDescriptor whichChoice__0; public SymbolDescriptor removePlayerName__1; public SymbolDescriptor script__0; public SymbolDescriptor queue__0; // end of wsclient:disenable_player/1 decls. public boolean init (DLP m) { whichChoice__0 = m.define_symbol ("whichChoice".intern(), 0); removePlayerName__1 = m.define_symbol ("removePlayerName".intern(), 1); script__0 = m.define_symbol ("script".intern(), 0); queue__0 = m.define_symbol ("queue".intern(), 0); return true; } // wsclient:disenable_player/1 init() } // wsclient:disenable_player/1 final class wsclient_show_chat_text_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: show_chat_text(_G81, _G82) case 0: m.allocate (3); //m.success = m.get_y_value (2,1); /* Name */ m.get_y_value (1,2); /* Text */ m.end_head (); break; case 1: // goal: format('~w: ~w~n', [_G81, _G82]) m.put_list (10); m.set_y_value (1); /* 'Text' */ m.set_nil (); m.put_atom (data__7__0,1); m.put_list (2); m.set_y_value (2); /* 'Name' */ m.set_x_value (10); /* 'Xtmp' */ m.call (dlplib.format_2); /*6*/ break; case 2: // goal: _G102=showChatText(_G81, _G82) m.put_y_value (0,1); /* 'Term' */ m.put_struct (showChatText__2,2); m.set_y_value (2); /* 'Name' */ m.set_y_value (1); /* 'Text' */ m.call (dlplib.op_eq_2); /*6*/ break; case 3: // goal: set_queue(script, queue, _G102) m.put_atom (script__0,1); m.put_atom (queue__0,2); m.put_y_value (0,3); /* 'Term' */ m.call (dlplib.set_queue_3); /*6*/ break; case 4: // goal: true m.deallocate (); m.exec (dlplib.true_0); break; case 5: m.end_rule (); break; } // switch return m.success; } // wsclient:show_chat_text/2 exec() // wsclient:show_chat_text/2 decls. public SymbolDescriptor data__7__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor sl_sr__0; public SymbolDescriptor showChatText__2; public SymbolDescriptor script__0; public SymbolDescriptor queue__0; // end of wsclient:show_chat_text/2 decls. public boolean init (DLP m) { data__7__0 = m.define_symbol ("~w: ~w~n".intern(), 0); op__dot__2 = m.define_symbol (".".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); showChatText__2 = m.define_symbol ("showChatText".intern(), 2); script__0 = m.define_symbol ("script".intern(), 0); queue__0 = m.define_symbol ("queue".intern(), 0); return true; } // wsclient:show_chat_text/2 init() } // wsclient:show_chat_text/2 final class wsclient_print_server_queue_size_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: print_server_queue_size(_G81, _G82) case 0: m.try_me_else (7); m.allocate (4); //m.success = m.get_y_value (1,1); /* ClientName */ m.get_y_value (0,2); /* NewQueueSize */ m.cut_level (2); m.end_head (); break; case 1: // goal: get_field(_G81, old_queue_size, _G92) m.put_y_value (1,1); /* 'ClientName' */ m.put_atom (old_queue_size__0,2); m.put_y_value (3,3); /* 'OldQueueSize' */ m.call (dlplib.get_field_3); /*6*/ break; case 2: // goal: _G82\=_G92 m.put_y_value (0,1); /* 'NewQueueSize' */ m.put_y_value (3,2); /* 'OldQueueSize' */ m.call (dlplib.op_neq_2); /*6*/ break; case 3: // goal: ! m.cut_body (2); break; case 4: // goal: set_field(_G81, old_queue_size, _G82) m.put_y_value (1,1); /* 'ClientName' */ m.put_atom (old_queue_size__0,2); m.put_y_value (0,3); /* 'NewQueueSize' */ m.call (dlplib.set_field_3); /*6*/ break; case 5: // goal: format('~w, ~w : message queue length = ~w~n', [this, client_name, _G82]) m.put_list (10); m.set_y_value (0); /* 'NewQueueSize' */ m.set_nil (); m.put_list (11); m.set_z_value (1); /* client_name */ m.set_x_value (10); /* 'Xtmp' */ m.put_atom (data__8__0,1); m.put_list (2); m.set_this (); m.set_x_value (11); /* 'Xtmp' */ m.deallocate (); m.exec (dlplib.format_2); break; case 6: m.end_rule (); break; // head: print_server_queue_size(_G4650, _G4651) case 7: m.trust_or_fail (); //m.success = m.get_v_varia (1); /* Unknown */ m.get_v_varia (2); /* Unknown */ m.end_head (); break; case 8: m.end_fact (); break; } // switch return m.success; } // wsclient:print_server_queue_size/2 exec() // wsclient:print_server_queue_size/2 decls. public SymbolDescriptor old_queue_size__0; public SymbolDescriptor data__8__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor this__0; public SymbolDescriptor sl_sr__0; // end of wsclient:print_server_queue_size/2 decls. public boolean init (DLP m) { old_queue_size__0 = m.define_symbol ("old_queue_size".intern(), 0); data__8__0 = m.define_symbol ("~w, ~w : message queue length = ~w~n".intern(), 0); op__dot__2 = m.define_symbol (".".intern(), 2); this__0 = m.define_symbol ("this".intern(), 0); sl_sr__0 = m.define_symbol ("[]".intern(), 0); return true; } // wsclient:print_server_queue_size/2 init() } // wsclient:print_server_queue_size/2 final class wsclient_local_processing_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: local_processing(_G81) case 0: m.try_me_else (4); m.allocate (1); //m.success = m.get_x_varia (10,1); /* Request */ m.end_head (); break; case 1: // goal: _G81=[ask, update, [_G101]] m.put_list (11); m.set_y_value (0); /* 'User' */ m.set_nil (); m.put_list (12); m.set_x_value (11); /* 'Xtmp' */ m.set_nil (); m.put_list (13); m.set_atom (update__0); m.set_x_value (12); /* 'Xtmp' */ m.put_x_value (10,1); /* 'Request' */ m.put_list (2); m.set_atom (ask__0); m.set_x_value (13); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 2: // goal: client_ident(_G101) m.put_y_value (0,1); /* 'User' */ m.deallocate (); m.exec (15); /* client_ident_1 */ break; case 3: m.end_rule (); break; // head: local_processing(_G3496) case 4: m.retry_me_else (10); m.allocate (3); //m.success = m.get_y_value (1,1); /* Request */ m.end_head (); break; case 5: // goal: queue_length(client_name, _G3505) m.put_z_value (1,1); /* client_name */ m.put_y_value (2,2); /* 'Length' */ m.call (dlplib.queue_length_2); /*6*/ break; case 6: // goal: _G3505>0 m.put_y_value (2,1); /* 'Length' */ m.put_int (0,2); m.call (dlplib.op_cmp_gt_2); /*6*/ break; case 7: // goal: get_queue(client_name, _G3517) m.put_z_value (1,1); /* client_name */ m.put_y_value (0,2); /* 'Message' */ m.call (dlplib.get_queue_2); /*6*/ break; case 8: // goal: _G3496=_G3517 m.put_y_value (1,1); /* 'Request' */ m.put_y_value (0,2); /* 'Message' */ m.deallocate (); m.exec (dlplib.op_eq_2); break; case 9: m.end_rule (); break; // head: local_processing(_G6657) case 10: m.retry_me_else (17); m.allocate (4); //m.success = m.get_y_value (3,1); /* Request */ m.end_head (); break; case 11: // goal: get_field(client_name, position, _G6667) m.put_z_value (1,1); /* client_name */ m.put_atom (position__0,2); m.put_y_value (2,3); /* 'Position' */ m.call (dlplib.get_field_3); /*6*/ break; case 12: // goal: get_field(client_name, rotation, _G6674) m.put_z_value (1,1); /* client_name */ m.put_atom (rotation__0,2); m.put_y_value (1,3); /* 'Rotation' */ m.call (dlplib.get_field_3); /*6*/ break; case 13: // goal: position_resolution(oldpos, _G6667) m.put_z_value (9,1); /* oldpos */ m.put_y_value (2,2); /* 'Position' */ m.call (13) /*2*/; /* position_resolution_2 */ break; case 14: // goal: _G6657=[tell, position_and_rotation, [_G6697, _G6667, _G6674]] m.put_list (10); m.set_y_value (1); /* 'Rotation' */ m.set_nil (); m.put_list (11); m.set_y_value (2); /* 'Position' */ m.set_x_value (10); /* 'Xtmp' */ m.put_list (12); m.set_y_value (0); /* 'User' */ m.set_x_value (11); /* 'Xtmp' */ m.put_list (13); m.set_x_value (12); /* 'Xtmp' */ m.set_nil (); m.put_list (14); m.set_atom (position_and_rotation__0); m.set_x_value (13); /* 'Xtmp' */ m.put_y_value (3,1); /* 'Request' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (14); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 15: // goal: client_ident(_G6697) m.put_y_value (0,1); /* 'User' */ m.deallocate (); m.exec (15); /* client_ident_1 */ break; case 16: m.end_rule (); break; // head: local_processing(_G12150) case 17: m.trust_or_fail (); m.allocate (1); //m.success = m.get_y_value (0,1); /* Request */ m.end_head (); break; case 18: // goal: sleep(200) m.put_int (200,1); m.call (dlplib.sleep_1); /*6*/ break; case 19: // goal: local_processing(_G12150) m.put_y_value (0,1); /* 'Request' */ m.deallocate (); m.exec (12); /* local_processing_1 */ break; case 20: m.end_rule (); break; } // switch return m.success; } // wsclient:local_processing/1 exec() // wsclient:local_processing/1 decls. public SymbolDescriptor op__dot__2; public SymbolDescriptor ask__0; public SymbolDescriptor update__0; public SymbolDescriptor sl_sr__0; public SymbolDescriptor position__0; public SymbolDescriptor rotation__0; public SymbolDescriptor tell__0; public SymbolDescriptor position_and_rotation__0; // end of wsclient:local_processing/1 decls. public boolean init (DLP m) { op__dot__2 = m.define_symbol (".".intern(), 2); ask__0 = m.define_symbol ("ask".intern(), 0); update__0 = m.define_symbol ("update".intern(), 0); sl_sr__0 = m.define_symbol ("[]".intern(), 0); position__0 = m.define_symbol ("position".intern(), 0); rotation__0 = m.define_symbol ("rotation".intern(), 0); tell__0 = m.define_symbol ("tell".intern(), 0); position_and_rotation__0 = m.define_symbol ("position_and_rotation".intern(), 0); return true; } // wsclient:local_processing/1 init() } // wsclient:local_processing/1 final class wsclient_position_resolution_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: position_resolution(_G81, _G82) case 0: m.allocate (8); //m.success = m.get_x_varia (10,1); /* OldPos */ m.get_y_value (0,2); /* NewPos */ m.end_head (); break; case 1: // goal: _G81=position(_G93, _G94, _G95) m.put_x_value (10,1); /* 'OldPos' */ m.put_struct (position__3,2); m.set_y_value (7); /* 'XO' */ m.set_y_value (6); /* 'YO' */ m.set_y_value (5); /* 'ZO' */ m.call (dlplib.op_eq_2); /*6*/ break; case 2: // goal: _G82=position(_G103, _G104, _G105) m.put_y_value (0,1); /* 'NewPos' */ m.put_struct (position__3,2); m.set_y_value (4); /* 'XN' */ m.set_y_value (3); /* 'YN' */ m.set_y_value (2); /* 'ZN' */ m.call (dlplib.op_eq_2); /*6*/ break; case 3: // goal: distance3D(_G93, _G94, _G95, _G103, _G104, _G105, _G116) m.put_y_value (7,1); /* 'XO' */ m.put_y_value (6,2); /* 'YO' */ m.put_y_value (5,3); /* 'ZO' */ m.put_y_value (4,4); /* 'XN' */ m.put_y_value (3,5); /* 'YN' */ m.put_y_value (2,6); /* 'ZN' */ m.put_y_value (1,7); /* 'Dist' */ m.call (23) /*2*/; /* distance3D_7 */ break; case 4: // goal: _G116>1 m.put_y_value (1,1); /* 'Dist' */ m.put_float (1f,2); m.call (dlplib.op_cmp_gt_2); /*6*/ break; case 5: // goal: assign_nlv_term(this, nreg, 9, _G82) m.put_this (1); m.put_nreg (2); m.put_int (9,3); m.put_y_value (0,4); /* 'NewPos' */ m.deallocate (); m.exec (dlplib.assign_nlv_term_4); break; case 6: m.end_rule (); break; } // switch return m.success; } // wsclient:position_resolution/2 exec() // wsclient:position_resolution/2 decls. public SymbolDescriptor position__3; // end of wsclient:position_resolution/2 decls. public boolean init (DLP m) { position__3 = m.define_symbol ("position".intern(), 3); return true; } // wsclient:position_resolution/2 init() } // wsclient:position_resolution/2 final class wsclient_client_exit_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: client_exit(_G81) case 0: m.try_me_else (5); m.allocate (1); //m.success = m.get_x_varia (10,1); /* Message */ m.cut_level (0); m.end_head (); break; case 1: // goal: _G81=[reply, unregister, _G98] m.put_list (11); m.set_v_varia (); /* 'Unknown' */ m.set_nil (); m.put_list (13); m.set_atom (unregister__0); m.set_x_value (11); /* 'Xtmp' */ m.put_x_value (10,1); /* 'Message' */ m.put_list (2); m.set_atom (reply__0); m.set_x_value (13); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 2: // goal: ! m.cut_body (0); break; case 3: // goal: true m.deallocate (); m.exec (dlplib.true_0); break; case 4: m.end_rule (); break; // head: client_exit(_G3386) case 5: m.trust_or_fail (); m.allocate (0); //m.success = m.get_x_varia (10,1); /* Message */ m.end_head (); break; case 6: // goal: _G3386=shutdown m.put_x_value (10,1); /* 'Message' */ m.put_atom (shutdown__0,2); m.call (dlplib.op_eq_2); /*6*/ break; case 7: // goal: format('~n~w : ~w server shutdown (broken pipe)~n', [this, server_host]) m.put_list (11); m.set_z_value (4); /* server_host */ m.set_nil (); m.put_atom (data__9__0,1); m.put_list (2); m.set_this (); m.set_x_value (11); /* 'Xtmp' */ m.deallocate (); m.exec (dlplib.format_2); break; case 8: m.end_rule (); break; } // switch return m.success; } // wsclient:client_exit/1 exec() // wsclient:client_exit/1 decls. public SymbolDescriptor op__dot__2; public SymbolDescriptor reply__0; public SymbolDescriptor unregister__0; public SymbolDescriptor sl_sr__0; public SymbolDescriptor shutdown__0; public SymbolDescriptor data__9__0; public SymbolDescriptor this__0; // end of wsclient:client_exit/1 decls. public boolean init (DLP m) { op__dot__2 = m.define_symbol (".".intern(), 2); reply__0 = m.define_symbol ("reply".intern(), 0); unregister__0 = m.define_symbol ("unregister".intern(), 0); sl_sr__0 = m.define_symbol ("[]".intern(), 0); shutdown__0 = m.define_symbol ("shutdown".intern(), 0); data__9__0 = m.define_symbol ("~n~w : ~w server shutdown (broken pipe)~n".intern(), 0); this__0 = m.define_symbol ("this".intern(), 0); return true; } // wsclient:client_exit/1 init() } // wsclient:client_exit/1 final class wsclient_client_ident_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: client_ident(_G81) case 0: //m.success = m.get_x_varia (10,1); /* User */ m.end_head (); break; case 1: // goal: _G81=user(client_host, client_name) m.put_x_value (10,1); /* 'User' */ m.put_struct (user__2,2); m.set_z_value (2); /* client_host */ m.set_z_value (1); /* client_name */ m.exec (dlplib.op_eq_2); break; case 2: m.end_rule (); break; } // switch return m.success; } // wsclient:client_ident/1 exec() // wsclient:client_ident/1 decls. public SymbolDescriptor user__2; // end of wsclient:client_ident/1 decls. public boolean init (DLP m) { user__2 = m.define_symbol ("user".intern(), 2); return true; } // wsclient:client_ident/1 init() } // wsclient:client_ident/1 final class wsclient_set_score_board_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: set_score_board(_G81) case 0: m.allocate (7); //m.success = m.get_x_varia (10,1); /* Score */ m.end_head (); break; case 1: // goal: _G81=score(_G94:_G100/_G101:_G98) m.put_struct (op__div__2,11); m.set_v_varia (); /* 'Unknown' */ m.set_y_value (6); /* 'Score1' */ m.put_struct (op__col__2,13); m.set_x_value (11); /* 'Xtmp' */ m.set_y_value (5); /* 'Score2' */ m.put_struct (op__col__2,14); m.set_v_varia (); /* 'Unknown' */ m.set_x_value (13); /* 'Xtmp' */ m.put_x_value (10,1); /* 'Score' */ m.put_struct (score__1,2); m.set_x_value (14); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 2: // goal: number_chars(_G101, _G107) m.put_y_value (6,1); /* 'Score1' */ m.put_y_value (4,2); /* 'Chars1' */ m.call (dlplib.number_chars_2); /*6*/ break; case 3: // goal: number_chars(_G98, _G113) m.put_y_value (5,1); /* 'Score2' */ m.put_y_value (3,2); /* 'Chars2' */ m.call (dlplib.number_chars_2); /*6*/ break; case 4: // goal: atom_chars(_G118, _G107) m.put_y_value (2,1); /* 'Atom1' */ m.put_y_value (4,2); /* 'Chars1' */ m.call (dlplib.atom_chars_2); /*6*/ break; case 5: // goal: atom_chars(_G124, _G113) m.put_y_value (1,1); /* 'Atom2' */ m.put_y_value (3,2); /* 'Chars2' */ m.call (dlplib.atom_chars_2); /*6*/ break; case 6: // goal: atom_list_concat([_G118, :, _G124], _G131) m.put_list (16); m.set_y_value (1); /* 'Atom2' */ m.set_nil (); m.put_list (17); m.set_atom (op__col__0); m.set_x_value (16); /* 'Xtmp' */ m.put_list (1); m.set_y_value (2); /* 'Atom1' */ m.set_x_value (17); /* 'Xtmp' */ m.put_y_value (0,2); /* 'TheScore' */ m.call (dlplib.atom_list_concat_2); /*6*/ break; case 7: // goal: setMFString(scorePlate1, score, [_G131]) m.put_atom (scorePlate1__0,1); m.put_atom (score__0,2); m.put_list (3); m.set_y_value (0); /* 'TheScore' */ m.set_nil (); m.call (24) /*2*/; /* setMFString_3 */ break; case 8: // goal: setMFString(scorePlate2, score, [_G131]) m.put_atom (scorePlate2__0,1); m.put_atom (score__0,2); m.put_list (3); m.set_y_value (0); /* 'TheScore' */ m.set_nil (); m.deallocate (); m.exec (24); /* setMFString_3 */ break; case 9: m.end_rule (); break; } // switch return m.success; } // wsclient:set_score_board/1 exec() // wsclient:set_score_board/1 decls. public SymbolDescriptor score__1; public SymbolDescriptor op__col__2; public SymbolDescriptor op__div__2; public SymbolDescriptor op__dot__2; public SymbolDescriptor op__col__0; public SymbolDescriptor sl_sr__0; public SymbolDescriptor scorePlate1__0; public SymbolDescriptor score__0; public SymbolDescriptor scorePlate2__0; // end of wsclient:set_score_board/1 decls. public boolean init (DLP m) { score__1 = m.define_symbol ("score".intern(), 1); op__col__2 = m.define_symbol (":".intern(), 2); op__div__2 = m.define_symbol ("/".intern(), 2); op__dot__2 = m.define_symbol (".".intern(), 2); op__col__0 = m.define_symbol (":".intern(), 0); sl_sr__0 = m.define_symbol ("[]".intern(), 0); scorePlate1__0 = m.define_symbol ("scorePlate1".intern(), 0); score__0 = m.define_symbol ("score".intern(), 0); scorePlate2__0 = m.define_symbol ("scorePlate2".intern(), 0); return true; } // wsclient:set_score_board/1 init() } // wsclient:set_score_board/1 final class wsclient_init_vars_0 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: init_vars case 0: m.allocate (0); //m.success = m.end_head (); break; case 1: // goal: assign_nlv_term(this, nreg, 0, './soccer6.wrl') m.put_this (1); m.put_nreg (2); m.put_int (0,3); m.put_atom (data__10__0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 2: // goal: assign_nlv_term(this, nreg, 1, unknown) m.put_this (1); m.put_nreg (2); m.put_int (1,3); m.put_atom (unknown__0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 3: // goal: assign_nlv_term(this, nreg, 2, unknown) m.put_this (1); m.put_nreg (2); m.put_int (2,3); m.put_atom (unknown__0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 4: // goal: assign_nlv_term(this, nreg, 3, unknown) m.put_this (1); m.put_nreg (2); m.put_int (3,3); m.put_atom (unknown__0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 5: // goal: assign_nlv_term(this, nreg, 4, unknown) m.put_this (1); m.put_nreg (2); m.put_int (4,3); m.put_atom (unknown__0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 6: // goal: assign_nlv_term(this, nreg, 5, 0) m.put_this (1); m.put_nreg (2); m.put_int (5,3); m.put_int (0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 7: // goal: assign_nlv_term(this, nreg, 6, 5000) m.put_this (1); m.put_nreg (2); m.put_int (6,3); m.put_int (5000,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 8: // goal: assign_nlv_term(this, nreg, 7, 4321) m.put_this (1); m.put_nreg (2); m.put_int (7,3); m.put_int (4321,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 9: // goal: assign_nlv_term(this, nreg, 8, 10) m.put_this (1); m.put_nreg (2); m.put_int (8,3); m.put_int (10,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 10: // goal: assign_nlv_term(this, nreg, 9, position(0, 0, 0)) m.put_this (1); m.put_nreg (2); m.put_int (9,3); m.put_struct (position__3,4); m.set_float (0f); m.set_float (0f); m.set_float (0f); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 11: // goal: assign_nlv_term(this, nreg, 10, rotation(0, 1, 0, 0)) m.put_this (1); m.put_nreg (2); m.put_int (10,3); m.put_struct (rotation__4,4); m.set_float (0f); m.set_float (1f); m.set_float (0f); m.set_float (0f); m.deallocate (); m.exec (dlplib.assign_nlv_term_4); break; case 12: m.end_rule (); break; } // switch return m.success; } // wsclient:init_vars/0 exec() // wsclient:init_vars/0 decls. public SymbolDescriptor data__10__0; public SymbolDescriptor unknown__0; public SymbolDescriptor position__3; public SymbolDescriptor rotation__4; // end of wsclient:init_vars/0 decls. public boolean init (DLP m) { data__10__0 = m.define_symbol ("./soccer6.wrl".intern(), 0); unknown__0 = m.define_symbol ("unknown".intern(), 0); position__3 = m.define_symbol ("position".intern(), 3); rotation__4 = m.define_symbol ("rotation".intern(), 4); return true; } // wsclient:init_vars/0 init() } // wsclient:init_vars/0 class wsclient extends Code { public static ObjectDescriptor object; public static ObjectDescriptor _gg_client; public static ObjectDescriptor _bcilib; public static MethodDescriptor main_0; public static MethodDescriptor wsclient_0; public static MethodDescriptor wsclient_3; public static MethodDescriptor client_request_1; public static MethodDescriptor client_chat_2; public static MethodDescriptor server_reply_1; public static MethodDescriptor enable_others_1; public static MethodDescriptor enable_clientname_1; public static MethodDescriptor enable_newplayer_1; public static MethodDescriptor disenable_player_1; public static MethodDescriptor show_chat_text_2; public static MethodDescriptor print_server_queue_size_2; public static MethodDescriptor local_processing_1; public static MethodDescriptor position_resolution_2; public static MethodDescriptor client_exit_1; public static MethodDescriptor client_ident_1; public static MethodDescriptor set_score_board_1; public static MethodDescriptor loadURL_1; public static MethodDescriptor gg_client_loop_3; public static MethodDescriptor setSFVec3f_5; public static MethodDescriptor setRotation_5; public static MethodDescriptor setPosition_4; public static MethodDescriptor setSFInt32_3; public static MethodDescriptor distance3D_7; public static MethodDescriptor setMFString_3; public boolean init (DLP m) { object = m.define_object ("wsclient".intern(), 2, 25, 11); _gg_client = m.header_object (object, "gg_client".intern(), 0); _bcilib = m.header_object (object, "bcilib".intern(), 1); main_0 = m.define_method (object, 0, "main".intern(), 0); wsclient_0 = m.define_method (object, 1, "wsclient".intern(), 0); wsclient_3 = m.define_method (object, 2, "wsclient".intern(), 3); client_request_1 = m.define_method (object, 3, "client_request".intern(), 1); client_chat_2 = m.define_method (object, 4, "client_chat".intern(), 2); server_reply_1 = m.define_method (object, 5, "server_reply".intern(), 1); enable_others_1 = m.define_method (object, 6, "enable_others".intern(), 1); enable_clientname_1 = m.define_method (object, 7, "enable_clientname".intern(), 1); enable_newplayer_1 = m.define_method (object, 8, "enable_newplayer".intern(), 1); disenable_player_1 = m.define_method (object, 9, "disenable_player".intern(), 1); show_chat_text_2 = m.define_method (object, 10, "show_chat_text".intern(), 2); print_server_queue_size_2 = m.define_method (object, 11, "print_server_queue_size".intern(), 2); local_processing_1 = m.define_method (object, 12, "local_processing".intern(), 1); position_resolution_2 = m.define_method (object, 13, "position_resolution".intern(), 2); client_exit_1 = m.define_method (object, 14, "client_exit".intern(), 1); client_ident_1 = m.define_method (object, 15, "client_ident".intern(), 1); set_score_board_1 = m.define_method (object, 16, "set_score_board".intern(), 1); loadURL_1 = m.extern_method (object, 17, "loadURL".intern(), 1); gg_client_loop_3 = m.extern_method (object, 18, "gg_client_loop".intern(), 3); setSFVec3f_5 = m.extern_method (object, 19, "setSFVec3f".intern(), 5); setRotation_5 = m.extern_method (object, 20, "setRotation".intern(), 5); setPosition_4 = m.extern_method (object, 21, "setPosition".intern(), 4); setSFInt32_3 = m.extern_method (object, 22, "setSFInt32".intern(), 3); distance3D_7 = m.extern_method (object, 23, "distance3D".intern(), 7); setMFString_3 = m.extern_method (object, 24, "setMFString".intern(), 3); m.define_nonlog (object, "url".intern(), 0); m.define_nonlog (object, "client_name".intern(), 1); m.define_nonlog (object, "client_host".intern(), 2); m.define_nonlog (object, "client_addr".intern(), 3); m.define_nonlog (object, "server_host".intern(), 4); m.define_nonlog (object, "remote_data".intern(), 5); m.define_nonlog (object, "time_limit".intern(), 6); m.define_nonlog (object, "server_port".intern(), 7); m.define_nonlog (object, "timeout".intern(), 8); m.define_nonlog (object, "oldpos".intern(), 9); m.define_nonlog (object, "oldrot".intern(), 10); return true; } // wsclient init() } // class wsclient // end of unit wsclient code. // begin of unit ball_client code. final class ball_client_ball_client_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: ball_client(_G110, _G111) case 0: m.allocate (1); //m.success = m.get_y_value (0,1); /* BallName */ m.get_x_varia (10,2); /* TimeLimit */ m.end_head (); break; case 1: // goal: assign_nlv_term(this, nreg, 1, _G111) m.put_this (1); m.put_nreg (2); m.put_int (1,3); m.put_x_value (10,4); /* 'TimeLimit' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 2: // goal: assign_nlv_term(this, nreg, 2, _G110) m.put_this (1); m.put_nreg (2); m.put_int (2,3); m.put_y_value (0,4); /* 'BallName' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 3: // goal: format('~w thread active.~n', [_G110]) m.put_atom (data__11__0,1); m.put_list (2); m.set_y_value (0); /* 'BallName' */ m.set_nil (); m.call (dlplib.format_2); /*6*/ break; case 4: // goal: next_activity(_G110) m.put_y_value (0,1); /* 'BallName' */ m.deallocate (); m.exec (1); /* next_activity_1 */ break; case 5: m.end_rule (); break; } // switch return m.success; } // ball_client:ball_client/2 exec() // ball_client:ball_client/2 decls. public SymbolDescriptor data__11__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor sl_sr__0; // end of ball_client:ball_client/2 decls. public boolean init (DLP m) { data__11__0 = m.define_symbol ("~w thread active.~n".intern(), 0); op__dot__2 = m.define_symbol (".".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); return true; } // ball_client:ball_client/2 init() } // ball_client:ball_client/2 final class ball_client_next_activity_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: next_activity(_G110) case 0: m.allocate (3); //m.success = m.get_v_varia (1); /* Unknown */ m.cut_level (0); m.end_head (); break; case 1: // goal: repeat m.call (dlplib.repeat_0); /*6*/ break; case 2: // goal: get_queue(ball_name, _G122) m.put_z_value (2,1); /* ball_name */ m.put_y_value (2,2); /* 'Data' */ m.call (dlplib.get_queue_2); /*6*/ break; case 3: // goal: ball_activity(_G122) m.put_y_value (2,1); /* 'Data' */ m.call (2) /*2*/; /* ball_activity_1 */ break; case 4: // goal: get_clock(_G132) m.put_y_value (1,1); /* 'TimeLimit' */ m.call (6) /*2*/; /* get_clock_1 */ break; case 5: // goal: _G132>time_limit m.put_y_value (1,1); /* 'TimeLimit' */ m.put_z_value (1,2); /* time_limit */ m.call (dlplib.op_cmp_gt_2); /*6*/ break; case 6: // goal: ! m.cut_body (0); break; case 7: // goal: <-(this, game_score, showGameScore) m.put_this (1); m.put_atom (game_score__0,2); m.put_atom (showGameScore__0,3); m.deallocate (); m.exec (dlplib.op_call_3); break; case 8: m.end_rule (); break; } // switch return m.success; } // ball_client:next_activity/1 exec() // ball_client:next_activity/1 decls. public SymbolDescriptor this__0; public SymbolDescriptor game_score__0; public SymbolDescriptor showGameScore__0; // end of ball_client:next_activity/1 decls. public boolean init (DLP m) { this__0 = m.define_symbol ("this".intern(), 0); game_score__0 = m.define_symbol ("game_score".intern(), 0); showGameScore__0 = m.define_symbol ("showGameScore".intern(), 0); return true; } // ball_client:next_activity/1 init() } // ball_client:next_activity/1 final class ball_client_ball_activity_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: ball_activity(_G110) case 0: m.try_me_else (6); m.allocate (6); //m.success = m.get_x_varia (10,1); /* Mesg */ m.cut_level (4); m.end_head (); break; case 1: // goal: _G110=[ball_position, _G124] m.put_list (11); m.set_y_value (5); /* 'Data' */ m.set_nil (); m.put_x_value (10,1); /* 'Mesg' */ m.put_list (2); m.set_atom (ball_position__0); m.set_x_value (11); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 2: // goal: _G124=[_G133, position(_G139, _G140, _G141)] m.put_struct (position__3,12); m.set_y_value (2); /* 'X' */ m.set_y_value (1); /* 'Y' */ m.set_y_value (0); /* 'Z' */ m.put_list (13); m.set_x_value (12); /* 'Xtmp' */ m.set_nil (); m.put_y_value (5,1); /* 'Data' */ m.put_list (2); m.set_y_value (3); /* 'Ball' */ m.set_x_value (13); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 3: // goal: ! m.cut_body (4); break; case 4: // goal: setPosition(_G133, _G139, _G140, _G141) m.put_y_value (3,1); /* 'Ball' */ m.put_y_value (2,2); /* 'X' */ m.put_y_value (1,3); /* 'Y' */ m.put_y_value (0,4); /* 'Z' */ m.deallocate (); m.exec (7); /* setPosition_4 */ break; case 5: m.end_rule (); break; // head: ball_activity(_G5243) case 6: m.retry_me_else (12); m.allocate (9); //m.success = m.get_x_varia (10,1); /* Mesg */ m.cut_level (7); m.end_head (); break; case 7: // goal: _G5243=[kick_ball, _G5257] m.put_list (11); m.set_y_value (8); /* 'Data' */ m.set_nil (); m.put_x_value (10,1); /* 'Mesg' */ m.put_list (2); m.set_atom (kick_ball__0); m.set_x_value (11); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 8: // goal: _G5257=[_G5266, _G5269, _G5272, _G5275, _G5278, _G5281, _G5284, _G5287] m.put_list (12); m.set_y_value (0); /* 'KickBallForceY' */ m.set_nil (); m.put_list (13); m.set_y_value (1); /* 'KickBallForce' */ m.set_x_value (12); /* 'Xtmp' */ m.put_list (14); m.set_y_value (2); /* 'R1' */ m.set_x_value (13); /* 'Xtmp' */ m.put_list (15); m.set_y_value (3); /* 'Z' */ m.set_x_value (14); /* 'Xtmp' */ m.put_list (16); m.set_y_value (4); /* 'Y' */ m.set_x_value (15); /* 'Xtmp' */ m.put_list (17); m.set_y_value (5); /* 'X' */ m.set_x_value (16); /* 'Xtmp' */ m.put_list (18); m.set_y_value (6); /* 'BallName' */ m.set_x_value (17); /* 'Xtmp' */ m.put_y_value (8,1); /* 'Data' */ m.put_list (2); m.set_v_varia (); /* 'Unknown' */ m.set_x_value (18); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 9: // goal: ! m.cut_body (7); break; case 10: // goal: kickedwithStaticStartRF(_G5269, translation, _G5272, _G5275, _G5278, _G5281, _G5284, _G5287) m.put_y_value (6,1); /* 'BallName' */ m.put_atom (translation__0,2); m.put_y_value (5,3); /* 'X' */ m.put_y_value (4,4); /* 'Y' */ m.put_y_value (3,5); /* 'Z' */ m.put_y_value (2,6); /* 'R1' */ m.put_y_value (1,7); /* 'KickBallForce' */ m.put_y_value (0,8); /* 'KickBallForceY' */ m.deallocate (); m.exec (4); /* kickedwithStaticStartRF_8 */ break; case 11: m.end_rule (); break; // head: ball_activity(_G12201) case 12: m.retry_me_else (18); m.allocate (10); //m.success = m.get_x_varia (10,1); /* Mesg */ m.cut_level (8); m.end_head (); break; case 13: // goal: _G12201=[move_ball, _G12215] m.put_list (11); m.set_y_value (9); /* 'Data' */ m.set_nil (); m.put_x_value (10,1); /* 'Mesg' */ m.put_list (2); m.set_atom (move_ball__0); m.set_x_value (11); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 14: // goal: _G12215=[_G12224, _G12227, _G12230, _G12233, _G12236, _G12239, _G12242, _G12245] m.put_list (12); m.set_y_value (0); /* 'Dist' */ m.set_nil (); m.put_list (13); m.set_y_value (1); /* 'Z2' */ m.set_x_value (12); /* 'Xtmp' */ m.put_list (14); m.set_y_value (2); /* 'Y2' */ m.set_x_value (13); /* 'Xtmp' */ m.put_list (15); m.set_y_value (3); /* 'X2' */ m.set_x_value (14); /* 'Xtmp' */ m.put_list (16); m.set_y_value (4); /* 'Z' */ m.set_x_value (15); /* 'Xtmp' */ m.put_list (17); m.set_y_value (5); /* 'Y' */ m.set_x_value (16); /* 'Xtmp' */ m.put_list (18); m.set_y_value (6); /* 'X' */ m.set_x_value (17); /* 'Xtmp' */ m.put_y_value (9,1); /* 'Data' */ m.put_list (2); m.set_y_value (7); /* 'Ball' */ m.set_x_value (18); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 15: // goal: ! m.cut_body (8); break; case 16: // goal: move_to_position(_G12224, translation, stepUnit, ballSleepTime, _G12227, _G12230, _G12233, _G12236, _G12239, _G12242, _G12245) m.put_y_value (7,1); /* 'Ball' */ m.put_atom (translation__0,2); m.put_z_value (4,3); /* stepUnit */ m.put_z_value (3,4); /* ballSleepTime */ m.put_y_value (6,5); /* 'X' */ m.put_y_value (5,6); /* 'Y' */ m.put_y_value (4,7); /* 'Z' */ m.put_y_value (3,8); /* 'X2' */ m.put_y_value (2,9); /* 'Y2' */ m.put_y_value (1,10); /* 'Z2' */ m.put_y_value (0,11); /* 'Dist' */ m.deallocate (); m.exec (8); /* move_to_position_11 */ break; case 17: m.end_rule (); break; // head: ball_activity(_G19380) case 18: m.trust_or_fail (); //m.success = m.get_x_varia (10,1); /* Data */ m.end_head (); break; case 19: // goal: format('~nBall ~w activity error : ~w~n', [ball_name, _G19380]) m.put_list (11); m.set_x_value (10); /* 'Data' */ m.set_nil (); m.put_atom (data__12__0,1); m.put_list (2); m.set_z_value (2); /* ball_name */ m.set_x_value (11); /* 'Xtmp' */ m.exec (dlplib.format_2); break; case 20: m.end_rule (); break; } // switch return m.success; } // ball_client:ball_activity/1 exec() // ball_client:ball_activity/1 decls. public SymbolDescriptor op__dot__2; public SymbolDescriptor ball_position__0; public SymbolDescriptor sl_sr__0; public SymbolDescriptor position__3; public SymbolDescriptor kick_ball__0; public SymbolDescriptor translation__0; public SymbolDescriptor move_ball__0; public SymbolDescriptor data__12__0; // end of ball_client:ball_activity/1 decls. public boolean init (DLP m) { op__dot__2 = m.define_symbol (".".intern(), 2); ball_position__0 = m.define_symbol ("ball_position".intern(), 0); sl_sr__0 = m.define_symbol ("[]".intern(), 0); position__3 = m.define_symbol ("position".intern(), 3); kick_ball__0 = m.define_symbol ("kick_ball".intern(), 0); translation__0 = m.define_symbol ("translation".intern(), 0); move_ball__0 = m.define_symbol ("move_ball".intern(), 0); data__12__0 = m.define_symbol ("~nBall ~w activity error : ~w~n".intern(), 0); return true; } // ball_client:ball_activity/1 init() } // ball_client:ball_activity/1 final class ball_client_kickedwithStaticStart_9 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: kickedwithStaticStart(_G110, _G111, _G112, _G113, _G114, _G115, _G116, _G117, _G118) case 0: m.try_me_else (15); m.allocate (16); //m.success = m.get_y_value (7,1); /* Ball */ m.get_y_value (6,2); /* Field */ m.get_y_value (14,3); /* X */ m.get_y_value (12,4); /* Y */ m.get_y_value (10,5); /* Z */ m.get_y_value (13,6); /* Vx */ m.get_y_value (11,7); /* Vy */ m.get_y_value (9,8); /* Vz */ m.get_y_value (15,9); /* BallSleepTime */ m.cut_level (0); m.end_head (); break; case 1: // goal: is_eval(_G116/4.9, _G126) m.put_struct (op__div__2,1); m.set_y_value (11); /* 'Vy' */ m.set_float (4.9f); m.put_y_value (2,2); /* 'Time' */ m.call (dlplib.is_eval_2); /*6*/ break; case 2: // goal: is_eval(_G118/1000, _G139) m.put_struct (op__div__2,1); m.set_y_value (15); /* 'BallSleepTime' */ m.set_int (1000); m.put_y_value (1,2); /* 'BallSleepTimeInSecond' */ m.call (dlplib.is_eval_2); /*6*/ break; case 3: // goal: assign_nlv_term(this, nreg, 0, 1) m.put_this (1); m.put_nreg (2); m.put_int (0,3); m.put_int (1,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 4: // goal: repeat m.call (dlplib.repeat_0); /*6*/ break; case 5: // goal: sleep(_G118) m.put_y_value (15,1); /* 'BallSleepTime' */ m.call (dlplib.sleep_1); /*6*/ break; case 6: // goal: is_eval(steps*_G139, _G162) m.put_struct (op__mul__2,1); m.set_z_value (0); /* steps */ m.set_y_value (1); /* 'BallSleepTimeInSecond' */ m.put_y_value (8,2); /* 'CurrentTime' */ m.call (dlplib.is_eval_2); /*6*/ break; case 7: // goal: is_eval(_G112+_G115*_G162, _G171) m.put_struct (op__mul__2,14); m.set_y_value (13); /* 'Vx' */ m.set_y_value (8); /* 'CurrentTime' */ m.put_struct (op__add__2,1); m.set_y_value (14); /* 'X' */ m.set_x_value (14); /* 'Xtmp' */ m.put_y_value (5,2); /* 'Xnew' */ m.call (dlplib.is_eval_2); /*6*/ break; case 8: // goal: is_eval(_G113+_G116*_G162-4.9*_G162*_G162, _G183) m.put_struct (op__mul__2,15); m.set_float (4.9f); m.set_y_value (8); /* 'CurrentTime' */ m.put_struct (op__mul__2,16); m.set_y_value (11); /* 'Vy' */ m.set_y_value (8); /* 'CurrentTime' */ m.put_struct (op__add__2,17); m.set_y_value (12); /* 'Y' */ m.set_x_value (16); /* 'Xtmp' */ m.put_struct (op__mul__2,18); m.set_x_value (15); /* 'Xtmp' */ m.set_y_value (8); /* 'CurrentTime' */ m.put_struct (op__sub__2,1); m.set_x_value (17); /* 'Xtmp' */ m.set_x_value (18); /* 'Xtmp' */ m.put_y_value (4,2); /* 'Ynew' */ m.call (dlplib.is_eval_2); /*6*/ break; case 9: // goal: is_eval(_G114+_G117*_G162, _G208) m.put_struct (op__mul__2,19); m.set_y_value (9); /* 'Vz' */ m.set_y_value (8); /* 'CurrentTime' */ m.put_struct (op__add__2,1); m.set_y_value (10); /* 'Z' */ m.set_x_value (19); /* 'Xtmp' */ m.put_y_value (3,2); /* 'Znew' */ m.call (dlplib.is_eval_2); /*6*/ break; case 10: // goal: setSFVec3f(_G110, _G111, _G171, _G183, _G208) m.put_y_value (7,1); /* 'Ball' */ m.put_y_value (6,2); /* 'Field' */ m.put_y_value (5,3); /* 'Xnew' */ m.put_y_value (4,4); /* 'Ynew' */ m.put_y_value (3,5); /* 'Znew' */ m.call (9) /*2*/; /* setSFVec3f_5 */ break; case 11: // goal: assign_nlv_expr(this, nreg, 0, steps+1) m.put_this (1); m.put_nreg (2); m.put_int (0,3); m.put_struct (op__add__2,4); m.set_z_value (0); /* steps */ m.set_int (1); m.call (dlplib.assign_nlv_expr_4); /*6*/ break; case 12: // goal: steps>_G126//_G139 m.put_z_value (0,1); /* steps */ m.put_struct (op__div_int__2,2); m.set_y_value (2); /* 'Time' */ m.set_y_value (1); /* 'BallSleepTimeInSecond' */ m.call (dlplib.op_cmp_gt_2); /*6*/ break; case 13: // goal: ! m.cut_tail (0); m.deallocate (); break; case 14: m.end_rule (); break; // head: kickedwithStaticStart(_G12077, _G12078, _G12079, _G12080, _G12081, _G12082, _G12083, _G12084, _G12085) case 15: m.trust_or_fail (); //m.success = m.get_v_varia (1); /* Unknown */ m.get_v_varia (2); /* Unknown */ m.get_v_varia (3); /* Unknown */ m.get_v_varia (4); /* Unknown */ m.get_v_varia (5); /* Unknown */ m.get_v_varia (6); /* Unknown */ m.get_v_varia (7); /* Unknown */ m.get_v_varia (8); /* Unknown */ m.get_v_varia (9); /* Unknown */ m.end_head (); break; case 16: m.end_fact (); break; } // switch return m.success; } // ball_client:kickedwithStaticStart/9 exec() // ball_client:kickedwithStaticStart/9 decls. public SymbolDescriptor op__div__2; public SymbolDescriptor op__mul__2; public SymbolDescriptor op__add__2; public SymbolDescriptor op__sub__2; public SymbolDescriptor op__div_int__2; // end of ball_client:kickedwithStaticStart/9 decls. public boolean init (DLP m) { op__div__2 = m.define_symbol ("/".intern(), 2); op__mul__2 = m.define_symbol ("*".intern(), 2); op__add__2 = m.define_symbol ("+".intern(), 2); op__sub__2 = m.define_symbol ("-".intern(), 2); op__div_int__2 = m.define_symbol ("//".intern(), 2); return true; } // ball_client:kickedwithStaticStart/9 init() } // ball_client:kickedwithStaticStart/9 final class ball_client_kickedwithStaticStartRF_8 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: kickedwithStaticStartRF(_G110, _G111, _G112, _G113, _G114, _G115, _G116, _G117) case 0: m.allocate (10); //m.success = m.get_y_value (1,1); /* Ball */ m.get_y_value (0,2); /* Field */ m.get_y_value (7,3); /* X */ m.get_y_value (6,4); /* Y */ m.get_y_value (5,5); /* Z */ m.get_y_value (8,6); /* R1 */ m.get_y_value (9,7); /* F1 */ m.get_y_value (3,8); /* Vy */ m.end_head (); break; case 1: // goal: is_eval(_G116*cos(_G115), _G125) m.put_struct (cos__1,13); m.set_y_value (8); /* 'R1' */ m.put_struct (op__mul__2,1); m.set_y_value (9); /* 'F1' */ m.set_x_value (13); /* 'Xtmp' */ m.put_y_value (4,2); /* 'Vx' */ m.call (dlplib.is_eval_2); /*6*/ break; case 2: // goal: is_eval(_G116*sin(_G115), _G136) m.put_struct (sin__1,14); m.set_y_value (8); /* 'R1' */ m.put_struct (op__mul__2,1); m.set_y_value (9); /* 'F1' */ m.set_x_value (14); /* 'Xtmp' */ m.put_y_value (2,2); /* 'Vz' */ m.call (dlplib.is_eval_2); /*6*/ break; case 3: // goal: kickedwithStaticStart(_G110, _G111, _G112, _G113, _G114, _G125, _G117, _G136, ballSleepTime) m.put_y_value (1,1); /* 'Ball' */ m.put_y_value (0,2); /* 'Field' */ m.put_y_value (7,3); /* 'X' */ m.put_y_value (6,4); /* 'Y' */ m.put_y_value (5,5); /* 'Z' */ m.put_y_value (4,6); /* 'Vx' */ m.put_y_value (3,7); /* 'Vy' */ m.put_y_value (2,8); /* 'Vz' */ m.put_z_value (3,9); /* ballSleepTime */ m.call (3) /*2*/; /* kickedwithStaticStart_9 */ break; case 4: // goal: fallToGround(_G110, _G111) m.put_y_value (1,1); /* 'Ball' */ m.put_y_value (0,2); /* 'Field' */ m.deallocate (); m.exec (5); /* fallToGround_2 */ break; case 5: m.end_rule (); break; } // switch return m.success; } // ball_client:kickedwithStaticStartRF/8 exec() // ball_client:kickedwithStaticStartRF/8 decls. public SymbolDescriptor op__mul__2; public SymbolDescriptor cos__1; public SymbolDescriptor sin__1; // end of ball_client:kickedwithStaticStartRF/8 decls. public boolean init (DLP m) { op__mul__2 = m.define_symbol ("*".intern(), 2); cos__1 = m.define_symbol ("cos".intern(), 1); sin__1 = m.define_symbol ("sin".intern(), 1); return true; } // ball_client:kickedwithStaticStartRF/8 init() } // ball_client:kickedwithStaticStartRF/8 final class ball_client_fallToGround_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: fallToGround(_G110, _G111) case 0: m.allocate (4); //m.success = m.get_y_value (3,1); /* Ball */ m.get_y_value (2,2); /* Field */ m.end_head (); break; case 1: // goal: getSFVec3f(_G110, _G111, _G121, _G122, _G123) m.put_y_value (3,1); /* 'Ball' */ m.put_y_value (2,2); /* 'Field' */ m.put_y_value (1,3); /* 'X' */ m.put_v_varia (4); /* 'Unknown' */ m.put_y_value (0,5); /* 'Z' */ m.call (10) /*2*/; /* getSFVec3f_5 */ break; case 2: // goal: setSFVec3f(_G110, _G111, _G121, 0.25, _G123) m.put_y_value (3,1); /* 'Ball' */ m.put_y_value (2,2); /* 'Field' */ m.put_y_value (1,3); /* 'X' */ m.put_float (0.25f,4); m.put_y_value (0,5); /* 'Z' */ m.deallocate (); m.exec (9); /* setSFVec3f_5 */ break; case 3: m.end_rule (); break; } // switch return m.success; } // ball_client:fallToGround/2 exec() // ball_client:fallToGround/2 decls. // end of ball_client:fallToGround/2 decls. public boolean init (DLP m) { return true; } // ball_client:fallToGround/2 init() } // ball_client:fallToGround/2 final class ball_client_init_vars_0 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: init_vars case 0: m.allocate (0); //m.success = m.end_head (); break; case 1: // goal: assign_nlv_term(this, nreg, 0, no_init) m.put_this (1); m.put_nreg (2); m.put_int (0,3); m.put_atom (no_init__0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 2: // goal: assign_nlv_term(this, nreg, 1, 0) m.put_this (1); m.put_nreg (2); m.put_int (1,3); m.put_int (0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 3: // goal: assign_nlv_term(this, nreg, 2, unknown) m.put_this (1); m.put_nreg (2); m.put_int (2,3); m.put_atom (unknown__0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 4: // goal: assign_nlv_term(this, nreg, 3, 300) m.put_this (1); m.put_nreg (2); m.put_int (3,3); m.put_int (300,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 5: // goal: assign_nlv_term(this, nreg, 4, 1.5) m.put_this (1); m.put_nreg (2); m.put_int (4,3); m.put_float (1.5f,4); m.deallocate (); m.exec (dlplib.assign_nlv_term_4); break; case 6: m.end_rule (); break; } // switch return m.success; } // ball_client:init_vars/0 exec() // ball_client:init_vars/0 decls. public SymbolDescriptor no_init__0; public SymbolDescriptor unknown__0; // end of ball_client:init_vars/0 decls. public boolean init (DLP m) { no_init__0 = m.define_symbol ("no_init".intern(), 0); unknown__0 = m.define_symbol ("unknown".intern(), 0); return true; } // ball_client:init_vars/0 init() } // ball_client:init_vars/0 class ball_client extends Code { public static ObjectDescriptor object; public static ObjectDescriptor _common_process_client; public static MethodDescriptor ball_client_2; public static MethodDescriptor next_activity_1; public static MethodDescriptor ball_activity_1; public static MethodDescriptor kickedwithStaticStart_9; public static MethodDescriptor kickedwithStaticStartRF_8; public static MethodDescriptor fallToGround_2; public static MethodDescriptor get_clock_1; public static MethodDescriptor setPosition_4; public static MethodDescriptor move_to_position_11; public static MethodDescriptor setSFVec3f_5; public static MethodDescriptor getSFVec3f_5; public boolean init (DLP m) { object = m.define_object ("ball_client".intern(), 1, 11, 5); _common_process_client = m.header_object (object, "common_process_client".intern(), 0); ball_client_2 = m.define_method (object, 0, "ball_client".intern(), 2); next_activity_1 = m.define_method (object, 1, "next_activity".intern(), 1); ball_activity_1 = m.define_method (object, 2, "ball_activity".intern(), 1); kickedwithStaticStart_9 = m.define_method (object, 3, "kickedwithStaticStart".intern(), 9); kickedwithStaticStartRF_8 = m.define_method (object, 4, "kickedwithStaticStartRF".intern(), 8); fallToGround_2 = m.define_method (object, 5, "fallToGround".intern(), 2); get_clock_1 = m.extern_method (object, 6, "get_clock".intern(), 1); setPosition_4 = m.extern_method (object, 7, "setPosition".intern(), 4); move_to_position_11 = m.extern_method (object, 8, "move_to_position".intern(), 11); setSFVec3f_5 = m.extern_method (object, 9, "setSFVec3f".intern(), 5); getSFVec3f_5 = m.extern_method (object, 10, "getSFVec3f".intern(), 5); m.define_nonlog (object, "steps".intern(), 0); m.define_nonlog (object, "time_limit".intern(), 1); m.define_nonlog (object, "ball_name".intern(), 2); m.define_nonlog (object, "ballSleepTime".intern(), 3); m.define_nonlog (object, "stepUnit".intern(), 4); return true; } // ball_client init() } // class ball_client // end of unit ball_client code. // begin of unit soccerPlayerClientAgent code. final class soccerPlayerClientAgent_soccerPlayerClientAgent_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: soccerPlayerClientAgent(_G110, _G111) case 0: m.allocate (2); //m.success = m.get_y_value (0,1); /* PlayerName */ m.get_y_value (1,2); /* TimeLimit */ m.end_head (); break; case 1: // goal: setSFInt32(_G110, whichChoice, 0) m.put_y_value (0,1); /* 'PlayerName' */ m.put_atom (whichChoice__0,2); m.put_int (0,3); m.call (5) /*2*/; /* setSFInt32_3 */ break; case 2: // goal: assign_nlv_term(this, nreg, 1, _G111) m.put_this (1); m.put_nreg (2); m.put_int (1,3); m.put_y_value (1,4); /* 'TimeLimit' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 3: // goal: assign_nlv_term(this, nreg, 2, _G110) m.put_this (1); m.put_nreg (2); m.put_int (2,3); m.put_y_value (0,4); /* 'PlayerName' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 4: // goal: format('~w thread active.~n', [_G110]) m.put_atom (data__13__0,1); m.put_list (2); m.set_y_value (0); /* 'PlayerName' */ m.set_nil (); m.call (dlplib.format_2); /*6*/ break; case 5: // goal: setDescription('WASP SOCCER (C)Zhisheng Huang 2000-2004, Vrije University Amsterdam') m.put_atom (data__14__0,1); m.call (6) /*2*/; /* setDescription_1 */ break; case 6: // goal: player_activity(_G110, ball) m.put_y_value (0,1); /* 'PlayerName' */ m.put_atom (ball__0,2); m.deallocate (); m.exec (1); /* player_activity_2 */ break; case 7: m.end_rule (); break; } // switch return m.success; } // soccerPlayerClientAgent:soccerPlayerClientAgent/2 exec() // soccerPlayerClientAgent:soccerPlayerClientAgent/2 decls. public SymbolDescriptor whichChoice__0; public SymbolDescriptor data__13__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor sl_sr__0; public SymbolDescriptor data__14__0; public SymbolDescriptor ball__0; // end of soccerPlayerClientAgent:soccerPlayerClientAgent/2 decls. public boolean init (DLP m) { whichChoice__0 = m.define_symbol ("whichChoice".intern(), 0); data__13__0 = m.define_symbol ("~w thread active.~n".intern(), 0); op__dot__2 = m.define_symbol (".".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); data__14__0 = m.define_symbol ("WASP SOCCER (C)Zhisheng Huang 2000-2004, Vrije University Amsterdam".intern(), 0); ball__0 = m.define_symbol ("ball".intern(), 0); return true; } // soccerPlayerClientAgent:soccerPlayerClientAgent/2 init() } // soccerPlayerClientAgent:soccerPlayerClientAgent/2 final class soccerPlayerClientAgent_player_activity_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: player_activity(_G110, _G111) case 0: m.allocate (5); //m.success = m.get_y_value (3,1); /* PlayerName */ m.get_y_value (2,2); /* Ball */ m.cut_level (0); m.end_head (); break; case 1: // goal: repeat m.call (dlplib.repeat_0); /*6*/ break; case 2: // goal: get_queue(_G110, _G123) m.put_y_value (3,1); /* 'PlayerName' */ m.put_y_value (4,2); /* 'Data' */ m.call (dlplib.get_queue_2); /*6*/ break; case 3: // goal: player_activity(_G123) m.put_y_value (4,1); /* 'Data' */ m.call (2) /*2*/; /* player_activity_1 */ break; case 4: // goal: get_clock(_G133) m.put_y_value (1,1); /* 'TimeLimit' */ m.call (7) /*2*/; /* get_clock_1 */ break; case 5: // goal: look_at_ball(_G110, _G111) m.put_y_value (3,1); /* 'PlayerName' */ m.put_y_value (2,2); /* 'Ball' */ m.call (8) /*2*/; /* look_at_ball_2 */ break; case 6: // goal: _G133>time_limit m.put_y_value (1,1); /* 'TimeLimit' */ m.put_z_value (1,2); /* time_limit */ m.call (dlplib.op_cmp_gt_2); /*6*/ break; case 7: // goal: ! m.cut_tail (0); m.deallocate (); break; case 8: m.end_rule (); break; } // switch return m.success; } // soccerPlayerClientAgent:player_activity/2 exec() // soccerPlayerClientAgent:player_activity/2 decls. // end of soccerPlayerClientAgent:player_activity/2 decls. public boolean init (DLP m) { return true; } // soccerPlayerClientAgent:player_activity/2 init() } // soccerPlayerClientAgent:player_activity/2 final class soccerPlayerClientAgent_player_activity_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: player_activity(_G110) case 0: m.try_me_else (6); m.allocate (10); //m.success = m.get_x_varia (10,1); /* Mesg */ m.cut_level (8); m.end_head (); break; case 1: // goal: _G110=[move_player, _G124] m.put_list (11); m.set_y_value (9); /* 'Data' */ m.set_nil (); m.put_x_value (10,1); /* 'Mesg' */ m.put_list (2); m.set_atom (move_player__0); m.set_x_value (11); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 2: // goal: _G124=[user(_G136, _G137), _G139, _G142, _G145, _G148, _G151, _G154, _G157] m.put_list (12); m.set_y_value (0); /* 'Dist' */ m.set_nil (); m.put_list (13); m.set_y_value (1); /* 'Z2' */ m.set_x_value (12); /* 'Xtmp' */ m.put_list (14); m.set_y_value (2); /* 'Y2' */ m.set_x_value (13); /* 'Xtmp' */ m.put_list (15); m.set_y_value (3); /* 'X2' */ m.set_x_value (14); /* 'Xtmp' */ m.put_list (16); m.set_y_value (4); /* 'Z' */ m.set_x_value (15); /* 'Xtmp' */ m.put_list (17); m.set_y_value (5); /* 'Y' */ m.set_x_value (16); /* 'Xtmp' */ m.put_struct (user__2,18); m.set_v_varia (); /* 'Unknown' */ m.set_y_value (7); /* 'Player' */ m.put_list (20); m.set_y_value (6); /* 'X' */ m.set_x_value (17); /* 'Xtmp' */ m.put_y_value (9,1); /* 'Data' */ m.put_list (2); m.set_x_value (18); /* 'Xtmp' */ m.set_x_value (20); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 3: // goal: ! m.cut_body (8); break; case 4: // goal: move_to_position(_G137, set_position, runStep, runSleepTime, _G139, _G142, _G145, _G148, _G151, _G154, _G157) m.put_y_value (7,1); /* 'Player' */ m.put_atom (set_position__0,2); m.put_z_value (4,3); /* runStep */ m.put_z_value (3,4); /* runSleepTime */ m.put_y_value (6,5); /* 'X' */ m.put_y_value (5,6); /* 'Y' */ m.put_y_value (4,7); /* 'Z' */ m.put_y_value (3,8); /* 'X2' */ m.put_y_value (2,9); /* 'Y2' */ m.put_y_value (1,10); /* 'Z2' */ m.put_y_value (0,11); /* 'Dist' */ m.deallocate (); m.exec (9); /* move_to_position_11 */ break; case 5: m.end_rule (); break; // head: player_activity(_G8310) case 6: m.retry_me_else (12); m.allocate (11); //m.success = m.get_x_varia (10,1); /* Mesg */ m.cut_level (9); m.end_head (); break; case 7: // goal: _G8310=[run_and_trace, _G8324] m.put_list (11); m.set_y_value (10); /* 'Data' */ m.set_nil (); m.put_x_value (10,1); /* 'Mesg' */ m.put_list (2); m.set_atom (run_and_trace__0); m.set_x_value (11); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 8: // goal: _G8324=[user(_G8336, _G8337), _G8339, _G8342, _G8345, _G8348, _G8351, _G8354, _G8357, _G8360] m.put_list (12); m.set_y_value (0); /* 'RunSleepTime' */ m.set_nil (); m.put_list (13); m.set_y_value (1); /* 'Runstep' */ m.set_x_value (12); /* 'Xtmp' */ m.put_list (14); m.set_y_value (2); /* 'Dist' */ m.set_x_value (13); /* 'Xtmp' */ m.put_list (15); m.set_y_value (3); /* 'KickableDistance' */ m.set_x_value (14); /* 'Xtmp' */ m.put_list (16); m.set_y_value (4); /* 'Z' */ m.set_x_value (15); /* 'Xtmp' */ m.put_list (17); m.set_y_value (5); /* 'Y' */ m.set_x_value (16); /* 'Xtmp' */ m.put_list (18); m.set_y_value (6); /* 'X' */ m.set_x_value (17); /* 'Xtmp' */ m.put_struct (user__2,19); m.set_v_varia (); /* 'Unknown' */ m.set_y_value (8); /* 'Player' */ m.put_list (21); m.set_y_value (7); /* 'Ball' */ m.set_x_value (18); /* 'Xtmp' */ m.put_y_value (10,1); /* 'Data' */ m.put_list (2); m.set_x_value (19); /* 'Xtmp' */ m.set_x_value (21); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 9: // goal: ! m.cut_body (9); break; case 10: // goal: run_and_trace(_G8337, _G8339, _G8342, _G8345, _G8348, _G8351, _G8354, _G8357, _G8360) m.put_y_value (8,1); /* 'Player' */ m.put_y_value (7,2); /* 'Ball' */ m.put_y_value (6,3); /* 'X' */ m.put_y_value (5,4); /* 'Y' */ m.put_y_value (4,5); /* 'Z' */ m.put_y_value (3,6); /* 'KickableDistance' */ m.put_y_value (2,7); /* 'Dist' */ m.put_y_value (1,8); /* 'Runstep' */ m.put_y_value (0,9); /* 'RunSleepTime' */ m.deallocate (); m.exec (3); /* run_and_trace_9 */ break; case 11: m.end_rule (); break; // head: player_activity(_G16194) case 12: m.trust_or_fail (); //m.success = m.get_x_varia (10,1); /* Data */ m.end_head (); break; case 13: // goal: format('~nPlayer ~w activity error : ~w~n', [player_name, _G16194]) m.put_list (11); m.set_x_value (10); /* 'Data' */ m.set_nil (); m.put_atom (data__15__0,1); m.put_list (2); m.set_z_value (2); /* player_name */ m.set_x_value (11); /* 'Xtmp' */ m.exec (dlplib.format_2); break; case 14: m.end_rule (); break; } // switch return m.success; } // soccerPlayerClientAgent:player_activity/1 exec() // soccerPlayerClientAgent:player_activity/1 decls. public SymbolDescriptor op__dot__2; public SymbolDescriptor move_player__0; public SymbolDescriptor sl_sr__0; public SymbolDescriptor user__2; public SymbolDescriptor set_position__0; public SymbolDescriptor run_and_trace__0; public SymbolDescriptor data__15__0; // end of soccerPlayerClientAgent:player_activity/1 decls. public boolean init (DLP m) { op__dot__2 = m.define_symbol (".".intern(), 2); move_player__0 = m.define_symbol ("move_player".intern(), 0); sl_sr__0 = m.define_symbol ("[]".intern(), 0); user__2 = m.define_symbol ("user".intern(), 2); set_position__0 = m.define_symbol ("set_position".intern(), 0); run_and_trace__0 = m.define_symbol ("run_and_trace".intern(), 0); data__15__0 = m.define_symbol ("~nPlayer ~w activity error : ~w~n".intern(), 0); return true; } // soccerPlayerClientAgent:player_activity/1 init() } // soccerPlayerClientAgent:player_activity/1 final class soccerPlayerClientAgent_run_and_trace_9 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: run_and_trace(_G110, _G111, _G112, _G113, _G114, _G115, _G116, _G117, _G118) case 0: m.try_me_else (18); m.allocate (16); //m.success = m.get_y_value (9,1); /* Player */ m.get_y_value (13,2); /* Ball */ m.get_x_varia (14,3); /* X */ m.get_y_value (8,4); /* Y */ m.get_y_value (15,5); /* Z */ m.get_y_value (2,6); /* KickableDistance */ m.get_y_value (1,7); /* Dist */ m.get_y_value (11,8); /* Runstep */ m.get_y_value (14,9); /* RunSleepTime */ m.cut_level (0); m.end_head (); break; case 1: // goal: assign_nlv_term(this, nreg, 5, _G112) m.put_this (1); m.put_nreg (2); m.put_int (5,3); m.put_x_value (14,4); /* 'X' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 2: // goal: assign_nlv_term(this, nreg, 6, _G114) m.put_this (1); m.put_nreg (2); m.put_int (6,3); m.put_y_value (15,4); /* 'Z' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 3: // goal: repeat m.call (dlplib.repeat_0); /*6*/ break; case 4: // goal: sleep(_G118) m.put_y_value (14,1); /* 'RunSleepTime' */ m.call (dlplib.sleep_1); /*6*/ break; case 5: // goal: getPosition(_G111, _G147, _G148, _G149) m.put_y_value (13,1); /* 'Ball' */ m.put_y_value (5,2); /* 'X1' */ m.put_v_varia (3); /* 'Unknown' */ m.put_y_value (4,4); /* 'Z1' */ m.call (10) /*2*/; /* getPosition_4 */ break; case 6: // goal: look_at_position(_G110, _G147, _G149) m.put_y_value (9,1); /* 'Player' */ m.put_y_value (5,2); /* 'X1' */ m.put_y_value (4,3); /* 'Z1' */ m.call (11) /*2*/; /* look_at_position_3 */ break; case 7: // goal: getRotation(_G110, _G162, _G163, _G164, _G165) m.put_y_value (9,1); /* 'Player' */ m.put_v_varia (2); /* 'Unknown' */ m.put_v_varia (3); /* 'Unknown' */ m.put_v_varia (4); /* 'Unknown' */ m.put_y_value (12,5); /* 'R' */ m.call (12) /*2*/; /* getRotation_5 */ break; case 8: // goal: is_eval(_G165+1.5708, _G170) m.put_struct (op__add__2,1); m.set_y_value (12); /* 'R' */ m.set_float (1.5708f); m.put_y_value (10,2); /* 'R1' */ m.call (dlplib.is_eval_2); /*6*/ break; case 9: // goal: is_eval(xold-_G117*cos(_G170), _G183) m.put_struct (cos__1,19); m.set_y_value (10); /* 'R1' */ m.put_struct (op__mul__2,20); m.set_y_value (11); /* 'Runstep' */ m.set_x_value (19); /* 'Xtmp' */ m.put_struct (op__sub__2,1); m.set_z_value (5); /* xold */ m.set_x_value (20); /* 'Xtmp' */ m.put_y_value (7,2); /* 'Xnew' */ m.call (dlplib.is_eval_2); /*6*/ break; case 10: // goal: is_eval(zold+_G117*sin(_G170), _G197) m.put_struct (sin__1,21); m.set_y_value (10); /* 'R1' */ m.put_struct (op__mul__2,22); m.set_y_value (11); /* 'Runstep' */ m.set_x_value (21); /* 'Xtmp' */ m.put_struct (op__add__2,1); m.set_z_value (6); /* zold */ m.set_x_value (22); /* 'Xtmp' */ m.put_y_value (6,2); /* 'Znew' */ m.call (dlplib.is_eval_2); /*6*/ break; case 11: // goal: setSFVec3f(_G110, set_position, _G183, _G113, _G197) m.put_y_value (9,1); /* 'Player' */ m.put_atom (set_position__0,2); m.put_y_value (7,3); /* 'Xnew' */ m.put_y_value (8,4); /* 'Y' */ m.put_y_value (6,5); /* 'Znew' */ m.call (13) /*2*/; /* setSFVec3f_5 */ break; case 12: // goal: assign_nlv_term(this, nreg, 5, _G183) m.put_this (1); m.put_nreg (2); m.put_int (5,3); m.put_y_value (7,4); /* 'Xnew' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 13: // goal: assign_nlv_term(this, nreg, 6, _G197) m.put_this (1); m.put_nreg (2); m.put_int (6,3); m.put_y_value (6,4); /* 'Znew' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 14: // goal: distance2d(_G183, _G197, _G147, _G149, _G236) m.put_y_value (7,1); /* 'Xnew' */ m.put_y_value (6,2); /* 'Znew' */ m.put_y_value (5,3); /* 'X1' */ m.put_y_value (4,4); /* 'Z1' */ m.put_y_value (3,5); /* 'DistBall' */ m.call (14) /*2*/; /* distance2d_5 */ break; case 15: // goal: end_of_run_and_trace(_G236, _G115, _G116) m.put_y_value (3,1); /* 'DistBall' */ m.put_y_value (2,2); /* 'KickableDistance' */ m.put_y_value (1,3); /* 'Dist' */ m.call (4) /*2*/; /* end_of_run_and_trace_3 */ break; case 16: // goal: ! m.cut_tail (0); m.deallocate (); break; case 17: m.end_rule (); break; // head: run_and_trace(_G15392, _G15393, _G15394, _G15395, _G15396, _G15397, _G15398, _G15399, _G15400) case 18: m.trust_or_fail (); //m.success = m.get_v_varia (1); /* Unknown */ m.get_v_varia (2); /* Unknown */ m.get_v_varia (3); /* Unknown */ m.get_v_varia (4); /* Unknown */ m.get_v_varia (5); /* Unknown */ m.get_v_varia (6); /* Unknown */ m.get_v_varia (7); /* Unknown */ m.get_v_varia (8); /* Unknown */ m.get_v_varia (9); /* Unknown */ m.end_head (); break; case 19: m.end_fact (); break; } // switch return m.success; } // soccerPlayerClientAgent:run_and_trace/9 exec() // soccerPlayerClientAgent:run_and_trace/9 decls. public SymbolDescriptor op__add__2; public SymbolDescriptor op__sub__2; public SymbolDescriptor op__mul__2; public SymbolDescriptor cos__1; public SymbolDescriptor sin__1; public SymbolDescriptor set_position__0; // end of soccerPlayerClientAgent:run_and_trace/9 decls. public boolean init (DLP m) { op__add__2 = m.define_symbol ("+".intern(), 2); op__sub__2 = m.define_symbol ("-".intern(), 2); op__mul__2 = m.define_symbol ("*".intern(), 2); cos__1 = m.define_symbol ("cos".intern(), 1); sin__1 = m.define_symbol ("sin".intern(), 1); set_position__0 = m.define_symbol ("set_position".intern(), 0); return true; } // soccerPlayerClientAgent:run_and_trace/9 init() } // soccerPlayerClientAgent:run_and_trace/9 final class soccerPlayerClientAgent_end_of_run_and_trace_3 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: end_of_run_and_trace(_G110, _G111, _G112) case 0: m.try_me_else (4); m.allocate (1); //m.success = m.get_x_varia (11,1); /* BallDist */ m.get_x_varia (12,2); /* KickDist */ m.get_v_varia (3); /* Unknown */ m.cut_level (0); m.end_head (); break; case 1: // goal: _G110=<_G111 m.put_x_value (11,1); /* 'BallDist' */ m.put_x_value (12,2); /* 'KickDist' */ m.call (dlplib.op_cmp_le_2); /*6*/ break; case 2: // goal: ! m.cut_tail (0); m.deallocate (); break; case 3: m.end_rule (); break; // head: end_of_run_and_trace(_G2642, _G2643, _G2644) case 4: m.trust_or_fail (); //m.success = m.get_x_varia (11,1); /* BallDist */ m.get_v_varia (2); /* Unknown */ m.get_x_varia (13,3); /* Dist */ m.end_head (); break; case 5: // goal: _G2642>_G2644 m.put_x_value (11,1); /* 'BallDist' */ m.put_x_value (13,2); /* 'Dist' */ m.exec (dlplib.op_cmp_gt_2); break; case 6: m.end_rule (); break; } // switch return m.success; } // soccerPlayerClientAgent:end_of_run_and_trace/3 exec() // soccerPlayerClientAgent:end_of_run_and_trace/3 decls. // end of soccerPlayerClientAgent:end_of_run_and_trace/3 decls. public boolean init (DLP m) { return true; } // soccerPlayerClientAgent:end_of_run_and_trace/3 init() } // soccerPlayerClientAgent:end_of_run_and_trace/3 final class soccerPlayerClientAgent_init_vars_0 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: init_vars case 0: m.allocate (0); //m.success = m.end_head (); break; case 1: // goal: assign_nlv_term(this, nreg, 0, no_init) m.put_this (1); m.put_nreg (2); m.put_int (0,3); m.put_atom (no_init__0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 2: // goal: assign_nlv_term(this, nreg, 1, 0) m.put_this (1); m.put_nreg (2); m.put_int (1,3); m.put_int (0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 3: // goal: assign_nlv_term(this, nreg, 2, unknown) m.put_this (1); m.put_nreg (2); m.put_int (2,3); m.put_atom (unknown__0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 4: // goal: assign_nlv_term(this, nreg, 3, 1000) m.put_this (1); m.put_nreg (2); m.put_int (3,3); m.put_int (1000,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 5: // goal: assign_nlv_term(this, nreg, 4, 2) m.put_this (1); m.put_nreg (2); m.put_int (4,3); m.put_int (2,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 6: // goal: assign_nlv_term(this, nreg, 5, no_init) m.put_this (1); m.put_nreg (2); m.put_int (5,3); m.put_atom (no_init__0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 7: // goal: assign_nlv_term(this, nreg, 6, no_init) m.put_this (1); m.put_nreg (2); m.put_int (6,3); m.put_atom (no_init__0,4); m.deallocate (); m.exec (dlplib.assign_nlv_term_4); break; case 8: m.end_rule (); break; } // switch return m.success; } // soccerPlayerClientAgent:init_vars/0 exec() // soccerPlayerClientAgent:init_vars/0 decls. public SymbolDescriptor no_init__0; public SymbolDescriptor unknown__0; // end of soccerPlayerClientAgent:init_vars/0 decls. public boolean init (DLP m) { no_init__0 = m.define_symbol ("no_init".intern(), 0); unknown__0 = m.define_symbol ("unknown".intern(), 0); return true; } // soccerPlayerClientAgent:init_vars/0 init() } // soccerPlayerClientAgent:init_vars/0 class soccerPlayerClientAgent extends Code { public static ObjectDescriptor object; public static ObjectDescriptor _common_process_client; public static MethodDescriptor soccerPlayerClientAgent_2; public static MethodDescriptor player_activity_2; public static MethodDescriptor player_activity_1; public static MethodDescriptor run_and_trace_9; public static MethodDescriptor end_of_run_and_trace_3; public static MethodDescriptor setSFInt32_3; public static MethodDescriptor setDescription_1; public static MethodDescriptor get_clock_1; public static MethodDescriptor look_at_ball_2; public static MethodDescriptor move_to_position_11; public static MethodDescriptor getPosition_4; public static MethodDescriptor look_at_position_3; public static MethodDescriptor getRotation_5; public static MethodDescriptor setSFVec3f_5; public static MethodDescriptor distance2d_5; public boolean init (DLP m) { object = m.define_object ("soccerPlayerClientAgent".intern(), 1, 15, 7); _common_process_client = m.header_object (object, "common_process_client".intern(), 0); soccerPlayerClientAgent_2 = m.define_method (object, 0, "soccerPlayerClientAgent".intern(), 2); player_activity_2 = m.define_method (object, 1, "player_activity".intern(), 2); player_activity_1 = m.define_method (object, 2, "player_activity".intern(), 1); run_and_trace_9 = m.define_method (object, 3, "run_and_trace".intern(), 9); end_of_run_and_trace_3 = m.define_method (object, 4, "end_of_run_and_trace".intern(), 3); setSFInt32_3 = m.extern_method (object, 5, "setSFInt32".intern(), 3); setDescription_1 = m.extern_method (object, 6, "setDescription".intern(), 1); get_clock_1 = m.extern_method (object, 7, "get_clock".intern(), 1); look_at_ball_2 = m.extern_method (object, 8, "look_at_ball".intern(), 2); move_to_position_11 = m.extern_method (object, 9, "move_to_position".intern(), 11); getPosition_4 = m.extern_method (object, 10, "getPosition".intern(), 4); look_at_position_3 = m.extern_method (object, 11, "look_at_position".intern(), 3); getRotation_5 = m.extern_method (object, 12, "getRotation".intern(), 5); setSFVec3f_5 = m.extern_method (object, 13, "setSFVec3f".intern(), 5); distance2d_5 = m.extern_method (object, 14, "distance2d".intern(), 5); m.define_nonlog (object, "steps".intern(), 0); m.define_nonlog (object, "time_limit".intern(), 1); m.define_nonlog (object, "player_name".intern(), 2); m.define_nonlog (object, "runSleepTime".intern(), 3); m.define_nonlog (object, "runStep".intern(), 4); m.define_nonlog (object, "xold".intern(), 5); m.define_nonlog (object, "zold".intern(), 6); return true; } // soccerPlayerClientAgent init() } // class soccerPlayerClientAgent // end of unit soccerPlayerClientAgent code. // begin of unit soccerPlayerUser_client code. final class soccerPlayerUser_client_soccerPlayerUser_client_3 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: soccerPlayerUser_client(_G110, _G111, _G112) case 0: m.allocate (2); //m.success = m.get_y_value (0,1); /* Name */ m.get_x_varia (11,2); /* TimeLimit */ m.get_y_value (1,3); /* ClientName */ m.end_head (); break; case 1: // goal: assign_nlv_term(this, nreg, 0, _G111) m.put_this (1); m.put_nreg (2); m.put_int (0,3); m.put_x_value (11,4); /* 'TimeLimit' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 2: // goal: assign_nlv_term(this, nreg, 1, _G112) m.put_this (1); m.put_nreg (2); m.put_int (1,3); m.put_y_value (1,4); /* 'ClientName' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 3: // goal: format('The user ~w thread is active (name=~w).~n', [_G110, _G112]) m.put_list (12); m.set_y_value (1); /* 'ClientName' */ m.set_nil (); m.put_atom (data__16__0,1); m.put_list (2); m.set_y_value (0); /* 'Name' */ m.set_x_value (12); /* 'Xtmp' */ m.call (dlplib.format_2); /*6*/ break; case 4: // goal: activity(_G110) m.put_y_value (0,1); /* 'Name' */ m.deallocate (); m.exec (1); /* activity_1 */ break; case 5: m.end_rule (); break; } // switch return m.success; } // soccerPlayerUser_client:soccerPlayerUser_client/3 exec() // soccerPlayerUser_client:soccerPlayerUser_client/3 decls. public SymbolDescriptor data__16__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor sl_sr__0; // end of soccerPlayerUser_client:soccerPlayerUser_client/3 decls. public boolean init (DLP m) { data__16__0 = m.define_symbol ("The user ~w thread is active (name=~w).~n".intern(), 0); op__dot__2 = m.define_symbol (".".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); return true; } // soccerPlayerUser_client:soccerPlayerUser_client/3 init() } // soccerPlayerUser_client:soccerPlayerUser_client/3 final class soccerPlayerUser_client_activity_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: activity(_G110) case 0: m.allocate (11); //m.success = m.get_y_value (2,1); /* Name */ m.cut_level (0); m.end_head (); break; case 1: // goal: repeat m.call (dlplib.repeat_0); /*6*/ break; case 2: // goal: sleep(500) m.put_int (500,1); m.call (dlplib.sleep_1); /*6*/ break; case 3: // goal: get_clock(_G126) m.put_y_value (1,1); /* 'Time' */ m.call (4) /*2*/; /* get_clock_1 */ break; case 4: // goal: getViewpointPositionEx(_G110, _G132, _G133, _G134) m.put_y_value (2,1); /* 'Name' */ m.put_y_value (9,2); /* 'XA' */ m.put_y_value (8,3); /* 'YA' */ m.put_y_value (7,4); /* 'ZA' */ m.call (5) /*2*/; /* getViewpointPositionEx_4 */ break; case 5: // goal: getViewpointOrientationEx(_G110, _G140, _G141, _G142, _G143) m.put_y_value (2,1); /* 'Name' */ m.put_y_value (6,2); /* 'XR' */ m.put_y_value (5,3); /* 'YR' */ m.put_y_value (4,4); /* 'ZR' */ m.put_y_value (10,5); /* 'R1' */ m.call (6) /*2*/; /* getViewpointOrientationEx_5 */ break; case 6: // goal: is_eval(_G143+3.1416, _G148) m.put_struct (op__add__2,1); m.set_y_value (10); /* 'R1' */ m.set_float (3.1416f); m.put_y_value (3,2); /* 'R2' */ m.call (dlplib.is_eval_2); /*6*/ break; case 7: // goal: set_field(client_name, position, position(_G132, _G133, _G134)) m.put_z_value (1,1); /* client_name */ m.put_atom (position__0,2); m.put_struct (position__3,3); m.set_y_value (9); /* 'XA' */ m.set_y_value (8); /* 'YA' */ m.set_y_value (7); /* 'ZA' */ m.call (dlplib.set_field_3); /*6*/ break; case 8: // goal: set_field(client_name, rotation, rotation(_G140, _G141, _G142, _G148)) m.put_z_value (1,1); /* client_name */ m.put_atom (rotation__0,2); m.put_struct (rotation__4,3); m.set_y_value (6); /* 'XR' */ m.set_y_value (5); /* 'YR' */ m.set_y_value (4); /* 'ZR' */ m.set_y_value (3); /* 'R2' */ m.call (dlplib.set_field_3); /*6*/ break; case 9: // goal: near_ball_then_kick(_G110, ball) m.put_y_value (2,1); /* 'Name' */ m.put_atom (ball__0,2); m.call (2) /*2*/; /* near_ball_then_kick_2 */ break; case 10: // goal: _G126>time_limit m.put_y_value (1,1); /* 'Time' */ m.put_z_value (0,2); /* time_limit */ m.call (dlplib.op_cmp_gt_2); /*6*/ break; case 11: // goal: ! m.cut_tail (0); m.deallocate (); break; case 12: m.end_rule (); break; } // switch return m.success; } // soccerPlayerUser_client:activity/1 exec() // soccerPlayerUser_client:activity/1 decls. public SymbolDescriptor op__add__2; public SymbolDescriptor position__0; public SymbolDescriptor position__3; public SymbolDescriptor rotation__0; public SymbolDescriptor rotation__4; public SymbolDescriptor ball__0; // end of soccerPlayerUser_client:activity/1 decls. public boolean init (DLP m) { op__add__2 = m.define_symbol ("+".intern(), 2); position__0 = m.define_symbol ("position".intern(), 0); position__3 = m.define_symbol ("position".intern(), 3); rotation__0 = m.define_symbol ("rotation".intern(), 0); rotation__4 = m.define_symbol ("rotation".intern(), 4); ball__0 = m.define_symbol ("ball".intern(), 0); return true; } // soccerPlayerUser_client:activity/1 init() } // soccerPlayerUser_client:activity/1 final class soccerPlayerUser_client_near_ball_then_kick_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: near_ball_then_kick(_G110, _G111) case 0: m.try_me_else (17); m.allocate (17); //m.success = m.get_y_value (10,1); /* Agent */ m.get_y_value (7,2); /* Ball */ m.cut_level (11); m.end_head (); break; case 1: // goal: getViewpointPositionEx(_G110, _G120, _G121, _G122) m.put_y_value (10,1); /* 'Agent' */ m.put_y_value (9,2); /* 'X' */ m.put_y_value (15,3); /* 'Y' */ m.put_y_value (13,4); /* 'Z' */ m.call (5) /*2*/; /* getViewpointPositionEx_4 */ break; case 2: // goal: _G127='a computer' m.put_y_value (16,1); /* 'Host' */ m.put_atom (data__17__0,2); m.call (dlplib.op_eq_2); /*6*/ break; case 3: // goal: _G133=[user(_G127, client_name), position(_G120, _G121, _G122)] m.put_struct (position__3,10); m.set_y_value (9); /* 'X' */ m.set_y_value (15); /* 'Y' */ m.set_y_value (13); /* 'Z' */ m.put_struct (user__2,11); m.set_y_value (16); /* 'Host' */ m.set_z_value (1); /* client_name */ m.put_list (12); m.set_x_value (10); /* 'Xtmp' */ m.set_nil (); m.put_y_value (14,1); /* 'TellData' */ m.put_list (2); m.set_x_value (11); /* 'Xtmp' */ m.set_x_value (12); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 4: // goal: _G152=[tell, position, _G133] m.put_list (13); m.set_y_value (14); /* 'TellData' */ m.set_nil (); m.put_list (14); m.set_atom (position__0); m.set_x_value (13); /* 'Xtmp' */ m.put_y_value (1,1); /* 'TellMessage' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (14); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 5: // goal: getPosition(_G111, _G168, _G169, _G170) m.put_y_value (7,1); /* 'Ball' */ m.put_y_value (6,2); /* 'X1' */ m.put_y_value (5,3); /* 'Y1' */ m.put_y_value (4,4); /* 'Z1' */ m.call (7) /*2*/; /* getPosition_4 */ break; case 6: // goal: distance2d(_G120, _G122, _G168, _G170, _G179) m.put_y_value (9,1); /* 'X' */ m.put_y_value (13,2); /* 'Z' */ m.put_y_value (6,3); /* 'X1' */ m.put_y_value (4,4); /* 'Z1' */ m.put_y_value (12,5); /* 'Dist' */ m.call (8) /*2*/; /* distance2d_5 */ break; case 7: // goal: _G179old_kick_time+3 m.put_y_value (1,1); /* 'NewKickTime' */ m.put_struct (op__add__2,2); m.set_z_value (6); /* old_kick_time */ m.set_int (3); m.call (dlplib.op_cmp_gt_2); /*6*/ break; case 3: // goal: assign_nlv_term(this, nreg, 6, _G118) m.put_this (1); m.put_nreg (2); m.put_int (6,3); m.put_y_value (1,4); /* 'NewKickTime' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 4: // goal: ! m.cut_tail (0); m.deallocate (); break; case 5: m.end_rule (); break; // head: ball_time_check(_G3259) case 6: m.trust_or_fail (); m.allocate (1); //m.success = m.get_y_value (0,1); /* Position */ m.end_head (); break; case 7: // goal: old_ball_pos\=_G3259 m.put_z_value (5,1); /* old_ball_pos */ m.put_y_value (0,2); /* 'Position' */ m.call (dlplib.op_neq_2); /*6*/ break; case 8: // goal: assign_nlv_term(this, nreg, 5, _G3259) m.put_this (1); m.put_nreg (2); m.put_int (5,3); m.put_y_value (0,4); /* 'Position' */ m.deallocate (); m.exec (dlplib.assign_nlv_term_4); break; case 9: m.end_rule (); break; } // switch return m.success; } // soccerPlayerUser_client:ball_time_check/1 exec() // soccerPlayerUser_client:ball_time_check/1 decls. public SymbolDescriptor op__add__2; // end of soccerPlayerUser_client:ball_time_check/1 decls. public boolean init (DLP m) { op__add__2 = m.define_symbol ("+".intern(), 2); return true; } // soccerPlayerUser_client:ball_time_check/1 init() } // soccerPlayerUser_client:ball_time_check/1 final class soccerPlayerUser_client_init_vars_0 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: init_vars case 0: m.allocate (0); //m.success = m.end_head (); break; case 1: // goal: assign_nlv_term(this, nreg, 0, 5000) m.put_this (1); m.put_nreg (2); m.put_int (0,3); m.put_int (5000,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 2: // goal: assign_nlv_term(this, nreg, 1, null) m.put_this (1); m.put_nreg (2); m.put_int (1,3); m.put_atom (null__0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 3: // goal: assign_nlv_term(this, nreg, 2, 3) m.put_this (1); m.put_nreg (2); m.put_int (2,3); m.put_float (3f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 4: // goal: assign_nlv_term(this, nreg, 3, 10) m.put_this (1); m.put_nreg (2); m.put_int (3,3); m.put_float (10f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 5: // goal: assign_nlv_term(this, nreg, 4, 6) m.put_this (1); m.put_nreg (2); m.put_int (4,3); m.put_float (6f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 6: // goal: assign_nlv_term(this, nreg, 5, unknown) m.put_this (1); m.put_nreg (2); m.put_int (5,3); m.put_atom (unknown__0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 7: // goal: assign_nlv_term(this, nreg, 6, -10) m.put_this (1); m.put_nreg (2); m.put_int (6,3); m.put_int (-10,4); m.deallocate (); m.exec (dlplib.assign_nlv_term_4); break; case 8: m.end_rule (); break; } // switch return m.success; } // soccerPlayerUser_client:init_vars/0 exec() // soccerPlayerUser_client:init_vars/0 decls. public SymbolDescriptor null__0; public SymbolDescriptor unknown__0; // end of soccerPlayerUser_client:init_vars/0 decls. public boolean init (DLP m) { null__0 = m.define_symbol ("null".intern(), 0); unknown__0 = m.define_symbol ("unknown".intern(), 0); return true; } // soccerPlayerUser_client:init_vars/0 init() } // soccerPlayerUser_client:init_vars/0 class soccerPlayerUser_client extends Code { public static ObjectDescriptor object; public static ObjectDescriptor _common_process_client; public static MethodDescriptor soccerPlayerUser_client_3; public static MethodDescriptor activity_1; public static MethodDescriptor near_ball_then_kick_2; public static MethodDescriptor ball_time_check_1; public static MethodDescriptor get_clock_1; public static MethodDescriptor getViewpointPositionEx_4; public static MethodDescriptor getViewpointOrientationEx_5; public static MethodDescriptor getPosition_4; public static MethodDescriptor distance2d_5; public boolean init (DLP m) { object = m.define_object ("soccerPlayerUser_client".intern(), 1, 9, 7); _common_process_client = m.header_object (object, "common_process_client".intern(), 0); soccerPlayerUser_client_3 = m.define_method (object, 0, "soccerPlayerUser_client".intern(), 3); activity_1 = m.define_method (object, 1, "activity".intern(), 1); near_ball_then_kick_2 = m.define_method (object, 2, "near_ball_then_kick".intern(), 2); ball_time_check_1 = m.define_method (object, 3, "ball_time_check".intern(), 1); get_clock_1 = m.extern_method (object, 4, "get_clock".intern(), 1); getViewpointPositionEx_4 = m.extern_method (object, 5, "getViewpointPositionEx".intern(), 4); getViewpointOrientationEx_5 = m.extern_method (object, 6, "getViewpointOrientationEx".intern(), 5); getPosition_4 = m.extern_method (object, 7, "getPosition".intern(), 4); distance2d_5 = m.extern_method (object, 8, "distance2d".intern(), 5); m.define_nonlog (object, "time_limit".intern(), 0); m.define_nonlog (object, "client_name".intern(), 1); m.define_nonlog (object, "kickableDistance".intern(), 2); m.define_nonlog (object, "kickBallForce".intern(), 3); m.define_nonlog (object, "kickBallForceY".intern(), 4); m.define_nonlog (object, "old_ball_pos".intern(), 5); m.define_nonlog (object, "old_kick_time".intern(), 6); return true; } // soccerPlayerUser_client init() } // class soccerPlayerUser_client // end of unit soccerPlayerUser_client code. // begin of unit game_score_client code. final class game_score_client_setGameScore_4 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: setGameScore(_G110, _G111, _G112, _G113) case 0: m.allocate (3); //m.success = m.get_x_varia (11,1); /* Team1 */ m.get_y_value (2,2); /* Team2 */ m.get_y_value (1,3); /* Score1 */ m.get_y_value (0,4); /* Score2 */ m.end_head (); break; case 1: // goal: assign_nlv_term(this, nreg, 2, _G110) m.put_this (1); m.put_nreg (2); m.put_int (2,3); m.put_x_value (11,4); /* 'Team1' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 2: // goal: assign_nlv_term(this, nreg, 3, _G111) m.put_this (1); m.put_nreg (2); m.put_int (3,3); m.put_y_value (2,4); /* 'Team2' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 3: // goal: assign_nlv_term(this, nreg, 0, _G112) m.put_this (1); m.put_nreg (2); m.put_int (0,3); m.put_y_value (1,4); /* 'Score1' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 4: // goal: assign_nlv_term(this, nreg, 1, _G113) m.put_this (1); m.put_nreg (2); m.put_int (1,3); m.put_y_value (0,4); /* 'Score2' */ m.deallocate (); m.exec (dlplib.assign_nlv_term_4); break; case 5: m.end_rule (); break; } // switch return m.success; } // game_score_client:setGameScore/4 exec() // game_score_client:setGameScore/4 decls. // end of game_score_client:setGameScore/4 decls. public boolean init (DLP m) { return true; } // game_score_client:setGameScore/4 init() } // game_score_client:setGameScore/4 final class game_score_client_getGameScore_4 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: getGameScore(_G110, _G111, _G112, _G113) case 0: m.allocate (3); //m.success = m.get_x_varia (11,1); /* Team1 */ m.get_y_value (2,2); /* Team2 */ m.get_y_value (1,3); /* Score1 */ m.get_y_value (0,4); /* Score2 */ m.end_head (); break; case 1: // goal: assign_var_term(_G110, team1) m.put_x_value (11,1); /* 'Team1' */ m.put_z_value (2,2); /* team1 */ m.call (dlplib.assign_var_term_2); /*6*/ break; case 2: // goal: assign_var_term(_G111, team2) m.put_y_value (2,1); /* 'Team2' */ m.put_z_value (3,2); /* team2 */ m.call (dlplib.assign_var_term_2); /*6*/ break; case 3: // goal: assign_var_term(_G112, score1) m.put_y_value (1,1); /* 'Score1' */ m.put_z_value (0,2); /* score1 */ m.call (dlplib.assign_var_term_2); /*6*/ break; case 4: // goal: assign_var_term(_G113, score2) m.put_y_value (0,1); /* 'Score2' */ m.put_z_value (1,2); /* score2 */ m.deallocate (); m.exec (dlplib.assign_var_term_2); break; case 5: m.end_rule (); break; } // switch return m.success; } // game_score_client:getGameScore/4 exec() // game_score_client:getGameScore/4 decls. // end of game_score_client:getGameScore/4 decls. public boolean init (DLP m) { return true; } // game_score_client:getGameScore/4 init() } // game_score_client:getGameScore/4 final class game_score_client_getTeamScore_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: getTeamScore(_G110, _G111) case 0: m.try_me_else (4); m.allocate (1); //m.success = m.get_x_varia (10,1); /* Team */ m.get_y_value (0,2); /* Score */ m.end_head (); break; case 1: // goal: _G110=team1 m.put_x_value (10,1); /* 'Team' */ m.put_z_value (2,2); /* team1 */ m.call (dlplib.op_eq_2); /*6*/ break; case 2: // goal: assign_var_term(_G111, score1) m.put_y_value (0,1); /* 'Score' */ m.put_z_value (0,2); /* score1 */ m.deallocate (); m.exec (dlplib.assign_var_term_2); break; case 3: m.end_rule (); break; // head: getTeamScore(_G2678, _G2679) case 4: m.trust_or_fail (); m.allocate (1); //m.success = m.get_x_varia (10,1); /* Team */ m.get_y_value (0,2); /* Score */ m.end_head (); break; case 5: // goal: _G2678=team2 m.put_x_value (10,1); /* 'Team' */ m.put_z_value (3,2); /* team2 */ m.call (dlplib.op_eq_2); /*6*/ break; case 6: // goal: assign_var_term(_G2679, score2) m.put_y_value (0,1); /* 'Score' */ m.put_z_value (1,2); /* score2 */ m.deallocate (); m.exec (dlplib.assign_var_term_2); break; case 7: m.end_rule (); break; } // switch return m.success; } // game_score_client:getTeamScore/2 exec() // game_score_client:getTeamScore/2 decls. // end of game_score_client:getTeamScore/2 decls. public boolean init (DLP m) { return true; } // game_score_client:getTeamScore/2 init() } // game_score_client:getTeamScore/2 final class game_score_client_setTeamScore_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: setTeamScore(_G110, _G111) case 0: m.try_me_else (4); m.allocate (1); //m.success = m.get_x_varia (10,1); /* Team */ m.get_y_value (0,2); /* Score */ m.end_head (); break; case 1: // goal: _G110=team1 m.put_x_value (10,1); /* 'Team' */ m.put_z_value (2,2); /* team1 */ m.call (dlplib.op_eq_2); /*6*/ break; case 2: // goal: assign_nlv_term(this, nreg, 0, _G111) m.put_this (1); m.put_nreg (2); m.put_int (0,3); m.put_y_value (0,4); /* 'Score' */ m.deallocate (); m.exec (dlplib.assign_nlv_term_4); break; case 3: m.end_rule (); break; // head: setTeamScore(_G2703, _G2704) case 4: m.trust_or_fail (); m.allocate (1); //m.success = m.get_x_varia (10,1); /* Team */ m.get_y_value (0,2); /* Score */ m.end_head (); break; case 5: // goal: _G2703=team2 m.put_x_value (10,1); /* 'Team' */ m.put_z_value (3,2); /* team2 */ m.call (dlplib.op_eq_2); /*6*/ break; case 6: // goal: assign_nlv_term(this, nreg, 1, _G2704) m.put_this (1); m.put_nreg (2); m.put_int (1,3); m.put_y_value (0,4); /* 'Score' */ m.deallocate (); m.exec (dlplib.assign_nlv_term_4); break; case 7: m.end_rule (); break; } // switch return m.success; } // game_score_client:setTeamScore/2 exec() // game_score_client:setTeamScore/2 decls. // end of game_score_client:setTeamScore/2 decls. public boolean init (DLP m) { return true; } // game_score_client:setTeamScore/2 init() } // game_score_client:setTeamScore/2 final class game_score_client_showGameScore_0 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: showGameScore case 0: m.allocate (9); //m.success = m.end_head (); break; case 1: // goal: getGameScore(_G116, _G117, _G118, _G119) m.put_y_value (8,1); /* 'Team1' */ m.put_y_value (7,2); /* 'Team2' */ m.put_y_value (6,3); /* 'Score1' */ m.put_y_value (5,4); /* 'Score2' */ m.call (1) /*2*/; /* getGameScore_4 */ break; case 2: // goal: format('game score: ~w:~w---~w:~w~n', [_G116, _G117, _G118, _G119]) m.put_list (9); m.set_y_value (5); /* 'Score2' */ m.set_nil (); m.put_list (10); m.set_y_value (6); /* 'Score1' */ m.set_x_value (9); /* 'Xtmp' */ m.put_list (11); m.set_y_value (7); /* 'Team2' */ m.set_x_value (10); /* 'Xtmp' */ m.put_atom (data__18__0,1); m.put_list (2); m.set_y_value (8); /* 'Team1' */ m.set_x_value (11); /* 'Xtmp' */ m.call (dlplib.format_2); /*6*/ break; case 3: // goal: number_chars(_G118, _G143) m.put_y_value (6,1); /* 'Score1' */ m.put_y_value (4,2); /* 'Score1C' */ m.call (dlplib.number_chars_2); /*6*/ break; case 4: // goal: number_chars(_G119, _G149) m.put_y_value (5,1); /* 'Score2' */ m.put_y_value (3,2); /* 'Score2C' */ m.call (dlplib.number_chars_2); /*6*/ break; case 5: // goal: atom_chars(_G154, _G143) m.put_y_value (2,1); /* 'Score1A' */ m.put_y_value (4,2); /* 'Score1C' */ m.call (dlplib.atom_chars_2); /*6*/ break; case 6: // goal: atom_chars(_G160, _G149) m.put_y_value (1,1); /* 'Score2A' */ m.put_y_value (3,2); /* 'Score2C' */ m.call (dlplib.atom_chars_2); /*6*/ break; case 7: // goal: atom_list_concat([_G154, :, _G160], _G167) m.put_list (12); m.set_y_value (1); /* 'Score2A' */ m.set_nil (); m.put_list (13); m.set_atom (op__col__0); m.set_x_value (12); /* 'Xtmp' */ m.put_list (1); m.set_y_value (2); /* 'Score1A' */ m.set_x_value (13); /* 'Xtmp' */ m.put_y_value (0,2); /* 'TheScore' */ m.call (dlplib.atom_list_concat_2); /*6*/ break; case 8: // goal: setMFString(scorePlate1, score, [_G167]) m.put_atom (scorePlate1__0,1); m.put_atom (score__0,2); m.put_list (3); m.set_y_value (0); /* 'TheScore' */ m.set_nil (); m.call (5) /*2*/; /* setMFString_3 */ break; case 9: // goal: setMFString(scorePlate2, score, [_G167]) m.put_atom (scorePlate2__0,1); m.put_atom (score__0,2); m.put_list (3); m.set_y_value (0); /* 'TheScore' */ m.set_nil (); m.deallocate (); m.exec (5); /* setMFString_3 */ break; case 10: m.end_rule (); break; } // switch return m.success; } // game_score_client:showGameScore/0 exec() // game_score_client:showGameScore/0 decls. public SymbolDescriptor data__18__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor sl_sr__0; public SymbolDescriptor op__col__0; public SymbolDescriptor scorePlate1__0; public SymbolDescriptor score__0; public SymbolDescriptor scorePlate2__0; // end of game_score_client:showGameScore/0 decls. public boolean init (DLP m) { data__18__0 = m.define_symbol ("game score: ~w:~w---~w:~w~n".intern(), 0); op__dot__2 = m.define_symbol (".".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); op__col__0 = m.define_symbol (":".intern(), 0); scorePlate1__0 = m.define_symbol ("scorePlate1".intern(), 0); score__0 = m.define_symbol ("score".intern(), 0); scorePlate2__0 = m.define_symbol ("scorePlate2".intern(), 0); return true; } // game_score_client:showGameScore/0 init() } // game_score_client:showGameScore/0 final class game_score_client_init_vars_0 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: init_vars case 0: m.allocate (0); //m.success = m.end_head (); break; case 1: // goal: assign_nlv_term(this, nreg, 0, no_init) m.put_this (1); m.put_nreg (2); m.put_int (0,3); m.put_atom (no_init__0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 2: // goal: assign_nlv_term(this, nreg, 1, no_init) m.put_this (1); m.put_nreg (2); m.put_int (1,3); m.put_atom (no_init__0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 3: // goal: assign_nlv_term(this, nreg, 2, no_init) m.put_this (1); m.put_nreg (2); m.put_int (2,3); m.put_atom (no_init__0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 4: // goal: assign_nlv_term(this, nreg, 3, no_init) m.put_this (1); m.put_nreg (2); m.put_int (3,3); m.put_atom (no_init__0,4); m.deallocate (); m.exec (dlplib.assign_nlv_term_4); break; case 5: m.end_rule (); break; } // switch return m.success; } // game_score_client:init_vars/0 exec() // game_score_client:init_vars/0 decls. public SymbolDescriptor no_init__0; // end of game_score_client:init_vars/0 decls. public boolean init (DLP m) { no_init__0 = m.define_symbol ("no_init".intern(), 0); return true; } // game_score_client:init_vars/0 init() } // game_score_client:init_vars/0 class game_score_client extends Code { public static ObjectDescriptor object; public static ObjectDescriptor _bcilib; public static MethodDescriptor setGameScore_4; public static MethodDescriptor getGameScore_4; public static MethodDescriptor getTeamScore_2; public static MethodDescriptor setTeamScore_2; public static MethodDescriptor showGameScore_0; public static MethodDescriptor setMFString_3; public boolean init (DLP m) { object = m.define_object ("game_score_client".intern(), 1, 6, 4); _bcilib = m.header_object (object, "bcilib".intern(), 0); setGameScore_4 = m.define_method (object, 0, "setGameScore".intern(), 4); getGameScore_4 = m.define_method (object, 1, "getGameScore".intern(), 4); getTeamScore_2 = m.define_method (object, 2, "getTeamScore".intern(), 2); setTeamScore_2 = m.define_method (object, 3, "setTeamScore".intern(), 2); showGameScore_0 = m.define_method (object, 4, "showGameScore".intern(), 0); setMFString_3 = m.extern_method (object, 5, "setMFString".intern(), 3); m.define_nonlog (object, "score1".intern(), 0); m.define_nonlog (object, "score2".intern(), 1); m.define_nonlog (object, "team1".intern(), 2); m.define_nonlog (object, "team2".intern(), 3); return true; } // game_score_client init() } // class game_score_client // end of unit game_score_client code. // begin of unit common_process_client code. final class common_process_client_distance2d_5 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: distance2d(_G110, _G111, _G112, _G113, _G114) case 0: m.allocate (5); //m.success = m.get_x_varia (12,1); /* X */ m.get_y_value (3,2); /* Z */ m.get_x_varia (13,3); /* X1 */ m.get_y_value (4,4); /* Z1 */ m.get_y_value (0,5); /* Dist */ m.end_head (); break; case 1: // goal: is_eval(_G112-_G110, _G122) m.put_struct (op__sub__2,1); m.set_x_value (13); /* 'X1' */ m.set_x_value (12); /* 'X' */ m.put_y_value (2,2); /* 'Xdif' */ m.call (dlplib.is_eval_2); /*6*/ break; case 2: // goal: is_eval(_G113-_G111, _G131) m.put_struct (op__sub__2,1); m.set_y_value (4); /* 'Z1' */ m.set_y_value (3); /* 'Z' */ m.put_y_value (1,2); /* 'Zdif' */ m.call (dlplib.is_eval_2); /*6*/ break; case 3: // goal: is_eval(sqrt(_G122*_G122+_G131*_G131), _G114) m.put_struct (op__mul__2,14); m.set_y_value (2); /* 'Xdif' */ m.set_y_value (2); /* 'Xdif' */ m.put_struct (op__mul__2,15); m.set_y_value (1); /* 'Zdif' */ m.set_y_value (1); /* 'Zdif' */ m.put_struct (op__add__2,16); m.set_x_value (14); /* 'Xtmp' */ m.set_x_value (15); /* 'Xtmp' */ m.put_struct (sqrt__1,1); m.set_x_value (16); /* 'Xtmp' */ m.put_y_value (0,2); /* 'Dist' */ m.deallocate (); m.exec (dlplib.is_eval_2); break; case 4: m.end_rule (); break; } // switch return m.success; } // common_process_client:distance2d/5 exec() // common_process_client:distance2d/5 decls. public SymbolDescriptor op__sub__2; public SymbolDescriptor sqrt__1; public SymbolDescriptor op__add__2; public SymbolDescriptor op__mul__2; // end of common_process_client:distance2d/5 decls. public boolean init (DLP m) { op__sub__2 = m.define_symbol ("-".intern(), 2); sqrt__1 = m.define_symbol ("sqrt".intern(), 1); op__add__2 = m.define_symbol ("+".intern(), 2); op__mul__2 = m.define_symbol ("*".intern(), 2); return true; } // common_process_client:distance2d/5 init() } // common_process_client:distance2d/5 final class common_process_client_distance3d_7 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: distance3d(_G110, _G111, _G112, _G113, _G114, _G115, _G116) case 0: m.allocate (8); //m.success = m.get_x_varia (13,1); /* X */ m.get_y_value (6,2); /* Y */ m.get_y_value (4,3); /* Z */ m.get_x_varia (14,4); /* X1 */ m.get_y_value (7,5); /* Y1 */ m.get_y_value (5,6); /* Z1 */ m.get_y_value (0,7); /* Dist */ m.end_head (); break; case 1: // goal: is_eval(_G113-_G110, _G124) m.put_struct (op__sub__2,1); m.set_x_value (14); /* 'X1' */ m.set_x_value (13); /* 'X' */ m.put_y_value (3,2); /* 'Xdif' */ m.call (dlplib.is_eval_2); /*6*/ break; case 2: // goal: is_eval(_G114-_G111, _G133) m.put_struct (op__sub__2,1); m.set_y_value (7); /* 'Y1' */ m.set_y_value (6); /* 'Y' */ m.put_y_value (2,2); /* 'Ydif' */ m.call (dlplib.is_eval_2); /*6*/ break; case 3: // goal: is_eval(_G115-_G112, _G142) m.put_struct (op__sub__2,1); m.set_y_value (5); /* 'Z1' */ m.set_y_value (4); /* 'Z' */ m.put_y_value (1,2); /* 'Zdif' */ m.call (dlplib.is_eval_2); /*6*/ break; case 4: // goal: is_eval(sqrt(_G124*_G124+_G133*_G133+_G142*_G142), _G116) m.put_struct (op__mul__2,15); m.set_y_value (3); /* 'Xdif' */ m.set_y_value (3); /* 'Xdif' */ m.put_struct (op__mul__2,16); m.set_y_value (2); /* 'Ydif' */ m.set_y_value (2); /* 'Ydif' */ m.put_struct (op__add__2,17); m.set_x_value (15); /* 'Xtmp' */ m.set_x_value (16); /* 'Xtmp' */ m.put_struct (op__mul__2,18); m.set_y_value (1); /* 'Zdif' */ m.set_y_value (1); /* 'Zdif' */ m.put_struct (op__add__2,19); m.set_x_value (17); /* 'Xtmp' */ m.set_x_value (18); /* 'Xtmp' */ m.put_struct (sqrt__1,1); m.set_x_value (19); /* 'Xtmp' */ m.put_y_value (0,2); /* 'Dist' */ m.deallocate (); m.exec (dlplib.is_eval_2); break; case 5: m.end_rule (); break; } // switch return m.success; } // common_process_client:distance3d/7 exec() // common_process_client:distance3d/7 decls. public SymbolDescriptor op__sub__2; public SymbolDescriptor sqrt__1; public SymbolDescriptor op__add__2; public SymbolDescriptor op__mul__2; // end of common_process_client:distance3d/7 decls. public boolean init (DLP m) { op__sub__2 = m.define_symbol ("-".intern(), 2); sqrt__1 = m.define_symbol ("sqrt".intern(), 1); op__add__2 = m.define_symbol ("+".intern(), 2); op__mul__2 = m.define_symbol ("*".intern(), 2); return true; } // common_process_client:distance3d/7 init() } // common_process_client:distance3d/7 final class common_process_client_distance2dObject_5 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: distance2dObject(_G110, _G111, _G112, _G113, _G114) case 0: m.allocate (7); //m.success = m.get_x_varia (12,1); /* Object1 */ m.get_x_varia (13,2); /* Field1 */ m.get_y_value (6,3); /* Object2 */ m.get_y_value (5,4); /* Field2 */ m.get_y_value (0,5); /* Dist */ m.end_head (); break; case 1: // goal: getSFVec3f(_G110, _G111, _G124, _G125, _G126) m.put_x_value (12,1); /* 'Object1' */ m.put_x_value (13,2); /* 'Field1' */ m.put_y_value (4,3); /* 'X1' */ m.put_v_varia (4); /* 'Unknown' */ m.put_y_value (3,5); /* 'Z1' */ m.call (13) /*2*/; /* getSFVec3f_5 */ break; case 2: // goal: getSFVec3f(_G112, _G113, _G133, _G134, _G135) m.put_y_value (6,1); /* 'Object2' */ m.put_y_value (5,2); /* 'Field2' */ m.put_y_value (2,3); /* 'X2' */ m.put_v_varia (4); /* 'Unknown' */ m.put_y_value (1,5); /* 'Z2' */ m.call (13) /*2*/; /* getSFVec3f_5 */ break; case 3: // goal: distance2d(_G124, _G126, _G133, _G135, _G114) m.put_y_value (4,1); /* 'X1' */ m.put_y_value (3,2); /* 'Z1' */ m.put_y_value (2,3); /* 'X2' */ m.put_y_value (1,4); /* 'Z2' */ m.put_y_value (0,5); /* 'Dist' */ m.deallocate (); m.exec (0); /* distance2d_5 */ break; case 4: m.end_rule (); break; } // switch return m.success; } // common_process_client:distance2dObject/5 exec() // common_process_client:distance2dObject/5 decls. // end of common_process_client:distance2dObject/5 decls. public boolean init (DLP m) { return true; } // common_process_client:distance2dObject/5 init() } // common_process_client:distance2dObject/5 final class common_process_client_distance3dObject_5 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: distance3dObject(_G110, _G111, _G112, _G113, _G114) case 0: m.allocate (9); //m.success = m.get_x_varia (12,1); /* Object1 */ m.get_x_varia (13,2); /* Field1 */ m.get_y_value (8,3); /* Object2 */ m.get_y_value (7,4); /* Field2 */ m.get_y_value (0,5); /* Dist */ m.end_head (); break; case 1: // goal: getSFVec3f(_G110, _G111, _G124, _G125, _G126) m.put_x_value (12,1); /* 'Object1' */ m.put_x_value (13,2); /* 'Field1' */ m.put_y_value (6,3); /* 'X1' */ m.put_y_value (5,4); /* 'Y1' */ m.put_y_value (4,5); /* 'Z1' */ m.call (13) /*2*/; /* getSFVec3f_5 */ break; case 2: // goal: getSFVec3f(_G112, _G113, _G133, _G134, _G135) m.put_y_value (8,1); /* 'Object2' */ m.put_y_value (7,2); /* 'Field2' */ m.put_y_value (3,3); /* 'X2' */ m.put_y_value (2,4); /* 'Y2' */ m.put_y_value (1,5); /* 'Z2' */ m.call (13) /*2*/; /* getSFVec3f_5 */ break; case 3: // goal: distance3d(_G124, _G125, _G126, _G133, _G134, _G135, _G114) m.put_y_value (6,1); /* 'X1' */ m.put_y_value (5,2); /* 'Y1' */ m.put_y_value (4,3); /* 'Z1' */ m.put_y_value (3,4); /* 'X2' */ m.put_y_value (2,5); /* 'Y2' */ m.put_y_value (1,6); /* 'Z2' */ m.put_y_value (0,7); /* 'Dist' */ m.deallocate (); m.exec (1); /* distance3d_7 */ break; case 4: m.end_rule (); break; } // switch return m.success; } // common_process_client:distance3dObject/5 exec() // common_process_client:distance3dObject/5 decls. // end of common_process_client:distance3dObject/5 decls. public boolean init (DLP m) { return true; } // common_process_client:distance3dObject/5 init() } // common_process_client:distance3dObject/5 final class common_process_client_distanceBall_3 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: distanceBall(_G110, _G111, _G112) case 0: //m.success = m.get_x_varia (11,1); /* Player */ m.get_x_varia (12,2); /* Ball */ m.get_x_varia (13,3); /* Dist */ m.end_head (); break; case 1: // goal: distance2dObject(_G110, position, _G111, position, _G112) m.put_x_value (11,1); /* 'Player' */ m.put_atom (position__0,2); m.put_x_value (12,3); /* 'Ball' */ m.put_atom (position__0,4); m.put_x_value (13,5); /* 'Dist' */ m.exec (2); /* distance2dObject_5 */ break; case 2: m.end_rule (); break; } // switch return m.success; } // common_process_client:distanceBall/3 exec() // common_process_client:distanceBall/3 decls. public SymbolDescriptor position__0; // end of common_process_client:distanceBall/3 decls. public boolean init (DLP m) { position__0 = m.define_symbol ("position".intern(), 0); return true; } // common_process_client:distanceBall/3 init() } // common_process_client:distanceBall/3 final class common_process_client_distancePlayer_3 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: distancePlayer(_G110, _G111, _G112) case 0: //m.success = m.get_x_varia (11,1); /* Player1 */ m.get_x_varia (12,2); /* Player2 */ m.get_x_varia (13,3); /* Dist */ m.end_head (); break; case 1: // goal: distance2dObject(_G110, position, _G111, position, _G112) m.put_x_value (11,1); /* 'Player1' */ m.put_atom (position__0,2); m.put_x_value (12,3); /* 'Player2' */ m.put_atom (position__0,4); m.put_x_value (13,5); /* 'Dist' */ m.exec (2); /* distance2dObject_5 */ break; case 2: m.end_rule (); break; } // switch return m.success; } // common_process_client:distancePlayer/3 exec() // common_process_client:distancePlayer/3 decls. public SymbolDescriptor position__0; // end of common_process_client:distancePlayer/3 decls. public boolean init (DLP m) { position__0 = m.define_symbol ("position".intern(), 0); return true; } // common_process_client:distancePlayer/3 init() } // common_process_client:distancePlayer/3 final class common_process_client_look_at_ball_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: look_at_ball(_G110, _G111) case 0: m.try_me_else (10); m.allocate (10); //m.success = m.get_y_value (1,1); /* Player */ m.get_y_value (9,2); /* Ball */ m.cut_level (8); m.end_head (); break; case 1: // goal: getSFVec3f(_G110, position, _G121, _G122, _G123) m.put_y_value (1,1); /* 'Player' */ m.put_atom (position__0,2); m.put_y_value (3,3); /* 'X' */ m.put_v_varia (4); /* 'Unknown' */ m.put_y_value (6,5); /* 'Z' */ m.call (13) /*2*/; /* getSFVec3f_5 */ break; case 2: // goal: getPosition(_G111, _G129, _G130, _G131) m.put_y_value (9,1); /* 'Ball' */ m.put_y_value (2,2); /* 'X1' */ m.put_v_varia (3); /* 'Unknown' */ m.put_y_value (7,4); /* 'Z1' */ m.call (14) /*2*/; /* getPosition_4 */ break; case 3: // goal: _G121=\=_G129 m.put_y_value (3,1); /* 'X' */ m.put_y_value (2,2); /* 'X1' */ m.call (dlplib.op_cmp_ne_2); /*6*/ break; case 4: // goal: ! m.cut_body (8); break; case 5: // goal: is_eval(_G121-_G129, _G145) m.put_struct (op__sub__2,1); m.set_y_value (3); /* 'X' */ m.set_y_value (2); /* 'X1' */ m.put_y_value (4,2); /* 'Xdif' */ m.call (dlplib.is_eval_2); /*6*/ break; case 6: // goal: is_eval(_G131-_G123, _G154) m.put_struct (op__sub__2,1); m.set_y_value (7); /* 'Z1' */ m.set_y_value (6); /* 'Z' */ m.put_y_value (5,2); /* 'Zdif' */ m.call (dlplib.is_eval_2); /*6*/ break; case 7: // goal: is_eval(atan(_G154/_G145)-sign(_G121-_G129)*1.5708, _G163) m.put_struct (op__sub__2,12); m.set_y_value (3); /* 'X' */ m.set_y_value (2); /* 'X1' */ m.put_struct (sign__1,13); m.set_x_value (12); /* 'Xtmp' */ m.put_struct (op__div__2,14); m.set_y_value (5); /* 'Zdif' */ m.set_y_value (4); /* 'Xdif' */ m.put_struct (atan__1,15); m.set_x_value (14); /* 'Xtmp' */ m.put_struct (op__mul__2,16); m.set_x_value (13); /* 'Xtmp' */ m.set_float (1.5708f); m.put_struct (op__sub__2,1); m.set_x_value (15); /* 'Xtmp' */ m.set_x_value (16); /* 'Xtmp' */ m.put_y_value (0,2); /* 'R' */ m.call (dlplib.is_eval_2); /*6*/ break; case 8: // goal: setRotation(_G110, 0, 1, 0, _G163) m.put_y_value (1,1); /* 'Player' */ m.put_float (0f,2); m.put_float (1f,3); m.put_float (0f,4); m.put_y_value (0,5); /* 'R' */ m.deallocate (); m.exec (15); /* setRotation_5 */ break; case 9: m.end_rule (); break; // head: look_at_ball(_G8533, _G8534) case 10: m.trust_or_fail (); //m.success = m.get_v_varia (1); /* Unknown */ m.get_v_varia (2); /* Unknown */ m.end_head (); break; case 11: m.end_fact (); break; } // switch return m.success; } // common_process_client:look_at_ball/2 exec() // common_process_client:look_at_ball/2 decls. public SymbolDescriptor position__0; public SymbolDescriptor op__sub__2; public SymbolDescriptor atan__1; public SymbolDescriptor op__div__2; public SymbolDescriptor op__mul__2; public SymbolDescriptor sign__1; // end of common_process_client:look_at_ball/2 decls. public boolean init (DLP m) { position__0 = m.define_symbol ("position".intern(), 0); op__sub__2 = m.define_symbol ("-".intern(), 2); atan__1 = m.define_symbol ("atan".intern(), 1); op__div__2 = m.define_symbol ("/".intern(), 2); op__mul__2 = m.define_symbol ("*".intern(), 2); sign__1 = m.define_symbol ("sign".intern(), 1); return true; } // common_process_client:look_at_ball/2 init() } // common_process_client:look_at_ball/2 final class common_process_client_look_at_position_3 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: look_at_position(_G110, _G111, _G112) case 0: m.try_me_else (9); m.allocate (9); //m.success = m.get_y_value (1,1); /* Player */ m.get_y_value (2,2); /* X1 */ m.get_y_value (7,3); /* Z1 */ m.cut_level (8); m.end_head (); break; case 1: // goal: getSFVec3f(_G110, position, _G122, _G123, _G124) m.put_y_value (1,1); /* 'Player' */ m.put_atom (position__0,2); m.put_y_value (3,3); /* 'X' */ m.put_v_varia (4); /* 'Unknown' */ m.put_y_value (6,5); /* 'Z' */ m.call (13) /*2*/; /* getSFVec3f_5 */ break; case 2: // goal: _G122=\=_G111 m.put_y_value (3,1); /* 'X' */ m.put_y_value (2,2); /* 'X1' */ m.call (dlplib.op_cmp_ne_2); /*6*/ break; case 3: // goal: ! m.cut_body (8); break; case 4: // goal: is_eval(_G122-_G111, _G138) m.put_struct (op__sub__2,1); m.set_y_value (3); /* 'X' */ m.set_y_value (2); /* 'X1' */ m.put_y_value (4,2); /* 'Xdif' */ m.call (dlplib.is_eval_2); /*6*/ break; case 5: // goal: is_eval(_G112-_G124, _G147) m.put_struct (op__sub__2,1); m.set_y_value (7); /* 'Z1' */ m.set_y_value (6); /* 'Z' */ m.put_y_value (5,2); /* 'Zdif' */ m.call (dlplib.is_eval_2); /*6*/ break; case 6: // goal: is_eval(atan(_G147/_G138)-sign(_G122-_G111)*1.5708, _G156) m.put_struct (op__sub__2,12); m.set_y_value (3); /* 'X' */ m.set_y_value (2); /* 'X1' */ m.put_struct (sign__1,13); m.set_x_value (12); /* 'Xtmp' */ m.put_struct (op__div__2,14); m.set_y_value (5); /* 'Zdif' */ m.set_y_value (4); /* 'Xdif' */ m.put_struct (atan__1,15); m.set_x_value (14); /* 'Xtmp' */ m.put_struct (op__mul__2,16); m.set_x_value (13); /* 'Xtmp' */ m.set_float (1.5708f); m.put_struct (op__sub__2,1); m.set_x_value (15); /* 'Xtmp' */ m.set_x_value (16); /* 'Xtmp' */ m.put_y_value (0,2); /* 'R' */ m.call (dlplib.is_eval_2); /*6*/ break; case 7: // goal: setRotation(_G110, 0, 1, 0, _G156) m.put_y_value (1,1); /* 'Player' */ m.put_float (0f,2); m.put_float (1f,3); m.put_float (0f,4); m.put_y_value (0,5); /* 'R' */ m.deallocate (); m.exec (15); /* setRotation_5 */ break; case 8: m.end_rule (); break; // head: look_at_position(_G7378, _G7379, _G7380) case 9: m.trust_or_fail (); //m.success = m.get_v_varia (1); /* Unknown */ m.get_v_varia (2); /* Unknown */ m.get_v_varia (3); /* Unknown */ m.end_head (); break; case 10: m.end_fact (); break; } // switch return m.success; } // common_process_client:look_at_position/3 exec() // common_process_client:look_at_position/3 decls. public SymbolDescriptor position__0; public SymbolDescriptor op__sub__2; public SymbolDescriptor atan__1; public SymbolDescriptor op__div__2; public SymbolDescriptor op__mul__2; public SymbolDescriptor sign__1; // end of common_process_client:look_at_position/3 decls. public boolean init (DLP m) { position__0 = m.define_symbol ("position".intern(), 0); op__sub__2 = m.define_symbol ("-".intern(), 2); atan__1 = m.define_symbol ("atan".intern(), 1); op__div__2 = m.define_symbol ("/".intern(), 2); op__mul__2 = m.define_symbol ("*".intern(), 2); sign__1 = m.define_symbol ("sign".intern(), 1); return true; } // common_process_client:look_at_position/3 init() } // common_process_client:look_at_position/3 final class common_process_client_move_to_position_11 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: move_to_position(_G110, _G111, _G112, _G113, _G114, _G115, _G116, _G114, _G118, _G116, _G120) case 0: m.try_me_else (2); //m.success = m.get_v_varia (1); /* Unknown */ m.get_v_varia (2); /* Unknown */ m.get_v_varia (3); /* Unknown */ m.get_v_varia (4); /* Unknown */ m.get_x_varia (19,5); /* X */ m.get_v_varia (6); /* Unknown */ m.get_x_varia (21,7); /* Z */ m.get_x_value (19,8); /* X */ m.get_v_varia (9); /* Unknown */ m.get_x_value (21,10); /* Z */ m.get_v_varia (11); /* Unknown */ m.cut_neck (); m.end_head (); break; case 1: m.end_fact (); break; // head: move_to_position(_G3035, _G3036, _G3037, _G3038, _G3039, _G3040, _G3041, _G3042, _G3043, _G3044, _G3045) case 2: m.trust_or_fail (); m.allocate (15); //m.success = m.get_y_value (5,1); /* Object */ m.get_y_value (4,2); /* Field */ m.get_y_value (11,3); /* StepUnit */ m.get_y_value (13,4); /* SleepTime */ m.get_y_value (10,5); /* X */ m.get_y_value (2,6); /* Y */ m.get_y_value (8,7); /* Z */ m.get_x_varia (15,8); /* X1 */ m.get_v_varia (9); /* Unknown */ m.get_y_value (14,10); /* Z1 */ m.get_y_value (12,11); /* Dist */ m.cut_level (0); m.end_head (); break; case 3: // goal: is_eval(sign(_G3039-_G3042)*_G3037*abs(_G3039-_G3042)/_G3045, _G3053) m.put_struct (op__sub__2,17); m.set_y_value (10); /* 'X' */ m.set_x_value (15); /* 'X1' */ m.put_struct (sign__1,18); m.set_x_value (17); /* 'Xtmp' */ m.put_struct (op__sub__2,19); m.set_y_value (10); /* 'X' */ m.set_x_value (15); /* 'X1' */ m.put_struct (op__mul__2,20); m.set_x_value (18); /* 'Xtmp' */ m.set_y_value (11); /* 'StepUnit' */ m.put_struct (abs__1,21); m.set_x_value (19); /* 'Xtmp' */ m.put_struct (op__mul__2,22); m.set_x_value (20); /* 'Xtmp' */ m.set_x_value (21); /* 'Xtmp' */ m.put_struct (op__div__2,1); m.set_x_value (22); /* 'Xtmp' */ m.set_y_value (12); /* 'Dist' */ m.put_y_value (9,2); /* 'Xstep' */ m.call (dlplib.is_eval_2); /*6*/ break; case 4: // goal: is_eval(sign(_G3041-_G3044)*_G3037*abs(_G3041-_G3044)/_G3045, _G3078) m.put_struct (op__sub__2,23); m.set_y_value (8); /* 'Z' */ m.set_y_value (14); /* 'Z1' */ m.put_struct (sign__1,24); m.set_x_value (23); /* 'Xtmp' */ m.put_struct (op__sub__2,25); m.set_y_value (8); /* 'Z' */ m.set_y_value (14); /* 'Z1' */ m.put_struct (op__mul__2,26); m.set_x_value (24); /* 'Xtmp' */ m.set_y_value (11); /* 'StepUnit' */ m.put_struct (abs__1,27); m.set_x_value (25); /* 'Xtmp' */ m.put_struct (op__mul__2,28); m.set_x_value (26); /* 'Xtmp' */ m.set_x_value (27); /* 'Xtmp' */ m.put_struct (op__div__2,1); m.set_x_value (28); /* 'Xtmp' */ m.set_y_value (12); /* 'Dist' */ m.put_y_value (7,2); /* 'Zstep' */ m.call (dlplib.is_eval_2); /*6*/ break; case 5: // goal: assign_nlv_expr(this, nreg, 0, _G3045//_G3037) m.put_this (1); m.put_nreg (2); m.put_int (0,3); m.put_struct (op__div_int__2,4); m.set_y_value (12); /* 'Dist' */ m.set_y_value (11); /* 'StepUnit' */ m.call (dlplib.assign_nlv_expr_4); /*6*/ break; case 6: // goal: repeat m.call (dlplib.repeat_0); /*6*/ break; case 7: // goal: sleep(_G3038) m.put_y_value (13,1); /* 'SleepTime' */ m.call (dlplib.sleep_1); /*6*/ break; case 8: // goal: is_eval(_G3045//_G3037-steps+1, _G3120) m.put_struct (op__div_int__2,29); m.set_y_value (12); /* 'Dist' */ m.set_y_value (11); /* 'StepUnit' */ m.put_struct (op__sub__2,30); m.set_x_value (29); /* 'Xtmp' */ m.set_z_value (0); /* steps */ m.put_struct (op__add__2,1); m.set_x_value (30); /* 'Xtmp' */ m.set_int (1); m.put_y_value (6,2); /* 'Steps' */ m.call (dlplib.is_eval_2); /*6*/ break; case 9: // goal: is_eval(_G3039-_G3053*_G3120, _G3135) m.put_struct (op__mul__2,31); m.set_y_value (9); /* 'Xstep' */ m.set_y_value (6); /* 'Steps' */ m.put_struct (op__sub__2,1); m.set_y_value (10); /* 'X' */ m.set_x_value (31); /* 'Xtmp' */ m.put_y_value (3,2); /* 'Xnew' */ m.call (dlplib.is_eval_2); /*6*/ break; case 10: // goal: is_eval(_G3041-_G3078*_G3120, _G3147) m.put_struct (op__mul__2,32); m.set_y_value (7); /* 'Zstep' */ m.set_y_value (6); /* 'Steps' */ m.put_struct (op__sub__2,1); m.set_y_value (8); /* 'Z' */ m.set_x_value (32); /* 'Xtmp' */ m.put_y_value (1,2); /* 'Znew' */ m.call (dlplib.is_eval_2); /*6*/ break; case 11: // goal: setSFVec3f(_G3035, _G3036, _G3135, _G3040, _G3147) m.put_y_value (5,1); /* 'Object' */ m.put_y_value (4,2); /* 'Field' */ m.put_y_value (3,3); /* 'Xnew' */ m.put_y_value (2,4); /* 'Y' */ m.put_y_value (1,5); /* 'Znew' */ m.call (16) /*2*/; /* setSFVec3f_5 */ break; case 12: // goal: assign_nlv_expr(this, nreg, 0, steps-1) m.put_this (1); m.put_nreg (2); m.put_int (0,3); m.put_struct (op__sub__2,4); m.set_z_value (0); /* steps */ m.set_int (1); m.call (dlplib.assign_nlv_expr_4); /*6*/ break; case 13: // goal: steps<1 m.put_z_value (0,1); /* steps */ m.put_int (1,2); m.call (dlplib.op_cmp_lt_2); /*6*/ break; case 14: // goal: ! m.cut_tail (0); m.deallocate (); break; case 15: m.end_rule (); break; } // switch return m.success; } // common_process_client:move_to_position/11 exec() // common_process_client:move_to_position/11 decls. public SymbolDescriptor op__div__2; public SymbolDescriptor op__mul__2; public SymbolDescriptor sign__1; public SymbolDescriptor op__sub__2; public SymbolDescriptor abs__1; public SymbolDescriptor op__div_int__2; public SymbolDescriptor op__add__2; // end of common_process_client:move_to_position/11 decls. public boolean init (DLP m) { op__div__2 = m.define_symbol ("/".intern(), 2); op__mul__2 = m.define_symbol ("*".intern(), 2); sign__1 = m.define_symbol ("sign".intern(), 1); op__sub__2 = m.define_symbol ("-".intern(), 2); abs__1 = m.define_symbol ("abs".intern(), 1); op__div_int__2 = m.define_symbol ("//".intern(), 2); op__add__2 = m.define_symbol ("+".intern(), 2); return true; } // common_process_client:move_to_position/11 init() } // common_process_client:move_to_position/11 final class common_process_client_getViewpointPositionEx_4 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: getViewpointPositionEx(_G110, _G111, _G112, _G113) case 0: //m.success = m.get_v_varia (1); /* Unknown */ m.get_x_varia (12,2); /* X */ m.get_x_varia (13,3); /* Y */ m.get_x_varia (14,4); /* Z */ m.end_head (); break; case 1: // goal: getSFVec3f(proxSensor, position, _G111, _G112, _G113) m.put_atom (proxSensor__0,1); m.put_atom (position__0,2); m.put_x_value (12,3); /* 'X' */ m.put_x_value (13,4); /* 'Y' */ m.put_x_value (14,5); /* 'Z' */ m.exec (13); /* getSFVec3f_5 */ break; case 2: m.end_rule (); break; } // switch return m.success; } // common_process_client:getViewpointPositionEx/4 exec() // common_process_client:getViewpointPositionEx/4 decls. public SymbolDescriptor proxSensor__0; public SymbolDescriptor position__0; // end of common_process_client:getViewpointPositionEx/4 decls. public boolean init (DLP m) { proxSensor__0 = m.define_symbol ("proxSensor".intern(), 0); position__0 = m.define_symbol ("position".intern(), 0); return true; } // common_process_client:getViewpointPositionEx/4 init() } // common_process_client:getViewpointPositionEx/4 final class common_process_client_getViewpointOrientationEx_5 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: getViewpointOrientationEx(_G110, _G111, _G112, _G113, _G114) case 0: //m.success = m.get_v_varia (1); /* Unknown */ m.get_x_varia (13,2); /* X */ m.get_x_varia (14,3); /* Y */ m.get_x_varia (15,4); /* Z */ m.get_x_varia (16,5); /* R */ m.end_head (); break; case 1: // goal: getSFRotation(proxSensor, orientation, _G111, _G112, _G113, _G114) m.put_atom (proxSensor__0,1); m.put_atom (orientation__0,2); m.put_x_value (13,3); /* 'X' */ m.put_x_value (14,4); /* 'Y' */ m.put_x_value (15,5); /* 'Z' */ m.put_x_value (16,6); /* 'R' */ m.exec (17); /* getSFRotation_6 */ break; case 2: m.end_rule (); break; } // switch return m.success; } // common_process_client:getViewpointOrientationEx/5 exec() // common_process_client:getViewpointOrientationEx/5 decls. public SymbolDescriptor proxSensor__0; public SymbolDescriptor orientation__0; // end of common_process_client:getViewpointOrientationEx/5 decls. public boolean init (DLP m) { proxSensor__0 = m.define_symbol ("proxSensor".intern(), 0); orientation__0 = m.define_symbol ("orientation".intern(), 0); return true; } // common_process_client:getViewpointOrientationEx/5 init() } // common_process_client:getViewpointOrientationEx/5 final class common_process_client_get_clock_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: get_clock(_G110) case 0: //m.success = m.get_x_varia (10,1); /* Time */ m.end_head (); break; case 1: // goal: get_field(wsclient, clock, _G110) m.put_atom (wsclient__0,1); m.put_atom (clock__0,2); m.put_x_value (10,3); /* 'Time' */ m.exec (dlplib.get_field_3); break; case 2: m.end_rule (); break; } // switch return m.success; } // common_process_client:get_clock/1 exec() // common_process_client:get_clock/1 decls. public SymbolDescriptor wsclient__0; public SymbolDescriptor clock__0; // end of common_process_client:get_clock/1 decls. public boolean init (DLP m) { wsclient__0 = m.define_symbol ("wsclient".intern(), 0); clock__0 = m.define_symbol ("clock".intern(), 0); return true; } // common_process_client:get_clock/1 init() } // common_process_client:get_clock/1 final class common_process_client_set_clock_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: set_clock(_G110) case 0: //m.success = m.get_x_varia (10,1); /* Time */ m.end_head (); break; case 1: // goal: set_field(wsclient, clock, _G110) m.put_atom (wsclient__0,1); m.put_atom (clock__0,2); m.put_x_value (10,3); /* 'Time' */ m.exec (dlplib.set_field_3); break; case 2: m.end_rule (); break; } // switch return m.success; } // common_process_client:set_clock/1 exec() // common_process_client:set_clock/1 decls. public SymbolDescriptor wsclient__0; public SymbolDescriptor clock__0; // end of common_process_client:set_clock/1 decls. public boolean init (DLP m) { wsclient__0 = m.define_symbol ("wsclient".intern(), 0); clock__0 = m.define_symbol ("clock".intern(), 0); return true; } // common_process_client:set_clock/1 init() } // common_process_client:set_clock/1 final class common_process_client_init_vars_0 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: init_vars case 0: //m.success = m.end_head (); break; case 1: // goal: assign_nlv_term(this, nreg, 0, no_init) m.put_this (1); m.put_nreg (2); m.put_int (0,3); m.put_atom (no_init__0,4); m.exec (dlplib.assign_nlv_term_4); break; case 2: m.end_rule (); break; } // switch return m.success; } // common_process_client:init_vars/0 exec() // common_process_client:init_vars/0 decls. public SymbolDescriptor no_init__0; // end of common_process_client:init_vars/0 decls. public boolean init (DLP m) { no_init__0 = m.define_symbol ("no_init".intern(), 0); return true; } // common_process_client:init_vars/0 init() } // common_process_client:init_vars/0 class common_process_client extends Code { public static ObjectDescriptor object; public static ObjectDescriptor _bcilib; public static MethodDescriptor distance2d_5; public static MethodDescriptor distance3d_7; public static MethodDescriptor distance2dObject_5; public static MethodDescriptor distance3dObject_5; public static MethodDescriptor distanceBall_3; public static MethodDescriptor distancePlayer_3; public static MethodDescriptor look_at_ball_2; public static MethodDescriptor look_at_position_3; public static MethodDescriptor move_to_position_11; public static MethodDescriptor getViewpointPositionEx_4; public static MethodDescriptor getViewpointOrientationEx_5; public static MethodDescriptor get_clock_1; public static MethodDescriptor set_clock_1; public static MethodDescriptor getSFVec3f_5; public static MethodDescriptor getPosition_4; public static MethodDescriptor setRotation_5; public static MethodDescriptor setSFVec3f_5; public static MethodDescriptor getSFRotation_6; public boolean init (DLP m) { object = m.define_object ("common_process_client".intern(), 1, 18, 1); _bcilib = m.header_object (object, "bcilib".intern(), 0); distance2d_5 = m.define_method (object, 0, "distance2d".intern(), 5); distance3d_7 = m.define_method (object, 1, "distance3d".intern(), 7); distance2dObject_5 = m.define_method (object, 2, "distance2dObject".intern(), 5); distance3dObject_5 = m.define_method (object, 3, "distance3dObject".intern(), 5); distanceBall_3 = m.define_method (object, 4, "distanceBall".intern(), 3); distancePlayer_3 = m.define_method (object, 5, "distancePlayer".intern(), 3); look_at_ball_2 = m.define_method (object, 6, "look_at_ball".intern(), 2); look_at_position_3 = m.define_method (object, 7, "look_at_position".intern(), 3); move_to_position_11 = m.define_method (object, 8, "move_to_position".intern(), 11); getViewpointPositionEx_4 = m.define_method (object, 9, "getViewpointPositionEx".intern(), 4); getViewpointOrientationEx_5 = m.define_method (object, 10, "getViewpointOrientationEx".intern(), 5); get_clock_1 = m.define_method (object, 11, "get_clock".intern(), 1); set_clock_1 = m.define_method (object, 12, "set_clock".intern(), 1); getSFVec3f_5 = m.extern_method (object, 13, "getSFVec3f".intern(), 5); getPosition_4 = m.extern_method (object, 14, "getPosition".intern(), 4); setRotation_5 = m.extern_method (object, 15, "setRotation".intern(), 5); setSFVec3f_5 = m.extern_method (object, 16, "setSFVec3f".intern(), 5); getSFRotation_6 = m.extern_method (object, 17, "getSFRotation".intern(), 6); m.define_nonlog (object, "steps".intern(), 0); return true; } // common_process_client init() } // class common_process_client // end of unit common_process_client code. // begin of unit wsclock_pulse_client code. final class wsclock_pulse_client_wsclock_pulse_client_0 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: wsclock_pulse_client case 0: m.allocate (3); //m.success = m.cut_level (0); m.end_head (); break; case 1: // goal: format('wsclock pulse thread active~n') m.put_atom (data__19__0,1); m.call (dlplib.format_1); /*6*/ break; case 2: // goal: repeat m.call (dlplib.repeat_0); /*6*/ break; case 3: // goal: sleep(5000) m.put_int (5000,1); m.call (dlplib.sleep_1); /*6*/ break; case 4: // goal: get_clock(_G129) m.put_y_value (2,1); /* 'Time' */ m.call (1) /*2*/; /* get_clock_1 */ break; case 5: // goal: is_eval(_G129-5, _G134) m.put_struct (op__sub__2,1); m.set_y_value (2); /* 'Time' */ m.set_int (5); m.put_y_value (1,2); /* 'Left' */ m.call (dlplib.is_eval_2); /*6*/ break; case 6: // goal: set_clock(_G134) m.put_y_value (1,1); /* 'Left' */ m.call (2) /*2*/; /* set_clock_1 */ break; case 7: // goal: _G134<1 m.put_y_value (1,1); /* 'Left' */ m.put_int (1,2); m.call (dlplib.op_cmp_lt_2); /*6*/ break; case 8: // goal: ! m.cut_tail (0); m.deallocate (); break; case 9: m.end_rule (); break; } // switch return m.success; } // wsclock_pulse_client:wsclock_pulse_client/0 exec() // wsclock_pulse_client:wsclock_pulse_client/0 decls. public SymbolDescriptor data__19__0; public SymbolDescriptor op__sub__2; // end of wsclock_pulse_client:wsclock_pulse_client/0 decls. public boolean init (DLP m) { data__19__0 = m.define_symbol ("wsclock pulse thread active~n".intern(), 0); op__sub__2 = m.define_symbol ("-".intern(), 2); return true; } // wsclock_pulse_client:wsclock_pulse_client/0 init() } // wsclock_pulse_client:wsclock_pulse_client/0 class wsclock_pulse_client extends Code { public static ObjectDescriptor object; public static ObjectDescriptor _common_process_client; public static MethodDescriptor wsclock_pulse_client_0; public static MethodDescriptor get_clock_1; public static MethodDescriptor set_clock_1; public boolean init (DLP m) { object = m.define_object ("wsclock_pulse_client".intern(), 1, 3, 0); _common_process_client = m.header_object (object, "common_process_client".intern(), 0); wsclock_pulse_client_0 = m.define_method (object, 0, "wsclock_pulse_client".intern(), 0); get_clock_1 = m.extern_method (object, 1, "get_clock".intern(), 1); set_clock_1 = m.extern_method (object, 2, "set_clock".intern(), 1); return true; } // wsclock_pulse_client init() } // class wsclock_pulse_client // end of unit wsclock_pulse_client code. // end of wsclient.pl code file.