// begin of wsserver.pl code file. // begin of unit wsserver code. final class wsserver_main_0 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: main case 0: m.allocate (0); //m.success = m.end_head (); break; case 1: // goal: gg_server_init(server_port) m.put_z_value (0,1); /* server_port */ m.call (8) /*2*/; /* gg_server_init_1 */ break; case 2: // goal: soccer_game_init m.deallocate (); m.exec (7); /* soccer_game_init_0 */ break; case 3: m.end_rule (); break; } // switch return m.success; } // wsserver:main/0 exec() // wsserver:main/0 decls. // end of wsserver:main/0 decls. public boolean init (DLP m) { return true; } // wsserver:main/0 init() } // wsserver:main/0 final class wsserver_wsserver_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: wsserver(_G413) case 0: //m.success = m.get_x_varia (10,1); /* Socket */ m.end_head (); break; case 1: // goal: gg_server_loop(_G413) m.put_x_value (10,1); /* 'Socket' */ m.exec (9); /* gg_server_loop_1 */ break; case 2: m.end_rule (); break; } // switch return m.success; } // wsserver:wsserver/1 exec() // wsserver:wsserver/1 decls. // end of wsserver:wsserver/1 decls. public boolean init (DLP m) { return true; } // wsserver:wsserver/1 init() } // wsserver:wsserver/1 final class wsserver_wsserver_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: wsserver(_G413, _G414) case 0: m.allocate (1); //m.success = m.get_x_varia (10,1); /* Server */ m.get_y_value (0,2); /* ServerPort */ m.end_head (); break; case 1: // goal: format('Server at ~w~n', [_G413]) m.put_atom (data__1__0,1); m.put_list (2); m.set_x_value (10); /* 'Server' */ m.set_nil (); m.call (dlplib.format_2); /*6*/ break; case 2: // goal: gg_server_init(_G414) m.put_y_value (0,1); /* 'ServerPort' */ m.deallocate (); m.exec (8); /* gg_server_init_1 */ break; case 3: m.end_rule (); break; } // switch return m.success; } // wsserver:wsserver/2 exec() // wsserver:wsserver/2 decls. public SymbolDescriptor data__1__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor sl_sr__0; // end of wsserver:wsserver/2 decls. public boolean init (DLP m) { data__1__0 = m.define_symbol ("Server at ~w~n".intern(), 0); op__dot__2 = m.define_symbol (".".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); return true; } // wsserver:wsserver/2 init() } // wsserver:wsserver/2 final class wsserver_mk_server_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: mk_server(_G413) case 0: //m.success = m.get_x_varia (10,1); /* Socket */ m.end_head (); break; case 1: // goal: new(wsserver(_G413), _G419) m.put_struct (wsserver__1,1); m.set_x_value (10); /* 'Socket' */ m.put_v_varia (2); /* 'Unknown' */ m.exec (dlplib.new_2); break; case 2: m.end_rule (); break; } // switch return m.success; } // wsserver:mk_server/1 exec() // wsserver:mk_server/1 decls. public SymbolDescriptor wsserver__1; // end of wsserver:mk_server/1 decls. public boolean init (DLP m) { wsserver__1 = m.define_symbol ("wsserver".intern(), 1); return true; } // wsserver:mk_server/1 init() } // wsserver:mk_server/1 final class wsserver_free_name_list_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: free_name_list(_G413) case 0: m.allocate (0); //m.success = m.get_x_varia (10,1); /* FreeList */ m.end_head (); break; case 1: // goal: _G413=[blue2, red4, blue3, red5, blue4, red6, blue5, red7, blue6, red8, blue10, red9, red10] m.put_list (11); m.set_atom (red10__0); m.set_nil (); m.put_list (12); m.set_atom (red9__0); m.set_x_value (11); /* 'Xtmp' */ m.put_list (13); m.set_atom (blue10__0); m.set_x_value (12); /* 'Xtmp' */ m.put_list (14); m.set_atom (red8__0); m.set_x_value (13); /* 'Xtmp' */ m.put_list (15); m.set_atom (blue6__0); m.set_x_value (14); /* 'Xtmp' */ m.put_list (16); m.set_atom (red7__0); m.set_x_value (15); /* 'Xtmp' */ m.put_list (17); m.set_atom (blue5__0); m.set_x_value (16); /* 'Xtmp' */ m.put_list (18); m.set_atom (red6__0); m.set_x_value (17); /* 'Xtmp' */ m.put_list (19); m.set_atom (blue4__0); m.set_x_value (18); /* 'Xtmp' */ m.put_list (20); m.set_atom (red5__0); m.set_x_value (19); /* 'Xtmp' */ m.put_list (21); m.set_atom (blue3__0); m.set_x_value (20); /* 'Xtmp' */ m.put_list (22); m.set_atom (red4__0); m.set_x_value (21); /* 'Xtmp' */ m.put_x_value (10,1); /* 'FreeList' */ m.put_list (2); m.set_atom (blue2__0); m.set_x_value (22); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 2: // goal: true m.deallocate (); m.exec (dlplib.true_0); break; case 3: m.end_rule (); break; } // switch return m.success; } // wsserver:free_name_list/1 exec() // wsserver:free_name_list/1 decls. public SymbolDescriptor op__dot__2; public SymbolDescriptor blue2__0; public SymbolDescriptor red4__0; public SymbolDescriptor blue3__0; public SymbolDescriptor red5__0; public SymbolDescriptor blue4__0; public SymbolDescriptor red6__0; public SymbolDescriptor blue5__0; public SymbolDescriptor red7__0; public SymbolDescriptor blue6__0; public SymbolDescriptor red8__0; public SymbolDescriptor blue10__0; public SymbolDescriptor red9__0; public SymbolDescriptor red10__0; public SymbolDescriptor sl_sr__0; // end of wsserver:free_name_list/1 decls. public boolean init (DLP m) { op__dot__2 = m.define_symbol (".".intern(), 2); blue2__0 = m.define_symbol ("blue2".intern(), 0); red4__0 = m.define_symbol ("red4".intern(), 0); blue3__0 = m.define_symbol ("blue3".intern(), 0); red5__0 = m.define_symbol ("red5".intern(), 0); blue4__0 = m.define_symbol ("blue4".intern(), 0); red6__0 = m.define_symbol ("red6".intern(), 0); blue5__0 = m.define_symbol ("blue5".intern(), 0); red7__0 = m.define_symbol ("red7".intern(), 0); blue6__0 = m.define_symbol ("blue6".intern(), 0); red8__0 = m.define_symbol ("red8".intern(), 0); blue10__0 = m.define_symbol ("blue10".intern(), 0); red9__0 = m.define_symbol ("red9".intern(), 0); red10__0 = m.define_symbol ("red10".intern(), 0); sl_sr__0 = m.define_symbol ("[]".intern(), 0); return true; } // wsserver:free_name_list/1 init() } // wsserver:free_name_list/1 final class wsserver_default_server_reply_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: default_server_reply(_G413) case 0: //m.success = m.get_x_varia (10,1); /* Attributes */ m.end_head (); break; case 1: // goal: _G413=[0, none] m.put_list (11); m.set_atom (none__0); m.set_nil (); m.put_x_value (10,1); /* 'Attributes' */ m.put_list (2); m.set_int (0); m.set_x_value (11); /* 'Xtmp' */ m.exec (dlplib.op_eq_2); break; case 2: m.end_rule (); break; } // switch return m.success; } // wsserver:default_server_reply/1 exec() // wsserver:default_server_reply/1 decls. public SymbolDescriptor op__dot__2; public SymbolDescriptor none__0; public SymbolDescriptor sl_sr__0; // end of wsserver:default_server_reply/1 decls. public boolean init (DLP m) { op__dot__2 = m.define_symbol (".".intern(), 2); none__0 = m.define_symbol ("none".intern(), 0); sl_sr__0 = m.define_symbol ("[]".intern(), 0); return true; } // wsserver:default_server_reply/1 init() } // wsserver:default_server_reply/1 final class wsserver_server_reply_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: server_reply(_G413, _G414) case 0: m.try_me_else (15); m.allocate (9); //m.success = m.get_x_varia (10,1); /* InputTerm */ m.get_y_value (6,2); /* ReplyTerm */ m.cut_level (8); m.end_head (); break; case 1: // goal: _G413=[register, soccer, from(_G434, _G435)] m.put_struct (from__2,11); m.set_y_value (2); /* 'ClientHost' */ m.set_y_value (7); /* 'ClientAddr' */ 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); /* 'InputTerm' */ m.put_list (2); m.set_atom (register__0); m.set_x_value (13); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 2: // goal: ! m.cut_body (8); break; case 3: // goal: format('~n~w new client from ~q~n~n', [this, _G434]) m.put_list (14); m.set_y_value (2); /* 'ClientHost' */ m.set_nil (); m.put_atom (data__2__0,1); m.put_list (2); m.set_this (); m.set_x_value (14); /* 'Xtmp' */ m.call (dlplib.format_2); /*6*/ break; case 4: // goal: get_field(used_name_list, _G456) m.put_atom (used_name_list__0,1); m.put_y_value (3,2); /* 'Others' */ m.call (dlplib.get_field_2); /*6*/ break; case 5: // goal: gg_register_client(_G434, _G462) m.put_y_value (2,1); /* 'ClientHost' */ m.put_y_value (1,2); /* 'ClientName' */ m.call (10) /*2*/; /* gg_register_client_2 */ break; case 6: // goal: assign_nlv_term(this, nreg, 1, _G434) m.put_this (1); m.put_nreg (2); m.put_int (1,3); m.put_y_value (2,4); /* 'ClientHost' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 7: // goal: assign_nlv_term(this, nreg, 2, _G462) m.put_this (1); m.put_nreg (2); m.put_int (2,3); m.put_y_value (1,4); /* 'ClientName' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 8: // goal: assign_nlv_term(this, nreg, 3, _G435) m.put_this (1); m.put_nreg (2); m.put_int (3,3); m.put_y_value (7,4); /* 'ClientAddr' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 9: // goal: get_field(ball, position, _G487) m.put_atom (ball__0,1); m.put_atom (position__0,2); m.put_y_value (5,3); /* 'BallPosition' */ m.call (dlplib.get_field_3); /*6*/ break; case 10: // goal: <-(this, wsgame_score, getGameScoreStruct(_G495)) m.put_this (1); m.put_atom (wsgame_score__0,2); m.put_struct (getGameScoreStruct__1,3); m.set_y_value (4); /* 'Score' */ m.call (dlplib.op_call_3); /*6*/ break; case 11: // goal: _G414=[reply, accept, [client_name, _G487, _G495, _G456]] m.put_list (15); m.set_y_value (3); /* 'Others' */ m.set_nil (); m.put_list (16); m.set_y_value (4); /* 'Score' */ m.set_x_value (15); /* 'Xtmp' */ m.put_list (17); m.set_y_value (5); /* 'BallPosition' */ m.set_x_value (16); /* 'Xtmp' */ m.put_list (18); m.set_z_value (2); /* client_name */ m.set_x_value (17); /* 'Xtmp' */ m.put_list (19); m.set_x_value (18); /* 'Xtmp' */ m.set_nil (); m.put_list (20); m.set_atom (accept__0); m.set_x_value (19); /* 'Xtmp' */ m.put_y_value (6,1); /* 'ReplyTerm' */ m.put_list (2); m.set_atom (reply__0); m.set_x_value (20); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 12: // goal: _G527=[tell, new_player, [client_name]] m.put_list (21); m.set_z_value (2); /* client_name */ m.set_nil (); m.put_list (22); m.set_x_value (21); /* 'Xtmp' */ m.set_nil (); m.put_list (23); m.set_atom (new_player__0); m.set_x_value (22); /* 'Xtmp' */ m.put_y_value (0,1); /* 'Message' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (23); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 13: // goal: <-(this, gg_echo, broadcast(_G434, _G462, _G527)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_y_value (2); /* 'ClientHost' */ m.set_y_value (1); /* 'ClientName' */ m.set_y_value (0); /* 'Message' */ m.deallocate (); m.exec (dlplib.op_call_3); break; case 14: m.end_rule (); break; // head: server_reply(_G13643, _G13644) case 15: m.retry_me_else (23); m.allocate (6); //m.success = m.get_x_varia (10,1); /* InputTerm */ m.get_y_value (2,2); /* ReplyTerm */ m.cut_level (5); m.end_head (); break; case 16: // goal: _G13643=[unregister, soccer, [user(_G13667, _G13668)]] m.put_struct (user__2,11); m.set_y_value (4); /* 'Host' */ m.set_y_value (3); /* 'Name' */ m.put_list (12); m.set_x_value (11); /* 'Xtmp' */ m.set_nil (); m.put_list (13); m.set_x_value (12); /* 'Xtmp' */ m.set_nil (); m.put_list (14); m.set_atom (soccer__0); m.set_x_value (13); /* 'Xtmp' */ m.put_x_value (10,1); /* 'InputTerm' */ m.put_list (2); m.set_atom (unregister__0); m.set_x_value (14); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 17: // goal: ! m.cut_body (5); break; case 18: // goal: gg_unregister_client(_G13667, _G13668, _G13678) m.put_y_value (4,1); /* 'Host' */ m.put_y_value (3,2); /* 'Name' */ m.put_y_value (1,3); /* 'Length' */ m.call (11) /*2*/; /* gg_unregister_client_3 */ break; case 19: // goal: _G13644=[reply, unregister, [done, _G13678]] m.put_list (15); m.set_y_value (1); /* 'Length' */ m.set_nil (); m.put_list (16); m.set_atom (done__0); m.set_x_value (15); /* 'Xtmp' */ m.put_list (17); m.set_x_value (16); /* 'Xtmp' */ m.set_nil (); m.put_list (18); m.set_atom (unregister__0); m.set_x_value (17); /* 'Xtmp' */ m.put_y_value (2,1); /* 'ReplyTerm' */ m.put_list (2); m.set_atom (reply__0); m.set_x_value (18); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 20: // goal: _G13704=[tell, unregister, [client_name]] m.put_list (19); m.set_z_value (2); /* client_name */ m.set_nil (); m.put_list (20); m.set_x_value (19); /* 'Xtmp' */ m.set_nil (); m.put_list (21); m.set_atom (unregister__0); m.set_x_value (20); /* 'Xtmp' */ m.put_y_value (0,1); /* 'Message' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (21); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 21: // goal: <-(this, gg_echo, broadcast(client_host, to_all_clients, _G13704)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_z_value (1); /* client_host */ m.set_atom (to_all_clients__0); m.set_y_value (0); /* 'Message' */ m.deallocate (); m.exec (dlplib.op_call_3); break; case 22: m.end_rule (); break; // head: server_reply(_G20979, _G20980) case 23: m.retry_me_else (31); m.allocate (7); //m.success = m.get_y_value (4,1); /* InputTerm */ m.get_y_value (1,2); /* ReplyTerm */ m.cut_level (6); m.end_head (); break; case 24: // goal: _G20979=[tell, position, [user(_G21003, _G21004), _G21006]] m.put_struct (user__2,10); m.set_y_value (3); /* 'Host' */ m.set_y_value (2); /* 'Name' */ m.put_list (11); m.set_y_value (5); /* 'Position' */ m.set_nil (); m.put_list (12); m.set_x_value (10); /* 'Xtmp' */ 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__0); m.set_x_value (13); /* 'Xtmp' */ m.put_y_value (4,1); /* 'InputTerm' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (14); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 25: // goal: ! m.cut_body (6); break; case 26: // goal: set_field(_G21004, position, _G21006) m.put_y_value (2,1); /* 'Name' */ m.put_atom (position__0,2); m.put_y_value (5,3); /* 'Position' */ m.call (dlplib.set_field_3); /*6*/ break; case 27: // goal: <-(this, gg_echo, broadcast(_G21003, _G21004, _G20979)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_y_value (3); /* 'Host' */ m.set_y_value (2); /* 'Name' */ m.set_y_value (4); /* 'InputTerm' */ m.call (dlplib.op_call_3); /*6*/ break; case 28: // goal: <-(this, gg_echo, get_broadcasted_data(user(_G21003, _G21004), _G21036)) m.put_struct (user__2,15); m.set_y_value (3); /* 'Host' */ m.set_y_value (2); /* 'Name' */ m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (get_broadcasted_data__2,3); m.set_x_value (15); /* 'Xtmp' */ m.set_y_value (0); /* 'Attributes' */ m.call (dlplib.op_call_3); /*6*/ break; case 29: // goal: _G20980=[reply, update, _G21036] m.put_list (16); m.set_y_value (0); /* 'Attributes' */ m.set_nil (); m.put_list (17); m.set_atom (update__0); m.set_x_value (16); /* 'Xtmp' */ m.put_y_value (1,1); /* 'ReplyTerm' */ m.put_list (2); m.set_atom (reply__0); m.set_x_value (17); /* 'Xtmp' */ m.deallocate (); m.exec (dlplib.op_eq_2); break; case 30: m.end_rule (); break; // head: server_reply(_G27501, _G27502) case 31: m.retry_me_else (39); m.allocate (7); //m.success = m.get_y_value (4,1); /* InputTerm */ m.get_y_value (1,2); /* ReplyTerm */ m.cut_level (6); m.end_head (); break; case 32: // goal: _G27501=[tell, rotation, [user(_G27525, _G27526), _G27528]] m.put_struct (user__2,10); m.set_y_value (3); /* 'Host' */ m.set_y_value (2); /* 'Name' */ m.put_list (11); m.set_y_value (5); /* 'Rotation' */ m.set_nil (); m.put_list (12); m.set_x_value (10); /* 'Xtmp' */ 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 (rotation__0); m.set_x_value (13); /* 'Xtmp' */ m.put_y_value (4,1); /* 'InputTerm' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (14); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 33: // goal: ! m.cut_body (6); break; case 34: // goal: set_field(_G27526, rotation, _G27528) m.put_y_value (2,1); /* 'Name' */ m.put_atom (rotation__0,2); m.put_y_value (5,3); /* 'Rotation' */ m.call (dlplib.set_field_3); /*6*/ break; case 35: // goal: <-(this, gg_echo, broadcast(_G27525, _G27526, _G27501)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_y_value (3); /* 'Host' */ m.set_y_value (2); /* 'Name' */ m.set_y_value (4); /* 'InputTerm' */ m.call (dlplib.op_call_3); /*6*/ break; case 36: // goal: <-(this, gg_echo, get_broadcasted_data(user(_G27525, _G27526), _G27558)) m.put_struct (user__2,15); m.set_y_value (3); /* 'Host' */ m.set_y_value (2); /* 'Name' */ m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (get_broadcasted_data__2,3); m.set_x_value (15); /* 'Xtmp' */ m.set_y_value (0); /* 'Attributes' */ m.call (dlplib.op_call_3); /*6*/ break; case 37: // goal: _G27502=[reply, update, _G27558] m.put_list (16); m.set_y_value (0); /* 'Attributes' */ m.set_nil (); m.put_list (17); m.set_atom (update__0); m.set_x_value (16); /* 'Xtmp' */ m.put_y_value (1,1); /* 'ReplyTerm' */ m.put_list (2); m.set_atom (reply__0); m.set_x_value (17); /* 'Xtmp' */ m.deallocate (); m.exec (dlplib.op_eq_2); break; case 38: m.end_rule (); break; // head: server_reply(_G33718, _G33719) case 39: m.retry_me_else (49); m.allocate (9); //m.success = m.get_y_value (4,1); /* InputTerm */ m.get_y_value (1,2); /* ReplyTerm */ m.cut_level (7); m.end_head (); break; case 40: // goal: _G33718=[tell, position_and_rotation, _G33736] m.put_list (10); m.set_y_value (8); /* 'Data' */ m.set_nil (); m.put_list (11); m.set_atom (position_and_rotation__0); m.set_x_value (10); /* 'Xtmp' */ m.put_y_value (4,1); /* 'InputTerm' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (11); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 41: // goal: _G33736=[user(_G33748, _G33749), _G33751, _G33754] m.put_list (12); m.set_y_value (5); /* 'Rotation' */ m.set_nil (); m.put_struct (user__2,13); m.set_y_value (3); /* 'Host' */ m.set_y_value (2); /* 'Name' */ m.put_list (14); m.set_y_value (6); /* 'Position' */ m.set_x_value (12); /* 'Xtmp' */ m.put_y_value (8,1); /* 'Data' */ m.put_list (2); m.set_x_value (13); /* 'Xtmp' */ m.set_x_value (14); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 42: // goal: ! m.cut_body (7); break; case 43: // goal: set_field(_G33749, position, _G33751) m.put_y_value (2,1); /* 'Name' */ m.put_atom (position__0,2); m.put_y_value (6,3); /* 'Position' */ m.call (dlplib.set_field_3); /*6*/ break; case 44: // goal: set_field(_G33749, rotation, _G33754) m.put_y_value (2,1); /* 'Name' */ m.put_atom (rotation__0,2); m.put_y_value (5,3); /* 'Rotation' */ m.call (dlplib.set_field_3); /*6*/ break; case 45: // goal: <-(this, gg_echo, broadcast(_G33748, _G33749, _G33718)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_y_value (3); /* 'Host' */ m.set_y_value (2); /* 'Name' */ m.set_y_value (4); /* 'InputTerm' */ m.call (dlplib.op_call_3); /*6*/ break; case 46: // goal: <-(this, gg_echo, get_broadcasted_data(user(_G33748, _G33749), _G33791)) m.put_struct (user__2,15); m.set_y_value (3); /* 'Host' */ m.set_y_value (2); /* 'Name' */ m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (get_broadcasted_data__2,3); m.set_x_value (15); /* 'Xtmp' */ m.set_y_value (0); /* 'Attributes' */ m.call (dlplib.op_call_3); /*6*/ break; case 47: // goal: _G33719=[reply, update, _G33791] m.put_list (16); m.set_y_value (0); /* 'Attributes' */ m.set_nil (); m.put_list (17); m.set_atom (update__0); m.set_x_value (16); /* 'Xtmp' */ m.put_y_value (1,1); /* 'ReplyTerm' */ m.put_list (2); m.set_atom (reply__0); m.set_x_value (17); /* 'Xtmp' */ m.deallocate (); m.exec (dlplib.op_eq_2); break; case 48: m.end_rule (); break; // head: server_reply(_G41272, _G41273) case 49: m.retry_me_else (56); m.allocate (4); //m.success = m.get_x_varia (10,1); /* InputTerm */ m.get_y_value (1,2); /* ReplyTerm */ m.cut_level (3); m.end_head (); break; case 50: // goal: _G41272=[tell, kick_ball, _G41290] m.put_list (11); m.set_y_value (2); /* '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); /* 'InputTerm' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (12); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 51: // goal: ! m.cut_body (3); break; case 52: // goal: set_queue(ball, [kick_ball, _G41290]) m.put_list (13); m.set_y_value (2); /* '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.call (dlplib.set_queue_2); /*6*/ break; case 53: // goal: <-(this, gg_echo, get_broadcasted_data(user(client_host, client_name), _G41315)) m.put_struct (user__2,14); m.set_z_value (1); /* client_host */ m.set_z_value (2); /* client_name */ m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (get_broadcasted_data__2,3); m.set_x_value (14); /* 'Xtmp' */ m.set_y_value (0); /* 'Attributes' */ m.call (dlplib.op_call_3); /*6*/ break; case 54: // goal: _G41273=[reply, update, _G41315] m.put_list (15); m.set_y_value (0); /* 'Attributes' */ m.set_nil (); m.put_list (16); m.set_atom (update__0); m.set_x_value (15); /* 'Xtmp' */ m.put_y_value (1,1); /* 'ReplyTerm' */ m.put_list (2); m.set_atom (reply__0); m.set_x_value (16); /* 'Xtmp' */ m.deallocate (); m.exec (dlplib.op_eq_2); break; case 55: m.end_rule (); break; // head: server_reply(_G46010, _G46011) case 56: m.retry_me_else (62); m.allocate (4); //m.success = m.get_x_varia (10,1); /* InputTerm */ m.get_y_value (1,2); /* ReplyTerm */ m.cut_level (3); m.end_head (); break; case 57: // goal: _G46010=[ask, update, [_G46031]] m.put_list (11); m.set_y_value (2); /* '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); /* 'InputTerm' */ m.put_list (2); m.set_atom (ask__0); m.set_x_value (13); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 58: // goal: ! m.cut_body (3); break; case 59: // goal: <-(this, gg_echo, get_broadcasted_data(_G46031, _G46044)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (get_broadcasted_data__2,3); m.set_y_value (2); /* 'User' */ m.set_y_value (0); /* 'Attributes' */ m.call (dlplib.op_call_3); /*6*/ break; case 60: // goal: _G46011=[reply, update, _G46044] m.put_list (14); m.set_y_value (0); /* 'Attributes' */ m.set_nil (); m.put_list (15); m.set_atom (update__0); m.set_x_value (14); /* 'Xtmp' */ m.put_y_value (1,1); /* 'ReplyTerm' */ m.put_list (2); m.set_atom (reply__0); m.set_x_value (15); /* 'Xtmp' */ m.deallocate (); m.exec (dlplib.op_eq_2); break; case 61: m.end_rule (); break; // head: server_reply(_G50189, _G50190) case 62: m.retry_me_else (70); m.allocate (3); //m.success = m.get_x_varia (10,1); /* InputTerm */ m.get_y_value (0,2); /* ReplyTerm */ m.cut_level (2); m.end_head (); break; case 63: // goal: _G50189=shutdown m.put_x_value (10,1); /* 'InputTerm' */ m.put_atom (shutdown__0,2); m.call (dlplib.op_eq_2); /*6*/ break; case 64: // goal: ! m.cut_body (2); break; case 65: // goal: _G50207=[tell, browser_exit, [client_name]] m.put_list (11); m.set_z_value (2); /* client_name */ 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_y_value (1,1); /* 'Message' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (13); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 66: // goal: gg_unregister_client(client_host, client_name, _G8522) m.put_z_value (1,1); /* client_host */ m.put_z_value (2,2); /* client_name */ m.put_v_varia (3); /* 'Unknown' */ m.call (11) /*2*/; /* gg_unregister_client_3 */ break; case 67: // goal: <-(this, gg_echo, broadcast(client_host, client_name, _G8502)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_z_value (1); /* client_host */ m.set_z_value (2); /* client_name */ m.set_y_value (1); /* 'Message' */ m.call (dlplib.op_call_3); /*6*/ break; case 68: // goal: _G8485=shutdown m.put_y_value (0,1); /* 'ReplyTerm' */ m.put_atom (shutdown__0,2); m.deallocate (); m.exec (dlplib.op_eq_2); break; case 69: m.end_rule (); break; // head: server_reply(_G11239, _G11240) case 70: m.retry_me_else (77); m.allocate (6); //m.success = m.get_y_value (1,1); /* InputTerm */ m.get_y_value (0,2); /* ReplyTerm */ m.cut_level (4); m.end_head (); break; case 71: // goal: _G11239=[tell, text, _G11257] m.put_list (10); m.set_y_value (5); /* 'Message' */ m.set_nil (); m.put_list (11); m.set_atom (text__0); m.set_x_value (10); /* 'Xtmp' */ m.put_y_value (1,1); /* 'InputTerm' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (11); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 72: // goal: _G11257=[user(_G11269, _G11270), [all], _G11278] m.put_list (12); m.set_atom (all__0); m.set_nil (); m.put_list (13); m.set_v_varia (); /* 'Unknown' */ m.set_nil (); m.put_struct (user__2,15); m.set_y_value (3); /* 'Host' */ m.set_y_value (2); /* 'Name' */ m.put_list (16); m.set_x_value (12); /* 'Xtmp' */ m.set_x_value (13); /* 'Xtmp' */ m.put_y_value (5,1); /* 'Message' */ m.put_list (2); m.set_x_value (15); /* 'Xtmp' */ m.set_x_value (16); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 73: // goal: ! m.cut_body (4); break; case 74: // goal: <-(this, gg_echo, broadcast(_G11269, _G11270, _G11239)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_y_value (3); /* 'Host' */ m.set_y_value (2); /* 'Name' */ m.set_y_value (1); /* 'InputTerm' */ m.call (dlplib.op_call_3); /*6*/ break; case 75: // goal: _G11240=getChatMessage m.put_y_value (0,1); /* 'ReplyTerm' */ m.put_atom (getChatMessage__0,2); m.deallocate (); m.exec (dlplib.op_eq_2); break; case 76: m.end_rule (); break; // head: server_reply(_G16654, _G16655) case 77: m.retry_me_else (84); m.allocate (6); //m.success = m.get_y_value (1,1); /* InputTerm */ m.get_y_value (0,2); /* ReplyTerm */ m.cut_level (4); m.end_head (); break; case 78: // goal: _G16654=[tell, text, _G16672] m.put_list (10); m.set_y_value (5); /* 'Message' */ m.set_nil (); m.put_list (11); m.set_atom (text__0); m.set_x_value (10); /* 'Xtmp' */ m.put_y_value (1,1); /* 'InputTerm' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (11); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 79: // goal: _G16672=[user(_G16684, _G16685), [_G16690], _G16693] m.put_list (12); m.set_y_value (2); /* 'Recipient' */ m.set_nil (); m.put_list (13); m.set_v_varia (); /* 'Unknown' */ m.set_nil (); m.put_struct (user__2,15); m.set_y_value (3); /* 'Host' */ m.set_v_varia (); /* 'Unknown' */ m.put_list (17); m.set_x_value (12); /* 'Xtmp' */ m.set_x_value (13); /* 'Xtmp' */ m.put_y_value (5,1); /* 'Message' */ m.put_list (2); m.set_x_value (15); /* 'Xtmp' */ m.set_x_value (17); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 80: // goal: ! m.cut_body (4); break; case 81: // goal: set_queue(_G16684, _G16690, _G16654) m.put_y_value (3,1); /* 'Host' */ m.put_y_value (2,2); /* 'Recipient' */ m.put_y_value (1,3); /* 'InputTerm' */ m.call (dlplib.set_queue_3); /*6*/ break; case 82: // goal: _G16655=getChatMessage m.put_y_value (0,1); /* 'ReplyTerm' */ m.put_atom (getChatMessage__0,2); m.deallocate (); m.exec (dlplib.op_eq_2); break; case 83: m.end_rule (); break; // head: server_reply(_G21774, _G21775) case 84: m.trust_or_fail (); //m.success = m.get_x_varia (10,1); /* InputTerm */ m.get_x_varia (11,2); /* ReplyTerm */ m.end_head (); break; case 85: // goal: _G21775=unknown_message(_G21774) m.put_x_value (11,1); /* 'ReplyTerm' */ m.put_struct (unknown_message__1,2); m.set_x_value (10); /* 'InputTerm' */ m.exec (dlplib.op_eq_2); break; case 86: m.end_rule (); break; } // switch return m.success; } // wsserver:server_reply/2 exec() // wsserver:server_reply/2 decls. public SymbolDescriptor op__dot__2; public SymbolDescriptor register__0; public SymbolDescriptor soccer__0; public SymbolDescriptor from__2; public SymbolDescriptor sl_sr__0; public SymbolDescriptor data__2__0; public SymbolDescriptor this__0; public SymbolDescriptor used_name_list__0; public SymbolDescriptor ball__0; public SymbolDescriptor position__0; public SymbolDescriptor wsgame_score__0; public SymbolDescriptor getGameScoreStruct__1; public SymbolDescriptor reply__0; public SymbolDescriptor accept__0; public SymbolDescriptor tell__0; public SymbolDescriptor new_player__0; public SymbolDescriptor gg_echo__0; public SymbolDescriptor broadcast__3; public SymbolDescriptor unregister__0; public SymbolDescriptor user__2; public SymbolDescriptor done__0; public SymbolDescriptor to_all_clients__0; public SymbolDescriptor get_broadcasted_data__2; public SymbolDescriptor update__0; public SymbolDescriptor rotation__0; public SymbolDescriptor position_and_rotation__0; public SymbolDescriptor kick_ball__0; public SymbolDescriptor ask__0; public SymbolDescriptor shutdown__0; public SymbolDescriptor browser_exit__0; public SymbolDescriptor text__0; public SymbolDescriptor all__0; public SymbolDescriptor getChatMessage__0; public SymbolDescriptor unknown_message__1; // end of wsserver:server_reply/2 decls. public boolean init (DLP m) { op__dot__2 = m.define_symbol (".".intern(), 2); register__0 = m.define_symbol ("register".intern(), 0); soccer__0 = m.define_symbol ("soccer".intern(), 0); from__2 = m.define_symbol ("from".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); data__2__0 = m.define_symbol ("~n~w new client from ~q~n~n".intern(), 0); this__0 = m.define_symbol ("this".intern(), 0); used_name_list__0 = m.define_symbol ("used_name_list".intern(), 0); ball__0 = m.define_symbol ("ball".intern(), 0); position__0 = m.define_symbol ("position".intern(), 0); wsgame_score__0 = m.define_symbol ("wsgame_score".intern(), 0); getGameScoreStruct__1 = m.define_symbol ("getGameScoreStruct".intern(), 1); reply__0 = m.define_symbol ("reply".intern(), 0); accept__0 = m.define_symbol ("accept".intern(), 0); tell__0 = m.define_symbol ("tell".intern(), 0); new_player__0 = m.define_symbol ("new_player".intern(), 0); gg_echo__0 = m.define_symbol ("gg_echo".intern(), 0); broadcast__3 = m.define_symbol ("broadcast".intern(), 3); unregister__0 = m.define_symbol ("unregister".intern(), 0); user__2 = m.define_symbol ("user".intern(), 2); done__0 = m.define_symbol ("done".intern(), 0); to_all_clients__0 = m.define_symbol ("to_all_clients".intern(), 0); get_broadcasted_data__2 = m.define_symbol ("get_broadcasted_data".intern(), 2); update__0 = m.define_symbol ("update".intern(), 0); rotation__0 = m.define_symbol ("rotation".intern(), 0); position_and_rotation__0 = m.define_symbol ("position_and_rotation".intern(), 0); kick_ball__0 = m.define_symbol ("kick_ball".intern(), 0); ask__0 = m.define_symbol ("ask".intern(), 0); shutdown__0 = m.define_symbol ("shutdown".intern(), 0); browser_exit__0 = m.define_symbol ("browser_exit".intern(), 0); text__0 = m.define_symbol ("text".intern(), 0); all__0 = m.define_symbol ("all".intern(), 0); getChatMessage__0 = m.define_symbol ("getChatMessage".intern(), 0); unknown_message__1 = m.define_symbol ("unknown_message".intern(), 1); return true; } // wsserver:server_reply/2 init() } // wsserver:server_reply/2 final class wsserver_soccer_game_init_0 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: soccer_game_init case 0: m.allocate (0); //m.success = m.end_head (); break; case 1: // goal: new(wsclock_pulse, _G87) m.put_atom (wsclock_pulse__0,1); m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.new_2); /*6*/ break; case 2: // goal: set_field(wsserver, clock, time_limit) m.put_atom (wsserver__0,1); m.put_atom (clock__0,2); m.put_z_value (4,3); /* time_limit */ m.call (dlplib.set_field_3); /*6*/ break; case 3: // goal: new(wsball(ball, time_limit), _G102) m.put_struct (wsball__2,1); m.set_atom (ball__0); m.set_z_value (4); /* time_limit */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.new_2); /*6*/ break; case 4: // goal: new(wsgoalKeeper(goalKeeper1, time_limit), _G113) m.put_struct (wsgoalKeeper__2,1); m.set_atom (goalKeeper1__0); m.set_z_value (4); /* time_limit */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.new_2); /*6*/ break; case 5: // goal: new(wsgoalKeeper(goalKeeper2, time_limit), _G124) m.put_struct (wsgoalKeeper__2,1); m.set_atom (goalKeeper2__0); m.set_z_value (4); /* time_limit */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.new_2); /*6*/ break; case 6: // goal: new(soccerPlayerServerAgent(blue8, time_limit), _G135) m.put_struct (soccerPlayerServerAgent__2,1); m.set_atom (blue8__0); m.set_z_value (4); /* time_limit */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.new_2); /*6*/ break; case 7: // goal: new(soccerPlayerServerAgent(blue7, time_limit), _G146) m.put_struct (soccerPlayerServerAgent__2,1); m.set_atom (blue7__0); m.set_z_value (4); /* time_limit */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.new_2); /*6*/ break; case 8: // goal: new(soccerPlayerServerAgent(red2, time_limit), _G157) m.put_struct (soccerPlayerServerAgent__2,1); m.set_atom (red2__0); m.set_z_value (4); /* time_limit */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.new_2); /*6*/ break; case 9: // goal: <-(this, wsgame_score, setGameScore(red, blue, 0, 0)) m.put_this (1); m.put_atom (wsgame_score__0,2); m.put_struct (setGameScore__4,3); m.set_atom (red__0); m.set_atom (blue__0); m.set_int (0); m.set_int (0); m.call (dlplib.op_call_3); /*6*/ break; case 10: // goal: <-(this, wsgame_score, showGameScore) m.put_this (1); m.put_atom (wsgame_score__0,2); m.put_atom (showGameScore__0,3); m.deallocate (); m.exec (dlplib.op_call_3); break; case 11: m.end_rule (); break; } // switch return m.success; } // wsserver:soccer_game_init/0 exec() // wsserver:soccer_game_init/0 decls. public SymbolDescriptor new__1; public SymbolDescriptor wsclock_pulse__0; public SymbolDescriptor wsserver__0; public SymbolDescriptor clock__0; public SymbolDescriptor wsball__2; public SymbolDescriptor ball__0; public SymbolDescriptor wsgoalKeeper__2; public SymbolDescriptor goalKeeper1__0; public SymbolDescriptor goalKeeper2__0; public SymbolDescriptor soccerPlayerServerAgent__2; public SymbolDescriptor blue8__0; public SymbolDescriptor blue7__0; public SymbolDescriptor red2__0; public SymbolDescriptor this__0; public SymbolDescriptor wsgame_score__0; public SymbolDescriptor setGameScore__4; public SymbolDescriptor red__0; public SymbolDescriptor blue__0; public SymbolDescriptor showGameScore__0; // end of wsserver:soccer_game_init/0 decls. public boolean init (DLP m) { new__1 = m.define_symbol ("new".intern(), 1); wsclock_pulse__0 = m.define_symbol ("wsclock_pulse".intern(), 0); wsserver__0 = m.define_symbol ("wsserver".intern(), 0); clock__0 = m.define_symbol ("clock".intern(), 0); wsball__2 = m.define_symbol ("wsball".intern(), 2); ball__0 = m.define_symbol ("ball".intern(), 0); wsgoalKeeper__2 = m.define_symbol ("wsgoalKeeper".intern(), 2); goalKeeper1__0 = m.define_symbol ("goalKeeper1".intern(), 0); goalKeeper2__0 = m.define_symbol ("goalKeeper2".intern(), 0); soccerPlayerServerAgent__2 = m.define_symbol ("soccerPlayerServerAgent".intern(), 2); blue8__0 = m.define_symbol ("blue8".intern(), 0); blue7__0 = m.define_symbol ("blue7".intern(), 0); red2__0 = m.define_symbol ("red2".intern(), 0); this__0 = m.define_symbol ("this".intern(), 0); wsgame_score__0 = m.define_symbol ("wsgame_score".intern(), 0); setGameScore__4 = m.define_symbol ("setGameScore".intern(), 4); red__0 = m.define_symbol ("red".intern(), 0); blue__0 = m.define_symbol ("blue".intern(), 0); showGameScore__0 = m.define_symbol ("showGameScore".intern(), 0); return true; } // wsserver:soccer_game_init/0 init() } // wsserver:soccer_game_init/0 final class wsserver_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, 4321) m.put_this (1); m.put_nreg (2); m.put_int (0,3); m.put_int (4321,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, null) m.put_this (1); m.put_nreg (2); m.put_int (2,3); m.put_atom (null__0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 4: // goal: assign_nlv_term(this, nreg, 3, null) m.put_this (1); m.put_nreg (2); m.put_int (3,3); m.put_atom (null__0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 5: // goal: assign_nlv_term(this, nreg, 4, 5000) m.put_this (1); m.put_nreg (2); m.put_int (4,3); m.put_int (5000,4); m.deallocate (); m.exec (dlplib.assign_nlv_term_4); break; case 6: m.end_rule (); break; } // switch return m.success; } // wsserver:init_vars/0 exec() // wsserver:init_vars/0 decls. public SymbolDescriptor null__0; // end of wsserver:init_vars/0 decls. public boolean init (DLP m) { null__0 = m.define_symbol ("null".intern(), 0); return true; } // wsserver:init_vars/0 init() } // wsserver:init_vars/0 class wsserver extends Code { public static ObjectDescriptor object; public static ObjectDescriptor _gg_server; public static MethodDescriptor main_0; public static MethodDescriptor wsserver_1; public static MethodDescriptor wsserver_2; public static MethodDescriptor mk_server_1; public static MethodDescriptor free_name_list_1; public static MethodDescriptor default_server_reply_1; public static MethodDescriptor server_reply_2; public static MethodDescriptor soccer_game_init_0; public static MethodDescriptor gg_server_init_1; public static MethodDescriptor gg_server_loop_1; public static MethodDescriptor gg_register_client_2; public static MethodDescriptor gg_unregister_client_3; public boolean init (DLP m) { object = m.define_object ("wsserver".intern(), 1, 12, 5); _gg_server = m.header_object (object, "gg_server".intern(), 0); main_0 = m.define_method (object, 0, "main".intern(), 0); wsserver_1 = m.define_method (object, 1, "wsserver".intern(), 1); wsserver_2 = m.define_method (object, 2, "wsserver".intern(), 2); mk_server_1 = m.define_method (object, 3, "mk_server".intern(), 1); free_name_list_1 = m.define_method (object, 4, "free_name_list".intern(), 1); default_server_reply_1 = m.define_method (object, 5, "default_server_reply".intern(), 1); server_reply_2 = m.define_method (object, 6, "server_reply".intern(), 2); soccer_game_init_0 = m.define_method (object, 7, "soccer_game_init".intern(), 0); gg_server_init_1 = m.extern_method (object, 8, "gg_server_init".intern(), 1); gg_server_loop_1 = m.extern_method (object, 9, "gg_server_loop".intern(), 1); gg_register_client_2 = m.extern_method (object, 10, "gg_register_client".intern(), 2); gg_unregister_client_3 = m.extern_method (object, 11, "gg_unregister_client".intern(), 3); m.define_nonlog (object, "server_port".intern(), 0); m.define_nonlog (object, "client_host".intern(), 1); m.define_nonlog (object, "client_name".intern(), 2); m.define_nonlog (object, "client_addr".intern(), 3); m.define_nonlog (object, "time_limit".intern(), 4); return true; } // wsserver init() } // class wsserver // end of unit wsserver code. // begin of unit wsball code. final class wsball_wsball_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: wsball(_G110, _G111) case 0: m.allocate (2); //m.success = m.get_y_value (0,1); /* Name */ m.get_y_value (1,2); /* TimeLimit */ m.end_head (); break; case 1: // goal: format('~w thread active.~n', [_G110]) m.put_atom (data__3__0,1); m.put_list (2); m.set_y_value (0); /* 'Name' */ m.set_nil (); m.call (dlplib.format_2); /*6*/ break; case 2: // goal: assign_nlv_term(this, nreg, 7, _G111) m.put_this (1); m.put_nreg (2); m.put_int (7,3); m.put_y_value (1,4); /* 'TimeLimit' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 3: // goal: set_init_position(_G110) m.put_y_value (0,1); /* 'Name' */ m.call (2) /*2*/; /* set_init_position_1 */ break; case 4: // goal: activity(_G110) m.put_y_value (0,1); /* 'Name' */ m.deallocate (); m.exec (3); /* activity_1 */ break; case 5: m.end_rule (); break; } // switch return m.success; } // wsball:wsball/2 exec() // wsball:wsball/2 decls. public SymbolDescriptor data__3__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor sl_sr__0; // end of wsball:wsball/2 decls. public boolean init (DLP m) { data__3__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; } // wsball:wsball/2 init() } // wsball:wsball/2 final class wsball_init_position_4 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: init_position(ball, 0, 0.25, 0) case 0: //m.success = m.get_atom (ball__0,1); m.get_float (0f,2); m.get_float (0.25f,3); m.get_float (0f,4); m.end_head (); break; case 1: m.end_fact (); break; } // switch return m.success; } // wsball:init_position/4 exec() // wsball:init_position/4 decls. public SymbolDescriptor ball__0; // end of wsball:init_position/4 decls. public boolean init (DLP m) { ball__0 = m.define_symbol ("ball".intern(), 0); return true; } // wsball:init_position/4 init() } // wsball:init_position/4 final class wsball_set_init_position_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: set_init_position(_G110) case 0: m.allocate (4); //m.success = m.get_y_value (3,1); /* Name */ m.end_head (); break; case 1: // goal: init_position(_G110, _G119, _G120, _G121) m.put_y_value (3,1); /* 'Name' */ m.put_y_value (2,2); /* 'X' */ m.put_y_value (1,3); /* 'Y' */ m.put_y_value (0,4); /* 'Z' */ m.call (1) /*2*/; /* init_position_4 */ break; case 2: // goal: set_field(_G110, position, position(_G119, _G120, _G121)) m.put_y_value (3,1); /* 'Name' */ m.put_atom (position__0,2); m.put_struct (position__3,3); m.set_y_value (2); /* 'X' */ m.set_y_value (1); /* 'Y' */ m.set_y_value (0); /* 'Z' */ m.deallocate (); m.exec (dlplib.set_field_3); break; case 3: m.end_rule (); break; } // switch return m.success; } // wsball:set_init_position/1 exec() // wsball:set_init_position/1 decls. public SymbolDescriptor position__0; public SymbolDescriptor position__3; // end of wsball:set_init_position/1 decls. public boolean init (DLP m) { position__0 = m.define_symbol ("position".intern(), 0); position__3 = m.define_symbol ("position".intern(), 3); return true; } // wsball:set_init_position/1 init() } // wsball:set_init_position/1 final class wsball_activity_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: activity(_G110) case 0: m.allocate (3); //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); /* 'TimeLimit' */ m.call (16) /*2*/; /* get_clock_1 */ break; case 4: // goal: ball_checks(_G110) m.put_y_value (2,1); /* 'Name' */ m.call (5) /*2*/; /* ball_checks_1 */ break; case 5: // goal: ball_action(_G110) m.put_y_value (2,1); /* 'Name' */ m.call (4) /*2*/; /* ball_action_1 */ break; case 6: // goal: ball_checks(_G110) m.put_y_value (2,1); /* 'Name' */ m.call (5) /*2*/; /* ball_checks_1 */ break; case 7: // goal: _G126>time_limit m.put_y_value (1,1); /* 'TimeLimit' */ m.put_z_value (7,2); /* time_limit */ m.call (dlplib.op_cmp_gt_2); /*6*/ break; case 8: // goal: ! m.cut_body (0); break; case 9: // goal: <-(this, wsgame_score, showGameScore) m.put_this (1); m.put_atom (wsgame_score__0,2); m.put_atom (showGameScore__0,3); m.deallocate (); m.exec (dlplib.op_call_3); break; case 10: m.end_rule (); break; } // switch return m.success; } // wsball:activity/1 exec() // wsball:activity/1 decls. public SymbolDescriptor this__0; public SymbolDescriptor wsgame_score__0; public SymbolDescriptor showGameScore__0; // end of wsball:activity/1 decls. public boolean init (DLP m) { this__0 = m.define_symbol ("this".intern(), 0); wsgame_score__0 = m.define_symbol ("wsgame_score".intern(), 0); showGameScore__0 = m.define_symbol ("showGameScore".intern(), 0); return true; } // wsball:activity/1 init() } // wsball:activity/1 final class wsball_ball_action_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: ball_action(_G110) case 0: m.allocate (2); //m.success = m.get_y_value (1,1); /* Name */ m.end_head (); break; case 1: // goal: get_queue(ball, _G119) m.put_atom (ball__0,1); m.put_y_value (0,2); /* 'Message' */ m.call (dlplib.get_queue_2); /*6*/ break; case 2: // goal: ball_activity(_G110, _G119) m.put_y_value (1,1); /* 'Name' */ m.put_y_value (0,2); /* 'Message' */ m.deallocate (); m.exec (6); /* ball_activity_2 */ break; case 3: m.end_rule (); break; } // switch return m.success; } // wsball:ball_action/1 exec() // wsball:ball_action/1 decls. public SymbolDescriptor ball__0; // end of wsball:ball_action/1 decls. public boolean init (DLP m) { ball__0 = m.define_symbol ("ball".intern(), 0); return true; } // wsball:ball_action/1 init() } // wsball:ball_action/1 final class wsball_ball_checks_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: ball_checks(_G110) case 0: m.allocate (4); //m.success = m.get_y_value (3,1); /* Name */ m.end_head (); break; case 1: // goal: getPosition(_G110, _G119, _G120, _G121) m.put_y_value (3,1); /* 'Name' */ m.put_y_value (2,2); /* 'X' */ m.put_y_value (1,3); /* 'Y' */ m.put_y_value (0,4); /* 'Z' */ m.call (17) /*2*/; /* getPosition_4 */ break; case 2: // goal: setValidBallPosition(_G110, _G119, _G120, _G121) m.put_y_value (3,1); /* 'Name' */ 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 (11); /* setValidBallPosition_4 */ break; case 3: m.end_rule (); break; } // switch return m.success; } // wsball:ball_checks/1 exec() // wsball:ball_checks/1 decls. // end of wsball:ball_checks/1 decls. public boolean init (DLP m) { return true; } // wsball:ball_checks/1 init() } // wsball:ball_checks/1 final class wsball_ball_activity_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: ball_activity(_G110, _G111) case 0: m.try_me_else (6); m.allocate (4); //m.success = m.get_y_value (1,1); /* Ball */ m.get_x_varia (10,2); /* Message */ m.cut_level (2); m.end_head (); break; case 1: // goal: _G111=[ball_position, _G125] m.put_list (11); m.set_y_value (3); /* 'Data' */ m.set_nil (); m.put_x_value (10,1); /* 'Message' */ 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: _G125=[_G110, _G137] m.put_list (12); m.set_y_value (0); /* 'Position' */ m.set_nil (); m.put_y_value (3,1); /* 'Data' */ m.put_list (2); m.set_y_value (1); /* 'Ball' */ m.set_x_value (12); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 3: // goal: ! m.cut_body (2); break; case 4: // goal: set_field(_G110, position, _G137) m.put_y_value (1,1); /* 'Ball' */ m.put_atom (position__0,2); m.put_y_value (0,3); /* 'Position' */ m.deallocate (); m.exec (dlplib.set_field_3); break; case 5: m.end_rule (); break; // head: ball_activity(_G4414, _G4415) case 6: m.retry_me_else (11); m.allocate (3); //m.success = m.get_y_value (1,1); /* Ball */ m.get_x_varia (10,2); /* Message */ m.cut_level (2); m.end_head (); break; case 7: // goal: _G4415=[kick_ball, _G4429] m.put_list (11); m.set_y_value (0); /* 'Data' */ m.set_nil (); m.put_x_value (10,1); /* 'Message' */ 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: ! m.cut_body (2); break; case 9: // goal: check_kick_ball(_G4414, _G4429) m.put_y_value (1,1); /* 'Ball' */ m.put_y_value (0,2); /* 'Data' */ m.deallocate (); m.exec (7); /* check_kick_ball_2 */ break; case 10: m.end_rule (); break; // head: ball_activity(_G7671, _G7672) case 11: m.retry_me_else (17); m.allocate (10); //m.success = m.get_y_value (7,1); /* Ball */ m.get_x_varia (10,2); /* Message */ m.cut_level (8); m.end_head (); break; case 12: // goal: _G7672=[move_ball, _G7686] m.put_list (11); m.set_y_value (9); /* 'Data' */ m.set_nil (); m.put_x_value (10,1); /* 'Message' */ 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 13: // goal: _G7686=[_G7671, _G7698, _G7701, _G7704, _G7707, _G7710, _G7713, _G7716] m.put_list (12); m.set_y_value (0); /* 'Dist' */ m.set_nil (); m.put_list (13); m.set_y_value (1); /* 'ZE' */ m.set_x_value (12); /* 'Xtmp' */ m.put_list (14); m.set_y_value (2); /* 'YE' */ m.set_x_value (13); /* 'Xtmp' */ m.put_list (15); m.set_y_value (3); /* 'XE' */ m.set_x_value (14); /* 'Xtmp' */ m.put_list (16); m.set_y_value (4); /* 'ZB' */ m.set_x_value (15); /* 'Xtmp' */ m.put_list (17); m.set_y_value (5); /* 'YB' */ m.set_x_value (16); /* 'Xtmp' */ m.put_list (18); m.set_y_value (6); /* 'XB' */ 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 14: // goal: ! m.cut_body (8); break; case 15: // goal: move_to_position(_G7671, translation, stepUnit, ballSleepTime, _G7698, _G7701, _G7704, _G7707, _G7710, _G7713, _G7716) m.put_y_value (7,1); /* 'Ball' */ m.put_atom (translation__0,2); m.put_atom (stepUnit__0,3); m.put_z_value (5,4); /* ballSleepTime */ m.put_y_value (6,5); /* 'XB' */ m.put_y_value (5,6); /* 'YB' */ m.put_y_value (4,7); /* 'ZB' */ m.put_y_value (3,8); /* 'XE' */ m.put_y_value (2,9); /* 'YE' */ m.put_y_value (1,10); /* 'ZE' */ m.put_y_value (0,11); /* 'Dist' */ m.deallocate (); m.exec (18); /* move_to_position_11 */ break; case 16: m.end_rule (); break; // head: ball_activity(_G15302, _G15303) case 17: m.trust_or_fail (); //m.success = m.get_x_varia (10,1); /* Ball */ m.get_x_varia (11,2); /* Message */ m.end_head (); break; case 18: // goal: format('~nUNKNOWN ~w MESSAGE = ~w~n~n', [_G15302, _G15303]) m.put_list (12); m.set_x_value (11); /* 'Message' */ m.set_nil (); m.put_atom (data__4__0,1); m.put_list (2); m.set_x_value (10); /* 'Ball' */ m.set_x_value (12); /* 'Xtmp' */ m.exec (dlplib.format_2); break; case 19: m.end_rule (); break; } // switch return m.success; } // wsball:ball_activity/2 exec() // wsball:ball_activity/2 decls. public SymbolDescriptor op__dot__2; public SymbolDescriptor ball_position__0; public SymbolDescriptor sl_sr__0; public SymbolDescriptor position__0; public SymbolDescriptor kick_ball__0; public SymbolDescriptor move_ball__0; public SymbolDescriptor translation__0; public SymbolDescriptor stepUnit__0; public SymbolDescriptor data__4__0; // end of wsball:ball_activity/2 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__0 = m.define_symbol ("position".intern(), 0); kick_ball__0 = m.define_symbol ("kick_ball".intern(), 0); move_ball__0 = m.define_symbol ("move_ball".intern(), 0); translation__0 = m.define_symbol ("translation".intern(), 0); stepUnit__0 = m.define_symbol ("stepUnit".intern(), 0); data__4__0 = m.define_symbol ("~nUNKNOWN ~w MESSAGE = ~w~n~n".intern(), 0); return true; } // wsball:ball_activity/2 init() } // wsball:ball_activity/2 final class wsball_check_kick_ball_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: check_kick_ball(_G110, _G111) case 0: m.try_me_else (10); m.allocate (15); //m.success = m.get_y_value (6,1); /* Ball */ m.get_y_value (7,2); /* Data */ m.cut_level (8); m.end_head (); break; case 1: // goal: _G111=[_G122, _G110, _G128, _G131, _G134, _G137, _G140, _G143] m.put_list (10); m.set_y_value (0); /* 'KickBallForceY' */ m.set_nil (); m.put_list (11); m.set_y_value (1); /* 'KickBallForce' */ m.set_x_value (10); /* 'Xtmp' */ m.put_list (12); m.set_y_value (2); /* 'R1' */ m.set_x_value (11); /* 'Xtmp' */ m.put_list (13); m.set_y_value (3); /* 'Z' */ m.set_x_value (12); /* 'Xtmp' */ m.put_list (14); m.set_y_value (4); /* 'Y' */ m.set_x_value (13); /* 'Xtmp' */ m.put_list (15); m.set_y_value (5); /* 'X' */ m.set_x_value (14); /* 'Xtmp' */ m.put_list (16); m.set_y_value (6); /* 'Ball' */ m.set_x_value (15); /* 'Xtmp' */ m.put_y_value (7,1); /* 'Data' */ m.put_list (2); m.set_y_value (14); /* 'Player' */ m.set_x_value (16); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 2: // goal: get_field(_G110, position, position(_G153, _G154, _G155)) m.put_y_value (6,1); /* 'Ball' */ m.put_atom (position__0,2); m.put_struct (position__3,3); m.set_y_value (11); /* 'XB' */ m.set_v_varia (); /* 'Unknown' */ m.set_y_value (10); /* 'ZB' */ m.call (dlplib.get_field_3); /*6*/ break; case 3: // goal: get_field(_G122, position, position(_G164, _G165, _G166)) m.put_y_value (14,1); /* 'Player' */ m.put_atom (position__0,2); m.put_struct (position__3,3); m.set_y_value (13); /* 'XP' */ m.set_v_varia (); /* 'Unknown' */ m.set_y_value (12); /* 'ZP' */ m.call (dlplib.get_field_3); /*6*/ break; case 4: // goal: distance2d(_G164, _G166, _G153, _G155, _G175) m.put_y_value (13,1); /* 'XP' */ m.put_y_value (12,2); /* 'ZP' */ m.put_y_value (11,3); /* 'XB' */ m.put_y_value (10,4); /* 'ZB' */ m.put_y_value (9,5); /* 'Dist' */ m.call (19) /*2*/; /* distance2d_5 */ break; case 5: // goal: _G175=_G111 m.put_x_value (11,1); /* 'X' */ m.put_y_value (0,2); /* 'Xmax' */ m.call (dlplib.op_cmp_gt_2); /*6*/ break; case 2: // goal: ! m.cut_body (2); break; case 3: // goal: _G112=_G111 m.put_y_value (1,1); /* 'Xval' */ m.put_y_value (0,2); /* 'Xmax' */ m.deallocate (); m.exec (dlplib.op_eq_2); break; case 4: m.end_rule (); break; // head: askValid_Max(_G2973, _G2974, _G2975) case 5: m.trust_or_fail (); //m.success = m.get_x_varia (11,1); /* X */ m.get_v_varia (2); /* Unknown */ m.get_x_varia (13,3); /* Xval */ m.end_head (); break; case 6: // goal: _G2975=_G2973 m.put_x_value (13,1); /* 'Xval' */ m.put_x_value (11,2); /* 'X' */ m.exec (dlplib.op_eq_2); break; case 7: m.end_rule (); break; } // switch return m.success; } // wsball:askValid_Max/3 exec() // wsball:askValid_Max/3 decls. // end of wsball:askValid_Max/3 decls. public boolean init (DLP m) { return true; } // wsball:askValid_Max/3 init() } // wsball:askValid_Max/3 final class wsball_setValidBallPosition_4 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: setValidBallPosition(_G110, _G111, _G112, _G113) case 0: m.try_me_else (7); m.allocate (3); //m.success = m.get_v_varia (1); /* Unknown */ m.get_y_value (2,2); /* X */ m.get_v_varia (3); /* Unknown */ m.get_y_value (1,4); /* Z */ m.cut_level (0); m.end_head (); break; case 1: // goal: _G111==xmin m.put_y_value (2,1); /* 'X' */ m.put_z_value (2,2); /* xmin */ m.call (dlplib.op_cmp_ge_2); /*6*/ break; case 3: // goal: _G113==zmin m.put_y_value (1,1); /* 'Z' */ m.put_z_value (4,2); /* zmin */ m.call (dlplib.op_cmp_ge_2); /*6*/ break; case 5: // goal: ! m.cut_tail (0); m.deallocate (); break; case 6: m.end_rule (); break; // head: setValidBallPosition(_G3634, _G3635, _G3636, _G3637) case 7: m.trust_or_fail (); m.allocate (5); //m.success = m.get_y_value (3,1); /* Ball */ m.get_x_varia (11,2); /* X */ m.get_y_value (1,3); /* Y */ m.get_y_value (4,4); /* Z */ m.end_head (); break; case 8: // goal: validMinMax(_G3635, xmin, xmax, _G3648) m.put_x_value (11,1); /* 'X' */ m.put_z_value (2,2); /* xmin */ m.put_z_value (1,3); /* xmax */ m.put_y_value (2,4); /* 'Xnew' */ m.call (8) /*2*/; /* validMinMax_4 */ break; case 9: // goal: validMinMax(_G3637, zmin, zmax, _G3656) m.put_y_value (4,1); /* 'Z' */ m.put_z_value (4,2); /* zmin */ m.put_z_value (3,3); /* zmax */ m.put_y_value (0,4); /* 'Znew' */ m.call (8) /*2*/; /* validMinMax_4 */ break; case 10: // goal: setPositionEx(_G3634, _G3648, _G3636, _G3656) m.put_y_value (3,1); /* 'Ball' */ m.put_y_value (2,2); /* 'Xnew' */ m.put_y_value (1,3); /* 'Y' */ m.put_y_value (0,4); /* 'Znew' */ m.deallocate (); m.exec (12); /* setPositionEx_4 */ break; case 11: m.end_rule (); break; } // switch return m.success; } // wsball:setValidBallPosition/4 exec() // wsball:setValidBallPosition/4 decls. // end of wsball:setValidBallPosition/4 decls. public boolean init (DLP m) { return true; } // wsball:setValidBallPosition/4 init() } // wsball:setValidBallPosition/4 final class wsball_setPositionEx_4 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: setPositionEx(_G110, _G111, _G112, _G113) case 0: m.try_me_else (8); m.allocate (7); //m.success = m.get_y_value (5,1); /* Ball */ m.get_y_value (4,2); /* X */ m.get_y_value (3,3); /* Y */ m.get_y_value (2,4); /* Z */ m.cut_level (6); m.end_head (); break; case 1: // goal: setPosition(_G110, _G111, _G112, _G113) m.put_y_value (5,1); /* 'Ball' */ m.put_y_value (4,2); /* 'X' */ m.put_y_value (3,3); /* 'Y' */ m.put_y_value (2,4); /* 'Z' */ m.call (20) /*2*/; /* setPosition_4 */ break; case 2: // goal: ! m.cut_body (6); break; case 3: // goal: set_field(_G110, old_pos, position(_G111, _G112, _G113)) m.put_y_value (5,1); /* 'Ball' */ m.put_atom (old_pos__0,2); m.put_struct (position__3,3); m.set_y_value (4); /* 'X' */ m.set_y_value (3); /* 'Y' */ m.set_y_value (2); /* 'Z' */ m.call (dlplib.set_field_3); /*6*/ break; case 4: // goal: _G143=[tell, ball_position, [_G110, position(_G111, _G112, _G113)]] m.put_struct (position__3,11); m.set_y_value (4); /* 'X' */ m.set_y_value (3); /* 'Y' */ m.set_y_value (2); /* 'Z' */ m.put_list (12); m.set_x_value (11); /* 'Xtmp' */ m.set_nil (); m.put_list (13); m.set_y_value (5); /* 'Ball' */ m.set_x_value (12); /* 'Xtmp' */ m.put_list (14); m.set_x_value (13); /* 'Xtmp' */ m.set_nil (); m.put_list (15); m.set_atom (ball_position__0); m.set_x_value (14); /* 'Xtmp' */ m.put_y_value (0,1); /* 'Message' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (15); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 5: // goal: local_host(_G168, _G169) m.put_y_value (1,1); /* 'Host' */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.local_host_2); /*6*/ break; case 6: // goal: <-(this, gg_echo, broadcast(_G168, to_all_clients, _G143)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_y_value (1); /* 'Host' */ m.set_atom (to_all_clients__0); m.set_y_value (0); /* 'Message' */ m.deallocate (); m.exec (dlplib.op_call_3); break; case 7: m.end_rule (); break; // head: setPositionEx(_G7992, _G7993, _G7994, _G7995) case 8: m.trust_or_fail (); //m.success = m.get_x_varia (11,1); /* Ball */ m.get_v_varia (2); /* Unknown */ m.get_v_varia (3); /* Unknown */ m.get_v_varia (4); /* Unknown */ m.end_head (); break; case 9: // goal: format('no position broadcast for ~w~n', [_G7992]) m.put_atom (data__5__0,1); m.put_list (2); m.set_x_value (11); /* 'Ball' */ m.set_nil (); m.exec (dlplib.format_2); break; case 10: m.end_rule (); break; } // switch return m.success; } // wsball:setPositionEx/4 exec() // wsball:setPositionEx/4 decls. public SymbolDescriptor old_pos__0; public SymbolDescriptor position__3; public SymbolDescriptor op__dot__2; public SymbolDescriptor tell__0; public SymbolDescriptor ball_position__0; public SymbolDescriptor sl_sr__0; public SymbolDescriptor this__0; public SymbolDescriptor gg_echo__0; public SymbolDescriptor broadcast__3; public SymbolDescriptor to_all_clients__0; public SymbolDescriptor data__5__0; // end of wsball:setPositionEx/4 decls. public boolean init (DLP m) { old_pos__0 = m.define_symbol ("old_pos".intern(), 0); position__3 = m.define_symbol ("position".intern(), 3); op__dot__2 = m.define_symbol (".".intern(), 2); tell__0 = m.define_symbol ("tell".intern(), 0); ball_position__0 = m.define_symbol ("ball_position".intern(), 0); sl_sr__0 = m.define_symbol ("[]".intern(), 0); this__0 = m.define_symbol ("this".intern(), 0); gg_echo__0 = m.define_symbol ("gg_echo".intern(), 0); broadcast__3 = m.define_symbol ("broadcast".intern(), 3); to_all_clients__0 = m.define_symbol ("to_all_clients".intern(), 0); data__5__0 = m.define_symbol ("no position broadcast for ~w~n".intern(), 0); return true; } // wsball:setPositionEx/4 init() } // wsball:setPositionEx/4 final class wsball_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.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 (21) /*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; } // switch return m.success; } // wsball:kickedwithStaticStart/9 exec() // wsball: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 wsball: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; } // wsball:kickedwithStaticStart/9 init() } // wsball:kickedwithStaticStart/9 final class wsball_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.try_me_else (7); m.allocate (11); //m.success = m.get_y_value (2,1); /* Ball */ m.get_y_value (1,2); /* Field */ m.get_y_value (8,3); /* X */ m.get_y_value (7,4); /* Y */ m.get_y_value (6,5); /* Z */ m.get_y_value (9,6); /* R1 */ m.get_y_value (10,7); /* F1 */ m.get_y_value (4,8); /* Vy */ m.cut_level (0); m.end_head (); break; case 1: // goal: is_eval(_G116*cos(_G115), _G125) m.put_struct (cos__1,13); m.set_y_value (9); /* 'R1' */ m.put_struct (op__mul__2,1); m.set_y_value (10); /* 'F1' */ m.set_x_value (13); /* 'Xtmp' */ m.put_y_value (5,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 (9); /* 'R1' */ m.put_struct (op__mul__2,1); m.set_y_value (10); /* 'F1' */ m.set_x_value (14); /* 'Xtmp' */ m.put_y_value (3,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 (2,1); /* 'Ball' */ m.put_y_value (1,2); /* 'Field' */ m.put_y_value (8,3); /* 'X' */ m.put_y_value (7,4); /* 'Y' */ m.put_y_value (6,5); /* 'Z' */ m.put_y_value (5,6); /* 'Vx' */ m.put_y_value (4,7); /* 'Vy' */ m.put_y_value (3,8); /* 'Vz' */ m.put_z_value (5,9); /* ballSleepTime */ m.call (13) /*2*/; /* kickedwithStaticStart_9 */ break; case 4: // goal: fallToGround(_G110, _G111) m.put_y_value (2,1); /* 'Ball' */ m.put_y_value (1,2); /* 'Field' */ m.call (15) /*2*/; /* fallToGround_2 */ break; case 5: // goal: ! m.cut_tail (0); m.deallocate (); break; case 6: m.end_rule (); break; // head: kickedwithStaticStartRF(_G6689, _G6690, _G6691, _G6692, _G6693, _G6694, _G6695, _G6696) case 7: 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.end_head (); break; case 8: // goal: format('~nKICK STATIC START RF FAILS~n~n') m.put_atom (data__6__0,1); m.exec (dlplib.format_1); break; case 9: m.end_rule (); break; } // switch return m.success; } // wsball:kickedwithStaticStartRF/8 exec() // wsball:kickedwithStaticStartRF/8 decls. public SymbolDescriptor op__mul__2; public SymbolDescriptor cos__1; public SymbolDescriptor sin__1; public SymbolDescriptor data__6__0; // end of wsball: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); data__6__0 = m.define_symbol ("~nKICK STATIC START RF FAILS~n~n".intern(), 0); return true; } // wsball:kickedwithStaticStartRF/8 init() } // wsball:kickedwithStaticStartRF/8 final class wsball_fallToGround_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: fallToGround(_G110, _G111) case 0: m.allocate (6); //m.success = m.get_y_value (4,1); /* Ball */ m.get_y_value (5,2); /* Field */ m.end_head (); break; case 1: // goal: getSFVec3f(_G110, _G111, _G121, _G122, _G123) m.put_y_value (4,1); /* 'Ball' */ m.put_y_value (5,2); /* 'Field' */ m.put_y_value (3,3); /* 'X' */ m.put_v_varia (4); /* 'Unknown' */ m.put_y_value (2,5); /* 'Z' */ m.call (22) /*2*/; /* getSFVec3f_5 */ break; case 2: // goal: setSFVec3f(_G110, _G111, _G121, 0.25, _G123) m.put_y_value (4,1); /* 'Ball' */ m.put_y_value (5,2); /* 'Field' */ m.put_y_value (3,3); /* 'X' */ m.put_float (0.25f,4); m.put_y_value (2,5); /* 'Z' */ m.call (21) /*2*/; /* setSFVec3f_5 */ break; case 3: // goal: _G141=[tell, ball_position, [_G110, position(_G121, 0.25, _G123)]] m.put_struct (position__3,11); m.set_y_value (3); /* 'X' */ m.set_float (0.25f); m.set_y_value (2); /* 'Z' */ m.put_list (12); m.set_x_value (11); /* 'Xtmp' */ m.set_nil (); m.put_list (13); m.set_y_value (4); /* 'Ball' */ m.set_x_value (12); /* 'Xtmp' */ m.put_list (14); m.set_x_value (13); /* 'Xtmp' */ m.set_nil (); m.put_list (15); m.set_atom (ball_position__0); m.set_x_value (14); /* 'Xtmp' */ m.put_y_value (0,1); /* 'Message' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (15); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 4: // goal: local_host(_G170, _G171) m.put_y_value (1,1); /* 'Host' */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.local_host_2); /*6*/ break; case 5: // goal: <-(this, gg_echo, broadcast(_G170, to_all_clients, _G141)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_y_value (1); /* 'Host' */ m.set_atom (to_all_clients__0); m.set_y_value (0); /* 'Message' */ m.deallocate (); m.exec (dlplib.op_call_3); break; case 6: m.end_rule (); break; } // switch return m.success; } // wsball:fallToGround/2 exec() // wsball:fallToGround/2 decls. public SymbolDescriptor op__dot__2; public SymbolDescriptor tell__0; public SymbolDescriptor ball_position__0; public SymbolDescriptor position__3; public SymbolDescriptor sl_sr__0; public SymbolDescriptor this__0; public SymbolDescriptor gg_echo__0; public SymbolDescriptor broadcast__3; public SymbolDescriptor to_all_clients__0; // end of wsball:fallToGround/2 decls. public boolean init (DLP m) { op__dot__2 = m.define_symbol (".".intern(), 2); tell__0 = m.define_symbol ("tell".intern(), 0); ball_position__0 = m.define_symbol ("ball_position".intern(), 0); position__3 = m.define_symbol ("position".intern(), 3); sl_sr__0 = m.define_symbol ("[]".intern(), 0); this__0 = m.define_symbol ("this".intern(), 0); gg_echo__0 = m.define_symbol ("gg_echo".intern(), 0); broadcast__3 = m.define_symbol ("broadcast".intern(), 3); to_all_clients__0 = m.define_symbol ("to_all_clients".intern(), 0); return true; } // wsball:fallToGround/2 init() } // wsball:fallToGround/2 final class wsball_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, 50) m.put_this (1); m.put_nreg (2); m.put_int (1,3); m.put_float (50f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 3: // goal: assign_nlv_term(this, nreg, 2, -50) m.put_this (1); m.put_nreg (2); m.put_int (2,3); m.put_float (-50f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 4: // goal: assign_nlv_term(this, nreg, 3, 32) m.put_this (1); m.put_nreg (2); m.put_int (3,3); m.put_float (32f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 5: // goal: assign_nlv_term(this, nreg, 4, -32) m.put_this (1); m.put_nreg (2); m.put_int (4,3); m.put_float (-32f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 6: // goal: assign_nlv_term(this, nreg, 5, 300) m.put_this (1); m.put_nreg (2); m.put_int (5,3); m.put_float (300f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 7: // goal: assign_nlv_term(this, nreg, 6, unlock) m.put_this (1); m.put_nreg (2); m.put_int (6,3); m.put_atom (unlock__0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 8: // goal: assign_nlv_term(this, nreg, 7, 5000) m.put_this (1); m.put_nreg (2); m.put_int (7,3); m.put_int (5000,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 9: // goal: assign_nlv_term(this, nreg, 8, 3) m.put_this (1); m.put_nreg (2); m.put_int (8,3); m.put_float (3f,4); m.deallocate (); m.exec (dlplib.assign_nlv_term_4); break; case 10: m.end_rule (); break; } // switch return m.success; } // wsball:init_vars/0 exec() // wsball:init_vars/0 decls. public SymbolDescriptor no_init__0; public SymbolDescriptor unlock__0; // end of wsball:init_vars/0 decls. public boolean init (DLP m) { no_init__0 = m.define_symbol ("no_init".intern(), 0); unlock__0 = m.define_symbol ("unlock".intern(), 0); return true; } // wsball:init_vars/0 init() } // wsball:init_vars/0 class wsball extends Code { public static ObjectDescriptor object; public static ObjectDescriptor _common_process_wsserver; public static MethodDescriptor wsball_2; public static MethodDescriptor init_position_4; public static MethodDescriptor set_init_position_1; public static MethodDescriptor activity_1; public static MethodDescriptor ball_action_1; public static MethodDescriptor ball_checks_1; public static MethodDescriptor ball_activity_2; public static MethodDescriptor check_kick_ball_2; public static MethodDescriptor validMinMax_4; public static MethodDescriptor askValid_Min_3; public static MethodDescriptor askValid_Max_3; public static MethodDescriptor setValidBallPosition_4; public static MethodDescriptor setPositionEx_4; public static MethodDescriptor kickedwithStaticStart_9; public static MethodDescriptor kickedwithStaticStartRF_8; public static MethodDescriptor fallToGround_2; public static MethodDescriptor get_clock_1; public static MethodDescriptor getPosition_4; public static MethodDescriptor move_to_position_11; public static MethodDescriptor distance2d_5; public static MethodDescriptor setPosition_4; public static MethodDescriptor setSFVec3f_5; public static MethodDescriptor getSFVec3f_5; public boolean init (DLP m) { object = m.define_object ("wsball".intern(), 1, 23, 9); _common_process_wsserver = m.header_object (object, "common_process_wsserver".intern(), 0); wsball_2 = m.define_method (object, 0, "wsball".intern(), 2); init_position_4 = m.define_method (object, 1, "init_position".intern(), 4); set_init_position_1 = m.define_method (object, 2, "set_init_position".intern(), 1); activity_1 = m.define_method (object, 3, "activity".intern(), 1); ball_action_1 = m.define_method (object, 4, "ball_action".intern(), 1); ball_checks_1 = m.define_method (object, 5, "ball_checks".intern(), 1); ball_activity_2 = m.define_method (object, 6, "ball_activity".intern(), 2); check_kick_ball_2 = m.define_method (object, 7, "check_kick_ball".intern(), 2); validMinMax_4 = m.define_method (object, 8, "validMinMax".intern(), 4); askValid_Min_3 = m.define_method (object, 9, "askValid_Min".intern(), 3); askValid_Max_3 = m.define_method (object, 10, "askValid_Max".intern(), 3); setValidBallPosition_4 = m.define_method (object, 11, "setValidBallPosition".intern(), 4); setPositionEx_4 = m.define_method (object, 12, "setPositionEx".intern(), 4); kickedwithStaticStart_9 = m.define_method (object, 13, "kickedwithStaticStart".intern(), 9); kickedwithStaticStartRF_8 = m.define_method (object, 14, "kickedwithStaticStartRF".intern(), 8); fallToGround_2 = m.define_method (object, 15, "fallToGround".intern(), 2); get_clock_1 = m.extern_method (object, 16, "get_clock".intern(), 1); getPosition_4 = m.extern_method (object, 17, "getPosition".intern(), 4); move_to_position_11 = m.extern_method (object, 18, "move_to_position".intern(), 11); distance2d_5 = m.extern_method (object, 19, "distance2d".intern(), 5); setPosition_4 = m.extern_method (object, 20, "setPosition".intern(), 4); setSFVec3f_5 = m.extern_method (object, 21, "setSFVec3f".intern(), 5); getSFVec3f_5 = m.extern_method (object, 22, "getSFVec3f".intern(), 5); m.define_nonlog (object, "steps".intern(), 0); m.define_nonlog (object, "xmax".intern(), 1); m.define_nonlog (object, "xmin".intern(), 2); m.define_nonlog (object, "zmax".intern(), 3); m.define_nonlog (object, "zmin".intern(), 4); m.define_nonlog (object, "ballSleepTime".intern(), 5); m.define_nonlog (object, "status".intern(), 6); m.define_nonlog (object, "time_limit".intern(), 7); m.define_nonlog (object, "kickableDistance".intern(), 8); return true; } // wsball init() } // class wsball // end of unit wsball code. // begin of unit wsgoalKeeper code. final class wsgoalKeeper_wsgoalKeeper_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: wsgoalKeeper(_G110, _G111) case 0: m.allocate (1); //m.success = m.get_y_value (0,1); /* Name */ m.get_x_varia (10,2); /* TimeLimit */ m.end_head (); break; case 1: // goal: assign_nlv_term(this, nreg, 11, _G111) m.put_this (1); m.put_nreg (2); m.put_int (11,3); m.put_x_value (10,4); /* 'TimeLimit' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 2: // goal: set_init_value(_G110) m.put_y_value (0,1); /* 'Name' */ m.call (1) /*2*/; /* set_init_value_1 */ break; case 3: // goal: format('~w thread active.~n', [_G110]) m.put_atom (data__7__0,1); m.put_list (2); m.set_y_value (0); /* 'Name' */ m.set_nil (); m.call (dlplib.format_2); /*6*/ break; case 4: // goal: activity(_G110) m.put_y_value (0,1); /* 'Name' */ m.deallocate (); m.exec (3); /* activity_1 */ break; case 5: m.end_rule (); break; } // switch return m.success; } // wsgoalKeeper:wsgoalKeeper/2 exec() // wsgoalKeeper:wsgoalKeeper/2 decls. public SymbolDescriptor data__7__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor sl_sr__0; // end of wsgoalKeeper:wsgoalKeeper/2 decls. public boolean init (DLP m) { data__7__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; } // wsgoalKeeper:wsgoalKeeper/2 init() } // wsgoalKeeper:wsgoalKeeper/2 final class wsgoalKeeper_set_init_value_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: set_init_value(_G110) case 0: m.allocate (3); //m.success = m.get_y_value (1,1); /* Player */ m.end_head (); break; case 1: // goal: defaultPositionRotation(_G110, _G119, _G120) m.put_y_value (1,1); /* 'Player' */ m.put_y_value (2,2); /* 'Position' */ m.put_y_value (0,3); /* 'Rotation' */ m.call (2) /*2*/; /* defaultPositionRotation_3 */ break; case 2: // goal: set_field(_G110, position, _G119) m.put_y_value (1,1); /* 'Player' */ m.put_atom (position__0,2); m.put_y_value (2,3); /* 'Position' */ m.call (dlplib.set_field_3); /*6*/ break; case 3: // goal: set_field(_G110, rotation, _G120) m.put_y_value (1,1); /* 'Player' */ m.put_atom (rotation__0,2); m.put_y_value (0,3); /* 'Rotation' */ m.deallocate (); m.exec (dlplib.set_field_3); break; case 4: m.end_rule (); break; } // switch return m.success; } // wsgoalKeeper:set_init_value/1 exec() // wsgoalKeeper:set_init_value/1 decls. public SymbolDescriptor position__0; public SymbolDescriptor rotation__0; // end of wsgoalKeeper:set_init_value/1 decls. public boolean init (DLP m) { position__0 = m.define_symbol ("position".intern(), 0); rotation__0 = m.define_symbol ("rotation".intern(), 0); return true; } // wsgoalKeeper:set_init_value/1 init() } // wsgoalKeeper:set_init_value/1 final class wsgoalKeeper_defaultPositionRotation_3 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: defaultPositionRotation(goalKeeper1, position(47, 1.8, 0), rotation(0, 1, 0, -1.5708)) case 0: m.try_me_else (2); //m.success = m.get_atom (goalKeeper1__0,1); m.get_struct (position__3,2); m.uni_float (47f); m.uni_float (1.8f); m.uni_float (0f); m.get_struct (rotation__4,3); m.uni_int (0); m.uni_int (1); m.uni_int (0); m.uni_float (-1.5708f); m.cut_neck (); m.end_head (); break; case 1: m.end_fact (); break; // head: defaultPositionRotation(goalKeeper2, position(-47, 1.8, 0), rotation(0, 1, 0, 1.5708)) case 2: m.trust_or_fail (); //m.success = m.get_atom (goalKeeper2__0,1); m.get_struct (position__3,2); m.uni_float (-47f); m.uni_float (1.8f); m.uni_float (0f); m.get_struct (rotation__4,3); m.uni_int (0); m.uni_int (1); m.uni_int (0); m.uni_float (1.5708f); m.end_head (); break; case 3: m.end_fact (); break; } // switch return m.success; } // wsgoalKeeper:defaultPositionRotation/3 exec() // wsgoalKeeper:defaultPositionRotation/3 decls. public SymbolDescriptor goalKeeper1__0; public SymbolDescriptor position__3; public SymbolDescriptor rotation__4; public SymbolDescriptor goalKeeper2__0; // end of wsgoalKeeper:defaultPositionRotation/3 decls. public boolean init (DLP m) { goalKeeper1__0 = m.define_symbol ("goalKeeper1".intern(), 0); position__3 = m.define_symbol ("position".intern(), 3); rotation__4 = m.define_symbol ("rotation".intern(), 4); goalKeeper2__0 = m.define_symbol ("goalKeeper2".intern(), 0); return true; } // wsgoalKeeper:defaultPositionRotation/3 init() } // wsgoalKeeper:defaultPositionRotation/3 final class wsgoalKeeper_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 (1,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(2000) m.put_int (2000,1); m.call (dlplib.sleep_1); /*6*/ break; case 3: // goal: get_clock(_G126) m.put_y_value (2,1); /* 'TimeLimit' */ m.call (17) /*2*/; /* get_clock_1 */ break; case 4: // goal: setDefaultPosition(_G110) m.put_y_value (1,1); /* 'Name' */ m.call (10) /*2*/; /* setDefaultPosition_1 */ break; case 5: // goal: look_at_ball(_G110, ball) m.put_y_value (1,1); /* 'Name' */ m.put_atom (ball__0,2); m.call (18) /*2*/; /* look_at_ball_2 */ break; case 6: // goal: getPositionInformation(_G110, ball, _G144, _G145, _G146, _G147, _G148, _G149, _G150) m.put_y_value (1,1); /* 'Name' */ m.put_atom (ball__0,2); m.put_y_value (9,3); /* 'X' */ m.put_y_value (8,4); /* 'Y' */ m.put_y_value (7,5); /* 'Z' */ m.put_y_value (6,6); /* 'Xball' */ m.put_y_value (5,7); /* 'Yball' */ m.put_y_value (4,8); /* 'Zball' */ m.put_y_value (3,9); /* 'Dist' */ m.call (6) /*2*/; /* getPositionInformation_9 */ break; case 7: // goal: findHowtoReact(_G110, ball, _G144, _G145, _G146, _G147, _G148, _G149, _G150, _G164) m.put_y_value (1,1); /* 'Name' */ m.put_atom (ball__0,2); m.put_y_value (9,3); /* 'X' */ m.put_y_value (8,4); /* 'Y' */ m.put_y_value (7,5); /* 'Z' */ m.put_y_value (6,6); /* 'Xball' */ m.put_y_value (5,7); /* 'Yball' */ m.put_y_value (4,8); /* 'Zball' */ m.put_y_value (3,9); /* 'Dist' */ m.put_y_value (10,10); /* 'Action' */ m.call (7) /*2*/; /* findHowtoReact_10 */ break; case 8: // goal: nonvar(_G164) m.put_y_value (10,1); /* 'Action' */ m.call (dlplib.nonvar_1); /*6*/ break; case 9: // goal: format('~w action: ~w ~n', [_G110, _G164]) m.put_list (10); m.set_y_value (10); /* 'Action' */ m.set_nil (); m.put_atom (data__8__0,1); m.put_list (2); m.set_y_value (1); /* 'Name' */ m.set_x_value (10); /* 'Xtmp' */ m.call (dlplib.format_2); /*6*/ break; case 10: // goal: doAction(_G164, _G110, ball, _G144, _G145, _G146, _G147, _G148, _G149, _G150) m.put_y_value (10,1); /* 'Action' */ m.put_y_value (1,2); /* 'Name' */ m.put_atom (ball__0,3); m.put_y_value (9,4); /* 'X' */ m.put_y_value (8,5); /* 'Y' */ m.put_y_value (7,6); /* 'Z' */ m.put_y_value (6,7); /* 'Xball' */ m.put_y_value (5,8); /* 'Yball' */ m.put_y_value (4,9); /* 'Zball' */ m.put_y_value (3,10); /* 'Dist' */ m.call (12) /*2*/; /* doAction_10 */ break; case 11: // goal: _G126>time_limit m.put_y_value (2,1); /* 'TimeLimit' */ m.put_z_value (11,2); /* time_limit */ m.call (dlplib.op_cmp_gt_2); /*6*/ break; case 12: // goal: quitGame(_G110) m.put_y_value (1,1); /* 'Name' */ m.call (5) /*2*/; /* quitGame_1 */ break; case 13: // goal: ! m.cut_tail (0); m.deallocate (); break; case 14: m.end_rule (); break; } // switch return m.success; } // wsgoalKeeper:activity/1 exec() // wsgoalKeeper:activity/1 decls. public SymbolDescriptor ball__0; public SymbolDescriptor data__8__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor sl_sr__0; // end of wsgoalKeeper:activity/1 decls. public boolean init (DLP m) { ball__0 = m.define_symbol ("ball".intern(), 0); data__8__0 = m.define_symbol ("~w action: ~w ~n".intern(), 0); op__dot__2 = m.define_symbol (".".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); return true; } // wsgoalKeeper:activity/1 init() } // wsgoalKeeper:activity/1 final class wsgoalKeeper_stadiumExit_3 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: stadiumExit(0, 0, -50) case 0: //m.success = m.get_float (0f,1); m.get_float (0f,2); m.get_float (-50f,3); m.end_head (); break; case 1: m.end_fact (); break; } // switch return m.success; } // wsgoalKeeper:stadiumExit/3 exec() // wsgoalKeeper:stadiumExit/3 decls. // end of wsgoalKeeper:stadiumExit/3 decls. public boolean init (DLP m) { return true; } // wsgoalKeeper:stadiumExit/3 init() } // wsgoalKeeper:stadiumExit/3 final class wsgoalKeeper_quitGame_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: quitGame(_G110) case 0: m.allocate (8); //m.success = m.get_y_value (0,1); /* Player */ m.end_head (); break; case 1: // goal: format('~w is gone.~n', [_G110]) m.put_atom (data__9__0,1); m.put_list (2); m.set_y_value (0); /* 'Player' */ m.set_nil (); m.call (dlplib.format_2); /*6*/ break; case 2: // goal: getSFVec3f(_G110, position, _G129, _G130, _G131) m.put_y_value (0,1); /* 'Player' */ m.put_atom (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*/; /* getSFVec3f_5 */ break; case 3: // goal: stadiumExit(_G136, _G137, _G138) m.put_y_value (4,1); /* 'X1' */ m.put_y_value (3,2); /* 'Y1' */ m.put_y_value (2,3); /* 'Z1' */ m.call (4) /*2*/; /* stadiumExit_3 */ break; case 4: // goal: distance2d(_G129, _G131, _G136, _G138, _G147) m.put_y_value (7,1); /* 'X' */ m.put_y_value (5,2); /* 'Z' */ m.put_y_value (4,3); /* 'X1' */ m.put_y_value (2,4); /* 'Z1' */ m.put_y_value (1,5); /* 'Dist' */ m.call (20) /*2*/; /* distance2d_5 */ break; case 5: // goal: run_to_position(_G110, _G129, _G130, _G131, _G136, _G137, _G138, _G147) m.put_y_value (0,1); /* 'Player' */ m.put_y_value (7,2); /* 'X' */ m.put_y_value (6,3); /* 'Y' */ m.put_y_value (5,4); /* 'Z' */ m.put_y_value (4,5); /* 'X1' */ m.put_y_value (3,6); /* 'Y1' */ m.put_y_value (2,7); /* 'Z1' */ m.put_y_value (1,8); /* 'Dist' */ m.call (14) /*2*/; /* run_to_position_8 */ break; case 6: // goal: <-(this, gg_echo, broadcast(server, _G110, [tell, quit, [_G110]])) m.put_list (10); m.set_y_value (0); /* 'Player' */ m.set_nil (); m.put_list (11); m.set_x_value (10); /* 'Xtmp' */ m.set_nil (); m.put_list (12); m.set_atom (quit__0); m.set_x_value (11); /* 'Xtmp' */ m.put_list (13); m.set_atom (tell__0); m.set_x_value (12); /* 'Xtmp' */ m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_atom (server__0); m.set_y_value (0); /* 'Player' */ m.set_x_value (13); /* 'Xtmp' */ m.deallocate (); m.exec (dlplib.op_call_3); break; case 7: m.end_rule (); break; } // switch return m.success; } // wsgoalKeeper:quitGame/1 exec() // wsgoalKeeper:quitGame/1 decls. public SymbolDescriptor data__9__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor sl_sr__0; public SymbolDescriptor position__0; public SymbolDescriptor this__0; public SymbolDescriptor gg_echo__0; public SymbolDescriptor broadcast__3; public SymbolDescriptor server__0; public SymbolDescriptor tell__0; public SymbolDescriptor quit__0; // end of wsgoalKeeper:quitGame/1 decls. public boolean init (DLP m) { data__9__0 = m.define_symbol ("~w is gone.~n".intern(), 0); op__dot__2 = m.define_symbol (".".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); position__0 = m.define_symbol ("position".intern(), 0); this__0 = m.define_symbol ("this".intern(), 0); gg_echo__0 = m.define_symbol ("gg_echo".intern(), 0); broadcast__3 = m.define_symbol ("broadcast".intern(), 3); server__0 = m.define_symbol ("server".intern(), 0); tell__0 = m.define_symbol ("tell".intern(), 0); quit__0 = m.define_symbol ("quit".intern(), 0); return true; } // wsgoalKeeper:quitGame/1 init() } // wsgoalKeeper:quitGame/1 final class wsgoalKeeper_getPositionInformation_9 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: getPositionInformation(_G110, _G111, _G112, _G113, _G114, _G115, _G116, _G117, _G118) case 0: m.allocate (7); //m.success = m.get_y_value (6,1); /* Player */ m.get_x_varia (14,2); /* Ball */ m.get_y_value (4,3); /* X */ m.get_y_value (5,4); /* Y */ m.get_y_value (3,5); /* Z */ m.get_y_value (2,6); /* X1 */ m.get_x_varia (15,7); /* Y1 */ m.get_y_value (1,8); /* Z1 */ m.get_y_value (0,9); /* Dist */ m.end_head (); break; case 1: // goal: getPosition(_G111, _G115, _G116, _G117) m.put_x_value (14,1); /* 'Ball' */ m.put_y_value (2,2); /* 'X1' */ m.put_x_value (15,3); /* 'Y1' */ m.put_y_value (1,4); /* 'Z1' */ m.call (21) /*2*/; /* getPosition_4 */ break; case 2: // goal: getSFVec3f(_G110, position, _G112, _G113, _G114) m.put_y_value (6,1); /* 'Player' */ m.put_atom (position__0,2); m.put_y_value (4,3); /* 'X' */ m.put_y_value (5,4); /* 'Y' */ m.put_y_value (3,5); /* 'Z' */ m.call (19) /*2*/; /* getSFVec3f_5 */ break; case 3: // goal: distance2d(_G112, _G114, _G115, _G117, _G118) m.put_y_value (4,1); /* 'X' */ m.put_y_value (3,2); /* 'Z' */ m.put_y_value (2,3); /* 'X1' */ m.put_y_value (1,4); /* 'Z1' */ m.put_y_value (0,5); /* 'Dist' */ m.deallocate (); m.exec (20); /* distance2d_5 */ break; case 4: m.end_rule (); break; } // switch return m.success; } // wsgoalKeeper:getPositionInformation/9 exec() // wsgoalKeeper:getPositionInformation/9 decls. public SymbolDescriptor position__0; // end of wsgoalKeeper:getPositionInformation/9 decls. public boolean init (DLP m) { position__0 = m.define_symbol ("position".intern(), 0); return true; } // wsgoalKeeper:getPositionInformation/9 init() } // wsgoalKeeper:getPositionInformation/9 final class wsgoalKeeper_findHowtoReact_10 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: findHowtoReact(_G110, _G111, _G112, _G113, _G114, _G115, _G116, _G117, _G118, run_then_kick) case 0: m.try_me_else (6); m.allocate (3); //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_y_value (1,7); /* Y1 */ m.get_v_varia (8); /* Unknown */ m.get_y_value (2,9); /* Dist */ m.get_atom (run_then_kick__0,10); m.cut_level (0); m.end_head (); break; case 1: // goal: _G118>holdableDistance m.put_y_value (2,1); /* 'Dist' */ m.put_z_value (1,2); /* holdableDistance */ m.call (dlplib.op_cmp_gt_2); /*6*/ break; case 2: // goal: _G118==_G7772 m.put_y_value (5,1); /* 'GoalXMax' */ m.put_y_value (4,2); /* 'X1' */ m.call (dlplib.op_cmp_ge_2); /*6*/ break; case 14: // goal: _G7788=<_G7774 m.put_y_value (3,1); /* 'GoalZMin' */ m.put_y_value (1,2); /* 'Z1' */ m.call (dlplib.op_cmp_le_2); /*6*/ break; case 15: // goal: _G7789>=_G7774 m.put_y_value (2,1); /* 'GoalZMax' */ m.put_y_value (1,2); /* 'Z1' */ m.call (dlplib.op_cmp_ge_2); /*6*/ break; case 16: // goal: ! m.cut_tail (0); m.deallocate (); break; case 17: m.end_rule (); break; // head: findHowtoReact(_G13931, _G13932, _G13933, _G13934, _G13935, _G13936, _G13937, _G13938, _G13939, ready_for_goal) case 18: m.retry_me_else (23); m.allocate (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_v_varia (5); /* Unknown */ m.get_v_varia (6); /* Unknown */ m.get_v_varia (7); /* Unknown */ m.get_v_varia (8); /* Unknown */ m.get_y_value (1,9); /* Dist */ m.get_atom (ready_for_goal__0,10); m.cut_level (0); m.end_head (); break; case 19: // goal: _G13939>stopableDistance m.put_y_value (1,1); /* 'Dist' */ m.put_z_value (4,2); /* stopableDistance */ m.call (dlplib.op_cmp_gt_2); /*6*/ break; case 20: // goal: _G13939watchableDistance m.put_x_value (22,1); /* 'Dist' */ m.put_z_value (3,2); /* watchableDistance */ m.call (dlplib.op_cmp_gt_2); /*6*/ break; case 25: // goal: ! m.cut_tail (0); m.deallocate (); break; case 26: m.end_rule (); break; // head: findHowtoReact(_G21199, _G21200, _G21201, _G21202, _G21203, _G21204, _G21205, _G21206, _G21207, _G21208) case 27: 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.get_v_varia (10); /* Unknown */ m.end_head (); break; case 28: // goal: format('~n~w : findHowtoReact : CASE UNDEFINED (SHOULD NEVER HAPPEN)~n~n', [this]) m.put_atom (data__10__0,1); m.put_list (2); m.set_this (); m.set_nil (); m.exec (dlplib.format_2); break; case 29: m.end_rule (); break; } // switch return m.success; } // wsgoalKeeper:findHowtoReact/10 exec() // wsgoalKeeper:findHowtoReact/10 decls. public SymbolDescriptor run_then_kick__0; public SymbolDescriptor hold_then_throw__0; public SymbolDescriptor record_score_then_throw__0; public SymbolDescriptor ready_for_goal__0; public SymbolDescriptor do_nothing__0; public SymbolDescriptor data__10__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor this__0; public SymbolDescriptor sl_sr__0; // end of wsgoalKeeper:findHowtoReact/10 decls. public boolean init (DLP m) { run_then_kick__0 = m.define_symbol ("run_then_kick".intern(), 0); hold_then_throw__0 = m.define_symbol ("hold_then_throw".intern(), 0); record_score_then_throw__0 = m.define_symbol ("record_score_then_throw".intern(), 0); ready_for_goal__0 = m.define_symbol ("ready_for_goal".intern(), 0); do_nothing__0 = m.define_symbol ("do_nothing".intern(), 0); data__10__0 = m.define_symbol ("~n~w : findHowtoReact : CASE UNDEFINED (SHOULD NEVER HAPPEN)~n~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; } // wsgoalKeeper:findHowtoReact/10 init() } // wsgoalKeeper:findHowtoReact/10 final class wsgoalKeeper_goalArea_6 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: goalArea(goalKeeper1, blue, 47, 50, -3.5, 3.5) case 0: m.try_me_else (2); //m.success = m.get_atom (goalKeeper1__0,1); m.get_atom (blue__0,2); m.get_float (47f,3); m.get_float (50f,4); m.get_float (-3.5f,5); m.get_float (3.5f,6); m.cut_neck (); m.end_head (); break; case 1: m.end_fact (); break; // head: goalArea(goalKeeper2, red, -50, -47, -3.5, 3.5) case 2: m.trust_or_fail (); //m.success = m.get_atom (goalKeeper2__0,1); m.get_atom (red__0,2); m.get_float (-50f,3); m.get_float (-47f,4); m.get_float (-3.5f,5); m.get_float (3.5f,6); m.end_head (); break; case 3: m.end_fact (); break; } // switch return m.success; } // wsgoalKeeper:goalArea/6 exec() // wsgoalKeeper:goalArea/6 decls. public SymbolDescriptor goalKeeper1__0; public SymbolDescriptor blue__0; public SymbolDescriptor goalKeeper2__0; public SymbolDescriptor red__0; // end of wsgoalKeeper:goalArea/6 decls. public boolean init (DLP m) { goalKeeper1__0 = m.define_symbol ("goalKeeper1".intern(), 0); blue__0 = m.define_symbol ("blue".intern(), 0); goalKeeper2__0 = m.define_symbol ("goalKeeper2".intern(), 0); red__0 = m.define_symbol ("red".intern(), 0); return true; } // wsgoalKeeper:goalArea/6 init() } // wsgoalKeeper:goalArea/6 final class wsgoalKeeper_defaultPosition_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: defaultPosition(goalKeeper1, position(47, 1.8, 0)) case 0: m.try_me_else (2); //m.success = m.get_atom (goalKeeper1__0,1); m.get_struct (position__3,2); m.uni_float (47f); m.uni_float (1.8f); m.uni_float (0f); m.cut_neck (); m.end_head (); break; case 1: m.end_fact (); break; // head: defaultPosition(goalKeeper2, position(-47, 1.8, 0)) case 2: m.trust_or_fail (); //m.success = m.get_atom (goalKeeper2__0,1); m.get_struct (position__3,2); m.uni_float (-47f); m.uni_float (1.8f); m.uni_float (0f); m.end_head (); break; case 3: m.end_fact (); break; } // switch return m.success; } // wsgoalKeeper:defaultPosition/2 exec() // wsgoalKeeper:defaultPosition/2 decls. public SymbolDescriptor goalKeeper1__0; public SymbolDescriptor position__3; public SymbolDescriptor goalKeeper2__0; // end of wsgoalKeeper:defaultPosition/2 decls. public boolean init (DLP m) { goalKeeper1__0 = m.define_symbol ("goalKeeper1".intern(), 0); position__3 = m.define_symbol ("position".intern(), 3); goalKeeper2__0 = m.define_symbol ("goalKeeper2".intern(), 0); return true; } // wsgoalKeeper:defaultPosition/2 init() } // wsgoalKeeper:defaultPosition/2 final class wsgoalKeeper_setDefaultPosition_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: setDefaultPosition(_G110) case 0: m.try_me_else (12); m.allocate (7); //m.success = m.get_y_value (1,1); /* GoalKeeper */ m.cut_level (5); m.end_head (); break; case 1: // goal: defaultPosition(_G110, _G119) m.put_y_value (1,1); /* 'GoalKeeper' */ m.put_y_value (4,2); /* 'Position' */ m.call (9) /*2*/; /* defaultPosition_2 */ break; case 2: // goal: set_field(_G110, position, _G119) m.put_y_value (1,1); /* 'GoalKeeper' */ m.put_atom (position__0,2); m.put_y_value (4,3); /* 'Position' */ m.call (dlplib.set_field_3); /*6*/ break; case 3: // goal: get_field(_G110, old_pos, _G133) m.put_y_value (1,1); /* 'GoalKeeper' */ m.put_atom (old_pos__0,2); m.put_y_value (6,3); /* 'OldPos' */ m.call (dlplib.get_field_3); /*6*/ break; case 4: // goal: _G133\=_G119 m.put_y_value (6,1); /* 'OldPos' */ m.put_y_value (4,2); /* 'Position' */ m.call (dlplib.op_neq_2); /*6*/ break; case 5: // goal: ! m.cut_body (5); break; case 6: // goal: set_field(_G110, old_pos, _G119) m.put_y_value (1,1); /* 'GoalKeeper' */ m.put_atom (old_pos__0,2); m.put_y_value (4,3); /* 'Position' */ m.call (dlplib.set_field_3); /*6*/ break; case 7: // goal: local_host(_G154, _G155) m.put_y_value (2,1); /* 'ClientHost' */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.local_host_2); /*6*/ break; case 8: // goal: _G160=[user(_G154, _G110), _G119] m.put_struct (user__2,11); m.set_y_value (2); /* 'ClientHost' */ m.set_y_value (1); /* 'GoalKeeper' */ m.put_list (12); m.set_y_value (4); /* 'Position' */ m.set_nil (); m.put_y_value (3,1); /* 'Data' */ 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 9: // goal: _G175=[tell, position, _G160] m.put_list (13); m.set_y_value (3); /* 'Data' */ m.set_nil (); m.put_list (14); m.set_atom (position__0); m.set_x_value (13); /* 'Xtmp' */ m.put_y_value (0,1); /* 'Message' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (14); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 10: // goal: <-(this, gg_echo, broadcast(_G154, _G110, _G175)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_y_value (2); /* 'ClientHost' */ m.set_y_value (1); /* 'GoalKeeper' */ m.set_y_value (0); /* 'Message' */ m.deallocate (); m.exec (dlplib.op_call_3); break; case 11: m.end_rule (); break; // head: setDefaultPosition(_G8050) case 12: m.trust_or_fail (); //m.success = m.get_v_varia (1); /* Unknown */ m.end_head (); break; case 13: m.end_fact (); break; } // switch return m.success; } // wsgoalKeeper:setDefaultPosition/1 exec() // wsgoalKeeper:setDefaultPosition/1 decls. public SymbolDescriptor position__0; public SymbolDescriptor old_pos__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor user__2; public SymbolDescriptor sl_sr__0; public SymbolDescriptor tell__0; public SymbolDescriptor this__0; public SymbolDescriptor gg_echo__0; public SymbolDescriptor broadcast__3; // end of wsgoalKeeper:setDefaultPosition/1 decls. public boolean init (DLP m) { position__0 = m.define_symbol ("position".intern(), 0); old_pos__0 = m.define_symbol ("old_pos".intern(), 0); op__dot__2 = m.define_symbol (".".intern(), 2); user__2 = m.define_symbol ("user".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); tell__0 = m.define_symbol ("tell".intern(), 0); this__0 = m.define_symbol ("this".intern(), 0); gg_echo__0 = m.define_symbol ("gg_echo".intern(), 0); broadcast__3 = m.define_symbol ("broadcast".intern(), 3); return true; } // wsgoalKeeper:setDefaultPosition/1 init() } // wsgoalKeeper:setDefaultPosition/1 final class wsgoalKeeper_ballThrowPosition_4 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: ballThrowPosition(goalKeeper1, top, 5, -10) case 0: m.try_me_else (2); //m.success = m.get_atom (goalKeeper1__0,1); m.get_atom (top__0,2); m.get_float (5f,3); m.get_float (-10f,4); m.cut_neck (); m.end_head (); break; case 1: m.end_fact (); break; // head: ballThrowPosition(goalKeeper2, bottom, -5, 10) case 2: m.trust_or_fail (); //m.success = m.get_atom (goalKeeper2__0,1); m.get_atom (bottom__0,2); m.get_float (-5f,3); m.get_float (10f,4); m.end_head (); break; case 3: m.end_fact (); break; } // switch return m.success; } // wsgoalKeeper:ballThrowPosition/4 exec() // wsgoalKeeper:ballThrowPosition/4 decls. public SymbolDescriptor goalKeeper1__0; public SymbolDescriptor top__0; public SymbolDescriptor goalKeeper2__0; public SymbolDescriptor bottom__0; // end of wsgoalKeeper:ballThrowPosition/4 decls. public boolean init (DLP m) { goalKeeper1__0 = m.define_symbol ("goalKeeper1".intern(), 0); top__0 = m.define_symbol ("top".intern(), 0); goalKeeper2__0 = m.define_symbol ("goalKeeper2".intern(), 0); bottom__0 = m.define_symbol ("bottom".intern(), 0); return true; } // wsgoalKeeper:ballThrowPosition/4 init() } // wsgoalKeeper:ballThrowPosition/4 final class wsgoalKeeper_doAction_10 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: doAction(do_nothing, _G111, _G112, _G113, _G114, _G115, _G116, _G117, _G118, _G119) case 0: m.try_me_else (2); //m.success = m.get_atom (do_nothing__0,1); 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.get_v_varia (10); /* Unknown */ m.cut_neck (); m.end_head (); break; case 1: m.end_fact (); break; // head: doAction(hold_then_throw, _G3041, _G3042, _G3043, _G3044, _G3045, _G3046, _G3047, _G3048, _G3049) case 2: m.retry_me_else (16); m.allocate (15); //m.success = m.get_atom (hold_then_throw__0,1); m.get_y_value (7,2); /* GoalKeeper */ m.get_y_value (2,3); /* Ball */ m.get_y_value (13,4); /* X */ m.get_x_varia (14,5); /* Y */ m.get_y_value (14,6); /* Z */ m.get_y_value (6,7); /* X1 */ m.get_y_value (5,8); /* Y1 */ m.get_y_value (4,9); /* Z1 */ m.get_v_varia (10); /* Unknown */ m.cut_level (0); m.end_head (); break; case 3: // goal: is_eval(_G3044-0.3, _G3057) m.put_struct (op__sub__2,1); m.set_x_value (14); /* 'Y' */ m.set_float (0.3f); m.put_y_value (12,2); /* 'Y2' */ m.call (dlplib.is_eval_2); /*6*/ break; case 4: // goal: is_eval(_G3045+0.2, _G3070) m.put_struct (op__add__2,1); m.set_y_value (14); /* 'Z' */ m.set_float (0.2f); m.put_y_value (11,2); /* 'Z2' */ m.call (dlplib.is_eval_2); /*6*/ break; case 5: // goal: <-(this, wsball, setPositionEx(_G3042, _G3043, _G3057, _G3070)) m.put_this (1); m.put_atom (wsball__0,2); m.put_struct (setPositionEx__4,3); m.set_y_value (2); /* 'Ball' */ m.set_y_value (13); /* 'X' */ m.set_y_value (12); /* 'Y2' */ m.set_y_value (11); /* 'Z2' */ m.call (dlplib.op_call_3); /*6*/ break; case 6: // goal: ballThrowPosition(_G3041, _G3095, _G3096, _G3097) m.put_y_value (7,1); /* 'GoalKeeper' */ m.put_v_varia (2); /* 'Unknown' */ m.put_y_value (10,3); /* 'X3' */ m.put_y_value (9,4); /* 'Z3' */ m.call (11) /*2*/; /* ballThrowPosition_4 */ break; case 7: // goal: look_at_position(_G3041, _G3096, _G3097) m.put_y_value (7,1); /* 'GoalKeeper' */ m.put_y_value (10,2); /* 'X3' */ m.put_y_value (9,3); /* 'Z3' */ m.call (22) /*2*/; /* look_at_position_3 */ break; case 8: // goal: sleep(500) m.put_int (500,1); m.call (dlplib.sleep_1); /*6*/ break; case 9: // goal: getRotation(_G3041, _G3115, _G3116, _G3117, _G3118) m.put_y_value (7,1); /* 'GoalKeeper' */ m.put_v_varia (2); /* 'Unknown' */ m.put_v_varia (3); /* 'Unknown' */ m.put_v_varia (4); /* 'Unknown' */ m.put_y_value (8,5); /* 'R' */ m.call (23) /*2*/; /* getRotation_5 */ break; case 10: // goal: is_eval(_G3118-1.5708, _G3123) m.put_struct (op__sub__2,1); m.set_y_value (8); /* 'R' */ m.set_float (1.5708f); m.put_y_value (3,2); /* 'R1' */ m.call (dlplib.is_eval_2); /*6*/ break; case 11: // goal: _G3136=[_G3041, _G3042, _G3046, _G3047, _G3048, _G3123, kickBallForce, kickBallForceY] m.put_list (20); m.set_z_value (8); /* kickBallForceY */ m.set_nil (); m.put_list (21); m.set_z_value (7); /* kickBallForce */ m.set_x_value (20); /* 'Xtmp' */ m.put_list (22); m.set_y_value (3); /* 'R1' */ m.set_x_value (21); /* 'Xtmp' */ m.put_list (23); m.set_y_value (4); /* 'Z1' */ m.set_x_value (22); /* 'Xtmp' */ m.put_list (24); m.set_y_value (5); /* 'Y1' */ m.set_x_value (23); /* 'Xtmp' */ m.put_list (25); m.set_y_value (6); /* 'X1' */ m.set_x_value (24); /* 'Xtmp' */ m.put_list (26); m.set_y_value (2); /* 'Ball' */ m.set_x_value (25); /* 'Xtmp' */ m.put_y_value (1,1); /* 'Data' */ m.put_list (2); m.set_y_value (7); /* 'GoalKeeper' */ m.set_x_value (26); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 12: // goal: set_queue(_G3042, [kick_ball, _G3136]) m.put_list (27); m.set_y_value (1); /* 'Data' */ m.set_nil (); m.put_y_value (2,1); /* 'Ball' */ m.put_list (2); m.set_atom (kick_ball__0); m.set_x_value (27); /* 'Xtmp' */ m.call (dlplib.set_queue_2); /*6*/ break; case 13: // goal: sleep(200) m.put_int (200,1); m.call (dlplib.sleep_1); /*6*/ break; case 14: // goal: ! m.cut_tail (0); m.deallocate (); break; case 15: m.end_rule (); break; // head: doAction(hold_then_throw, _G17002, _G17003, _G17004, _G17005, _G17006, _G17007, _G17008, _G17009, _G17010) case 16: m.retry_me_else (23); m.allocate (6); //m.success = m.get_atom (hold_then_throw__0,1); m.get_v_varia (2); /* Unknown */ m.get_y_value (5,3); /* Ball */ 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.get_v_varia (10); /* Unknown */ m.end_head (); break; case 17: // goal: get_field(ball, position, position(_G17022, _G17023, _G17024)) m.put_atom (ball__0,1); m.put_atom (position__0,2); m.put_struct (position__3,3); m.set_y_value (4); /* 'XB' */ m.set_y_value (3); /* 'YB' */ m.set_y_value (2); /* 'ZB' */ m.call (dlplib.get_field_3); /*6*/ break; case 18: // goal: _G17029=[_G17003, position(_G17022, _G17023, _G17024)] m.put_struct (position__3,22); m.set_y_value (4); /* 'XB' */ m.set_y_value (3); /* 'YB' */ m.set_y_value (2); /* 'ZB' */ m.put_list (23); m.set_x_value (22); /* 'Xtmp' */ m.set_nil (); m.put_y_value (1,1); /* 'Data' */ m.put_list (2); m.set_y_value (5); /* 'Ball' */ m.set_x_value (23); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 19: // goal: _G17045=[tell, ball_position, _G17029] m.put_list (24); m.set_y_value (1); /* 'Data' */ m.set_nil (); m.put_list (25); m.set_atom (ball_position__0); m.set_x_value (24); /* 'Xtmp' */ m.put_y_value (0,1); /* 'Message' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (25); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 20: // goal: <-(this, gg_echo, broadcast(anyhost, all_clients, _G17045)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_atom (anyhost__0); m.set_atom (all_clients__0); m.set_y_value (0); /* 'Message' */ m.call (dlplib.op_call_3); /*6*/ break; case 21: // goal: format('~nHOLD_THEN_THROW FAILS : ~w~n', [this]) m.put_atom (data__11__0,1); m.put_list (2); m.set_this (); m.set_nil (); m.deallocate (); m.exec (dlplib.format_2); break; case 22: m.end_rule (); break; // head: doAction(run_then_kick, _G24652, _G24653, _G24654, _G24655, _G24656, _G24657, _G24658, _G24659, _G24660) case 23: m.retry_me_else (38); m.allocate (15); //m.success = m.get_atom (run_then_kick__0,1); m.get_y_value (7,2); /* GoalKeeper */ m.get_y_value (2,3); /* Ball */ m.get_v_varia (4); /* Unknown */ m.get_y_value (14,5); /* Y */ m.get_v_varia (6); /* Unknown */ m.get_y_value (6,7); /* X1 */ m.get_y_value (5,8); /* Y1 */ m.get_y_value (4,9); /* Z1 */ m.get_v_varia (10); /* Unknown */ m.cut_level (0); m.end_head (); break; case 24: // goal: set_field(_G24652, position, position(_G24657, _G24655, _G24659)) m.put_y_value (7,1); /* 'GoalKeeper' */ m.put_atom (position__0,2); m.put_struct (position__3,3); m.set_y_value (6); /* 'X1' */ m.set_y_value (14); /* 'Y' */ m.set_y_value (4); /* 'Z1' */ m.call (dlplib.set_field_3); /*6*/ break; case 25: // goal: local_host(_G24679, _G24680) m.put_y_value (12,1); /* 'Host' */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.local_host_2); /*6*/ break; case 26: // goal: _G24685=[user(_G24679, _G24652), position(_G24657, _G24655, _G24659)] m.put_struct (position__3,18); m.set_y_value (6); /* 'X1' */ m.set_y_value (14); /* 'Y' */ m.set_y_value (4); /* 'Z1' */ m.put_struct (user__2,19); m.set_y_value (12); /* 'Host' */ m.set_y_value (7); /* 'GoalKeeper' */ m.put_list (20); m.set_x_value (18); /* 'Xtmp' */ m.set_nil (); m.put_y_value (13,1); /* 'KeeperData' */ m.put_list (2); m.set_x_value (19); /* 'Xtmp' */ m.set_x_value (20); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 27: // goal: _G24704=[tell, position, _G24685] m.put_list (21); m.set_y_value (13); /* 'KeeperData' */ m.set_nil (); m.put_list (22); m.set_atom (position__0); m.set_x_value (21); /* 'Xtmp' */ m.put_y_value (11,1); /* 'KeeperMessage' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (22); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 28: // goal: <-(this, gg_echo, broadcast(_G24679, to_all_clients, _G24704)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_y_value (12); /* 'Host' */ m.set_atom (to_all_clients__0); m.set_y_value (11); /* 'KeeperMessage' */ m.call (dlplib.op_call_3); /*6*/ break; case 29: // goal: ballThrowPosition(_G24652, _G24730, _G24731, _G24732) m.put_y_value (7,1); /* 'GoalKeeper' */ m.put_v_varia (2); /* 'Unknown' */ m.put_y_value (10,3); /* 'X3' */ m.put_y_value (9,4); /* 'Z3' */ m.call (11) /*2*/; /* ballThrowPosition_4 */ break; case 30: // goal: look_at_position(_G24652, _G24731, _G24732) m.put_y_value (7,1); /* 'GoalKeeper' */ m.put_y_value (10,2); /* 'X3' */ m.put_y_value (9,3); /* 'Z3' */ m.call (22) /*2*/; /* look_at_position_3 */ break; case 31: // goal: get_field(_G24652, rotation, rotation(_G24748, _G24749, _G24750, _G24751)) m.put_y_value (7,1); /* 'GoalKeeper' */ m.put_atom (rotation__0,2); m.put_struct (rotation__4,3); m.set_v_varia (); /* 'Unknown' */ m.set_v_varia (); /* 'Unknown' */ m.set_v_varia (); /* 'Unknown' */ m.set_y_value (8); /* 'R' */ m.call (dlplib.get_field_3); /*6*/ break; case 32: // goal: is_eval(_G24751-1.5708, _G24756) m.put_struct (op__sub__2,1); m.set_y_value (8); /* 'R' */ m.set_float (1.5708f); m.put_y_value (3,2); /* 'R1' */ m.call (dlplib.is_eval_2); /*6*/ break; case 33: // goal: _G24769=[_G24652, _G24653, _G24657, _G24658, _G24659, _G24756, kickBallForce, kickBallForceY] m.put_list (27); m.set_z_value (8); /* kickBallForceY */ m.set_nil (); m.put_list (28); m.set_z_value (7); /* kickBallForce */ m.set_x_value (27); /* 'Xtmp' */ m.put_list (29); m.set_y_value (3); /* 'R1' */ m.set_x_value (28); /* 'Xtmp' */ m.put_list (30); m.set_y_value (4); /* 'Z1' */ m.set_x_value (29); /* 'Xtmp' */ m.put_list (31); m.set_y_value (5); /* 'Y1' */ m.set_x_value (30); /* 'Xtmp' */ m.put_list (32); m.set_y_value (6); /* 'X1' */ m.set_x_value (31); /* 'Xtmp' */ m.put_list (33); m.set_y_value (2); /* 'Ball' */ m.set_x_value (32); /* 'Xtmp' */ m.put_y_value (1,1); /* 'KickData' */ m.put_list (2); m.set_y_value (7); /* 'GoalKeeper' */ m.set_x_value (33); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 34: // goal: set_queue(_G24653, [kick_ball, _G24769]) m.put_list (34); m.set_y_value (1); /* 'KickData' */ m.set_nil (); m.put_y_value (2,1); /* 'Ball' */ m.put_list (2); m.set_atom (kick_ball__0); m.set_x_value (34); /* 'Xtmp' */ m.call (dlplib.set_queue_2); /*6*/ break; case 35: // goal: sleep(200) m.put_int (200,1); m.call (dlplib.sleep_1); /*6*/ break; case 36: // goal: ! m.cut_tail (0); m.deallocate (); break; case 37: m.end_rule (); break; // head: doAction(run_then_kick, _G40507, _G40508, _G40509, _G40510, _G40511, _G40512, _G40513, _G40514, _G40515) case 38: m.retry_me_else (45); m.allocate (6); //m.success = m.get_atom (run_then_kick__0,1); m.get_v_varia (2); /* Unknown */ m.get_y_value (5,3); /* Ball */ 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.get_v_varia (10); /* Unknown */ m.end_head (); break; case 39: // goal: get_field(ball, position, position(_G40527, _G40528, _G40529)) m.put_atom (ball__0,1); m.put_atom (position__0,2); m.put_struct (position__3,3); m.set_y_value (4); /* 'XB' */ m.set_y_value (3); /* 'YB' */ m.set_y_value (2); /* 'ZB' */ m.call (dlplib.get_field_3); /*6*/ break; case 40: // goal: _G40534=[_G40508, position(_G40527, _G40528, _G40529)] m.put_struct (position__3,22); m.set_y_value (4); /* 'XB' */ m.set_y_value (3); /* 'YB' */ m.set_y_value (2); /* 'ZB' */ m.put_list (23); m.set_x_value (22); /* 'Xtmp' */ m.set_nil (); m.put_y_value (1,1); /* 'Data' */ m.put_list (2); m.set_y_value (5); /* 'Ball' */ m.set_x_value (23); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 41: // goal: _G40550=[tell, ball_position, _G40534] m.put_list (24); m.set_y_value (1); /* 'Data' */ m.set_nil (); m.put_list (25); m.set_atom (ball_position__0); m.set_x_value (24); /* 'Xtmp' */ m.put_y_value (0,1); /* 'Message' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (25); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 42: // goal: <-(this, gg_echo, broadcast(anyhost, all_clients, _G40550)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_atom (anyhost__0); m.set_atom (all_clients__0); m.set_y_value (0); /* 'Message' */ m.call (dlplib.op_call_3); /*6*/ break; case 43: // goal: format('~nRUN THEN KICK FAILS : ~w~n', [this]) m.put_atom (data__12__0,1); m.put_list (2); m.set_this (); m.set_nil (); m.deallocate (); m.exec (dlplib.format_2); break; case 44: m.end_rule (); break; // head: doAction(record_score_then_throw, _G46777, _G46778, _G46779, _G46780, _G46781, _G46782, _G46783, _G46784, _G46785) case 45: m.retry_me_else (65); m.allocate (16); //m.success = m.get_atom (record_score_then_throw__0,1); m.get_y_value (7,2); /* GoalKeeper */ m.get_y_value (6,3); /* Ball */ m.get_y_value (5,4); /* X */ m.get_y_value (4,5); /* Y */ m.get_y_value (3,6); /* Z */ m.get_y_value (2,7); /* X1 */ m.get_y_value (1,8); /* Y1 */ m.get_y_value (0,9); /* Z1 */ m.get_v_varia (10); /* Unknown */ m.cut_neck (); m.end_head (); break; case 46: // goal: format('~none more score!!!~n') m.put_atom (data__13__0,1); m.call (dlplib.format_1); /*6*/ break; case 47: // goal: opp_team(_G46777, _G46802) m.put_y_value (7,1); /* 'GoalKeeper' */ m.put_y_value (14,2); /* 'OppTeam' */ m.call (15) /*2*/; /* opp_team_2 */ break; case 48: // goal: <-(this, wsgame_score, getTeamScore(_G46802, _G46811)) m.put_this (1); m.put_atom (wsgame_score__0,2); m.put_struct (getTeamScore__2,3); m.set_y_value (14); /* 'OppTeam' */ m.set_y_value (15); /* 'Score' */ m.call (dlplib.op_call_3); /*6*/ break; case 49: // goal: nonvar(_G46811) m.put_y_value (15,1); /* 'Score' */ m.call (dlplib.nonvar_1); /*6*/ break; case 50: // goal: is_eval(_G46811+1, _G46821) m.put_struct (op__add__2,1); m.set_y_value (15); /* 'Score' */ m.set_int (1); m.put_y_value (13,2); /* 'NewScore' */ m.call (dlplib.is_eval_2); /*6*/ break; case 51: // goal: <-(this, wsgame_score, setTeamScore(_G46802, _G46821)) m.put_this (1); m.put_atom (wsgame_score__0,2); m.put_struct (setTeamScore__2,3); m.set_y_value (14); /* 'OppTeam' */ m.set_y_value (13); /* 'NewScore' */ m.call (dlplib.op_call_3); /*6*/ break; case 52: // goal: <-(this, wsgame_score, showGameScore) m.put_this (1); m.put_atom (wsgame_score__0,2); m.put_atom (showGameScore__0,3); m.call (dlplib.op_call_3); /*6*/ break; case 53: // goal: setSFVec3f(_G46777, position, _G46782, _G46780, _G46784) m.put_y_value (7,1); /* 'GoalKeeper' */ m.put_atom (position__0,2); m.put_y_value (2,3); /* 'X1' */ m.put_y_value (4,4); /* 'Y' */ m.put_y_value (0,5); /* 'Z1' */ m.call (24) /*2*/; /* setSFVec3f_5 */ break; case 54: // goal: local_host(_G46854, _G46855) m.put_y_value (9,1); /* 'Host' */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.local_host_2); /*6*/ break; case 55: // goal: _G46860=[user(_G46854, _G46777), position(_G46782, _G46780, _G46784)] m.put_struct (position__3,16); m.set_y_value (2); /* 'X1' */ m.set_y_value (4); /* 'Y' */ m.set_y_value (0); /* 'Z1' */ m.put_struct (user__2,17); m.set_y_value (9); /* 'Host' */ m.set_y_value (7); /* 'GoalKeeper' */ m.put_list (18); m.set_x_value (16); /* 'Xtmp' */ m.set_nil (); m.put_y_value (12,1); /* 'Data' */ m.put_list (2); m.set_x_value (17); /* 'Xtmp' */ m.set_x_value (18); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 56: // goal: _G46879=[tell, position, _G46860] m.put_list (19); m.set_y_value (12); /* 'Data' */ m.set_nil (); m.put_list (20); m.set_atom (position__0); m.set_x_value (19); /* 'Xtmp' */ m.put_y_value (11,1); /* 'Message' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (20); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 57: // goal: <-(this, gg_echo, broadcast(_G46854, _G46777, _G46879)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_y_value (9); /* 'Host' */ m.set_y_value (7); /* 'GoalKeeper' */ m.set_y_value (11); /* 'Message' */ m.call (dlplib.op_call_3); /*6*/ break; case 58: // goal: sleep(1000) m.put_int (1000,1); m.call (dlplib.sleep_1); /*6*/ break; case 59: // goal: setSFVec3f(_G46777, position, _G46779, _G46780, _G46781) m.put_y_value (7,1); /* 'GoalKeeper' */ m.put_atom (position__0,2); m.put_y_value (5,3); /* 'X' */ m.put_y_value (4,4); /* 'Y' */ m.put_y_value (3,5); /* 'Z' */ m.call (24) /*2*/; /* setSFVec3f_5 */ break; case 60: // goal: _G46918=[user(_G46854, _G46777), position(_G46779, _G46780, _G46781)] m.put_struct (position__3,21); m.set_y_value (5); /* 'X' */ m.set_y_value (4); /* 'Y' */ m.set_y_value (3); /* 'Z' */ m.put_struct (user__2,22); m.set_y_value (9); /* 'Host' */ m.set_y_value (7); /* 'GoalKeeper' */ m.put_list (23); m.set_x_value (21); /* 'Xtmp' */ m.set_nil (); m.put_y_value (10,1); /* 'Data2' */ m.put_list (2); m.set_x_value (22); /* 'Xtmp' */ m.set_x_value (23); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 61: // goal: _G46937=[tell, position, _G46918] m.put_list (24); m.set_y_value (10); /* 'Data2' */ m.set_nil (); m.put_list (25); m.set_atom (position__0); m.set_x_value (24); /* 'Xtmp' */ m.put_y_value (8,1); /* 'Message2' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (25); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 62: // goal: <-(this, gg_echo, broadcast(_G46854, _G46777, _G46937)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_y_value (9); /* 'Host' */ m.set_y_value (7); /* 'GoalKeeper' */ m.set_y_value (8); /* 'Message2' */ m.call (dlplib.op_call_3); /*6*/ break; case 63: // goal: doAction(hold_then_throw, _G46777, _G46778, _G46779, _G46780, _G46781, _G46782, _G46783, _G46784, _G46968) m.put_atom (hold_then_throw__0,1); m.put_y_value (7,2); /* 'GoalKeeper' */ m.put_y_value (6,3); /* 'Ball' */ m.put_y_value (5,4); /* 'X' */ m.put_y_value (4,5); /* 'Y' */ m.put_y_value (3,6); /* 'Z' */ m.put_y_value (2,7); /* 'X1' */ m.put_y_value (1,8); /* 'Y1' */ m.put_y_value (0,9); /* 'Z1' */ m.put_v_varia (10); /* 'Unknown' */ m.deallocate (); m.exec (12); /* doAction_10 */ break; case 64: m.end_rule (); break; // head: doAction(ready_for_goal, _G64309, _G64310, _G64311, _G64312, _G64313, _G64314, _G64315, _G64316, _G64317) case 65: m.retry_me_else (67); //m.success = m.get_atom (ready_for_goal__0,1); 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.get_v_varia (10); /* Unknown */ m.cut_neck (); m.end_head (); break; case 66: m.end_fact (); break; // head: doAction(_G67298, _G67299, _G67300, _G67301, _G67302, _G67303, _G67304, _G67305, _G67306, _G67307) case 67: m.trust_or_fail (); //m.success = m.get_x_varia (14,1); /* Action */ 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.get_v_varia (10); /* Unknown */ m.end_head (); break; case 68: // goal: format('~n~w : UNKNOWN ACTION = ~w~n', [this, _G67298]) m.put_list (24); m.set_x_value (14); /* 'Action' */ m.set_nil (); m.put_atom (data__14__0,1); m.put_list (2); m.set_this (); m.set_x_value (24); /* 'Xtmp' */ m.exec (dlplib.format_2); break; case 69: m.end_rule (); break; } // switch return m.success; } // wsgoalKeeper:doAction/10 exec() // wsgoalKeeper:doAction/10 decls. public SymbolDescriptor do_nothing__0; public SymbolDescriptor hold_then_throw__0; public SymbolDescriptor op__sub__2; public SymbolDescriptor op__add__2; public SymbolDescriptor this__0; public SymbolDescriptor wsball__0; public SymbolDescriptor setPositionEx__4; public SymbolDescriptor op__dot__2; public SymbolDescriptor sl_sr__0; public SymbolDescriptor kick_ball__0; public SymbolDescriptor ball__0; public SymbolDescriptor position__0; public SymbolDescriptor position__3; public SymbolDescriptor tell__0; public SymbolDescriptor ball_position__0; public SymbolDescriptor gg_echo__0; public SymbolDescriptor broadcast__3; public SymbolDescriptor anyhost__0; public SymbolDescriptor all_clients__0; public SymbolDescriptor data__11__0; public SymbolDescriptor run_then_kick__0; public SymbolDescriptor user__2; public SymbolDescriptor to_all_clients__0; public SymbolDescriptor rotation__0; public SymbolDescriptor rotation__4; public SymbolDescriptor data__12__0; public SymbolDescriptor record_score_then_throw__0; public SymbolDescriptor data__13__0; public SymbolDescriptor wsgame_score__0; public SymbolDescriptor getTeamScore__2; public SymbolDescriptor setTeamScore__2; public SymbolDescriptor showGameScore__0; public SymbolDescriptor ready_for_goal__0; public SymbolDescriptor data__14__0; // end of wsgoalKeeper:doAction/10 decls. public boolean init (DLP m) { do_nothing__0 = m.define_symbol ("do_nothing".intern(), 0); hold_then_throw__0 = m.define_symbol ("hold_then_throw".intern(), 0); op__sub__2 = m.define_symbol ("-".intern(), 2); op__add__2 = m.define_symbol ("+".intern(), 2); this__0 = m.define_symbol ("this".intern(), 0); wsball__0 = m.define_symbol ("wsball".intern(), 0); setPositionEx__4 = m.define_symbol ("setPositionEx".intern(), 4); op__dot__2 = m.define_symbol (".".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); kick_ball__0 = m.define_symbol ("kick_ball".intern(), 0); ball__0 = m.define_symbol ("ball".intern(), 0); position__0 = m.define_symbol ("position".intern(), 0); position__3 = m.define_symbol ("position".intern(), 3); tell__0 = m.define_symbol ("tell".intern(), 0); ball_position__0 = m.define_symbol ("ball_position".intern(), 0); gg_echo__0 = m.define_symbol ("gg_echo".intern(), 0); broadcast__3 = m.define_symbol ("broadcast".intern(), 3); anyhost__0 = m.define_symbol ("anyhost".intern(), 0); all_clients__0 = m.define_symbol ("all_clients".intern(), 0); data__11__0 = m.define_symbol ("~nHOLD_THEN_THROW FAILS : ~w~n".intern(), 0); run_then_kick__0 = m.define_symbol ("run_then_kick".intern(), 0); user__2 = m.define_symbol ("user".intern(), 2); to_all_clients__0 = m.define_symbol ("to_all_clients".intern(), 0); rotation__0 = m.define_symbol ("rotation".intern(), 0); rotation__4 = m.define_symbol ("rotation".intern(), 4); data__12__0 = m.define_symbol ("~nRUN THEN KICK FAILS : ~w~n".intern(), 0); record_score_then_throw__0 = m.define_symbol ("record_score_then_throw".intern(), 0); data__13__0 = m.define_symbol ("~none more score!!!~n".intern(), 0); wsgame_score__0 = m.define_symbol ("wsgame_score".intern(), 0); getTeamScore__2 = m.define_symbol ("getTeamScore".intern(), 2); setTeamScore__2 = m.define_symbol ("setTeamScore".intern(), 2); showGameScore__0 = m.define_symbol ("showGameScore".intern(), 0); ready_for_goal__0 = m.define_symbol ("ready_for_goal".intern(), 0); data__14__0 = m.define_symbol ("~n~w : UNKNOWN ACTION = ~w~n".intern(), 0); return true; } // wsgoalKeeper:doAction/10 init() } // wsgoalKeeper:doAction/10 final class wsgoalKeeper_kick_ball_to_position_8 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: kick_ball_to_position(_G110, _G111, _G112, _G113, _G114, _G115, _G116, _G117) case 0: m.try_me_else (8); m.allocate (12); //m.success = m.get_y_value (1,1); /* Ball */ m.get_y_value (10,2); /* X */ m.get_y_value (9,3); /* Y */ m.get_y_value (8,4); /* Z */ m.get_y_value (7,5); /* X1 */ m.get_y_value (6,6); /* Y1 */ m.get_y_value (5,7); /* Z1 */ m.get_y_value (4,8); /* Dist */ m.cut_level (11); m.end_head (); break; case 1: // goal: move_to_position(_G110, translation, ballstep, ballSleepTime, _G111, _G112, _G113, _G114, _G115, _G116, _G117) m.put_y_value (1,1); /* 'Ball' */ m.put_atom (translation__0,2); m.put_z_value (5,3); /* ballstep */ m.put_z_value (6,4); /* ballSleepTime */ m.put_y_value (10,5); /* 'X' */ m.put_y_value (9,6); /* 'Y' */ m.put_y_value (8,7); /* 'Z' */ m.put_y_value (7,8); /* 'X1' */ m.put_y_value (6,9); /* 'Y1' */ m.put_y_value (5,10); /* 'Z1' */ m.put_y_value (4,11); /* 'Dist' */ m.call (25) /*2*/; /* move_to_position_11 */ break; case 2: // goal: ! m.cut_body (11); break; case 3: // goal: _G143=[_G110, _G111, _G112, _G113, _G114, _G115, _G116, _G117] m.put_list (13); m.set_y_value (4); /* 'Dist' */ m.set_nil (); m.put_list (14); m.set_y_value (5); /* 'Z1' */ m.set_x_value (13); /* 'Xtmp' */ m.put_list (15); m.set_y_value (6); /* 'Y1' */ m.set_x_value (14); /* 'Xtmp' */ m.put_list (16); m.set_y_value (7); /* 'X1' */ m.set_x_value (15); /* 'Xtmp' */ m.put_list (17); m.set_y_value (8); /* 'Z' */ m.set_x_value (16); /* 'Xtmp' */ m.put_list (18); m.set_y_value (9); /* 'Y' */ m.set_x_value (17); /* 'Xtmp' */ m.put_list (19); m.set_y_value (10); /* 'X' */ m.set_x_value (18); /* 'Xtmp' */ m.put_y_value (3,1); /* 'Data' */ m.put_list (2); m.set_y_value (1); /* 'Ball' */ m.set_x_value (19); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 4: // goal: _G173=[tell, move_ball, _G143] m.put_list (20); m.set_y_value (3); /* 'Data' */ m.set_nil (); m.put_list (21); m.set_atom (move_ball__0); m.set_x_value (20); /* 'Xtmp' */ m.put_y_value (0,1); /* 'Message' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (21); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 5: // goal: local_host(_G188, _G189) m.put_y_value (2,1); /* 'Host' */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.local_host_2); /*6*/ break; case 6: // goal: <-(this, gg_echo, broadcast(_G188, _G110, _G173)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_y_value (2); /* 'Host' */ m.set_y_value (1); /* 'Ball' */ m.set_y_value (0); /* 'Message' */ m.deallocate (); m.exec (dlplib.op_call_3); break; case 7: m.end_rule (); break; // head: kick_ball_to_position(_G10479, _G10480, _G10481, _G10482, _G10483, _G10484, _G10485, _G10486) case 8: m.trust_or_fail (); //m.success = m.get_x_varia (13,1); /* Ball */ 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.end_head (); break; case 9: // goal: format('~n~w MOVE FAILS ~n', [_G10479]) m.put_atom (data__15__0,1); m.put_list (2); m.set_x_value (13); /* 'Ball' */ m.set_nil (); m.exec (dlplib.format_2); break; case 10: m.end_rule (); break; } // switch return m.success; } // wsgoalKeeper:kick_ball_to_position/8 exec() // wsgoalKeeper:kick_ball_to_position/8 decls. public SymbolDescriptor translation__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor sl_sr__0; public SymbolDescriptor tell__0; public SymbolDescriptor move_ball__0; public SymbolDescriptor this__0; public SymbolDescriptor gg_echo__0; public SymbolDescriptor broadcast__3; public SymbolDescriptor data__15__0; // end of wsgoalKeeper:kick_ball_to_position/8 decls. public boolean init (DLP m) { translation__0 = m.define_symbol ("translation".intern(), 0); op__dot__2 = m.define_symbol (".".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); tell__0 = m.define_symbol ("tell".intern(), 0); move_ball__0 = m.define_symbol ("move_ball".intern(), 0); this__0 = m.define_symbol ("this".intern(), 0); gg_echo__0 = m.define_symbol ("gg_echo".intern(), 0); broadcast__3 = m.define_symbol ("broadcast".intern(), 3); data__15__0 = m.define_symbol ("~n~w MOVE FAILS ~n".intern(), 0); return true; } // wsgoalKeeper:kick_ball_to_position/8 init() } // wsgoalKeeper:kick_ball_to_position/8 final class wsgoalKeeper_run_to_position_8 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: run_to_position(_G110, _G111, _G112, _G113, _G114, _G115, _G116, _G117) case 0: m.allocate (11); //m.success = m.get_y_value (7,1); /* Player */ m.get_y_value (6,2); /* X */ m.get_y_value (5,3); /* Y */ m.get_y_value (4,4); /* Z */ m.get_y_value (3,5); /* X1 */ m.get_y_value (2,6); /* Y1 */ m.get_y_value (1,7); /* Z1 */ m.get_y_value (0,8); /* Dist */ m.end_head (); break; case 1: // goal: look_at_position(_G110, _G114, _G116) m.put_y_value (7,1); /* 'Player' */ m.put_y_value (3,2); /* 'X1' */ m.put_y_value (1,3); /* 'Z1' */ m.call (22) /*2*/; /* look_at_position_3 */ break; case 2: // goal: local_host(_G132, _G133) m.put_y_value (9,1); /* 'Host' */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.local_host_2); /*6*/ break; case 3: // goal: _G138=[user(_G132, _G110), _G111, _G112, _G113, _G114, _G115, _G116, _G117] m.put_list (14); m.set_y_value (0); /* 'Dist' */ m.set_nil (); m.put_list (15); m.set_y_value (1); /* 'Z1' */ m.set_x_value (14); /* 'Xtmp' */ m.put_list (16); m.set_y_value (2); /* 'Y1' */ m.set_x_value (15); /* 'Xtmp' */ m.put_list (17); m.set_y_value (3); /* 'X1' */ m.set_x_value (16); /* 'Xtmp' */ m.put_list (18); m.set_y_value (4); /* 'Z' */ m.set_x_value (17); /* 'Xtmp' */ m.put_list (19); m.set_y_value (5); /* 'Y' */ m.set_x_value (18); /* 'Xtmp' */ m.put_struct (user__2,20); m.set_y_value (9); /* 'Host' */ m.set_y_value (7); /* 'Player' */ m.put_list (21); m.set_y_value (6); /* 'X' */ m.set_x_value (19); /* 'Xtmp' */ m.put_y_value (10,1); /* 'Data' */ m.put_list (2); m.set_x_value (20); /* 'Xtmp' */ m.set_x_value (21); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 4: // goal: _G171=[tell, move_player, _G138] m.put_list (22); m.set_y_value (10); /* 'Data' */ m.set_nil (); m.put_list (23); m.set_atom (move_player__0); m.set_x_value (22); /* 'Xtmp' */ m.put_y_value (8,1); /* 'Message' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (23); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 5: // goal: <-(this, gg_echo, broadcast(_G132, _G110, _G171)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_y_value (9); /* 'Host' */ m.set_y_value (7); /* 'Player' */ m.set_y_value (8); /* 'Message' */ m.call (dlplib.op_call_3); /*6*/ break; case 6: // goal: move_to_position(_G110, set_position, runstep, runSleepTime, _G111, _G112, _G113, _G114, _G115, _G116, _G117) m.put_y_value (7,1); /* 'Player' */ m.put_atom (set_position__0,2); m.put_z_value (9,3); /* runstep */ m.put_z_value (10,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); /* 'X1' */ m.put_y_value (2,9); /* 'Y1' */ m.put_y_value (1,10); /* 'Z1' */ m.put_y_value (0,11); /* 'Dist' */ m.deallocate (); m.exec (25); /* move_to_position_11 */ break; case 7: m.end_rule (); break; } // switch return m.success; } // wsgoalKeeper:run_to_position/8 exec() // wsgoalKeeper:run_to_position/8 decls. public SymbolDescriptor op__dot__2; public SymbolDescriptor user__2; public SymbolDescriptor sl_sr__0; public SymbolDescriptor tell__0; public SymbolDescriptor move_player__0; public SymbolDescriptor this__0; public SymbolDescriptor gg_echo__0; public SymbolDescriptor broadcast__3; public SymbolDescriptor set_position__0; // end of wsgoalKeeper:run_to_position/8 decls. public boolean init (DLP m) { op__dot__2 = m.define_symbol (".".intern(), 2); user__2 = m.define_symbol ("user".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); tell__0 = m.define_symbol ("tell".intern(), 0); move_player__0 = m.define_symbol ("move_player".intern(), 0); this__0 = m.define_symbol ("this".intern(), 0); gg_echo__0 = m.define_symbol ("gg_echo".intern(), 0); broadcast__3 = m.define_symbol ("broadcast".intern(), 3); set_position__0 = m.define_symbol ("set_position".intern(), 0); return true; } // wsgoalKeeper:run_to_position/8 init() } // wsgoalKeeper:run_to_position/8 final class wsgoalKeeper_opp_team_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: opp_team(goalKeeper1, red) case 0: m.try_me_else (2); //m.success = m.get_atom (goalKeeper1__0,1); m.get_atom (red__0,2); m.cut_neck (); m.end_head (); break; case 1: m.end_fact (); break; // head: opp_team(goalKeeper2, blue) case 2: m.trust_or_fail (); //m.success = m.get_atom (goalKeeper2__0,1); m.get_atom (blue__0,2); m.end_head (); break; case 3: m.end_fact (); break; } // switch return m.success; } // wsgoalKeeper:opp_team/2 exec() // wsgoalKeeper:opp_team/2 decls. public SymbolDescriptor goalKeeper1__0; public SymbolDescriptor red__0; public SymbolDescriptor goalKeeper2__0; public SymbolDescriptor blue__0; // end of wsgoalKeeper:opp_team/2 decls. public boolean init (DLP m) { goalKeeper1__0 = m.define_symbol ("goalKeeper1".intern(), 0); red__0 = m.define_symbol ("red".intern(), 0); goalKeeper2__0 = m.define_symbol ("goalKeeper2".intern(), 0); blue__0 = m.define_symbol ("blue".intern(), 0); return true; } // wsgoalKeeper:opp_team/2 init() } // wsgoalKeeper:opp_team/2 final class wsgoalKeeper_setRotationEx_5 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: setRotationEx(_G110, _G111, _G112, _G113, _G114) case 0: m.try_me_else (12); m.allocate (10); //m.success = m.get_y_value (1,1); /* GoalKeeper */ m.get_y_value (7,2); /* X */ m.get_y_value (6,3); /* Y */ m.get_y_value (5,4); /* Z */ m.get_y_value (4,5); /* R */ m.cut_level (8); m.end_head (); break; case 1: // goal: get_field(_G110, old_rot, _G124) m.put_y_value (1,1); /* 'GoalKeeper' */ m.put_atom (old_rot__0,2); m.put_y_value (9,3); /* 'OldRot' */ m.call (dlplib.get_field_3); /*6*/ break; case 2: // goal: _G124\=rotation(_G111, _G112, _G113, _G114) m.put_y_value (9,1); /* 'OldRot' */ m.put_struct (rotation__4,2); m.set_y_value (7); /* 'X' */ m.set_y_value (6); /* 'Y' */ m.set_y_value (5); /* 'Z' */ m.set_y_value (4); /* 'R' */ m.call (dlplib.op_neq_2); /*6*/ break; case 3: // goal: ! m.cut_body (8); break; case 4: // goal: set_field(_G110, old_rot, rotation(_G111, _G112, _G113, _G114)) m.put_y_value (1,1); /* 'GoalKeeper' */ m.put_atom (old_rot__0,2); m.put_struct (rotation__4,3); m.set_y_value (7); /* 'X' */ m.set_y_value (6); /* 'Y' */ m.set_y_value (5); /* 'Z' */ m.set_y_value (4); /* 'R' */ m.call (dlplib.set_field_3); /*6*/ break; case 5: // goal: setRotation(_G110, _G111, _G112, _G113, _G114) m.put_y_value (1,1); /* 'GoalKeeper' */ m.put_y_value (7,2); /* 'X' */ m.put_y_value (6,3); /* 'Y' */ m.put_y_value (5,4); /* 'Z' */ m.put_y_value (4,5); /* 'R' */ m.call (26) /*2*/; /* setRotation_5 */ break; case 6: // goal: local_host(_G164, _G165) m.put_y_value (2,1); /* 'Host' */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.local_host_2); /*6*/ break; case 7: // goal: _G170=[user(_G164, _G110), rotation(_G111, _G112, _G113, _G114)] m.put_struct (rotation__4,13); m.set_y_value (7); /* 'X' */ m.set_y_value (6); /* 'Y' */ m.set_y_value (5); /* 'Z' */ m.set_y_value (4); /* 'R' */ m.put_struct (user__2,14); m.set_y_value (2); /* 'Host' */ m.set_y_value (1); /* 'GoalKeeper' */ m.put_list (15); m.set_x_value (13); /* 'Xtmp' */ m.set_nil (); m.put_y_value (3,1); /* 'Data' */ m.put_list (2); m.set_x_value (14); /* 'Xtmp' */ m.set_x_value (15); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 8: // goal: _G190=[tell, rotation, _G170] m.put_list (16); m.set_y_value (3); /* 'Data' */ m.set_nil (); m.put_list (17); m.set_atom (rotation__0); m.set_x_value (16); /* 'Xtmp' */ m.put_y_value (0,1); /* 'Message' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (17); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 9: // goal: local_host(_G164, _G206) m.put_y_value (2,1); /* 'Host' */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.local_host_2); /*6*/ break; case 10: // goal: <-(this, gg_echo, broadcast(_G164, _G110, _G190)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_y_value (2); /* 'Host' */ m.set_y_value (1); /* 'GoalKeeper' */ m.set_y_value (0); /* 'Message' */ m.deallocate (); m.exec (dlplib.op_call_3); break; case 11: m.end_rule (); break; // head: setRotationEx(_G10749, _G10750, _G10751, _G10752, _G10753) case 12: 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.end_head (); break; case 13: m.end_fact (); break; } // switch return m.success; } // wsgoalKeeper:setRotationEx/5 exec() // wsgoalKeeper:setRotationEx/5 decls. public SymbolDescriptor old_rot__0; public SymbolDescriptor rotation__4; public SymbolDescriptor op__dot__2; public SymbolDescriptor user__2; public SymbolDescriptor sl_sr__0; public SymbolDescriptor tell__0; public SymbolDescriptor rotation__0; public SymbolDescriptor this__0; public SymbolDescriptor gg_echo__0; public SymbolDescriptor broadcast__3; // end of wsgoalKeeper:setRotationEx/5 decls. public boolean init (DLP m) { old_rot__0 = m.define_symbol ("old_rot".intern(), 0); rotation__4 = m.define_symbol ("rotation".intern(), 4); op__dot__2 = m.define_symbol (".".intern(), 2); user__2 = m.define_symbol ("user".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); tell__0 = m.define_symbol ("tell".intern(), 0); rotation__0 = m.define_symbol ("rotation".intern(), 0); this__0 = m.define_symbol ("this".intern(), 0); gg_echo__0 = m.define_symbol ("gg_echo".intern(), 0); broadcast__3 = m.define_symbol ("broadcast".intern(), 3); return true; } // wsgoalKeeper:setRotationEx/5 init() } // wsgoalKeeper:setRotationEx/5 final class wsgoalKeeper_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, 2.8) m.put_this (1); m.put_nreg (2); m.put_int (1,3); m.put_float (2.8f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 3: // goal: assign_nlv_term(this, nreg, 2, 45) m.put_this (1); m.put_nreg (2); m.put_int (2,3); m.put_float (45f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 4: // goal: assign_nlv_term(this, nreg, 3, 30) m.put_this (1); m.put_nreg (2); m.put_int (3,3); m.put_float (30f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 5: // goal: assign_nlv_term(this, nreg, 4, 8) m.put_this (1); m.put_nreg (2); m.put_int (4,3); m.put_float (8f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 6: // goal: assign_nlv_term(this, nreg, 5, 1.5) m.put_this (1); m.put_nreg (2); m.put_int (5,3); m.put_float (1.5f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 7: // goal: assign_nlv_term(this, nreg, 6, 300) m.put_this (1); m.put_nreg (2); m.put_int (6,3); m.put_int (300,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 8: // goal: assign_nlv_term(this, nreg, 7, 10) m.put_this (1); m.put_nreg (2); m.put_int (7,3); m.put_float (10f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 9: // goal: assign_nlv_term(this, nreg, 8, 15) m.put_this (1); m.put_nreg (2); m.put_int (8,3); m.put_float (15f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 10: // goal: assign_nlv_term(this, nreg, 9, 1.5) m.put_this (1); m.put_nreg (2); m.put_int (9,3); m.put_float (1.5f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 11: // goal: assign_nlv_term(this, nreg, 10, 750) m.put_this (1); m.put_nreg (2); m.put_int (10,3); m.put_int (750,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 12: // goal: assign_nlv_term(this, nreg, 11, 5000) m.put_this (1); m.put_nreg (2); m.put_int (11,3); m.put_int (5000,4); m.deallocate (); m.exec (dlplib.assign_nlv_term_4); break; case 13: m.end_rule (); break; } // switch return m.success; } // wsgoalKeeper:init_vars/0 exec() // wsgoalKeeper:init_vars/0 decls. public SymbolDescriptor no_init__0; // end of wsgoalKeeper:init_vars/0 decls. public boolean init (DLP m) { no_init__0 = m.define_symbol ("no_init".intern(), 0); return true; } // wsgoalKeeper:init_vars/0 init() } // wsgoalKeeper:init_vars/0 class wsgoalKeeper extends Code { public static ObjectDescriptor object; public static ObjectDescriptor _common_process_wsserver; public static MethodDescriptor wsgoalKeeper_2; public static MethodDescriptor set_init_value_1; public static MethodDescriptor defaultPositionRotation_3; public static MethodDescriptor activity_1; public static MethodDescriptor stadiumExit_3; public static MethodDescriptor quitGame_1; public static MethodDescriptor getPositionInformation_9; public static MethodDescriptor findHowtoReact_10; public static MethodDescriptor goalArea_6; public static MethodDescriptor defaultPosition_2; public static MethodDescriptor setDefaultPosition_1; public static MethodDescriptor ballThrowPosition_4; public static MethodDescriptor doAction_10; public static MethodDescriptor kick_ball_to_position_8; public static MethodDescriptor run_to_position_8; public static MethodDescriptor opp_team_2; public static MethodDescriptor setRotationEx_5; public static MethodDescriptor get_clock_1; public static MethodDescriptor look_at_ball_2; public static MethodDescriptor getSFVec3f_5; public static MethodDescriptor distance2d_5; 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 move_to_position_11; public static MethodDescriptor setRotation_5; public boolean init (DLP m) { object = m.define_object ("wsgoalKeeper".intern(), 1, 27, 12); _common_process_wsserver = m.header_object (object, "common_process_wsserver".intern(), 0); wsgoalKeeper_2 = m.define_method (object, 0, "wsgoalKeeper".intern(), 2); set_init_value_1 = m.define_method (object, 1, "set_init_value".intern(), 1); defaultPositionRotation_3 = m.define_method (object, 2, "defaultPositionRotation".intern(), 3); activity_1 = m.define_method (object, 3, "activity".intern(), 1); stadiumExit_3 = m.define_method (object, 4, "stadiumExit".intern(), 3); quitGame_1 = m.define_method (object, 5, "quitGame".intern(), 1); getPositionInformation_9 = m.define_method (object, 6, "getPositionInformation".intern(), 9); findHowtoReact_10 = m.define_method (object, 7, "findHowtoReact".intern(), 10); goalArea_6 = m.define_method (object, 8, "goalArea".intern(), 6); defaultPosition_2 = m.define_method (object, 9, "defaultPosition".intern(), 2); setDefaultPosition_1 = m.define_method (object, 10, "setDefaultPosition".intern(), 1); ballThrowPosition_4 = m.define_method (object, 11, "ballThrowPosition".intern(), 4); doAction_10 = m.define_method (object, 12, "doAction".intern(), 10); kick_ball_to_position_8 = m.define_method (object, 13, "kick_ball_to_position".intern(), 8); run_to_position_8 = m.define_method (object, 14, "run_to_position".intern(), 8); opp_team_2 = m.define_method (object, 15, "opp_team".intern(), 2); setRotationEx_5 = m.define_method (object, 16, "setRotationEx".intern(), 5); get_clock_1 = m.extern_method (object, 17, "get_clock".intern(), 1); look_at_ball_2 = m.extern_method (object, 18, "look_at_ball".intern(), 2); getSFVec3f_5 = m.extern_method (object, 19, "getSFVec3f".intern(), 5); distance2d_5 = m.extern_method (object, 20, "distance2d".intern(), 5); getPosition_4 = m.extern_method (object, 21, "getPosition".intern(), 4); look_at_position_3 = m.extern_method (object, 22, "look_at_position".intern(), 3); getRotation_5 = m.extern_method (object, 23, "getRotation".intern(), 5); setSFVec3f_5 = m.extern_method (object, 24, "setSFVec3f".intern(), 5); move_to_position_11 = m.extern_method (object, 25, "move_to_position".intern(), 11); setRotation_5 = m.extern_method (object, 26, "setRotation".intern(), 5); m.define_nonlog (object, "steps".intern(), 0); m.define_nonlog (object, "holdableDistance".intern(), 1); m.define_nonlog (object, "throwableDistance".intern(), 2); m.define_nonlog (object, "watchableDistance".intern(), 3); m.define_nonlog (object, "stopableDistance".intern(), 4); m.define_nonlog (object, "ballstep".intern(), 5); m.define_nonlog (object, "ballSleepTime".intern(), 6); m.define_nonlog (object, "kickBallForce".intern(), 7); m.define_nonlog (object, "kickBallForceY".intern(), 8); m.define_nonlog (object, "runstep".intern(), 9); m.define_nonlog (object, "runSleepTime".intern(), 10); m.define_nonlog (object, "time_limit".intern(), 11); return true; } // wsgoalKeeper init() } // class wsgoalKeeper // end of unit wsgoalKeeper code. // begin of unit soccerPlayerServerAgent code. final class soccerPlayerServerAgent_defaultPositionRotation_3 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: defaultPositionRotation(blue9, position(35, 1.8, 4), rotation(0, 1, 0, -1.5708)) case 0: m.try_me_else (2); //m.success = m.get_atom (blue9__0,1); m.get_struct (position__3,2); m.uni_float (35f); m.uni_float (1.8f); m.uni_float (4f); m.get_struct (rotation__4,3); m.uni_float (0f); m.uni_float (1f); m.uni_float (0f); m.uni_float (-1.5708f); m.cut_neck (); m.end_head (); break; case 1: m.end_fact (); break; // head: defaultPositionRotation(blue8, position(5.5, 1.8, 4), rotation(0, 1, 0, -1.5708)) case 2: m.retry_me_else (4); //m.success = m.get_atom (blue8__0,1); m.get_struct (position__3,2); m.uni_float (5.5f); m.uni_float (1.8f); m.uni_float (4f); m.get_struct (rotation__4,3); m.uni_float (0f); m.uni_float (1f); m.uni_float (0f); m.uni_float (-1.5708f); m.cut_neck (); m.end_head (); break; case 3: m.end_fact (); break; // head: defaultPositionRotation(blue7, position(15, 1.8, 4), rotation(0, 1, 0, -1.5708)) case 4: m.retry_me_else (6); //m.success = m.get_atom (blue7__0,1); m.get_struct (position__3,2); m.uni_float (15f); m.uni_float (1.8f); m.uni_float (4f); m.get_struct (rotation__4,3); m.uni_float (0f); m.uni_float (1f); m.uni_float (0f); m.uni_float (-1.5708f); m.cut_neck (); m.end_head (); break; case 5: m.end_fact (); break; // head: defaultPositionRotation(red2, position(5, 1.8, -4), rotation(0, 1, 0, 1.5708)) case 6: m.retry_me_else (8); //m.success = m.get_atom (red2__0,1); m.get_struct (position__3,2); m.uni_float (5f); m.uni_float (1.8f); m.uni_float (-4f); m.get_struct (rotation__4,3); m.uni_float (0f); m.uni_float (1f); m.uni_float (0f); m.uni_float (1.5708f); m.cut_neck (); m.end_head (); break; case 7: m.end_fact (); break; // head: defaultPositionRotation(red3, position(25, 1.8, 4), rotation(0, 1, 0, -1.5708)) case 8: m.retry_me_else (10); //m.success = m.get_atom (red3__0,1); m.get_struct (position__3,2); m.uni_float (25f); m.uni_float (1.8f); m.uni_float (4f); m.get_struct (rotation__4,3); m.uni_float (0f); m.uni_float (1f); m.uni_float (0f); m.uni_float (-1.5708f); m.cut_neck (); m.end_head (); break; case 9: m.end_fact (); break; // head: defaultPositionRotation(red10, position(-10, 1.8, 4), rotation(0, 1, 0, -1.5708)) case 10: m.retry_me_else (12); //m.success = m.get_atom (red10__0,1); m.get_struct (position__3,2); m.uni_float (-10f); m.uni_float (1.8f); m.uni_float (4f); m.get_struct (rotation__4,3); m.uni_float (0f); m.uni_float (1f); m.uni_float (0f); m.uni_float (-1.5708f); m.cut_neck (); m.end_head (); break; case 11: m.end_fact (); break; // head: defaultPositionRotation(red4, position(40, 1.8, 9.5), rotation(0, 1, 0, -1.5708)) case 12: m.retry_me_else (14); //m.success = m.get_atom (red4__0,1); m.get_struct (position__3,2); m.uni_float (40f); m.uni_float (1.8f); m.uni_float (9.5f); m.get_struct (rotation__4,3); m.uni_float (0f); m.uni_float (1f); m.uni_float (0f); m.uni_float (-1.5708f); m.cut_neck (); m.end_head (); break; case 13: m.end_fact (); break; // head: defaultPositionRotation(red5, position(15, 1.8, -20), rotation(0, 1, 0, -1.5708)) case 14: m.retry_me_else (16); //m.success = m.get_atom (red5__0,1); m.get_struct (position__3,2); m.uni_float (15f); m.uni_float (1.8f); m.uni_float (-20f); m.get_struct (rotation__4,3); m.uni_float (0f); m.uni_float (1f); m.uni_float (0f); m.uni_float (-1.5708f); m.cut_neck (); m.end_head (); break; case 15: m.end_fact (); break; // head: defaultPositionRotation(red7, position(15, 1.8, 23), rotation(0, 1, 0, -1.5708)) case 16: m.retry_me_else (18); //m.success = m.get_atom (red7__0,1); m.get_struct (position__3,2); m.uni_float (15f); m.uni_float (1.8f); m.uni_float (23f); m.get_struct (rotation__4,3); m.uni_float (0f); m.uni_float (1f); m.uni_float (0f); m.uni_float (-1.5708f); m.cut_neck (); m.end_head (); break; case 17: m.end_fact (); break; // head: defaultPositionRotation(red8, position(-40, 1.8, 10), rotation(0, 1, 0, -1.5708)) case 18: m.retry_me_else (20); //m.success = m.get_atom (red8__0,1); m.get_struct (position__3,2); m.uni_float (-40f); m.uni_float (1.8f); m.uni_float (10f); m.get_struct (rotation__4,3); m.uni_float (0f); m.uni_float (1f); m.uni_float (0f); m.uni_float (-1.5708f); m.cut_neck (); m.end_head (); break; case 19: m.end_fact (); break; // head: defaultPositionRotation(red9, position(-35, 1.8, -10), rotation(0, 1, 0, -1.5708)) case 20: m.retry_me_else (22); //m.success = m.get_atom (red9__0,1); m.get_struct (position__3,2); m.uni_float (-35f); m.uni_float (1.8f); m.uni_float (-10f); m.get_struct (rotation__4,3); m.uni_float (0f); m.uni_float (1f); m.uni_float (0f); m.uni_float (-1.5708f); m.cut_neck (); m.end_head (); break; case 21: m.end_fact (); break; // head: defaultPositionRotation(red11, position(-45, 1.8, -10), rotation(0, 1, 0, -1.5708)) case 22: m.retry_me_else (24); //m.success = m.get_atom (red11__0,1); m.get_struct (position__3,2); m.uni_float (-45f); m.uni_float (1.8f); m.uni_float (-10f); m.get_struct (rotation__4,3); m.uni_float (0f); m.uni_float (1f); m.uni_float (0f); m.uni_float (-1.5708f); m.cut_neck (); m.end_head (); break; case 23: m.end_fact (); break; // head: defaultPositionRotation(blue6, position(15, 1.8, 14), rotation(0, 1, 0, -1.5708)) case 24: m.retry_me_else (26); //m.success = m.get_atom (blue6__0,1); m.get_struct (position__3,2); m.uni_float (15f); m.uni_float (1.8f); m.uni_float (14f); m.get_struct (rotation__4,3); m.uni_float (0f); m.uni_float (1f); m.uni_float (0f); m.uni_float (-1.5708f); m.cut_neck (); m.end_head (); break; case 25: m.end_fact (); break; // head: defaultPositionRotation(blue5, position(-15, 1.8, -24), rotation(0, 1, 0, -1.5708)) case 26: m.retry_me_else (28); //m.success = m.get_atom (blue5__0,1); m.get_struct (position__3,2); m.uni_float (-15f); m.uni_float (1.8f); m.uni_float (-24f); m.get_struct (rotation__4,3); m.uni_float (0f); m.uni_float (1f); m.uni_float (0f); m.uni_float (-1.5708f); m.cut_neck (); m.end_head (); break; case 27: m.end_fact (); break; // head: defaultPositionRotation(blue4, position(-25, 1.8, -14), rotation(0, 1, 0, -1.5708)) case 28: m.retry_me_else (30); //m.success = m.get_atom (blue4__0,1); m.get_struct (position__3,2); m.uni_float (-25f); m.uni_float (1.8f); m.uni_float (-14f); m.get_struct (rotation__4,3); m.uni_float (0f); m.uni_float (1f); m.uni_float (0f); m.uni_float (-1.5708f); m.cut_neck (); m.end_head (); break; case 29: m.end_fact (); break; // head: defaultPositionRotation(blue3, position(45, 1.8, 14), rotation(0, 1, 0, -1.5708)) case 30: m.retry_me_else (32); //m.success = m.get_atom (blue3__0,1); m.get_struct (position__3,2); m.uni_float (45f); m.uni_float (1.8f); m.uni_float (14f); m.get_struct (rotation__4,3); m.uni_float (0f); m.uni_float (1f); m.uni_float (0f); m.uni_float (-1.5708f); m.cut_neck (); m.end_head (); break; case 31: m.end_fact (); break; // head: defaultPositionRotation(blue2, position(35, 1.8, -16), rotation(0, 1, 0, -1.5708)) case 32: m.retry_me_else (34); //m.success = m.get_atom (blue2__0,1); m.get_struct (position__3,2); m.uni_float (35f); m.uni_float (1.8f); m.uni_float (-16f); m.get_struct (rotation__4,3); m.uni_float (0f); m.uni_float (1f); m.uni_float (0f); m.uni_float (-1.5708f); m.cut_neck (); m.end_head (); break; case 33: m.end_fact (); break; // head: defaultPositionRotation(blue10, position(-45, 1.8, -9), rotation(0, 1, 0, -1.5708)) case 34: m.trust_or_fail (); //m.success = m.get_atom (blue10__0,1); m.get_struct (position__3,2); m.uni_float (-45f); m.uni_float (1.8f); m.uni_float (-9f); m.get_struct (rotation__4,3); m.uni_float (0f); m.uni_float (1f); m.uni_float (0f); m.uni_float (-1.5708f); m.end_head (); break; case 35: m.end_fact (); break; } // switch return m.success; } // soccerPlayerServerAgent:defaultPositionRotation/3 exec() // soccerPlayerServerAgent:defaultPositionRotation/3 decls. public SymbolDescriptor blue9__0; public SymbolDescriptor position__3; public SymbolDescriptor rotation__4; public SymbolDescriptor blue8__0; public SymbolDescriptor blue7__0; public SymbolDescriptor red2__0; public SymbolDescriptor red3__0; public SymbolDescriptor red10__0; public SymbolDescriptor red4__0; public SymbolDescriptor red5__0; public SymbolDescriptor red7__0; public SymbolDescriptor red8__0; public SymbolDescriptor red9__0; public SymbolDescriptor red11__0; public SymbolDescriptor blue6__0; public SymbolDescriptor blue5__0; public SymbolDescriptor blue4__0; public SymbolDescriptor blue3__0; public SymbolDescriptor blue2__0; public SymbolDescriptor blue10__0; // end of soccerPlayerServerAgent:defaultPositionRotation/3 decls. public boolean init (DLP m) { blue9__0 = m.define_symbol ("blue9".intern(), 0); position__3 = m.define_symbol ("position".intern(), 3); rotation__4 = m.define_symbol ("rotation".intern(), 4); blue8__0 = m.define_symbol ("blue8".intern(), 0); blue7__0 = m.define_symbol ("blue7".intern(), 0); red2__0 = m.define_symbol ("red2".intern(), 0); red3__0 = m.define_symbol ("red3".intern(), 0); red10__0 = m.define_symbol ("red10".intern(), 0); red4__0 = m.define_symbol ("red4".intern(), 0); red5__0 = m.define_symbol ("red5".intern(), 0); red7__0 = m.define_symbol ("red7".intern(), 0); red8__0 = m.define_symbol ("red8".intern(), 0); red9__0 = m.define_symbol ("red9".intern(), 0); red11__0 = m.define_symbol ("red11".intern(), 0); blue6__0 = m.define_symbol ("blue6".intern(), 0); blue5__0 = m.define_symbol ("blue5".intern(), 0); blue4__0 = m.define_symbol ("blue4".intern(), 0); blue3__0 = m.define_symbol ("blue3".intern(), 0); blue2__0 = m.define_symbol ("blue2".intern(), 0); blue10__0 = m.define_symbol ("blue10".intern(), 0); return true; } // soccerPlayerServerAgent:defaultPositionRotation/3 init() } // soccerPlayerServerAgent:defaultPositionRotation/3 final class soccerPlayerServerAgent_soccerPlayerServerAgent_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: soccerPlayerServerAgent(_G110, _G111) case 0: m.allocate (1); //m.success = m.get_y_value (0,1); /* Name */ m.get_x_varia (10,2); /* TimeLimit */ 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 (10,4); /* 'TimeLimit' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 2: // goal: set_init_value(_G110) m.put_y_value (0,1); /* 'Name' */ m.call (2) /*2*/; /* set_init_value_1 */ break; case 3: // goal: format('~w thread active.~n', [_G110]) m.put_atom (data__16__0,1); m.put_list (2); m.set_y_value (0); /* 'Name' */ m.set_nil (); m.call (dlplib.format_2); /*6*/ break; case 4: // goal: activity(_G110) m.put_y_value (0,1); /* 'Name' */ m.deallocate (); m.exec (3); /* activity_1 */ break; case 5: m.end_rule (); break; } // switch return m.success; } // soccerPlayerServerAgent:soccerPlayerServerAgent/2 exec() // soccerPlayerServerAgent:soccerPlayerServerAgent/2 decls. public SymbolDescriptor data__16__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor sl_sr__0; // end of soccerPlayerServerAgent:soccerPlayerServerAgent/2 decls. public boolean init (DLP m) { data__16__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; } // soccerPlayerServerAgent:soccerPlayerServerAgent/2 init() } // soccerPlayerServerAgent:soccerPlayerServerAgent/2 final class soccerPlayerServerAgent_set_init_value_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: set_init_value(_G110) case 0: m.allocate (3); //m.success = m.get_y_value (1,1); /* Player */ m.end_head (); break; case 1: // goal: defaultPositionRotation(_G110, _G119, _G120) m.put_y_value (1,1); /* 'Player' */ m.put_y_value (2,2); /* 'Position' */ m.put_y_value (0,3); /* 'Rotation' */ m.call (0) /*2*/; /* defaultPositionRotation_3 */ break; case 2: // goal: set_field(_G110, position, _G119) m.put_y_value (1,1); /* 'Player' */ m.put_atom (position__0,2); m.put_y_value (2,3); /* 'Position' */ m.call (dlplib.set_field_3); /*6*/ break; case 3: // goal: set_field(_G110, rotation, _G120) m.put_y_value (1,1); /* 'Player' */ m.put_atom (rotation__0,2); m.put_y_value (0,3); /* 'Rotation' */ m.deallocate (); m.exec (dlplib.set_field_3); break; case 4: m.end_rule (); break; } // switch return m.success; } // soccerPlayerServerAgent:set_init_value/1 exec() // soccerPlayerServerAgent:set_init_value/1 decls. public SymbolDescriptor position__0; public SymbolDescriptor rotation__0; // end of soccerPlayerServerAgent:set_init_value/1 decls. public boolean init (DLP m) { position__0 = m.define_symbol ("position".intern(), 0); rotation__0 = m.define_symbol ("rotation".intern(), 0); return true; } // soccerPlayerServerAgent:set_init_value/1 init() } // soccerPlayerServerAgent:set_init_value/1 final class soccerPlayerServerAgent_activity_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: activity(_G110) case 0: m.allocate (14); //m.success = m.get_y_value (1,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(5000) m.put_int (5000,1); m.call (dlplib.sleep_1); /*6*/ break; case 3: // goal: get_clock(_G126) m.put_y_value (2,1); /* 'TimeLimit' */ m.call (27) /*2*/; /* get_clock_1 */ break; case 4: // goal: format('~w : playing time = ~w seconds.~n', [_G110, _G126]) m.put_list (10); m.set_y_value (2); /* 'TimeLimit' */ m.set_nil (); m.put_atom (data__17__0,1); m.put_list (2); m.set_y_value (1); /* 'Name' */ m.set_x_value (10); /* 'Xtmp' */ m.call (dlplib.format_2); /*6*/ break; case 5: // goal: getPositionInformation(_G110, ball, _G145, _G146, _G147, _G148, _G149, _G150, _G151, _G152, _G153, _G154) m.put_y_value (1,1); /* 'Name' */ m.put_atom (ball__0,2); m.put_y_value (12,3); /* 'X' */ m.put_y_value (11,4); /* 'Y' */ m.put_y_value (10,5); /* 'Z' */ m.put_y_value (9,6); /* 'Xball' */ m.put_y_value (8,7); /* 'Yball' */ m.put_y_value (7,8); /* 'Zball' */ m.put_y_value (6,9); /* 'Dist' */ m.put_y_value (5,10); /* 'Xgoal' */ m.put_y_value (4,11); /* 'Zgoal' */ m.put_y_value (3,12); /* 'Dist1' */ m.call (10) /*2*/; /* getPositionInformation_12 */ break; case 6: // goal: findHowtoReact(_G110, ball, _G145, _G146, _G147, _G148, _G149, _G150, _G151, _G152, _G153, _G154, _G171) m.put_y_value (1,1); /* 'Name' */ m.put_atom (ball__0,2); m.put_y_value (12,3); /* 'X' */ m.put_y_value (11,4); /* 'Y' */ m.put_y_value (10,5); /* 'Z' */ m.put_y_value (9,6); /* 'Xball' */ m.put_y_value (8,7); /* 'Yball' */ m.put_y_value (7,8); /* 'Zball' */ m.put_y_value (6,9); /* 'Dist' */ m.put_y_value (5,10); /* 'Xgoal' */ m.put_y_value (4,11); /* 'Zgoal' */ m.put_y_value (3,12); /* 'Dist1' */ m.put_y_value (13,13); /* 'Action' */ m.call (4) /*2*/; /* findHowtoReact_13 */ break; case 7: // goal: nonvar(_G171) m.put_y_value (13,1); /* 'Action' */ m.call (dlplib.nonvar_1); /*6*/ break; case 8: // goal: format('~w : action = ~w ~n', [_G110, _G171]) m.put_list (11); m.set_y_value (13); /* 'Action' */ m.set_nil (); m.put_atom (data__18__0,1); m.put_list (2); m.set_y_value (1); /* 'Name' */ m.set_x_value (11); /* 'Xtmp' */ m.call (dlplib.format_2); /*6*/ break; case 9: // goal: doAction(_G171, _G110, ball, _G145, _G146, _G147, _G148, _G149, _G150, _G151, _G152, _G153, _G154) m.put_y_value (13,1); /* 'Action' */ m.put_y_value (1,2); /* 'Name' */ m.put_atom (ball__0,3); m.put_y_value (12,4); /* 'X' */ m.put_y_value (11,5); /* 'Y' */ m.put_y_value (10,6); /* 'Z' */ m.put_y_value (9,7); /* 'Xball' */ m.put_y_value (8,8); /* 'Yball' */ m.put_y_value (7,9); /* 'Zball' */ m.put_y_value (6,10); /* 'Dist' */ m.put_y_value (5,11); /* 'Xgoal' */ m.put_y_value (4,12); /* 'Zgoal' */ m.put_y_value (3,13); /* 'Dist1' */ m.call (6) /*2*/; /* doAction_13 */ break; case 10: // goal: _G126>time_limit m.put_y_value (2,1); /* 'TimeLimit' */ m.put_z_value (0,2); /* time_limit */ m.call (dlplib.op_cmp_gt_2); /*6*/ break; case 11: // goal: quitGame(_G110) m.put_y_value (1,1); /* 'Name' */ m.call (20) /*2*/; /* quitGame_1 */ break; case 12: // goal: ! m.cut_tail (0); m.deallocate (); break; case 13: m.end_rule (); break; } // switch return m.success; } // soccerPlayerServerAgent:activity/1 exec() // soccerPlayerServerAgent:activity/1 decls. public SymbolDescriptor data__17__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor sl_sr__0; public SymbolDescriptor ball__0; public SymbolDescriptor data__18__0; // end of soccerPlayerServerAgent:activity/1 decls. public boolean init (DLP m) { data__17__0 = m.define_symbol ("~w : playing time = ~w seconds.~n".intern(), 0); op__dot__2 = m.define_symbol (".".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); ball__0 = m.define_symbol ("ball".intern(), 0); data__18__0 = m.define_symbol ("~w : action = ~w ~n".intern(), 0); return true; } // soccerPlayerServerAgent:activity/1 init() } // soccerPlayerServerAgent:activity/1 final class soccerPlayerServerAgent_findHowtoReact_13 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: findHowtoReact(_G110, _G111, _G112, _G113, _G114, _G115, _G116, _G117, _G118, _G119, _G120, _G121, shooting) case 0: m.try_me_else (5); m.allocate (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_v_varia (5); /* Unknown */ m.get_v_varia (6); /* Unknown */ m.get_v_varia (7); /* Unknown */ m.get_v_varia (8); /* Unknown */ m.get_x_varia (24,9); /* Dist */ m.get_v_varia (10); /* Unknown */ m.get_v_varia (11); /* Unknown */ m.get_y_value (1,12); /* Dist1 */ m.get_atom (shooting__0,13); m.cut_level (0); m.end_head (); break; case 1: // goal: _G118=kickableGoalDistance m.put_y_value (1,1); /* 'Dist1' */ m.put_z_value (7,2); /* kickableGoalDistance */ m.call (dlplib.op_cmp_gt_2); /*6*/ break; case 8: // goal: ! m.cut_tail (0); m.deallocate (); break; case 9: m.end_rule (); break; // head: findHowtoReact(_G8569, _G8570, _G8571, _G8572, _G8573, _G8574, _G8575, _G8576, _G8577, _G8578, _G8579, _G8580, run_to_ball) case 10: m.retry_me_else (17); m.allocate (5); //m.success = m.get_y_value (4,1); /* Player */ 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_y_value (1,6); /* X1 */ m.get_v_varia (7); /* Unknown */ m.get_v_varia (8); /* Unknown */ m.get_x_varia (22,9); /* Dist */ m.get_v_varia (10); /* Unknown */ m.get_v_varia (11); /* Unknown */ m.get_v_varia (12); /* Unknown */ m.get_atom (run_to_ball__0,13); m.cut_level (0); m.end_head (); break; case 11: // goal: _G8577>kickableDistance m.put_x_value (22,1); /* 'Dist' */ m.put_z_value (5,2); /* kickableDistance */ m.call (dlplib.op_cmp_gt_2); /*6*/ break; case 12: // goal: getFieldAreaInformation(_G8569, _G8596, _G8597, _G8598, _G8599) m.put_y_value (4,1); /* 'Player' */ m.put_v_varia (2); /* 'Unknown' */ m.put_v_varia (3); /* 'Unknown' */ m.put_y_value (3,4); /* 'FieldMin' */ m.put_y_value (2,5); /* 'FieldMax' */ m.call (5) /*2*/; /* getFieldAreaInformation_5 */ break; case 13: // goal: _G8598=<_G8574 m.put_y_value (3,1); /* 'FieldMin' */ m.put_y_value (1,2); /* 'X1' */ m.call (dlplib.op_cmp_le_2); /*6*/ break; case 14: // goal: _G8599>=_G8574 m.put_y_value (2,1); /* 'FieldMax' */ m.put_y_value (1,2); /* 'X1' */ m.call (dlplib.op_cmp_ge_2); /*6*/ break; case 15: // goal: ! m.cut_tail (0); m.deallocate (); break; case 16: m.end_rule (); break; // head: findHowtoReact(_G14645, _G14646, _G14647, _G14648, _G14649, _G14650, _G14651, _G14652, _G14653, _G14654, _G14655, _G14656, move_around) case 17: m.retry_me_else (23); m.allocate (4); //m.success = m.get_y_value (3,1); /* Player */ 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_y_value (2,6); /* X1 */ m.get_v_varia (7); /* Unknown */ m.get_v_varia (8); /* Unknown */ m.get_x_varia (22,9); /* Dist */ m.get_v_varia (10); /* Unknown */ m.get_v_varia (11); /* Unknown */ m.get_v_varia (12); /* Unknown */ m.get_atom (move_around__0,13); m.cut_level (0); m.end_head (); break; case 18: // goal: _G14653>kickableDistance m.put_x_value (22,1); /* 'Dist' */ m.put_z_value (5,2); /* kickableDistance */ m.call (dlplib.op_cmp_gt_2); /*6*/ break; case 19: // goal: getFieldAreaInformation(_G14645, _G14672, _G14673, _G14674, _G14675) m.put_y_value (3,1); /* 'Player' */ m.put_v_varia (2); /* 'Unknown' */ m.put_v_varia (3); /* 'Unknown' */ m.put_y_value (1,4); /* 'FieldMin' */ m.put_v_varia (5); /* 'Unknown' */ m.call (5) /*2*/; /* getFieldAreaInformation_5 */ break; case 20: // goal: _G14650<_G14674 m.put_y_value (2,1); /* 'X1' */ m.put_y_value (1,2); /* 'FieldMin' */ m.call (dlplib.op_cmp_lt_2); /*6*/ break; case 21: // goal: ! m.cut_tail (0); m.deallocate (); break; case 22: m.end_rule (); break; // head: findHowtoReact(_G20340, _G20341, _G20342, _G20343, _G20344, _G20345, _G20346, _G20347, _G20348, _G20349, _G20350, _G20351, move_around) case 23: m.retry_me_else (29); m.allocate (4); //m.success = m.get_y_value (3,1); /* Player */ 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_y_value (2,6); /* X1 */ m.get_v_varia (7); /* Unknown */ m.get_v_varia (8); /* Unknown */ m.get_x_varia (22,9); /* Dist */ m.get_v_varia (10); /* Unknown */ m.get_v_varia (11); /* Unknown */ m.get_v_varia (12); /* Unknown */ m.get_atom (move_around__0,13); m.cut_level (0); m.end_head (); break; case 24: // goal: _G20348>kickableDistance m.put_x_value (22,1); /* 'Dist' */ m.put_z_value (5,2); /* kickableDistance */ m.call (dlplib.op_cmp_gt_2); /*6*/ break; case 25: // goal: getFieldAreaInformation(_G20340, _G20367, _G20368, _G20369, _G20370) m.put_y_value (3,1); /* 'Player' */ m.put_v_varia (2); /* 'Unknown' */ m.put_v_varia (3); /* 'Unknown' */ m.put_v_varia (4); /* 'Unknown' */ m.put_y_value (1,5); /* 'FieldMax' */ m.call (5) /*2*/; /* getFieldAreaInformation_5 */ break; case 26: // goal: _G20345>_G20370 m.put_y_value (2,1); /* 'X1' */ m.put_y_value (1,2); /* 'FieldMax' */ m.call (dlplib.op_cmp_gt_2); /*6*/ break; case 27: // goal: ! m.cut_tail (0); m.deallocate (); break; case 28: m.end_rule (); break; // head: findHowtoReact(_G25832, _G25833, _G25834, _G25835, _G25836, _G25837, _G25838, _G25839, _G25840, _G25841, _G25842, _G25843, _G25844) case 29: 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.get_v_varia (10); /* Unknown */ m.get_v_varia (11); /* Unknown */ m.get_v_varia (12); /* Unknown */ m.get_v_varia (13); /* Unknown */ m.end_head (); break; case 30: m.end_fact (); break; } // switch return m.success; } // soccerPlayerServerAgent:findHowtoReact/13 exec() // soccerPlayerServerAgent:findHowtoReact/13 decls. public SymbolDescriptor shooting__0; public SymbolDescriptor passing__0; public SymbolDescriptor run_to_ball__0; public SymbolDescriptor move_around__0; // end of soccerPlayerServerAgent:findHowtoReact/13 decls. public boolean init (DLP m) { shooting__0 = m.define_symbol ("shooting".intern(), 0); passing__0 = m.define_symbol ("passing".intern(), 0); run_to_ball__0 = m.define_symbol ("run_to_ball".intern(), 0); move_around__0 = m.define_symbol ("move_around".intern(), 0); return true; } // soccerPlayerServerAgent:findHowtoReact/13 init() } // soccerPlayerServerAgent:findHowtoReact/13 final class soccerPlayerServerAgent_getFieldAreaInformation_5 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: getFieldAreaInformation(_G110, _G111, _G112, _G113, _G114) case 0: m.allocate (5); //m.success = m.get_y_value (4,1); /* Player */ m.get_y_value (3,2); /* Team */ m.get_y_value (2,3); /* Role */ m.get_y_value (1,4); /* FieldMin */ m.get_y_value (0,5); /* FieldMax */ m.end_head (); break; case 1: // goal: playerRole(_G110, _G112) m.put_y_value (4,1); /* 'Player' */ m.put_y_value (2,2); /* 'Role' */ m.call (16) /*2*/; /* playerRole_2 */ break; case 2: // goal: team(_G111, _G110) m.put_y_value (3,1); /* 'Team' */ m.put_y_value (4,2); /* 'Player' */ m.call (15) /*2*/; /* team_2 */ break; case 3: // goal: fieldArea(_G111, _G112, _G113, _G114) m.put_y_value (3,1); /* 'Team' */ m.put_y_value (2,2); /* 'Role' */ m.put_y_value (1,3); /* 'FieldMin' */ m.put_y_value (0,4); /* 'FieldMax' */ m.deallocate (); m.exec (18); /* fieldArea_4 */ break; case 4: m.end_rule (); break; } // switch return m.success; } // soccerPlayerServerAgent:getFieldAreaInformation/5 exec() // soccerPlayerServerAgent:getFieldAreaInformation/5 decls. // end of soccerPlayerServerAgent:getFieldAreaInformation/5 decls. public boolean init (DLP m) { return true; } // soccerPlayerServerAgent:getFieldAreaInformation/5 init() } // soccerPlayerServerAgent:getFieldAreaInformation/5 final class soccerPlayerServerAgent_doAction_13 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: doAction(shooting, _G111, _G112, _G113, _G114, _G115, _G116, _G117, _G118, _G119, _G120, _G121, _G122) case 0: m.try_me_else (4); m.allocate (0); //m.success = m.get_atom (shooting__0,1); m.get_v_varia (2); /* Unknown */ m.get_x_varia (17,3); /* Ball */ m.get_v_varia (4); /* Unknown */ m.get_v_varia (5); /* Unknown */ m.get_v_varia (6); /* Unknown */ m.get_x_varia (21,7); /* X1 */ m.get_x_varia (22,8); /* Y1 */ m.get_x_varia (23,9); /* Z1 */ m.get_v_varia (10); /* Unknown */ m.get_x_varia (25,11); /* Xgoal */ m.get_x_varia (26,12); /* Zgoal */ m.get_x_varia (27,13); /* Dist1 */ m.cut_neck (); m.end_head (); break; case 1: // goal: kick_ball_to_position(_G112, _G116, _G117, _G118, _G120, 0, _G121, _G122) m.put_x_value (17,1); /* 'Ball' */ m.put_x_value (21,2); /* 'X1' */ m.put_x_value (22,3); /* 'Y1' */ m.put_x_value (23,4); /* 'Z1' */ m.put_x_value (25,5); /* 'Xgoal' */ m.put_float (0f,6); m.put_x_value (26,7); /* 'Zgoal' */ m.put_x_value (27,8); /* 'Dist1' */ m.call (11) /*2*/; /* kick_ball_to_position_8 */ break; case 2: // goal: true m.deallocate (); m.exec (dlplib.true_0); break; case 3: m.end_rule (); break; // head: doAction(passing, _G4898, _G4899, _G4900, _G4901, _G4902, _G4903, _G4904, _G4905, _G4906, _G4907, _G4908, _G4909) case 4: m.retry_me_else (9); m.allocate (11); //m.success = m.get_atom (passing__0,1); m.get_y_value (10,2); /* Player */ m.get_y_value (9,3); /* Ball */ m.get_y_value (8,4); /* X */ m.get_y_value (7,5); /* Y */ m.get_y_value (6,6); /* Z */ m.get_y_value (5,7); /* X1 */ m.get_y_value (4,8); /* Y1 */ m.get_y_value (3,9); /* Z1 */ m.get_v_varia (10); /* Unknown */ m.get_v_varia (11); /* Unknown */ m.get_v_varia (12); /* Unknown */ m.get_v_varia (13); /* Unknown */ m.cut_neck (); m.end_head (); break; case 5: // goal: findCoTeammate(_G4898, _G4900, _G4901, _G4902, _G4924, _G4925, _G4926, _G4927, _G4928) m.put_y_value (10,1); /* 'Player' */ m.put_y_value (8,2); /* 'X' */ m.put_y_value (7,3); /* 'Y' */ m.put_y_value (6,4); /* 'Z' */ m.put_y_value (2,5); /* 'Teammate' */ m.put_y_value (1,6); /* 'X2' */ m.put_v_varia (7); /* 'Unknown' */ m.put_y_value (0,8); /* 'Z2' */ m.put_v_varia (9); /* 'Unknown' */ m.call (24) /*2*/; /* findCoTeammate_9 */ break; case 6: // goal: doPassing(_G4898, _G4899, _G4900, _G4901, _G4902, _G4903, _G4904, _G4905, _G4924, _G4925, _G4943, _G4927) m.put_y_value (10,1); /* 'Player' */ m.put_y_value (9,2); /* 'Ball' */ m.put_y_value (8,3); /* 'X' */ m.put_y_value (7,4); /* 'Y' */ m.put_y_value (6,5); /* 'Z' */ m.put_y_value (5,6); /* 'X1' */ m.put_y_value (4,7); /* 'Y1' */ m.put_y_value (3,8); /* 'Z1' */ m.put_y_value (2,9); /* 'Teammate' */ m.put_y_value (1,10); /* 'X2' */ m.put_v_varia (11); /* 'Unknown' */ m.put_y_value (0,12); /* 'Z2' */ m.call (7) /*2*/; /* doPassing_12 */ break; case 7: // goal: true m.deallocate (); m.exec (dlplib.true_0); break; case 8: m.end_rule (); break; // head: doAction(run_to_ball, _G12107, _G12108, _G12109, _G12110, _G12111, _G12112, _G12113, _G12114, _G12115, _G12116, _G12117, _G12118) case 9: m.retry_me_else (12); //m.success = m.get_atom (run_to_ball__0,1); m.get_x_varia (16,2); /* Player */ m.get_x_varia (17,3); /* Ball */ m.get_x_varia (18,4); /* X */ m.get_x_varia (19,5); /* Y */ m.get_x_varia (20,6); /* Z */ m.get_v_varia (7); /* Unknown */ m.get_v_varia (8); /* Unknown */ m.get_v_varia (9); /* Unknown */ m.get_v_varia (10); /* Unknown */ m.get_v_varia (11); /* Unknown */ m.get_v_varia (12); /* Unknown */ m.get_v_varia (13); /* Unknown */ m.cut_neck (); m.end_head (); break; case 10: // goal: run_and_trace(_G12107, _G12108, _G12109, _G12110, _G12111, kickableDistance, runableDistance, runstep, runSleepTime) m.put_x_value (16,1); /* 'Player' */ m.put_x_value (17,2); /* 'Ball' */ m.put_x_value (18,3); /* 'X' */ m.put_x_value (19,4); /* 'Y' */ m.put_x_value (20,5); /* 'Z' */ m.put_z_value (5,6); /* kickableDistance */ m.put_z_value (6,7); /* runableDistance */ m.put_z_value (1,8); /* runstep */ m.put_z_value (2,9); /* runSleepTime */ m.exec (13); /* run_and_trace_9 */ break; case 11: m.end_rule (); break; // head: doAction(move_around, _G16563, _G16564, _G16565, _G16566, _G16567, _G16568, _G16569, _G16570, _G16571, _G16572, _G16573, _G16574) case 12: m.retry_me_else (17); m.allocate (8); //m.success = m.get_atom (move_around__0,1); m.get_y_value (7,2); /* Player */ m.get_v_varia (3); /* Unknown */ m.get_y_value (6,4); /* X */ m.get_y_value (5,5); /* Y */ m.get_y_value (4,6); /* Z */ m.get_v_varia (7); /* Unknown */ m.get_v_varia (8); /* Unknown */ m.get_v_varia (9); /* Unknown */ m.get_v_varia (10); /* Unknown */ m.get_v_varia (11); /* Unknown */ m.get_v_varia (12); /* Unknown */ m.get_v_varia (13); /* Unknown */ m.cut_neck (); m.end_head (); break; case 13: // goal: defaultPositionRotation(_G16563, position(_G16589, _G16590, _G16591), _G16587) m.put_y_value (7,1); /* 'Player' */ m.put_struct (position__3,2); m.set_y_value (3); /* 'X1' */ m.set_y_value (2); /* 'Y1' */ m.set_y_value (1); /* 'Z1' */ m.put_v_varia (3); /* 'Unknown' */ m.call (0) /*2*/; /* defaultPositionRotation_3 */ break; case 14: // goal: distance2d(_G16565, _G16567, _G16589, _G16591, _G16600) m.put_y_value (6,1); /* 'X' */ m.put_y_value (4,2); /* 'Z' */ m.put_y_value (3,3); /* 'X1' */ m.put_y_value (1,4); /* 'Z1' */ m.put_y_value (0,5); /* 'Dist' */ m.call (28) /*2*/; /* distance2d_5 */ break; case 15: // goal: run_to_position(_G16563, _G16565, _G16566, _G16567, _G16589, _G16590, _G16591, _G16600) m.put_y_value (7,1); /* 'Player' */ m.put_y_value (6,2); /* 'X' */ m.put_y_value (5,3); /* 'Y' */ m.put_y_value (4,4); /* 'Z' */ m.put_y_value (3,5); /* 'X1' */ m.put_y_value (2,6); /* 'Y1' */ m.put_y_value (1,7); /* 'Z1' */ m.put_y_value (0,8); /* 'Dist' */ m.deallocate (); m.exec (12); /* run_to_position_8 */ break; case 16: m.end_rule (); break; // head: doAction(do_nothing, _G23768, _G23769, _G23770, _G23771, _G23772, _G23773, _G23774, _G23775, _G23776, _G23777, _G23778, _G23779) case 17: m.retry_me_else (19); //m.success = m.get_atom (do_nothing__0,1); 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.get_v_varia (10); /* Unknown */ m.get_v_varia (11); /* Unknown */ m.get_v_varia (12); /* Unknown */ m.get_v_varia (13); /* Unknown */ m.cut_neck (); m.end_head (); break; case 18: m.end_fact (); break; // head: doAction(_G27156, _G27157, _G27158, _G27159, _G27160, _G27161, _G27162, _G27163, _G27164, _G27165, _G27166, _G27167, _G27168) case 19: m.trust_or_fail (); //m.success = m.get_x_varia (16,1); /* Action */ 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.get_v_varia (10); /* Unknown */ m.get_v_varia (11); /* Unknown */ m.get_v_varia (12); /* Unknown */ m.get_v_varia (13); /* Unknown */ m.end_head (); break; case 20: // goal: format('~n~w : unknown action = ~w~n', [this, _G27156]) m.put_list (29); m.set_x_value (16); /* 'Action' */ m.set_nil (); m.put_atom (data__19__0,1); m.put_list (2); m.set_this (); m.set_x_value (29); /* 'Xtmp' */ m.exec (dlplib.format_2); break; case 21: m.end_rule (); break; } // switch return m.success; } // soccerPlayerServerAgent:doAction/13 exec() // soccerPlayerServerAgent:doAction/13 decls. public SymbolDescriptor shooting__0; public SymbolDescriptor passing__0; public SymbolDescriptor run_to_ball__0; public SymbolDescriptor move_around__0; public SymbolDescriptor position__3; public SymbolDescriptor do_nothing__0; public SymbolDescriptor data__19__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor this__0; public SymbolDescriptor sl_sr__0; // end of soccerPlayerServerAgent:doAction/13 decls. public boolean init (DLP m) { shooting__0 = m.define_symbol ("shooting".intern(), 0); passing__0 = m.define_symbol ("passing".intern(), 0); run_to_ball__0 = m.define_symbol ("run_to_ball".intern(), 0); move_around__0 = m.define_symbol ("move_around".intern(), 0); position__3 = m.define_symbol ("position".intern(), 3); do_nothing__0 = m.define_symbol ("do_nothing".intern(), 0); data__19__0 = m.define_symbol ("~n~w : unknown action = ~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; } // soccerPlayerServerAgent:doAction/13 init() } // soccerPlayerServerAgent:doAction/13 final class soccerPlayerServerAgent_doPassing_12 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: doPassing(_G110, _G111, _G112, _G113, _G114, _G115, _G116, _G117, _G118, _G119, _G120, _G121) case 0: m.try_me_else (5); m.allocate (9); //m.success = m.get_y_value (8,1); /* Player */ m.get_y_value (7,2); /* Ball */ m.get_y_value (6,3); /* X */ m.get_v_varia (4); /* Unknown */ m.get_v_varia (5); /* Unknown */ m.get_y_value (5,6); /* X1 */ m.get_y_value (4,7); /* Y1 */ m.get_y_value (3,8); /* Z1 */ m.get_x_varia (17,9); /* Teammate */ m.get_y_value (2,10); /* X2 */ m.get_v_varia (11); /* Unknown */ m.get_y_value (1,12); /* Z2 */ m.cut_level (0); m.end_head (); break; case 1: // goal: nonvar(_G118) m.put_x_value (17,1); /* 'Teammate' */ m.call (dlplib.nonvar_1); /*6*/ break; case 2: // goal: kickBalltoDirection(_G110, _G111, _G112, _G137, _G138, _G115, _G116, _G117, _G119, _G143, _G121) m.put_y_value (8,1); /* 'Player' */ m.put_y_value (7,2); /* 'Ball' */ m.put_y_value (6,3); /* 'X' */ m.put_v_varia (4); /* 'Unknown' */ m.put_v_varia (5); /* 'Unknown' */ m.put_y_value (5,6); /* 'X1' */ m.put_y_value (4,7); /* 'Y1' */ m.put_y_value (3,8); /* 'Z1' */ m.put_y_value (2,9); /* 'X2' */ m.put_v_varia (10); /* 'Unknown' */ m.put_y_value (1,11); /* 'Z2' */ m.call (8) /*2*/; /* kickBalltoDirection_11 */ break; case 3: // goal: ! m.cut_tail (0); m.deallocate (); break; case 4: m.end_rule (); break; // head: doPassing(_G5858, _G5859, _G5860, _G5861, _G5862, _G5863, _G5864, _G5865, _G5866, _G5867, _G5868, _G5869) case 5: m.trust_or_fail (); m.allocate (10); //m.success = m.get_y_value (8,1); /* Player */ m.get_y_value (7,2); /* Ball */ m.get_y_value (6,3); /* X */ m.get_v_varia (4); /* Unknown */ m.get_v_varia (5); /* Unknown */ m.get_y_value (5,6); /* X1 */ m.get_y_value (4,7); /* Y1 */ m.get_y_value (3,8); /* Z1 */ m.get_x_varia (17,9); /* Teammate */ m.get_v_varia (10); /* Unknown */ m.get_v_varia (11); /* Unknown */ m.get_v_varia (12); /* Unknown */ m.cut_level (0); m.end_head (); break; case 6: // goal: var _G5866 m.put_x_value (17,1); /* 'Teammate' */ m.call (dlplib.var_1); /*6*/ break; case 7: // goal: team(_G5882, _G5858) m.put_y_value (9,1); /* 'Team' */ m.put_y_value (8,2); /* 'Player' */ m.call (15) /*2*/; /* team_2 */ break; case 8: // goal: goalPosition(_G5882, _G5889, _G5890) m.put_y_value (9,1); /* 'Team' */ m.put_y_value (2,2); /* 'X2' */ m.put_y_value (1,3); /* 'Z2' */ m.call (17) /*2*/; /* goalPosition_3 */ break; case 9: // goal: kickBalltoDirection(_G5858, _G5859, _G5860, _G5898, _G5899, _G5863, _G5864, _G5865, _G5889, _G5904, _G5890) m.put_y_value (8,1); /* 'Player' */ m.put_y_value (7,2); /* 'Ball' */ m.put_y_value (6,3); /* 'X' */ m.put_v_varia (4); /* 'Unknown' */ m.put_v_varia (5); /* 'Unknown' */ m.put_y_value (5,6); /* 'X1' */ m.put_y_value (4,7); /* 'Y1' */ m.put_y_value (3,8); /* 'Z1' */ m.put_y_value (2,9); /* 'X2' */ m.put_v_varia (10); /* 'Unknown' */ m.put_y_value (1,11); /* 'Z2' */ m.call (8) /*2*/; /* kickBalltoDirection_11 */ break; case 10: // goal: ! m.cut_tail (0); m.deallocate (); break; case 11: m.end_rule (); break; } // switch return m.success; } // soccerPlayerServerAgent:doPassing/12 exec() // soccerPlayerServerAgent:doPassing/12 decls. // end of soccerPlayerServerAgent:doPassing/12 decls. public boolean init (DLP m) { return true; } // soccerPlayerServerAgent:doPassing/12 init() } // soccerPlayerServerAgent:doPassing/12 final class soccerPlayerServerAgent_kickBalltoDirection_11 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: kickBalltoDirection(_G110, _G111, _G112, _G113, _G114, _G115, _G116, _G117, _G118, _G119, _G120) case 0: m.allocate (11); //m.success = m.get_y_value (7,1); /* Player */ m.get_y_value (1,2); /* Ball */ m.get_y_value (10,3); /* X */ m.get_v_varia (4); /* Unknown */ m.get_v_varia (5); /* Unknown */ m.get_y_value (6,6); /* X1 */ m.get_y_value (5,7); /* Y1 */ m.get_y_value (4,8); /* Z1 */ m.get_x_varia (17,9); /* X2 */ m.get_v_varia (10); /* Unknown */ m.get_x_varia (19,11); /* Z2 */ m.cut_level (8); m.end_head (); break; case 1: // goal: look_at_position(_G110, _G118, _G120) m.put_y_value (7,1); /* 'Player' */ m.put_x_value (17,2); /* 'X2' */ m.put_x_value (19,3); /* 'Z2' */ m.call (29) /*2*/; /* look_at_position_3 */ break; case 2: // goal: getRotation(_G110, _G136, _G137, _G138, _G139) m.put_y_value (7,1); /* 'Player' */ m.put_v_varia (2); /* 'Unknown' */ m.put_v_varia (3); /* 'Unknown' */ m.put_v_varia (4); /* 'Unknown' */ m.put_y_value (9,5); /* 'R' */ m.call (30) /*2*/; /* getRotation_5 */ break; case 3: // goal: getCorrectKickRotation(_G112, _G115, _G139, _G147) m.put_y_value (10,1); /* 'X' */ m.put_y_value (6,2); /* 'X1' */ m.put_y_value (9,3); /* 'R' */ m.put_y_value (3,4); /* 'R1' */ m.call (9) /*2*/; /* getCorrectKickRotation_4 */ break; case 4: // goal: is_eval(kickBallForceY+random*10, _G152) m.put_struct (op__mul__2,23); m.set_atom (random__0); m.set_float (10f); m.put_struct (op__add__2,1); m.set_z_value (11); /* kickBallForceY */ m.set_x_value (23); /* 'Xtmp' */ m.put_y_value (2,2); /* 'KickBallForceY' */ m.call (dlplib.is_eval_2); /*6*/ break; case 5: // goal: ! m.cut_body (8); break; case 6: // goal: _G171=[_G110, _G111, _G115, _G116, _G117, _G147, kickBallForce, _G152] m.put_list (24); m.set_y_value (2); /* 'KickBallForceY' */ m.set_nil (); m.put_list (25); m.set_z_value (10); /* kickBallForce */ m.set_x_value (24); /* 'Xtmp' */ m.put_list (26); m.set_y_value (3); /* 'R1' */ m.set_x_value (25); /* 'Xtmp' */ m.put_list (27); m.set_y_value (4); /* 'Z1' */ m.set_x_value (26); /* 'Xtmp' */ m.put_list (28); m.set_y_value (5); /* 'Y1' */ m.set_x_value (27); /* 'Xtmp' */ m.put_list (29); m.set_y_value (6); /* 'X1' */ m.set_x_value (28); /* 'Xtmp' */ m.put_list (30); m.set_y_value (1); /* 'Ball' */ m.set_x_value (29); /* 'Xtmp' */ m.put_y_value (0,1); /* 'Data' */ m.put_list (2); m.set_y_value (7); /* 'Player' */ m.set_x_value (30); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 7: // goal: set_queue(_G111, [kick_ball, _G171]) m.put_list (31); m.set_y_value (0); /* 'Data' */ m.set_nil (); m.put_y_value (1,1); /* 'Ball' */ m.put_list (2); m.set_atom (kick_ball__0); m.set_x_value (31); /* 'Xtmp' */ m.call (dlplib.set_queue_2); /*6*/ break; case 8: // goal: sleep(200) m.put_int (200,1); m.call (dlplib.sleep_1); /*6*/ break; case 9: // goal: true m.deallocate (); m.exec (dlplib.true_0); break; case 10: m.end_rule (); break; } // switch return m.success; } // soccerPlayerServerAgent:kickBalltoDirection/11 exec() // soccerPlayerServerAgent:kickBalltoDirection/11 decls. public SymbolDescriptor op__add__2; public SymbolDescriptor op__mul__2; public SymbolDescriptor random__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor sl_sr__0; public SymbolDescriptor kick_ball__0; // end of soccerPlayerServerAgent:kickBalltoDirection/11 decls. public boolean init (DLP m) { op__add__2 = m.define_symbol ("+".intern(), 2); op__mul__2 = m.define_symbol ("*".intern(), 2); random__0 = m.define_symbol ("random".intern(), 0); op__dot__2 = m.define_symbol (".".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); kick_ball__0 = m.define_symbol ("kick_ball".intern(), 0); return true; } // soccerPlayerServerAgent:kickBalltoDirection/11 init() } // soccerPlayerServerAgent:kickBalltoDirection/11 final class soccerPlayerServerAgent_getCorrectKickRotation_4 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: getCorrectKickRotation(_G110, _G111, _G112, _G113) case 0: m.try_me_else (5); m.allocate (3); //m.success = m.get_x_varia (11,1); /* X */ m.get_x_varia (12,2); /* X1 */ m.get_y_value (1,3); /* R */ m.get_y_value (0,4); /* R1 */ m.cut_level (2); m.end_head (); break; case 1: // goal: _G110=<_G111 m.put_x_value (11,1); /* 'X' */ m.put_x_value (12,2); /* 'X1' */ m.call (dlplib.op_cmp_le_2); /*6*/ break; case 2: // goal: ! m.cut_body (2); break; case 3: // goal: is_eval(_G112-1.5708, _G113) m.put_struct (op__sub__2,1); m.set_y_value (1); /* 'R' */ m.set_float (1.5708f); m.put_y_value (0,2); /* 'R1' */ m.deallocate (); m.exec (dlplib.is_eval_2); break; case 4: m.end_rule (); break; // head: getCorrectKickRotation(_G3348, _G3349, _G3350, _G3351) case 5: m.trust_or_fail (); m.allocate (2); //m.success = m.get_x_varia (11,1); /* X */ m.get_x_varia (12,2); /* X1 */ m.get_y_value (1,3); /* R */ m.get_y_value (0,4); /* R1 */ m.end_head (); break; case 6: // goal: _G3348>_G3349 m.put_x_value (11,1); /* 'X' */ m.put_x_value (12,2); /* 'X1' */ m.call (dlplib.op_cmp_gt_2); /*6*/ break; case 7: // goal: is_eval(1.5708-_G3350, _G3351) m.put_struct (op__sub__2,1); m.set_float (1.5708f); m.set_y_value (1); /* 'R' */ m.put_y_value (0,2); /* 'R1' */ m.deallocate (); m.exec (dlplib.is_eval_2); break; case 8: m.end_rule (); break; } // switch return m.success; } // soccerPlayerServerAgent:getCorrectKickRotation/4 exec() // soccerPlayerServerAgent:getCorrectKickRotation/4 decls. public SymbolDescriptor op__sub__2; // end of soccerPlayerServerAgent:getCorrectKickRotation/4 decls. public boolean init (DLP m) { op__sub__2 = m.define_symbol ("-".intern(), 2); return true; } // soccerPlayerServerAgent:getCorrectKickRotation/4 init() } // soccerPlayerServerAgent:getCorrectKickRotation/4 final class soccerPlayerServerAgent_getPositionInformation_12 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: getPositionInformation(_G110, _G111, _G112, _G113, _G114, _G115, _G116, _G117, _G118, _G119, _G120, _G121) case 0: m.allocate (10); //m.success = m.get_y_value (6,1); /* Player */ m.get_x_varia (15,2); /* Ball */ m.get_y_value (5,3); /* X */ m.get_y_value (4,4); /* Y */ m.get_y_value (3,5); /* Z */ m.get_y_value (9,6); /* X1 */ m.get_x_varia (16,7); /* Y1 */ m.get_y_value (8,8); /* Z1 */ m.get_y_value (7,9); /* Dist */ m.get_y_value (2,10); /* Xgoal */ m.get_y_value (1,11); /* Zgoal */ m.get_y_value (0,12); /* Dist1 */ m.end_head (); break; case 1: // goal: get_field(_G111, position, position(_G115, _G116, _G117)) m.put_x_value (15,1); /* 'Ball' */ m.put_atom (position__0,2); m.put_struct (position__3,3); m.set_y_value (9); /* 'X1' */ m.set_x_value (16); /* 'Y1' */ m.set_y_value (8); /* 'Z1' */ m.call (dlplib.get_field_3); /*6*/ break; case 2: // goal: get_field(_G110, position, position(_G112, _G113, _G114)) m.put_y_value (6,1); /* 'Player' */ m.put_atom (position__0,2); m.put_struct (position__3,3); m.set_y_value (5); /* 'X' */ m.set_y_value (4); /* 'Y' */ m.set_y_value (3); /* 'Z' */ m.call (dlplib.get_field_3); /*6*/ break; case 3: // goal: distance2d(_G112, _G114, _G115, _G117, _G118) m.put_y_value (5,1); /* 'X' */ m.put_y_value (3,2); /* 'Z' */ m.put_y_value (9,3); /* 'X1' */ m.put_y_value (8,4); /* 'Z1' */ m.put_y_value (7,5); /* 'Dist' */ m.call (28) /*2*/; /* distance2d_5 */ break; case 4: // goal: distanceGoal(_G110, _G112, _G113, _G114, _G119, _G120, _G121) m.put_y_value (6,1); /* 'Player' */ m.put_y_value (5,2); /* 'X' */ m.put_y_value (4,3); /* 'Y' */ m.put_y_value (3,4); /* 'Z' */ m.put_y_value (2,5); /* 'Xgoal' */ m.put_y_value (1,6); /* 'Zgoal' */ m.put_y_value (0,7); /* 'Dist1' */ m.deallocate (); m.exec (23); /* distanceGoal_7 */ break; case 5: m.end_rule (); break; } // switch return m.success; } // soccerPlayerServerAgent:getPositionInformation/12 exec() // soccerPlayerServerAgent:getPositionInformation/12 decls. public SymbolDescriptor position__0; public SymbolDescriptor position__3; // end of soccerPlayerServerAgent:getPositionInformation/12 decls. public boolean init (DLP m) { position__0 = m.define_symbol ("position".intern(), 0); position__3 = m.define_symbol ("position".intern(), 3); return true; } // soccerPlayerServerAgent:getPositionInformation/12 init() } // soccerPlayerServerAgent:getPositionInformation/12 final class soccerPlayerServerAgent_kick_ball_to_position_8 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: kick_ball_to_position(_G110, _G111, _G112, _G113, _G114, _G115, _G116, _G117) case 0: m.allocate (11); //m.success = m.get_y_value (7,1); /* Ball */ m.get_y_value (6,2); /* X */ m.get_y_value (5,3); /* Y */ m.get_y_value (4,4); /* Z */ m.get_y_value (3,5); /* X1 */ m.get_y_value (2,6); /* Y1 */ m.get_y_value (1,7); /* Z1 */ m.get_y_value (0,8); /* Dist */ m.end_head (); break; case 1: // goal: _G125=[_G110, _G111, _G112, _G113, _G114, _G115, _G116, _G117] m.put_list (13); m.set_y_value (0); /* 'Dist' */ m.set_nil (); m.put_list (14); m.set_y_value (1); /* 'Z1' */ m.set_x_value (13); /* 'Xtmp' */ m.put_list (15); m.set_y_value (2); /* 'Y1' */ m.set_x_value (14); /* 'Xtmp' */ m.put_list (16); m.set_y_value (3); /* 'X1' */ m.set_x_value (15); /* 'Xtmp' */ m.put_list (17); m.set_y_value (4); /* 'Z' */ m.set_x_value (16); /* 'Xtmp' */ m.put_list (18); m.set_y_value (5); /* 'Y' */ m.set_x_value (17); /* 'Xtmp' */ m.put_list (19); m.set_y_value (6); /* 'X' */ m.set_x_value (18); /* 'Xtmp' */ m.put_y_value (10,1); /* 'Data' */ m.put_list (2); m.set_y_value (7); /* 'Ball' */ m.set_x_value (19); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 2: // goal: _G155=[tell, move_ball, _G125] m.put_list (20); m.set_y_value (10); /* 'Data' */ m.set_nil (); m.put_list (21); m.set_atom (move_ball__0); m.set_x_value (20); /* 'Xtmp' */ m.put_y_value (8,1); /* 'Message' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (21); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 3: // goal: local_host(_G170, _G171) m.put_y_value (9,1); /* 'Host' */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.local_host_2); /*6*/ break; case 4: // goal: <-(this, gg_echo, broadcast(_G170, _G110, _G155)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_y_value (9); /* 'Host' */ m.set_y_value (7); /* 'Ball' */ m.set_y_value (8); /* 'Message' */ m.call (dlplib.op_call_3); /*6*/ break; case 5: // goal: move_to_position(_G110, translation, ballstep, ballSleepTime, _G111, _G112, _G113, _G114, _G115, _G116, _G117) m.put_y_value (7,1); /* 'Ball' */ m.put_atom (translation__0,2); m.put_z_value (3,3); /* ballstep */ m.put_z_value (4,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); /* 'X1' */ m.put_y_value (2,9); /* 'Y1' */ m.put_y_value (1,10); /* 'Z1' */ m.put_y_value (0,11); /* 'Dist' */ m.deallocate (); m.exec (31); /* move_to_position_11 */ break; case 6: m.end_rule (); break; } // switch return m.success; } // soccerPlayerServerAgent:kick_ball_to_position/8 exec() // soccerPlayerServerAgent:kick_ball_to_position/8 decls. public SymbolDescriptor op__dot__2; public SymbolDescriptor sl_sr__0; public SymbolDescriptor tell__0; public SymbolDescriptor move_ball__0; public SymbolDescriptor this__0; public SymbolDescriptor gg_echo__0; public SymbolDescriptor broadcast__3; public SymbolDescriptor translation__0; // end of soccerPlayerServerAgent:kick_ball_to_position/8 decls. public boolean init (DLP m) { op__dot__2 = m.define_symbol (".".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); tell__0 = m.define_symbol ("tell".intern(), 0); move_ball__0 = m.define_symbol ("move_ball".intern(), 0); this__0 = m.define_symbol ("this".intern(), 0); gg_echo__0 = m.define_symbol ("gg_echo".intern(), 0); broadcast__3 = m.define_symbol ("broadcast".intern(), 3); translation__0 = m.define_symbol ("translation".intern(), 0); return true; } // soccerPlayerServerAgent:kick_ball_to_position/8 init() } // soccerPlayerServerAgent:kick_ball_to_position/8 final class soccerPlayerServerAgent_run_to_position_8 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: run_to_position(_G110, _G111, _G112, _G113, _G111, _G115, _G113, _G117) case 0: m.try_me_else (2); //m.success = m.get_v_varia (1); /* Unknown */ m.get_x_varia (14,2); /* X */ m.get_v_varia (3); /* Unknown */ m.get_x_varia (16,4); /* Z */ m.get_x_value (14,5); /* X */ m.get_v_varia (6); /* Unknown */ m.get_x_value (16,7); /* Z */ m.get_v_varia (8); /* Unknown */ m.cut_neck (); m.end_head (); break; case 1: m.end_fact (); break; // head: run_to_position(_G2630, _G2631, _G2632, _G2633, _G2634, _G2635, _G2636, _G2637) case 2: m.retry_me_else (11); m.allocate (12); //m.success = m.get_y_value (10,1); /* Player */ m.get_y_value (9,2); /* X */ m.get_y_value (8,3); /* Y */ m.get_y_value (7,4); /* Z */ m.get_y_value (6,5); /* X1 */ m.get_y_value (5,6); /* Y1 */ m.get_y_value (4,7); /* Z1 */ m.get_y_value (3,8); /* Dist */ m.cut_level (11); m.end_head (); break; case 3: // goal: look_at_position(_G2630, _G2634, _G2636) m.put_y_value (10,1); /* 'Player' */ m.put_y_value (6,2); /* 'X1' */ m.put_y_value (4,3); /* 'Z1' */ m.call (29) /*2*/; /* look_at_position_3 */ break; case 4: // goal: ! m.cut_body (11); break; case 5: // goal: move_to_position(_G2630, set_position, runstep, runSleepTime, _G2631, _G2632, _G2633, _G2634, _G2635, _G2636, _G2637) m.put_y_value (10,1); /* 'Player' */ m.put_atom (set_position__0,2); m.put_z_value (1,3); /* runstep */ m.put_z_value (2,4); /* runSleepTime */ m.put_y_value (9,5); /* 'X' */ m.put_y_value (8,6); /* 'Y' */ m.put_y_value (7,7); /* 'Z' */ m.put_y_value (6,8); /* 'X1' */ m.put_y_value (5,9); /* 'Y1' */ m.put_y_value (4,10); /* 'Z1' */ m.put_y_value (3,11); /* 'Dist' */ m.call (31) /*2*/; /* move_to_position_11 */ break; case 6: // goal: local_host(_G2670, _G2671) m.put_y_value (1,1); /* 'Host' */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.local_host_2); /*6*/ break; case 7: // goal: _G2676=[user(_G2670, _G2630), _G2631, _G2632, _G2633, _G2634, _G2635, _G2636, _G2637] m.put_list (14); m.set_y_value (3); /* 'Dist' */ m.set_nil (); m.put_list (15); m.set_y_value (4); /* 'Z1' */ m.set_x_value (14); /* 'Xtmp' */ m.put_list (16); m.set_y_value (5); /* 'Y1' */ m.set_x_value (15); /* 'Xtmp' */ m.put_list (17); m.set_y_value (6); /* 'X1' */ m.set_x_value (16); /* 'Xtmp' */ m.put_list (18); m.set_y_value (7); /* 'Z' */ m.set_x_value (17); /* 'Xtmp' */ m.put_list (19); m.set_y_value (8); /* 'Y' */ m.set_x_value (18); /* 'Xtmp' */ m.put_struct (user__2,20); m.set_y_value (1); /* 'Host' */ m.set_y_value (10); /* 'Player' */ m.put_list (21); m.set_y_value (9); /* 'X' */ m.set_x_value (19); /* 'Xtmp' */ m.put_y_value (2,1); /* 'Data' */ m.put_list (2); m.set_x_value (20); /* 'Xtmp' */ m.set_x_value (21); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 8: // goal: _G2709=[tell, move_player, _G2676] m.put_list (22); m.set_y_value (2); /* 'Data' */ m.set_nil (); m.put_list (23); m.set_atom (move_player__0); m.set_x_value (22); /* 'Xtmp' */ m.put_y_value (0,1); /* 'Message' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (23); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 9: // goal: <-(this, gg_echo, broadcast(_G2670, to_all_clients, _G2709)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_y_value (1); /* 'Host' */ m.set_atom (to_all_clients__0); m.set_y_value (0); /* 'Message' */ m.deallocate (); m.exec (dlplib.op_call_3); break; case 10: m.end_rule (); break; // head: run_to_position(_G13883, _G13884, _G13885, _G13886, _G13887, _G13888, _G13889, _G13890) case 11: m.trust_or_fail (); //m.success = m.get_x_varia (13,1); /* Player */ 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.end_head (); break; case 12: // goal: format('~w RUN TO POSITION FAILS~n', [_G13883]) m.put_atom (data__20__0,1); m.put_list (2); m.set_x_value (13); /* 'Player' */ m.set_nil (); m.exec (dlplib.format_2); break; case 13: m.end_rule (); break; } // switch return m.success; } // soccerPlayerServerAgent:run_to_position/8 exec() // soccerPlayerServerAgent:run_to_position/8 decls. public SymbolDescriptor set_position__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor user__2; public SymbolDescriptor sl_sr__0; public SymbolDescriptor tell__0; public SymbolDescriptor move_player__0; public SymbolDescriptor this__0; public SymbolDescriptor gg_echo__0; public SymbolDescriptor broadcast__3; public SymbolDescriptor to_all_clients__0; public SymbolDescriptor data__20__0; // end of soccerPlayerServerAgent:run_to_position/8 decls. public boolean init (DLP m) { set_position__0 = m.define_symbol ("set_position".intern(), 0); op__dot__2 = m.define_symbol (".".intern(), 2); user__2 = m.define_symbol ("user".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); tell__0 = m.define_symbol ("tell".intern(), 0); move_player__0 = m.define_symbol ("move_player".intern(), 0); this__0 = m.define_symbol ("this".intern(), 0); gg_echo__0 = m.define_symbol ("gg_echo".intern(), 0); broadcast__3 = m.define_symbol ("broadcast".intern(), 3); to_all_clients__0 = m.define_symbol ("to_all_clients".intern(), 0); data__20__0 = m.define_symbol ("~w RUN TO POSITION FAILS~n".intern(), 0); return true; } // soccerPlayerServerAgent:run_to_position/8 init() } // soccerPlayerServerAgent:run_to_position/8 final class soccerPlayerServerAgent_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 (22); m.allocate (20); //m.success = m.get_y_value (9,1); /* Player */ m.get_y_value (13,2); /* Ball */ m.get_y_value (16,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: _G126=[user(_G132, _G110), _G111, _G112, _G113, _G114, _G115, _G116, _G117, _G118] m.put_list (14); m.set_y_value (14); /* 'RunSleepTime' */ m.set_nil (); m.put_list (15); m.set_y_value (11); /* 'Runstep' */ m.set_x_value (14); /* 'Xtmp' */ m.put_list (16); m.set_y_value (1); /* 'Dist' */ m.set_x_value (15); /* 'Xtmp' */ m.put_list (17); m.set_y_value (2); /* 'KickableDistance' */ m.set_x_value (16); /* 'Xtmp' */ m.put_list (18); m.set_y_value (15); /* 'Z' */ m.set_x_value (17); /* 'Xtmp' */ m.put_list (19); m.set_y_value (8); /* 'Y' */ m.set_x_value (18); /* 'Xtmp' */ m.put_list (20); m.set_y_value (16); /* 'X' */ m.set_x_value (19); /* 'Xtmp' */ m.put_struct (user__2,21); m.set_y_value (18); /* 'ServerHost' */ m.set_y_value (9); /* 'Player' */ m.put_list (22); m.set_y_value (13); /* 'Ball' */ m.set_x_value (20); /* 'Xtmp' */ m.put_y_value (19,1); /* 'Data' */ m.put_list (2); m.set_x_value (21); /* 'Xtmp' */ m.set_x_value (22); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 2: // goal: _G162=[tell, run_and_trace, _G126] m.put_list (23); m.set_y_value (19); /* 'Data' */ m.set_nil (); m.put_list (24); m.set_atom (run_and_trace__0); m.set_x_value (23); /* 'Xtmp' */ m.put_y_value (17,1); /* 'Message' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (24); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 3: // goal: <-(this, gg_echo, broadcast(_G132, to_all_clients, _G162)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_y_value (18); /* 'ServerHost' */ m.set_atom (to_all_clients__0); m.set_y_value (17); /* 'Message' */ m.call (dlplib.op_call_3); /*6*/ break; case 4: // goal: assign_nlv_term(this, nreg, 14, _G112) m.put_this (1); m.put_nreg (2); m.put_int (14,3); m.put_y_value (16,4); /* 'X' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 5: // goal: assign_nlv_term(this, nreg, 15, _G114) m.put_this (1); m.put_nreg (2); m.put_int (15,3); m.put_y_value (15,4); /* 'Z' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 6: // goal: repeat m.call (dlplib.repeat_0); /*6*/ break; case 7: // goal: sleep(_G118) m.put_y_value (14,1); /* 'RunSleepTime' */ m.call (dlplib.sleep_1); /*6*/ break; case 8: // goal: getPosition(_G111, _G208, _G209, _G210) 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 (32) /*2*/; /* getPosition_4 */ break; case 9: // goal: look_at_position(_G110, _G208, _G210) m.put_y_value (9,1); /* 'Player' */ m.put_y_value (5,2); /* 'X1' */ m.put_y_value (4,3); /* 'Z1' */ m.call (29) /*2*/; /* look_at_position_3 */ break; case 10: // goal: getRotation(_G110, _G223, _G224, _G225, _G226) 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 (30) /*2*/; /* getRotation_5 */ break; case 11: // goal: is_eval(_G226+1.5708, _G231) 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 12: // goal: is_eval(xold-_G117*cos(_G231), _G244) m.put_struct (cos__1,29); m.set_y_value (10); /* 'R1' */ m.put_struct (op__mul__2,30); m.set_y_value (11); /* 'Runstep' */ m.set_x_value (29); /* 'Xtmp' */ m.put_struct (op__sub__2,1); m.set_z_value (14); /* xold */ m.set_x_value (30); /* 'Xtmp' */ m.put_y_value (7,2); /* 'Xnew' */ m.call (dlplib.is_eval_2); /*6*/ break; case 13: // goal: is_eval(zold+_G117*sin(_G231), _G258) m.put_struct (sin__1,31); m.set_y_value (10); /* 'R1' */ m.put_struct (op__mul__2,32); m.set_y_value (11); /* 'Runstep' */ m.set_x_value (31); /* 'Xtmp' */ m.put_struct (op__add__2,1); m.set_z_value (15); /* zold */ m.set_x_value (32); /* 'Xtmp' */ m.put_y_value (6,2); /* 'Znew' */ m.call (dlplib.is_eval_2); /*6*/ break; case 14: // goal: setSFVec3f(_G110, set_position, _G244, _G113, _G258) 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 (33) /*2*/; /* setSFVec3f_5 */ break; case 15: // goal: assign_nlv_term(this, nreg, 14, _G244) m.put_this (1); m.put_nreg (2); m.put_int (14,3); m.put_y_value (7,4); /* 'Xnew' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 16: // goal: assign_nlv_term(this, nreg, 15, _G258) m.put_this (1); m.put_nreg (2); m.put_int (15,3); m.put_y_value (6,4); /* 'Znew' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 17: // goal: distance2d(_G244, _G258, _G208, _G210, _G297) 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 (28) /*2*/; /* distance2d_5 */ break; case 18: // goal: assign_nlv_term(this, nreg, 13, _G297) m.put_this (1); m.put_nreg (2); m.put_int (13,3); m.put_y_value (3,4); /* 'Distball' */ m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 19: // goal: end_of_run_and_trace(balldistance, _G115, _G116) m.put_z_value (13,1); /* balldistance */ m.put_y_value (2,2); /* 'KickableDistance' */ m.put_y_value (1,3); /* 'Dist' */ m.call (14) /*2*/; /* end_of_run_and_trace_3 */ break; case 20: // goal: ! m.cut_tail (0); m.deallocate (); break; case 21: m.end_rule (); break; // head: run_and_trace(_G23568, _G23569, _G23570, _G23571, _G23572, _G23573, _G23574, _G23575, _G23576) case 22: m.trust_or_fail (); //m.success = m.get_x_varia (14,1); /* Player */ 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 23: // goal: format('~nRUN_AND_TRACE FAILS : ~w~n', [_G23568]) m.put_atom (data__21__0,1); m.put_list (2); m.set_x_value (14); /* 'Player' */ m.set_nil (); m.exec (dlplib.format_2); break; case 24: m.end_rule (); break; } // switch return m.success; } // soccerPlayerServerAgent:run_and_trace/9 exec() // soccerPlayerServerAgent:run_and_trace/9 decls. public SymbolDescriptor op__dot__2; public SymbolDescriptor user__2; public SymbolDescriptor sl_sr__0; public SymbolDescriptor tell__0; public SymbolDescriptor run_and_trace__0; public SymbolDescriptor this__0; public SymbolDescriptor gg_echo__0; public SymbolDescriptor broadcast__3; public SymbolDescriptor to_all_clients__0; 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; public SymbolDescriptor data__21__0; // end of soccerPlayerServerAgent:run_and_trace/9 decls. public boolean init (DLP m) { op__dot__2 = m.define_symbol (".".intern(), 2); user__2 = m.define_symbol ("user".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); tell__0 = m.define_symbol ("tell".intern(), 0); run_and_trace__0 = m.define_symbol ("run_and_trace".intern(), 0); this__0 = m.define_symbol ("this".intern(), 0); gg_echo__0 = m.define_symbol ("gg_echo".intern(), 0); broadcast__3 = m.define_symbol ("broadcast".intern(), 3); to_all_clients__0 = m.define_symbol ("to_all_clients".intern(), 0); 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); data__21__0 = m.define_symbol ("~nRUN_AND_TRACE FAILS : ~w~n".intern(), 0); return true; } // soccerPlayerServerAgent:run_and_trace/9 init() } // soccerPlayerServerAgent:run_and_trace/9 final class soccerPlayerServerAgent_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; } // soccerPlayerServerAgent:end_of_run_and_trace/3 exec() // soccerPlayerServerAgent:end_of_run_and_trace/3 decls. // end of soccerPlayerServerAgent:end_of_run_and_trace/3 decls. public boolean init (DLP m) { return true; } // soccerPlayerServerAgent:end_of_run_and_trace/3 init() } // soccerPlayerServerAgent:end_of_run_and_trace/3 final class soccerPlayerServerAgent_team_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: team(red, goalKeeper2) case 0: m.try_me_else (2); //m.success = m.get_atom (red__0,1); m.get_atom (goalKeeper2__0,2); m.end_head (); break; case 1: m.end_fact (); break; // head: team(red, red2) case 2: m.retry_me_else (4); //m.success = m.get_atom (red__0,1); m.get_atom (red2__0,2); m.end_head (); break; case 3: m.end_fact (); break; // head: team(red, red3) case 4: m.retry_me_else (6); //m.success = m.get_atom (red__0,1); m.get_atom (red3__0,2); m.end_head (); break; case 5: m.end_fact (); break; // head: team(blue, goalKeeper1) case 6: m.retry_me_else (8); //m.success = m.get_atom (blue__0,1); m.get_atom (goalKeeper1__0,2); m.end_head (); break; case 7: m.end_fact (); break; // head: team(blue, blue8) case 8: m.retry_me_else (10); //m.success = m.get_atom (blue__0,1); m.get_atom (blue8__0,2); m.end_head (); break; case 9: m.end_fact (); break; // head: team(blue, blue7) case 10: m.trust_or_fail (); //m.success = m.get_atom (blue__0,1); m.get_atom (blue7__0,2); m.end_head (); break; case 11: m.end_fact (); break; } // switch return m.success; } // soccerPlayerServerAgent:team/2 exec() // soccerPlayerServerAgent:team/2 decls. public SymbolDescriptor red__0; public SymbolDescriptor goalKeeper2__0; public SymbolDescriptor red2__0; public SymbolDescriptor red3__0; public SymbolDescriptor blue__0; public SymbolDescriptor goalKeeper1__0; public SymbolDescriptor blue8__0; public SymbolDescriptor blue7__0; // end of soccerPlayerServerAgent:team/2 decls. public boolean init (DLP m) { red__0 = m.define_symbol ("red".intern(), 0); goalKeeper2__0 = m.define_symbol ("goalKeeper2".intern(), 0); red2__0 = m.define_symbol ("red2".intern(), 0); red3__0 = m.define_symbol ("red3".intern(), 0); blue__0 = m.define_symbol ("blue".intern(), 0); goalKeeper1__0 = m.define_symbol ("goalKeeper1".intern(), 0); blue8__0 = m.define_symbol ("blue8".intern(), 0); blue7__0 = m.define_symbol ("blue7".intern(), 0); return true; } // soccerPlayerServerAgent:team/2 init() } // soccerPlayerServerAgent:team/2 final class soccerPlayerServerAgent_playerRole_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: playerRole(red2, midfielder) case 0: m.try_me_else (2); //m.success = m.get_atom (red2__0,1); m.get_atom (midfielder__0,2); m.end_head (); break; case 1: m.end_fact (); break; // head: playerRole(red3, forward) case 2: m.retry_me_else (4); //m.success = m.get_atom (red3__0,1); m.get_atom (forward__0,2); m.end_head (); break; case 3: m.end_fact (); break; // head: playerRole(blue7, midfielder) case 4: m.retry_me_else (6); //m.success = m.get_atom (blue7__0,1); m.get_atom (midfielder__0,2); m.end_head (); break; case 5: m.end_fact (); break; // head: playerRole(blue8, forward) case 6: m.trust_or_fail (); //m.success = m.get_atom (blue8__0,1); m.get_atom (forward__0,2); m.end_head (); break; case 7: m.end_fact (); break; } // switch return m.success; } // soccerPlayerServerAgent:playerRole/2 exec() // soccerPlayerServerAgent:playerRole/2 decls. public SymbolDescriptor red2__0; public SymbolDescriptor midfielder__0; public SymbolDescriptor red3__0; public SymbolDescriptor forward__0; public SymbolDescriptor blue7__0; public SymbolDescriptor blue8__0; // end of soccerPlayerServerAgent:playerRole/2 decls. public boolean init (DLP m) { red2__0 = m.define_symbol ("red2".intern(), 0); midfielder__0 = m.define_symbol ("midfielder".intern(), 0); red3__0 = m.define_symbol ("red3".intern(), 0); forward__0 = m.define_symbol ("forward".intern(), 0); blue7__0 = m.define_symbol ("blue7".intern(), 0); blue8__0 = m.define_symbol ("blue8".intern(), 0); return true; } // soccerPlayerServerAgent:playerRole/2 init() } // soccerPlayerServerAgent:playerRole/2 final class soccerPlayerServerAgent_goalPosition_3 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: goalPosition(red, 49, -3) case 0: m.try_me_else (2); //m.success = m.get_atom (red__0,1); m.get_float (49f,2); m.get_float (-3f,3); m.end_head (); break; case 1: m.end_fact (); break; // head: goalPosition(blue, -49, -3) case 2: m.trust_or_fail (); //m.success = m.get_atom (blue__0,1); m.get_float (-49f,2); m.get_float (-3f,3); m.end_head (); break; case 3: m.end_fact (); break; } // switch return m.success; } // soccerPlayerServerAgent:goalPosition/3 exec() // soccerPlayerServerAgent:goalPosition/3 decls. public SymbolDescriptor red__0; public SymbolDescriptor blue__0; // end of soccerPlayerServerAgent:goalPosition/3 decls. public boolean init (DLP m) { red__0 = m.define_symbol ("red".intern(), 0); blue__0 = m.define_symbol ("blue".intern(), 0); return true; } // soccerPlayerServerAgent:goalPosition/3 init() } // soccerPlayerServerAgent:goalPosition/3 final class soccerPlayerServerAgent_fieldArea_4 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: fieldArea(red, midfielder, -25, 20) case 0: m.try_me_else (2); //m.success = m.get_atom (red__0,1); m.get_atom (midfielder__0,2); m.get_float (-25f,3); m.get_float (20f,4); m.end_head (); break; case 1: m.end_fact (); break; // head: fieldArea(blue, midfielder, -20, 25) case 2: m.retry_me_else (4); //m.success = m.get_atom (blue__0,1); m.get_atom (midfielder__0,2); m.get_float (-20f,3); m.get_float (25f,4); m.end_head (); break; case 3: m.end_fact (); break; // head: fieldArea(red, defender, -50, -25) case 4: m.retry_me_else (6); //m.success = m.get_atom (red__0,1); m.get_atom (defender__0,2); m.get_float (-50f,3); m.get_float (-25f,4); m.end_head (); break; case 5: m.end_fact (); break; // head: fieldArea(blue, defender, 25, 50) case 6: m.retry_me_else (8); //m.success = m.get_atom (blue__0,1); m.get_atom (defender__0,2); m.get_float (25f,3); m.get_float (50f,4); m.end_head (); break; case 7: m.end_fact (); break; // head: fieldArea(blue, forward, -50, 20) case 8: m.retry_me_else (10); //m.success = m.get_atom (blue__0,1); m.get_atom (forward__0,2); m.get_float (-50f,3); m.get_float (20f,4); m.end_head (); break; case 9: m.end_fact (); break; // head: fieldArea(red, forward, 20, 50) case 10: m.trust_or_fail (); //m.success = m.get_atom (red__0,1); m.get_atom (forward__0,2); m.get_float (20f,3); m.get_float (50f,4); m.end_head (); break; case 11: m.end_fact (); break; } // switch return m.success; } // soccerPlayerServerAgent:fieldArea/4 exec() // soccerPlayerServerAgent:fieldArea/4 decls. public SymbolDescriptor red__0; public SymbolDescriptor midfielder__0; public SymbolDescriptor blue__0; public SymbolDescriptor defender__0; public SymbolDescriptor forward__0; // end of soccerPlayerServerAgent:fieldArea/4 decls. public boolean init (DLP m) { red__0 = m.define_symbol ("red".intern(), 0); midfielder__0 = m.define_symbol ("midfielder".intern(), 0); blue__0 = m.define_symbol ("blue".intern(), 0); defender__0 = m.define_symbol ("defender".intern(), 0); forward__0 = m.define_symbol ("forward".intern(), 0); return true; } // soccerPlayerServerAgent:fieldArea/4 init() } // soccerPlayerServerAgent:fieldArea/4 final class soccerPlayerServerAgent_stadiumExit_3 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: stadiumExit(0, 0, -50) case 0: //m.success = m.get_float (0f,1); m.get_float (0f,2); m.get_float (-50f,3); m.end_head (); break; case 1: m.end_fact (); break; } // switch return m.success; } // soccerPlayerServerAgent:stadiumExit/3 exec() // soccerPlayerServerAgent:stadiumExit/3 decls. // end of soccerPlayerServerAgent:stadiumExit/3 decls. public boolean init (DLP m) { return true; } // soccerPlayerServerAgent:stadiumExit/3 init() } // soccerPlayerServerAgent:stadiumExit/3 final class soccerPlayerServerAgent_quitGame_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: quitGame(_G110) case 0: m.allocate (8); //m.success = m.get_y_value (0,1); /* Player */ m.end_head (); break; case 1: // goal: format('~n~w is gone.~n', [_G110]) m.put_atom (data__22__0,1); m.put_list (2); m.set_y_value (0); /* 'Player' */ m.set_nil (); m.call (dlplib.format_2); /*6*/ break; case 2: // goal: getSFVec3f(_G110, position, _G129, _G130, _G131) m.put_y_value (0,1); /* 'Player' */ m.put_atom (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 (34) /*2*/; /* getSFVec3f_5 */ break; case 3: // goal: stadiumExit(_G136, _G137, _G138) m.put_y_value (4,1); /* 'X1' */ m.put_y_value (3,2); /* 'Y1' */ m.put_y_value (2,3); /* 'Z1' */ m.call (19) /*2*/; /* stadiumExit_3 */ break; case 4: // goal: distance2d(_G129, _G131, _G136, _G138, _G147) m.put_y_value (7,1); /* 'X' */ m.put_y_value (5,2); /* 'Z' */ m.put_y_value (4,3); /* 'X1' */ m.put_y_value (2,4); /* 'Z1' */ m.put_y_value (1,5); /* 'Dist' */ m.call (28) /*2*/; /* distance2d_5 */ break; case 5: // goal: run_to_position(_G110, _G129, _G130, _G131, _G136, _G137, _G138, _G147) m.put_y_value (0,1); /* 'Player' */ m.put_y_value (7,2); /* 'X' */ m.put_y_value (6,3); /* 'Y' */ m.put_y_value (5,4); /* 'Z' */ m.put_y_value (4,5); /* 'X1' */ m.put_y_value (3,6); /* 'Y1' */ m.put_y_value (2,7); /* 'Z1' */ m.put_y_value (1,8); /* 'Dist' */ m.call (12) /*2*/; /* run_to_position_8 */ break; case 6: // goal: <-(this, gg_echo, broadcast(any_host, any_client, [tell, quit, [_G110]])) m.put_list (10); m.set_y_value (0); /* 'Player' */ m.set_nil (); m.put_list (11); m.set_x_value (10); /* 'Xtmp' */ m.set_nil (); m.put_list (12); m.set_atom (quit__0); m.set_x_value (11); /* 'Xtmp' */ m.put_list (13); m.set_atom (tell__0); m.set_x_value (12); /* 'Xtmp' */ m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_atom (any_host__0); m.set_atom (any_client__0); m.set_x_value (13); /* 'Xtmp' */ m.deallocate (); m.exec (dlplib.op_call_3); break; case 7: m.end_rule (); break; } // switch return m.success; } // soccerPlayerServerAgent:quitGame/1 exec() // soccerPlayerServerAgent:quitGame/1 decls. public SymbolDescriptor data__22__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor sl_sr__0; public SymbolDescriptor position__0; public SymbolDescriptor this__0; public SymbolDescriptor gg_echo__0; public SymbolDescriptor broadcast__3; public SymbolDescriptor any_host__0; public SymbolDescriptor any_client__0; public SymbolDescriptor tell__0; public SymbolDescriptor quit__0; // end of soccerPlayerServerAgent:quitGame/1 decls. public boolean init (DLP m) { data__22__0 = m.define_symbol ("~n~w is gone.~n".intern(), 0); op__dot__2 = m.define_symbol (".".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); position__0 = m.define_symbol ("position".intern(), 0); this__0 = m.define_symbol ("this".intern(), 0); gg_echo__0 = m.define_symbol ("gg_echo".intern(), 0); broadcast__3 = m.define_symbol ("broadcast".intern(), 3); any_host__0 = m.define_symbol ("any_host".intern(), 0); any_client__0 = m.define_symbol ("any_client".intern(), 0); tell__0 = m.define_symbol ("tell".intern(), 0); quit__0 = m.define_symbol ("quit".intern(), 0); return true; } // soccerPlayerServerAgent:quitGame/1 init() } // soccerPlayerServerAgent:quitGame/1 final class soccerPlayerServerAgent_teammate_3 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: teammate(_G110, _G111, _G112) case 0: m.allocate (3); //m.success = m.get_y_value (1,1); /* Player1 */ m.get_y_value (0,2); /* Player2 */ m.get_y_value (2,3); /* Team */ m.end_head (); break; case 1: // goal: team(_G112, _G110) m.put_y_value (2,1); /* 'Team' */ m.put_y_value (1,2); /* 'Player1' */ m.call (15) /*2*/; /* team_2 */ break; case 2: // goal: team(_G112, _G111) m.put_y_value (2,1); /* 'Team' */ m.put_y_value (0,2); /* 'Player2' */ m.call (15) /*2*/; /* team_2 */ break; case 3: // goal: _G110\==_G111 m.put_y_value (1,1); /* 'Player1' */ m.put_y_value (0,2); /* 'Player2' */ m.deallocate (); m.exec (dlplib.op_at_cmp_ne_2); break; case 4: m.end_rule (); break; } // switch return m.success; } // soccerPlayerServerAgent:teammate/3 exec() // soccerPlayerServerAgent:teammate/3 decls. // end of soccerPlayerServerAgent:teammate/3 decls. public boolean init (DLP m) { return true; } // soccerPlayerServerAgent:teammate/3 init() } // soccerPlayerServerAgent:teammate/3 final class soccerPlayerServerAgent_teammateRole_4 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: teammateRole(_G110, _G111, _G112, _G113) case 0: m.allocate (3); //m.success = m.get_y_value (2,1); /* Player */ m.get_x_varia (11,2); /* Team */ m.get_y_value (0,3); /* Role */ m.get_y_value (1,4); /* Mate */ m.end_head (); break; case 1: // goal: team(_G111, _G113) m.put_x_value (11,1); /* 'Team' */ m.put_y_value (1,2); /* 'Mate' */ m.call (15) /*2*/; /* team_2 */ break; case 2: // goal: _G110\==_G113 m.put_y_value (2,1); /* 'Player' */ m.put_y_value (1,2); /* 'Mate' */ m.call (dlplib.op_at_cmp_ne_2); /*6*/ break; case 3: // goal: playerRole(_G113, _G112) m.put_y_value (1,1); /* 'Mate' */ m.put_y_value (0,2); /* 'Role' */ m.deallocate (); m.exec (16); /* playerRole_2 */ break; case 4: m.end_rule (); break; } // switch return m.success; } // soccerPlayerServerAgent:teammateRole/4 exec() // soccerPlayerServerAgent:teammateRole/4 decls. // end of soccerPlayerServerAgent:teammateRole/4 decls. public boolean init (DLP m) { return true; } // soccerPlayerServerAgent:teammateRole/4 init() } // soccerPlayerServerAgent:teammateRole/4 final class soccerPlayerServerAgent_distanceGoal_7 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: distanceGoal(_G110, _G111, _G112, _G113, _G114, _G115, _G116) case 0: m.allocate (7); //m.success = m.get_x_varia (13,1); /* Player */ m.get_y_value (4,2); /* X */ m.get_v_varia (3); /* Unknown */ m.get_y_value (3,4); /* Z */ m.get_y_value (2,5); /* X1 */ m.get_y_value (1,6); /* Z1 */ m.get_y_value (0,7); /* Dist */ m.end_head (); break; case 1: // goal: team(_G124, _G110) m.put_y_value (6,1); /* 'Team' */ m.put_x_value (13,2); /* 'Player' */ m.call (15) /*2*/; /* team_2 */ break; case 2: // goal: goalPosition(_G124, _G114, _G132) m.put_y_value (6,1); /* 'Team' */ m.put_y_value (2,2); /* 'X1' */ m.put_y_value (5,3); /* 'Z2' */ m.call (17) /*2*/; /* goalPosition_3 */ break; case 3: // goal: assign_var_expr(_G115, _G132+random*7) m.put_struct (op__mul__2,15); m.set_atom (random__0); m.set_float (7f); m.put_y_value (1,1); /* 'Z1' */ m.put_struct (op__add__2,2); m.set_y_value (5); /* 'Z2' */ m.set_x_value (15); /* 'Xtmp' */ m.call (dlplib.assign_var_expr_2); /*6*/ break; case 4: // goal: distance2d(_G111, _G113, _G114, _G115, _G116) m.put_y_value (4,1); /* 'X' */ m.put_y_value (3,2); /* 'Z' */ m.put_y_value (2,3); /* 'X1' */ m.put_y_value (1,4); /* 'Z1' */ m.put_y_value (0,5); /* 'Dist' */ m.deallocate (); m.exec (28); /* distance2d_5 */ break; case 5: m.end_rule (); break; } // switch return m.success; } // soccerPlayerServerAgent:distanceGoal/7 exec() // soccerPlayerServerAgent:distanceGoal/7 decls. public SymbolDescriptor op__add__2; public SymbolDescriptor op__mul__2; public SymbolDescriptor random__0; // end of soccerPlayerServerAgent:distanceGoal/7 decls. public boolean init (DLP m) { op__add__2 = m.define_symbol ("+".intern(), 2); op__mul__2 = m.define_symbol ("*".intern(), 2); random__0 = m.define_symbol ("random".intern(), 0); return true; } // soccerPlayerServerAgent:distanceGoal/7 init() } // soccerPlayerServerAgent:distanceGoal/7 final class soccerPlayerServerAgent_findCoTeammate_9 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: findCoTeammate(_G110, _G111, _G112, _G113, _G114, _G115, _G116, _G117, _G118) case 0: m.try_me_else (9); m.allocate (12); //m.success = m.get_y_value (10,1); /* Player */ m.get_y_value (9,2); /* X */ m.get_y_value (8,3); /* Y */ m.get_y_value (7,4); /* Z */ m.get_y_value (5,5); /* Teammate */ m.get_y_value (4,6); /* X1 */ m.get_y_value (3,7); /* Y1 */ m.get_y_value (2,8); /* Z1 */ m.get_y_value (1,9); /* Dist */ m.cut_level (0); m.end_head (); break; case 1: // goal: playerRole(_G110, _G127) m.put_y_value (10,1); /* 'Player' */ m.put_y_value (11,2); /* 'Role' */ m.call (16) /*2*/; /* playerRole_2 */ break; case 2: // goal: roleOrder(_G127, _G133, attack) m.put_y_value (11,1); /* 'Role' */ m.put_y_value (6,2); /* 'TeammateRole' */ m.put_atom (attack__0,3); m.call (25) /*2*/; /* roleOrder_3 */ break; case 3: // goal: findRoleTeammate(_G110, _G111, _G112, _G113, _G133, _G114, _G115, _G116, _G117, _G118) m.put_y_value (10,1); /* 'Player' */ m.put_y_value (9,2); /* 'X' */ m.put_y_value (8,3); /* 'Y' */ m.put_y_value (7,4); /* 'Z' */ m.put_y_value (6,5); /* 'TeammateRole' */ m.put_y_value (5,6); /* 'Teammate' */ m.put_y_value (4,7); /* 'X1' */ m.put_y_value (3,8); /* 'Y1' */ m.put_y_value (2,9); /* 'Z1' */ m.put_y_value (1,10); /* 'Dist' */ m.call (26) /*2*/; /* findRoleTeammate_10 */ break; case 4: // goal: nonvar(_G118) m.put_y_value (1,1); /* 'Dist' */ m.call (dlplib.nonvar_1); /*6*/ break; case 5: // goal: _G118=passableDistanceMin m.put_y_value (1,1); /* 'Dist' */ m.put_z_value (9,2); /* passableDistanceMin */ 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; // head: findCoTeammate(_G6728, _G6729, _G6730, _G6731, _G6732, _G6733, _G6734, _G6735, _G6736) 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.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 10: m.end_fact (); break; } // switch return m.success; } // soccerPlayerServerAgent:findCoTeammate/9 exec() // soccerPlayerServerAgent:findCoTeammate/9 decls. public SymbolDescriptor attack__0; // end of soccerPlayerServerAgent:findCoTeammate/9 decls. public boolean init (DLP m) { attack__0 = m.define_symbol ("attack".intern(), 0); return true; } // soccerPlayerServerAgent:findCoTeammate/9 init() } // soccerPlayerServerAgent:findCoTeammate/9 final class soccerPlayerServerAgent_roleOrder_3 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: roleOrder(midfielder, forward, attack) case 0: m.try_me_else (2); //m.success = m.get_atom (midfielder__0,1); m.get_atom (forward__0,2); m.get_atom (attack__0,3); m.end_head (); break; case 1: m.end_fact (); break; // head: roleOrder(defender, midfielder, attack) case 2: m.retry_me_else (4); //m.success = m.get_atom (defender__0,1); m.get_atom (midfielder__0,2); m.get_atom (attack__0,3); m.end_head (); break; case 3: m.end_fact (); break; // head: roleOrder(forward, forward, attack) case 4: m.retry_me_else (6); //m.success = m.get_atom (forward__0,1); m.get_atom (forward__0,2); m.get_atom (attack__0,3); m.end_head (); break; case 5: m.end_fact (); break; // head: roleOrder(midfielder, midfielder, attack) case 6: m.retry_me_else (8); //m.success = m.get_atom (midfielder__0,1); m.get_atom (midfielder__0,2); m.get_atom (attack__0,3); m.end_head (); break; case 7: m.end_fact (); break; // head: roleOrder(defender, defender, attack) case 8: m.trust_or_fail (); //m.success = m.get_atom (defender__0,1); m.get_atom (defender__0,2); m.get_atom (attack__0,3); m.end_head (); break; case 9: m.end_fact (); break; } // switch return m.success; } // soccerPlayerServerAgent:roleOrder/3 exec() // soccerPlayerServerAgent:roleOrder/3 decls. public SymbolDescriptor midfielder__0; public SymbolDescriptor forward__0; public SymbolDescriptor attack__0; public SymbolDescriptor defender__0; // end of soccerPlayerServerAgent:roleOrder/3 decls. public boolean init (DLP m) { midfielder__0 = m.define_symbol ("midfielder".intern(), 0); forward__0 = m.define_symbol ("forward".intern(), 0); attack__0 = m.define_symbol ("attack".intern(), 0); defender__0 = m.define_symbol ("defender".intern(), 0); return true; } // soccerPlayerServerAgent:roleOrder/3 init() } // soccerPlayerServerAgent:roleOrder/3 final class soccerPlayerServerAgent_findRoleTeammate_10 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: findRoleTeammate(_G110, _G111, _G112, _G113, _G114, _G115, _G116, _G117, _G118, _G119) case 0: m.try_me_else (7); m.allocate (11); //m.success = m.get_y_value (10,1); /* Player */ m.get_y_value (5,2); /* X */ m.get_v_varia (3); /* Unknown */ m.get_y_value (4,4); /* Z */ m.get_y_value (8,5); /* Role */ m.get_y_value (7,6); /* Mate */ m.get_y_value (3,7); /* X1 */ m.get_y_value (6,8); /* Y1 */ m.get_y_value (2,9); /* Z1 */ m.get_y_value (1,10); /* Dist */ m.cut_level (0); m.end_head (); break; case 1: // goal: team(_G127, _G110) m.put_y_value (9,1); /* 'Team' */ m.put_y_value (10,2); /* 'Player' */ m.call (15) /*2*/; /* team_2 */ break; case 2: // goal: teammateRole(_G110, _G127, _G114, _G115) m.put_y_value (10,1); /* 'Player' */ m.put_y_value (9,2); /* 'Team' */ m.put_y_value (8,3); /* 'Role' */ m.put_y_value (7,4); /* 'Mate' */ m.call (22) /*2*/; /* teammateRole_4 */ break; case 3: // goal: getSFVec3f(_G115, position, _G116, _G117, _G118) m.put_y_value (7,1); /* 'Mate' */ m.put_atom (position__0,2); m.put_y_value (3,3); /* 'X1' */ m.put_y_value (6,4); /* 'Y1' */ m.put_y_value (2,5); /* 'Z1' */ m.call (34) /*2*/; /* getSFVec3f_5 */ break; case 4: // goal: distance2d(_G111, _G113, _G116, _G118, _G119) m.put_y_value (5,1); /* 'X' */ m.put_y_value (4,2); /* 'Z' */ m.put_y_value (3,3); /* 'X1' */ m.put_y_value (2,4); /* 'Z1' */ m.put_y_value (1,5); /* 'Dist' */ m.call (28) /*2*/; /* distance2d_5 */ break; case 5: // goal: ! m.cut_tail (0); m.deallocate (); break; case 6: m.end_rule (); break; // head: findRoleTeammate(_G6073, _G6074, _G6075, _G6076, _G6077, _G6078, _G6079, _G6080, _G6081, _G6082) case 7: 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.get_v_varia (10); /* Unknown */ m.end_head (); break; case 8: m.end_fact (); break; } // switch return m.success; } // soccerPlayerServerAgent:findRoleTeammate/10 exec() // soccerPlayerServerAgent:findRoleTeammate/10 decls. public SymbolDescriptor position__0; // end of soccerPlayerServerAgent:findRoleTeammate/10 decls. public boolean init (DLP m) { position__0 = m.define_symbol ("position".intern(), 0); return true; } // soccerPlayerServerAgent:findRoleTeammate/10 init() } // soccerPlayerServerAgent:findRoleTeammate/10 final class soccerPlayerServerAgent_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, 2) m.put_this (1); m.put_nreg (2); m.put_int (1,3); m.put_float (2f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 3: // goal: assign_nlv_term(this, nreg, 2, 1000) m.put_this (1); m.put_nreg (2); m.put_int (2,3); m.put_int (1000,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 4: // goal: assign_nlv_term(this, nreg, 3, 1.5) m.put_this (1); m.put_nreg (2); m.put_int (3,3); m.put_float (1.5f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 5: // goal: assign_nlv_term(this, nreg, 4, 250) m.put_this (1); m.put_nreg (2); m.put_int (4,3); m.put_int (250,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 6: // goal: assign_nlv_term(this, nreg, 5, 1.5) m.put_this (1); m.put_nreg (2); m.put_int (5,3); m.put_float (1.5f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 7: // goal: assign_nlv_term(this, nreg, 6, 30) m.put_this (1); m.put_nreg (2); m.put_int (6,3); m.put_float (30f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 8: // goal: assign_nlv_term(this, nreg, 7, 30) m.put_this (1); m.put_nreg (2); m.put_int (7,3); m.put_float (30f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 9: // goal: assign_nlv_term(this, nreg, 8, 40) m.put_this (1); m.put_nreg (2); m.put_int (8,3); m.put_float (40f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 10: // goal: assign_nlv_term(this, nreg, 9, 3) m.put_this (1); m.put_nreg (2); m.put_int (9,3); m.put_float (3f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 11: // goal: assign_nlv_term(this, nreg, 10, 10) m.put_this (1); m.put_nreg (2); m.put_int (10,3); m.put_float (10f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 12: // goal: assign_nlv_term(this, nreg, 11, 6) m.put_this (1); m.put_nreg (2); m.put_int (11,3); m.put_float (6f,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 13: // goal: assign_nlv_term(this, nreg, 12, no_init) m.put_this (1); m.put_nreg (2); m.put_int (12,3); m.put_atom (no_init__0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 14: // goal: assign_nlv_term(this, nreg, 13, no_init) m.put_this (1); m.put_nreg (2); m.put_int (13,3); m.put_atom (no_init__0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 15: // goal: assign_nlv_term(this, nreg, 14, no_init) m.put_this (1); m.put_nreg (2); m.put_int (14,3); m.put_atom (no_init__0,4); m.call (dlplib.assign_nlv_term_4); /*6*/ break; case 16: // goal: assign_nlv_term(this, nreg, 15, no_init) m.put_this (1); m.put_nreg (2); m.put_int (15,3); m.put_atom (no_init__0,4); m.deallocate (); m.exec (dlplib.assign_nlv_term_4); break; case 17: m.end_rule (); break; } // switch return m.success; } // soccerPlayerServerAgent:init_vars/0 exec() // soccerPlayerServerAgent:init_vars/0 decls. public SymbolDescriptor no_init__0; // end of soccerPlayerServerAgent:init_vars/0 decls. public boolean init (DLP m) { no_init__0 = m.define_symbol ("no_init".intern(), 0); return true; } // soccerPlayerServerAgent:init_vars/0 init() } // soccerPlayerServerAgent:init_vars/0 class soccerPlayerServerAgent extends Code { public static ObjectDescriptor object; public static ObjectDescriptor _common_process_wsserver; public static MethodDescriptor defaultPositionRotation_3; public static MethodDescriptor soccerPlayerServerAgent_2; public static MethodDescriptor set_init_value_1; public static MethodDescriptor activity_1; public static MethodDescriptor findHowtoReact_13; public static MethodDescriptor getFieldAreaInformation_5; public static MethodDescriptor doAction_13; public static MethodDescriptor doPassing_12; public static MethodDescriptor kickBalltoDirection_11; public static MethodDescriptor getCorrectKickRotation_4; public static MethodDescriptor getPositionInformation_12; public static MethodDescriptor kick_ball_to_position_8; public static MethodDescriptor run_to_position_8; public static MethodDescriptor run_and_trace_9; public static MethodDescriptor end_of_run_and_trace_3; public static MethodDescriptor team_2; public static MethodDescriptor playerRole_2; public static MethodDescriptor goalPosition_3; public static MethodDescriptor fieldArea_4; public static MethodDescriptor stadiumExit_3; public static MethodDescriptor quitGame_1; public static MethodDescriptor teammate_3; public static MethodDescriptor teammateRole_4; public static MethodDescriptor distanceGoal_7; public static MethodDescriptor findCoTeammate_9; public static MethodDescriptor roleOrder_3; public static MethodDescriptor findRoleTeammate_10; public static MethodDescriptor get_clock_1; public static MethodDescriptor distance2d_5; public static MethodDescriptor look_at_position_3; public static MethodDescriptor getRotation_5; public static MethodDescriptor move_to_position_11; public static MethodDescriptor getPosition_4; public static MethodDescriptor setSFVec3f_5; public static MethodDescriptor getSFVec3f_5; public boolean init (DLP m) { object = m.define_object ("soccerPlayerServerAgent".intern(), 1, 35, 16); _common_process_wsserver = m.header_object (object, "common_process_wsserver".intern(), 0); defaultPositionRotation_3 = m.define_method (object, 0, "defaultPositionRotation".intern(), 3); soccerPlayerServerAgent_2 = m.define_method (object, 1, "soccerPlayerServerAgent".intern(), 2); set_init_value_1 = m.define_method (object, 2, "set_init_value".intern(), 1); activity_1 = m.define_method (object, 3, "activity".intern(), 1); findHowtoReact_13 = m.define_method (object, 4, "findHowtoReact".intern(), 13); getFieldAreaInformation_5 = m.define_method (object, 5, "getFieldAreaInformation".intern(), 5); doAction_13 = m.define_method (object, 6, "doAction".intern(), 13); doPassing_12 = m.define_method (object, 7, "doPassing".intern(), 12); kickBalltoDirection_11 = m.define_method (object, 8, "kickBalltoDirection".intern(), 11); getCorrectKickRotation_4 = m.define_method (object, 9, "getCorrectKickRotation".intern(), 4); getPositionInformation_12 = m.define_method (object, 10, "getPositionInformation".intern(), 12); kick_ball_to_position_8 = m.define_method (object, 11, "kick_ball_to_position".intern(), 8); run_to_position_8 = m.define_method (object, 12, "run_to_position".intern(), 8); run_and_trace_9 = m.define_method (object, 13, "run_and_trace".intern(), 9); end_of_run_and_trace_3 = m.define_method (object, 14, "end_of_run_and_trace".intern(), 3); team_2 = m.define_method (object, 15, "team".intern(), 2); playerRole_2 = m.define_method (object, 16, "playerRole".intern(), 2); goalPosition_3 = m.define_method (object, 17, "goalPosition".intern(), 3); fieldArea_4 = m.define_method (object, 18, "fieldArea".intern(), 4); stadiumExit_3 = m.define_method (object, 19, "stadiumExit".intern(), 3); quitGame_1 = m.define_method (object, 20, "quitGame".intern(), 1); teammate_3 = m.define_method (object, 21, "teammate".intern(), 3); teammateRole_4 = m.define_method (object, 22, "teammateRole".intern(), 4); distanceGoal_7 = m.define_method (object, 23, "distanceGoal".intern(), 7); findCoTeammate_9 = m.define_method (object, 24, "findCoTeammate".intern(), 9); roleOrder_3 = m.define_method (object, 25, "roleOrder".intern(), 3); findRoleTeammate_10 = m.define_method (object, 26, "findRoleTeammate".intern(), 10); get_clock_1 = m.extern_method (object, 27, "get_clock".intern(), 1); distance2d_5 = m.extern_method (object, 28, "distance2d".intern(), 5); look_at_position_3 = m.extern_method (object, 29, "look_at_position".intern(), 3); getRotation_5 = m.extern_method (object, 30, "getRotation".intern(), 5); move_to_position_11 = m.extern_method (object, 31, "move_to_position".intern(), 11); getPosition_4 = m.extern_method (object, 32, "getPosition".intern(), 4); setSFVec3f_5 = m.extern_method (object, 33, "setSFVec3f".intern(), 5); getSFVec3f_5 = m.extern_method (object, 34, "getSFVec3f".intern(), 5); m.define_nonlog (object, "time_limit".intern(), 0); m.define_nonlog (object, "runstep".intern(), 1); m.define_nonlog (object, "runSleepTime".intern(), 2); m.define_nonlog (object, "ballstep".intern(), 3); m.define_nonlog (object, "ballSleepTime".intern(), 4); m.define_nonlog (object, "kickableDistance".intern(), 5); m.define_nonlog (object, "runableDistance".intern(), 6); m.define_nonlog (object, "kickableGoalDistance".intern(), 7); m.define_nonlog (object, "passableDistanceMax".intern(), 8); m.define_nonlog (object, "passableDistanceMin".intern(), 9); m.define_nonlog (object, "kickBallForce".intern(), 10); m.define_nonlog (object, "kickBallForceY".intern(), 11); m.define_nonlog (object, "steps".intern(), 12); m.define_nonlog (object, "balldistance".intern(), 13); m.define_nonlog (object, "xold".intern(), 14); m.define_nonlog (object, "zold".intern(), 15); return true; } // soccerPlayerServerAgent init() } // class soccerPlayerServerAgent // end of unit soccerPlayerServerAgent code. // begin of unit common_process_wsserver code. final class common_process_wsserver_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_wsserver:distance2d/5 exec() // common_process_wsserver: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_wsserver: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_wsserver:distance2d/5 init() } // common_process_wsserver:distance2d/5 final class common_process_wsserver_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_wsserver:distance3d/7 exec() // common_process_wsserver: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_wsserver: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_wsserver:distance3d/7 init() } // common_process_wsserver:distance3d/7 final class common_process_wsserver_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 (12) /*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 (12) /*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_wsserver:distance2dObject/5 exec() // common_process_wsserver:distance2dObject/5 decls. // end of common_process_wsserver:distance2dObject/5 decls. public boolean init (DLP m) { return true; } // common_process_wsserver:distance2dObject/5 init() } // common_process_wsserver:distance2dObject/5 final class common_process_wsserver_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 (12) /*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 (12) /*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_wsserver:distance3dObject/5 exec() // common_process_wsserver:distance3dObject/5 decls. // end of common_process_wsserver:distance3dObject/5 decls. public boolean init (DLP m) { return true; } // common_process_wsserver:distance3dObject/5 init() } // common_process_wsserver:distance3dObject/5 final class common_process_wsserver_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_wsserver:distanceBall/3 exec() // common_process_wsserver:distanceBall/3 decls. public SymbolDescriptor position__0; // end of common_process_wsserver:distanceBall/3 decls. public boolean init (DLP m) { position__0 = m.define_symbol ("position".intern(), 0); return true; } // common_process_wsserver:distanceBall/3 init() } // common_process_wsserver:distanceBall/3 final class common_process_wsserver_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_wsserver:distancePlayer/3 exec() // common_process_wsserver:distancePlayer/3 decls. public SymbolDescriptor position__0; // end of common_process_wsserver:distancePlayer/3 decls. public boolean init (DLP m) { position__0 = m.define_symbol ("position".intern(), 0); return true; } // common_process_wsserver:distancePlayer/3 init() } // common_process_wsserver:distancePlayer/3 final class common_process_wsserver_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: get_field(_G110, position, position(_G123, _G124, _G125)) m.put_y_value (1,1); /* 'Player' */ m.put_atom (position__0,2); m.put_struct (position__3,3); m.set_y_value (7); /* 'X' */ m.set_v_varia (); /* 'Unknown' */ m.set_y_value (4); /* 'Z' */ m.call (dlplib.get_field_3); /*6*/ break; case 2: // goal: get_field(_G111, position, position(_G134, _G135, _G136)) m.put_y_value (9,1); /* 'Ball' */ m.put_atom (position__0,2); m.put_struct (position__3,3); m.set_y_value (6); /* 'X1' */ m.set_v_varia (); /* 'Unknown' */ m.set_y_value (5); /* 'Z1' */ m.call (dlplib.get_field_3); /*6*/ break; case 3: // goal: _G123\=_G134 m.put_y_value (7,1); /* 'X' */ m.put_y_value (6,2); /* 'X1' */ m.call (dlplib.op_neq_2); /*6*/ break; case 4: // goal: ! m.cut_body (8); break; case 5: // goal: is_eval(_G123-_G134, _G150) m.put_struct (op__sub__2,1); m.set_y_value (7); /* 'X' */ m.set_y_value (6); /* 'X1' */ m.put_y_value (2,2); /* 'Xdif' */ m.call (dlplib.is_eval_2); /*6*/ break; case 6: // goal: is_eval(_G136-_G125, _G159) m.put_struct (op__sub__2,1); m.set_y_value (5); /* 'Z1' */ m.set_y_value (4); /* 'Z' */ m.put_y_value (3,2); /* 'Zdif' */ m.call (dlplib.is_eval_2); /*6*/ break; case 7: // goal: is_eval(atan(_G159/_G150)-sign(_G150)*1.5708, _G168) m.put_struct (sign__1,12); m.set_y_value (2); /* 'Xdif' */ m.put_struct (op__div__2,13); m.set_y_value (3); /* 'Zdif' */ m.set_y_value (2); /* 'Xdif' */ m.put_struct (atan__1,14); m.set_x_value (13); /* 'Xtmp' */ m.put_struct (op__mul__2,15); m.set_x_value (12); /* 'Xtmp' */ m.set_float (1.5708f); m.put_struct (op__sub__2,1); m.set_x_value (14); /* 'Xtmp' */ m.set_x_value (15); /* 'Xtmp' */ m.put_y_value (0,2); /* 'R' */ m.call (dlplib.is_eval_2); /*6*/ break; case 8: // goal: set_field(_G110, rotation, rotation(0, 1, 0, _G168)) m.put_y_value (1,1); /* 'Player' */ m.put_atom (rotation__0,2); m.put_struct (rotation__4,3); m.set_float (0f); m.set_float (1f); m.set_float (0f); m.set_y_value (0); /* 'R' */ m.deallocate (); m.exec (dlplib.set_field_3); break; case 9: m.end_rule (); break; // head: look_at_ball(_G8288, _G8289) 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_wsserver:look_at_ball/2 exec() // common_process_wsserver:look_at_ball/2 decls. public SymbolDescriptor position__0; public SymbolDescriptor position__3; public SymbolDescriptor op__sub__2; public SymbolDescriptor atan__1; public SymbolDescriptor op__div__2; public SymbolDescriptor op__mul__2; public SymbolDescriptor sign__1; public SymbolDescriptor rotation__0; public SymbolDescriptor rotation__4; // end of common_process_wsserver:look_at_ball/2 decls. public boolean init (DLP m) { position__0 = m.define_symbol ("position".intern(), 0); position__3 = m.define_symbol ("position".intern(), 3); 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); rotation__0 = m.define_symbol ("rotation".intern(), 0); rotation__4 = m.define_symbol ("rotation".intern(), 4); return true; } // common_process_wsserver:look_at_ball/2 init() } // common_process_wsserver:look_at_ball/2 final class common_process_wsserver_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 (6); m.allocate (5); //m.success = m.get_x_varia (11,1); /* Player */ m.get_y_value (3,2); /* X1 */ m.get_y_value (1,3); /* Z1 */ m.cut_level (0); m.end_head (); break; case 1: // goal: get_field(_G110, position, position(_G124, _G125, _G126)) m.put_x_value (11,1); /* 'Player' */ m.put_atom (position__0,2); m.put_struct (position__3,3); m.set_y_value (4); /* 'X' */ m.set_v_varia (); /* 'Unknown' */ m.set_y_value (2); /* 'Z' */ m.call (dlplib.get_field_3); /*6*/ break; case 2: // goal: _G124=_G111 m.put_y_value (4,1); /* 'X' */ m.put_y_value (3,2); /* 'X1' */ m.call (dlplib.op_eq_2); /*6*/ break; case 3: // goal: _G126=_G112 m.put_y_value (2,1); /* 'Z' */ m.put_y_value (1,2); /* 'Z1' */ m.call (dlplib.op_eq_2); /*6*/ break; case 4: // goal: ! m.cut_tail (0); m.deallocate (); break; case 5: m.end_rule (); break; // head: look_at_position(_G4027, _G4028, _G4029) case 6: m.retry_me_else (15); m.allocate (9); //m.success = m.get_y_value (1,1); /* Player */ m.get_y_value (6,2); /* X1 */ m.get_y_value (5,3); /* Z1 */ m.cut_level (8); m.end_head (); break; case 7: // goal: get_field(_G4027, position, position(_G4041, _G4042, _G4043)) m.put_y_value (1,1); /* 'Player' */ m.put_atom (position__0,2); m.put_struct (position__3,3); m.set_y_value (7); /* 'X' */ m.set_v_varia (); /* 'Unknown' */ m.set_y_value (4); /* 'Z' */ m.call (dlplib.get_field_3); /*6*/ break; case 8: // goal: _G4041\=_G4028 m.put_y_value (7,1); /* 'X' */ m.put_y_value (6,2); /* 'X1' */ m.call (dlplib.op_neq_2); /*6*/ break; case 9: // goal: ! m.cut_body (8); break; case 10: // goal: is_eval(_G4041-_G4028, _G4057) m.put_struct (op__sub__2,1); m.set_y_value (7); /* 'X' */ m.set_y_value (6); /* 'X1' */ m.put_y_value (2,2); /* 'Xdif' */ m.call (dlplib.is_eval_2); /*6*/ break; case 11: // goal: is_eval(_G4029-_G4043, _G4066) m.put_struct (op__sub__2,1); m.set_y_value (5); /* 'Z1' */ m.set_y_value (4); /* 'Z' */ m.put_y_value (3,2); /* 'Zdif' */ m.call (dlplib.is_eval_2); /*6*/ break; case 12: // goal: is_eval(atan(_G4066/_G4057)-sign(_G4057)*1.5708, _G4075) m.put_struct (sign__1,12); m.set_y_value (2); /* 'Xdif' */ m.put_struct (op__div__2,13); m.set_y_value (3); /* 'Zdif' */ m.set_y_value (2); /* 'Xdif' */ m.put_struct (atan__1,14); m.set_x_value (13); /* 'Xtmp' */ m.put_struct (op__mul__2,15); m.set_x_value (12); /* 'Xtmp' */ m.set_float (1.5708f); m.put_struct (op__sub__2,1); m.set_x_value (14); /* 'Xtmp' */ m.set_x_value (15); /* 'Xtmp' */ m.put_y_value (0,2); /* 'R' */ m.call (dlplib.is_eval_2); /*6*/ break; case 13: // goal: setRotationEx(_G4027, 0, 1, 0, _G4075) 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 (8); /* setRotationEx_5 */ break; case 14: m.end_rule (); break; // head: look_at_position(_G10881, _G10882, _G10883) 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.end_head (); break; case 16: m.end_fact (); break; } // switch return m.success; } // common_process_wsserver:look_at_position/3 exec() // common_process_wsserver:look_at_position/3 decls. public SymbolDescriptor position__0; public SymbolDescriptor position__3; 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_wsserver:look_at_position/3 decls. public boolean init (DLP m) { position__0 = m.define_symbol ("position".intern(), 0); position__3 = m.define_symbol ("position".intern(), 3); 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_wsserver:look_at_position/3 init() } // common_process_wsserver:look_at_position/3 final class common_process_wsserver_setRotationEx_5 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: setRotationEx(_G110, _G111, _G112, _G113, _G114) case 0: m.try_me_else (12); m.allocate (10); //m.success = m.get_y_value (1,1); /* Player */ m.get_y_value (7,2); /* X */ m.get_y_value (6,3); /* Y */ m.get_y_value (5,4); /* Z */ m.get_y_value (4,5); /* R */ m.cut_level (8); m.end_head (); break; case 1: // goal: set_field(_G110, rotation, rotation(_G111, _G112, _G113, _G114)) m.put_y_value (1,1); /* 'Player' */ m.put_atom (rotation__0,2); m.put_struct (rotation__4,3); m.set_y_value (7); /* 'X' */ m.set_y_value (6); /* 'Y' */ m.set_y_value (5); /* 'Z' */ m.set_y_value (4); /* 'R' */ m.call (dlplib.set_field_3); /*6*/ break; case 2: // goal: get_field(_G110, old_rot, _G136) m.put_y_value (1,1); /* 'Player' */ m.put_atom (old_rot__0,2); m.put_y_value (9,3); /* 'OldRot' */ m.call (dlplib.get_field_3); /*6*/ break; case 3: // goal: _G136\=rotation(_G111, _G112, _G113, _G114) m.put_y_value (9,1); /* 'OldRot' */ m.put_struct (rotation__4,2); m.set_y_value (7); /* 'X' */ m.set_y_value (6); /* 'Y' */ m.set_y_value (5); /* 'Z' */ m.set_y_value (4); /* 'R' */ m.call (dlplib.op_neq_2); /*6*/ break; case 4: // goal: ! m.cut_body (8); break; case 5: // goal: set_field(_G110, old_rot, rotation(_G111, _G112, _G113, _G114)) m.put_y_value (1,1); /* 'Player' */ m.put_atom (old_rot__0,2); m.put_struct (rotation__4,3); m.set_y_value (7); /* 'X' */ m.set_y_value (6); /* 'Y' */ m.set_y_value (5); /* 'Z' */ m.set_y_value (4); /* 'R' */ m.call (dlplib.set_field_3); /*6*/ break; case 6: // goal: local_host(_G167, _G168) m.put_y_value (2,1); /* 'Host' */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.local_host_2); /*6*/ break; case 7: // goal: _G173=[user(_G167, _G110), rotation(_G111, _G112, _G113, _G114)] m.put_struct (rotation__4,13); m.set_y_value (7); /* 'X' */ m.set_y_value (6); /* 'Y' */ m.set_y_value (5); /* 'Z' */ m.set_y_value (4); /* 'R' */ m.put_struct (user__2,14); m.set_y_value (2); /* 'Host' */ m.set_y_value (1); /* 'Player' */ m.put_list (15); m.set_x_value (13); /* 'Xtmp' */ m.set_nil (); m.put_y_value (3,1); /* 'Data' */ m.put_list (2); m.set_x_value (14); /* 'Xtmp' */ m.set_x_value (15); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 8: // goal: _G193=[tell, rotation, _G173] m.put_list (16); m.set_y_value (3); /* 'Data' */ m.set_nil (); m.put_list (17); m.set_atom (rotation__0); m.set_x_value (16); /* 'Xtmp' */ m.put_y_value (0,1); /* 'Message' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (17); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 9: // goal: <-(this, gg_echo, broadcast(_G167, _G110, _G193)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_y_value (2); /* 'Host' */ m.set_y_value (1); /* 'Player' */ m.set_y_value (0); /* 'Message' */ m.call (dlplib.op_call_3); /*6*/ break; case 10: // goal: true m.deallocate (); m.exec (dlplib.true_0); break; case 11: m.end_rule (); break; // head: setRotationEx(_G10105, _G10106, _G10107, _G10108, _G10109) case 12: 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.end_head (); break; case 13: m.end_fact (); break; } // switch return m.success; } // common_process_wsserver:setRotationEx/5 exec() // common_process_wsserver:setRotationEx/5 decls. public SymbolDescriptor rotation__0; public SymbolDescriptor rotation__4; public SymbolDescriptor old_rot__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor user__2; public SymbolDescriptor sl_sr__0; public SymbolDescriptor tell__0; public SymbolDescriptor this__0; public SymbolDescriptor gg_echo__0; public SymbolDescriptor broadcast__3; // end of common_process_wsserver:setRotationEx/5 decls. public boolean init (DLP m) { rotation__0 = m.define_symbol ("rotation".intern(), 0); rotation__4 = m.define_symbol ("rotation".intern(), 4); old_rot__0 = m.define_symbol ("old_rot".intern(), 0); op__dot__2 = m.define_symbol (".".intern(), 2); user__2 = m.define_symbol ("user".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); tell__0 = m.define_symbol ("tell".intern(), 0); this__0 = m.define_symbol ("this".intern(), 0); gg_echo__0 = m.define_symbol ("gg_echo".intern(), 0); broadcast__3 = m.define_symbol ("broadcast".intern(), 3); return true; } // common_process_wsserver:setRotationEx/5 init() } // common_process_wsserver:setRotationEx/5 final class common_process_wsserver_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 (13) /*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_wsserver:move_to_position/11 exec() // common_process_wsserver: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_wsserver: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_wsserver:move_to_position/11 init() } // common_process_wsserver:move_to_position/11 final class common_process_wsserver_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(wsserver, clock, _G110) m.put_atom (wsserver__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_wsserver:get_clock/1 exec() // common_process_wsserver:get_clock/1 decls. public SymbolDescriptor wsserver__0; public SymbolDescriptor clock__0; // end of common_process_wsserver:get_clock/1 decls. public boolean init (DLP m) { wsserver__0 = m.define_symbol ("wsserver".intern(), 0); clock__0 = m.define_symbol ("clock".intern(), 0); return true; } // common_process_wsserver:get_clock/1 init() } // common_process_wsserver:get_clock/1 final class common_process_wsserver_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(wsserver, clock, _G110) m.put_atom (wsserver__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_wsserver:set_clock/1 exec() // common_process_wsserver:set_clock/1 decls. public SymbolDescriptor wsserver__0; public SymbolDescriptor clock__0; // end of common_process_wsserver:set_clock/1 decls. public boolean init (DLP m) { wsserver__0 = m.define_symbol ("wsserver".intern(), 0); clock__0 = m.define_symbol ("clock".intern(), 0); return true; } // common_process_wsserver:set_clock/1 init() } // common_process_wsserver:set_clock/1 final class common_process_wsserver_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_wsserver:init_vars/0 exec() // common_process_wsserver:init_vars/0 decls. public SymbolDescriptor no_init__0; // end of common_process_wsserver:init_vars/0 decls. public boolean init (DLP m) { no_init__0 = m.define_symbol ("no_init".intern(), 0); return true; } // common_process_wsserver:init_vars/0 init() } // common_process_wsserver:init_vars/0 class common_process_wsserver extends Code { public static ObjectDescriptor object; public static ObjectDescriptor _getsets; 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 setRotationEx_5; public static MethodDescriptor move_to_position_11; public static MethodDescriptor get_clock_1; public static MethodDescriptor set_clock_1; public static MethodDescriptor getSFVec3f_5; public static MethodDescriptor setSFVec3f_5; public boolean init (DLP m) { object = m.define_object ("common_process_wsserver".intern(), 1, 14, 1); _getsets = m.header_object (object, "getsets".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); setRotationEx_5 = m.define_method (object, 8, "setRotationEx".intern(), 5); move_to_position_11 = m.define_method (object, 9, "move_to_position".intern(), 11); get_clock_1 = m.define_method (object, 10, "get_clock".intern(), 1); set_clock_1 = m.define_method (object, 11, "set_clock".intern(), 1); getSFVec3f_5 = m.extern_method (object, 12, "getSFVec3f".intern(), 5); setSFVec3f_5 = m.extern_method (object, 13, "setSFVec3f".intern(), 5); m.define_nonlog (object, "steps".intern(), 0); return true; } // common_process_wsserver init() } // class common_process_wsserver // end of unit common_process_wsserver code. // begin of unit getsets code. final class getsets_getPosition_4 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: getPosition(_G107, _G108, _G109, _G110) case 0: //m.success = m.get_x_varia (11,1); /* Name */ 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: get_field(_G107, position, position(_G108, _G109, _G110)) m.put_x_value (11,1); /* 'Name' */ m.put_atom (position__0,2); m.put_struct (position__3,3); m.set_x_value (12); /* 'X' */ m.set_x_value (13); /* 'Y' */ m.set_x_value (14); /* 'Z' */ m.exec (dlplib.get_field_3); break; case 2: m.end_rule (); break; } // switch return m.success; } // getsets:getPosition/4 exec() // getsets:getPosition/4 decls. public SymbolDescriptor position__0; public SymbolDescriptor position__3; // end of getsets:getPosition/4 decls. public boolean init (DLP m) { position__0 = m.define_symbol ("position".intern(), 0); position__3 = m.define_symbol ("position".intern(), 3); return true; } // getsets:getPosition/4 init() } // getsets:getPosition/4 final class getsets_setPosition_4 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: setPosition(_G107, _G108, _G109, _G110) case 0: //m.success = m.get_x_varia (11,1); /* Name */ 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: set_field(_G107, position, position(_G108, _G109, _G110)) m.put_x_value (11,1); /* 'Name' */ m.put_atom (position__0,2); m.put_struct (position__3,3); m.set_x_value (12); /* 'X' */ m.set_x_value (13); /* 'Y' */ m.set_x_value (14); /* 'Z' */ m.exec (dlplib.set_field_3); break; case 2: m.end_rule (); break; } // switch return m.success; } // getsets:setPosition/4 exec() // getsets:setPosition/4 decls. public SymbolDescriptor position__0; public SymbolDescriptor position__3; // end of getsets:setPosition/4 decls. public boolean init (DLP m) { position__0 = m.define_symbol ("position".intern(), 0); position__3 = m.define_symbol ("position".intern(), 3); return true; } // getsets:setPosition/4 init() } // getsets:setPosition/4 final class getsets_getRotation_5 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: getRotation(_G107, _G108, _G109, _G110, _G111) case 0: //m.success = m.get_x_varia (12,1); /* Name */ 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: get_field(_G107, rotation, rotation(_G108, _G109, _G110, _G111)) m.put_x_value (12,1); /* 'Name' */ m.put_atom (rotation__0,2); m.put_struct (rotation__4,3); m.set_x_value (13); /* 'X' */ m.set_x_value (14); /* 'Y' */ m.set_x_value (15); /* 'Z' */ m.set_x_value (16); /* 'R' */ m.exec (dlplib.get_field_3); break; case 2: m.end_rule (); break; } // switch return m.success; } // getsets:getRotation/5 exec() // getsets:getRotation/5 decls. public SymbolDescriptor rotation__0; public SymbolDescriptor rotation__4; // end of getsets:getRotation/5 decls. public boolean init (DLP m) { rotation__0 = m.define_symbol ("rotation".intern(), 0); rotation__4 = m.define_symbol ("rotation".intern(), 4); return true; } // getsets:getRotation/5 init() } // getsets:getRotation/5 final class getsets_setRotation_5 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: setRotation(_G107, _G108, _G109, _G110, _G111) case 0: //m.success = m.get_x_varia (12,1); /* Name */ 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: set_field(_G107, rotation, rotation(_G108, _G109, _G110, _G111)) m.put_x_value (12,1); /* 'Name' */ m.put_atom (rotation__0,2); m.put_struct (rotation__4,3); m.set_x_value (13); /* 'X' */ m.set_x_value (14); /* 'Y' */ m.set_x_value (15); /* 'Z' */ m.set_x_value (16); /* 'R' */ m.exec (dlplib.set_field_3); break; case 2: m.end_rule (); break; } // switch return m.success; } // getsets:setRotation/5 exec() // getsets:setRotation/5 decls. public SymbolDescriptor rotation__0; public SymbolDescriptor rotation__4; // end of getsets:setRotation/5 decls. public boolean init (DLP m) { rotation__0 = m.define_symbol ("rotation".intern(), 0); rotation__4 = m.define_symbol ("rotation".intern(), 4); return true; } // getsets:setRotation/5 init() } // getsets:setRotation/5 final class getsets_getSFVec3f_5 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: getSFVec3f(_G107, position, _G109, _G110, _G111) case 0: m.try_me_else (3); //m.success = m.get_x_varia (12,1); /* Name */ m.get_atom (position__0,2); m.get_x_varia (13,3); /* X */ m.get_x_varia (14,4); /* Y */ m.get_x_varia (15,5); /* Z */ m.cut_neck (); m.end_head (); break; case 1: // goal: get_field(_G107, position, position(_G109, _G110, _G111)) m.put_x_value (12,1); /* 'Name' */ m.put_atom (position__0,2); m.put_struct (position__3,3); m.set_x_value (13); /* 'X' */ m.set_x_value (14); /* 'Y' */ m.set_x_value (15); /* 'Z' */ m.exec (dlplib.get_field_3); break; case 2: m.end_rule (); break; // head: getSFVec3f(_G3194, set_position, _G3196, _G3197, _G3198) case 3: m.retry_me_else (6); //m.success = m.get_x_varia (12,1); /* Name */ m.get_atom (set_position__0,2); m.get_x_varia (13,3); /* X */ m.get_x_varia (14,4); /* Y */ m.get_x_varia (15,5); /* Z */ m.cut_neck (); m.end_head (); break; case 4: // goal: get_field(_G3194, position, position(_G3196, _G3197, _G3198)) m.put_x_value (12,1); /* 'Name' */ m.put_atom (position__0,2); m.put_struct (position__3,3); m.set_x_value (13); /* 'X' */ m.set_x_value (14); /* 'Y' */ m.set_x_value (15); /* 'Z' */ m.exec (dlplib.get_field_3); break; case 5: m.end_rule (); break; // head: getSFVec3f(_G6186, translation, _G6188, _G6189, _G6190) case 6: m.trust_or_fail (); //m.success = m.get_x_varia (12,1); /* Name */ m.get_atom (translation__0,2); m.get_x_varia (13,3); /* X */ m.get_x_varia (14,4); /* Y */ m.get_x_varia (15,5); /* Z */ m.end_head (); break; case 7: // goal: get_field(_G6186, position, position(_G6188, _G6189, _G6190)) m.put_x_value (12,1); /* 'Name' */ m.put_atom (position__0,2); m.put_struct (position__3,3); m.set_x_value (13); /* 'X' */ m.set_x_value (14); /* 'Y' */ m.set_x_value (15); /* 'Z' */ m.exec (dlplib.get_field_3); break; case 8: m.end_rule (); break; } // switch return m.success; } // getsets:getSFVec3f/5 exec() // getsets:getSFVec3f/5 decls. public SymbolDescriptor position__0; public SymbolDescriptor position__3; public SymbolDescriptor set_position__0; public SymbolDescriptor translation__0; // end of getsets:getSFVec3f/5 decls. public boolean init (DLP m) { position__0 = m.define_symbol ("position".intern(), 0); position__3 = m.define_symbol ("position".intern(), 3); set_position__0 = m.define_symbol ("set_position".intern(), 0); translation__0 = m.define_symbol ("translation".intern(), 0); return true; } // getsets:getSFVec3f/5 init() } // getsets:getSFVec3f/5 final class getsets_setSFVec3f_5 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: setSFVec3f(_G107, position, _G109, _G110, _G111) case 0: m.try_me_else (3); //m.success = m.get_x_varia (12,1); /* Name */ m.get_atom (position__0,2); m.get_x_varia (13,3); /* X */ m.get_x_varia (14,4); /* Y */ m.get_x_varia (15,5); /* Z */ m.cut_neck (); m.end_head (); break; case 1: // goal: set_field(_G107, position, position(_G109, _G110, _G111)) m.put_x_value (12,1); /* 'Name' */ m.put_atom (position__0,2); m.put_struct (position__3,3); m.set_x_value (13); /* 'X' */ m.set_x_value (14); /* 'Y' */ m.set_x_value (15); /* 'Z' */ m.exec (dlplib.set_field_3); break; case 2: m.end_rule (); break; // head: setSFVec3f(_G3194, set_position, _G3196, _G3197, _G3198) case 3: m.retry_me_else (6); //m.success = m.get_x_varia (12,1); /* Name */ m.get_atom (set_position__0,2); m.get_x_varia (13,3); /* X */ m.get_x_varia (14,4); /* Y */ m.get_x_varia (15,5); /* Z */ m.cut_neck (); m.end_head (); break; case 4: // goal: set_field(_G3194, position, position(_G3196, _G3197, _G3198)) m.put_x_value (12,1); /* 'Name' */ m.put_atom (position__0,2); m.put_struct (position__3,3); m.set_x_value (13); /* 'X' */ m.set_x_value (14); /* 'Y' */ m.set_x_value (15); /* 'Z' */ m.exec (dlplib.set_field_3); break; case 5: m.end_rule (); break; // head: setSFVec3f(_G6186, translation, _G6188, _G6189, _G6190) case 6: m.trust_or_fail (); //m.success = m.get_x_varia (12,1); /* Name */ m.get_atom (translation__0,2); m.get_x_varia (13,3); /* X */ m.get_x_varia (14,4); /* Y */ m.get_x_varia (15,5); /* Z */ m.end_head (); break; case 7: // goal: set_field(_G6186, position, position(_G6188, _G6189, _G6190)) m.put_x_value (12,1); /* 'Name' */ m.put_atom (position__0,2); m.put_struct (position__3,3); m.set_x_value (13); /* 'X' */ m.set_x_value (14); /* 'Y' */ m.set_x_value (15); /* 'Z' */ m.exec (dlplib.set_field_3); break; case 8: m.end_rule (); break; } // switch return m.success; } // getsets:setSFVec3f/5 exec() // getsets:setSFVec3f/5 decls. public SymbolDescriptor position__0; public SymbolDescriptor position__3; public SymbolDescriptor set_position__0; public SymbolDescriptor translation__0; // end of getsets:setSFVec3f/5 decls. public boolean init (DLP m) { position__0 = m.define_symbol ("position".intern(), 0); position__3 = m.define_symbol ("position".intern(), 3); set_position__0 = m.define_symbol ("set_position".intern(), 0); translation__0 = m.define_symbol ("translation".intern(), 0); return true; } // getsets:setSFVec3f/5 init() } // getsets:setSFVec3f/5 class getsets extends Code { public static ObjectDescriptor object; public static MethodDescriptor getPosition_4; public static MethodDescriptor setPosition_4; public static MethodDescriptor getRotation_5; public static MethodDescriptor setRotation_5; public static MethodDescriptor getSFVec3f_5; public static MethodDescriptor setSFVec3f_5; public boolean init (DLP m) { object = m.define_object ("getsets".intern(), 0, 6, 0); getPosition_4 = m.define_method (object, 0, "getPosition".intern(), 4); setPosition_4 = m.define_method (object, 1, "setPosition".intern(), 4); getRotation_5 = m.define_method (object, 2, "getRotation".intern(), 5); setRotation_5 = m.define_method (object, 3, "setRotation".intern(), 5); getSFVec3f_5 = m.define_method (object, 4, "getSFVec3f".intern(), 5); setSFVec3f_5 = m.define_method (object, 5, "setSFVec3f".intern(), 5); return true; } // getsets init() } // class getsets // end of unit getsets code. // begin of unit wsgame_score code. final class wsgame_score_setGameScore_4 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: setGameScore(_G107, _G108, _G109, _G110) 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, _G107) 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, _G108) 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, _G109) 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, _G110) 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; } // wsgame_score:setGameScore/4 exec() // wsgame_score:setGameScore/4 decls. // end of wsgame_score:setGameScore/4 decls. public boolean init (DLP m) { return true; } // wsgame_score:setGameScore/4 init() } // wsgame_score:setGameScore/4 final class wsgame_score_getGameScore_4 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: getGameScore(_G107, _G108, _G109, _G110) 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: _G107=team1 m.put_x_value (11,1); /* 'Team1' */ m.put_z_value (2,2); /* team1 */ m.call (dlplib.op_eq_2); /*6*/ break; case 2: // goal: _G108=team2 m.put_y_value (2,1); /* 'Team2' */ m.put_z_value (3,2); /* team2 */ m.call (dlplib.op_eq_2); /*6*/ break; case 3: // goal: _G109=score1 m.put_y_value (1,1); /* 'Score1' */ m.put_z_value (0,2); /* score1 */ m.call (dlplib.op_eq_2); /*6*/ break; case 4: // goal: _G110=score2 m.put_y_value (0,1); /* 'Score2' */ m.put_z_value (1,2); /* score2 */ m.deallocate (); m.exec (dlplib.op_eq_2); break; case 5: m.end_rule (); break; } // switch return m.success; } // wsgame_score:getGameScore/4 exec() // wsgame_score:getGameScore/4 decls. // end of wsgame_score:getGameScore/4 decls. public boolean init (DLP m) { return true; } // wsgame_score:getGameScore/4 init() } // wsgame_score:getGameScore/4 final class wsgame_score_getGameScoreStruct_1 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: getGameScoreStruct(_G107) case 0: //m.success = m.get_x_varia (10,1); /* Score */ m.end_head (); break; case 1: // goal: _G107=score(team1:team2/score1:score2) m.put_struct (op__div__2,11); m.set_z_value (3); /* team2 */ m.set_z_value (0); /* score1 */ m.put_struct (op__col__2,12); m.set_x_value (11); /* 'Xtmp' */ m.set_z_value (1); /* score2 */ m.put_struct (op__col__2,13); m.set_z_value (2); /* team1 */ m.set_x_value (12); /* 'Xtmp' */ m.put_x_value (10,1); /* 'Score' */ m.put_struct (score__1,2); m.set_x_value (13); /* 'Xtmp' */ m.exec (dlplib.op_eq_2); break; case 2: m.end_rule (); break; } // switch return m.success; } // wsgame_score:getGameScoreStruct/1 exec() // wsgame_score:getGameScoreStruct/1 decls. public SymbolDescriptor score__1; public SymbolDescriptor op__col__2; public SymbolDescriptor op__div__2; // end of wsgame_score:getGameScoreStruct/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); return true; } // wsgame_score:getGameScoreStruct/1 init() } // wsgame_score:getGameScoreStruct/1 final class wsgame_score_getTeamScore_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: getTeamScore(team1, _G108) case 0: m.try_me_else (3); //m.success = m.get_z_value (2,1); /* team1 */ m.get_x_varia (10,2); /* Score */ m.cut_neck (); m.end_head (); break; case 1: // goal: _G108=score1 m.put_x_value (10,1); /* 'Score' */ m.put_z_value (0,2); /* score1 */ m.exec (dlplib.op_eq_2); break; case 2: m.end_rule (); break; // head: getTeamScore(team2, _G2161) case 3: m.trust_or_fail (); //m.success = m.get_z_value (3,1); /* team2 */ m.get_x_varia (10,2); /* Score */ m.end_head (); break; case 4: // goal: _G2161=score2 m.put_x_value (10,1); /* 'Score' */ m.put_z_value (1,2); /* score2 */ m.exec (dlplib.op_eq_2); break; case 5: m.end_rule (); break; } // switch return m.success; } // wsgame_score:getTeamScore/2 exec() // wsgame_score:getTeamScore/2 decls. // end of wsgame_score:getTeamScore/2 decls. public boolean init (DLP m) { return true; } // wsgame_score:getTeamScore/2 init() } // wsgame_score:getTeamScore/2 final class wsgame_score_setTeamScore_2 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: setTeamScore(team1, _G108) case 0: m.try_me_else (3); //m.success = m.get_z_value (2,1); /* team1 */ m.get_x_varia (10,2); /* Score */ m.cut_neck (); m.end_head (); break; case 1: // goal: assign_nlv_term(this, nreg, 0, _G108) m.put_this (1); m.put_nreg (2); m.put_int (0,3); m.put_x_value (10,4); /* 'Score' */ m.exec (dlplib.assign_nlv_term_4); break; case 2: m.end_rule (); break; // head: setTeamScore(team2, _G2351) case 3: m.trust_or_fail (); //m.success = m.get_z_value (3,1); /* team2 */ m.get_x_varia (10,2); /* Score */ m.end_head (); break; case 4: // goal: assign_nlv_term(this, nreg, 1, _G2351) m.put_this (1); m.put_nreg (2); m.put_int (1,3); m.put_x_value (10,4); /* 'Score' */ m.exec (dlplib.assign_nlv_term_4); break; case 5: m.end_rule (); break; } // switch return m.success; } // wsgame_score:setTeamScore/2 exec() // wsgame_score:setTeamScore/2 decls. // end of wsgame_score:setTeamScore/2 decls. public boolean init (DLP m) { return true; } // wsgame_score:setTeamScore/2 init() } // wsgame_score:setTeamScore/2 final class wsgame_score_showGameScore_0 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: showGameScore case 0: m.allocate (3); //m.success = m.end_head (); break; case 1: // goal: getGameScoreStruct(_G113) m.put_y_value (2,1); /* 'Score' */ m.call (2) /*2*/; /* getGameScoreStruct_1 */ break; case 2: // goal: format('~ngame score: ~w~n', [_G113]) m.put_atom (data__23__0,1); m.put_list (2); m.set_y_value (2); /* 'Score' */ m.set_nil (); m.call (dlplib.format_2); /*6*/ break; case 3: // goal: _G127=[tell, game_score, _G113] m.put_list (9); m.set_y_value (2); /* 'Score' */ m.set_nil (); m.put_list (10); m.set_atom (game_score__0); m.set_x_value (9); /* 'Xtmp' */ m.put_y_value (0,1); /* 'Message' */ m.put_list (2); m.set_atom (tell__0); m.set_x_value (10); /* 'Xtmp' */ m.call (dlplib.op_eq_2); /*6*/ break; case 4: // goal: local_host(_G142, _G143) m.put_y_value (1,1); /* 'Host' */ m.put_v_varia (2); /* 'Unknown' */ m.call (dlplib.local_host_2); /*6*/ break; case 5: // goal: format('game score: ~w~n', [_G142]) m.put_atom (data__24__0,1); m.put_list (2); m.set_y_value (1); /* 'Host' */ m.set_nil (); m.call (dlplib.format_2); /*6*/ break; case 6: // goal: <-(this, gg_echo, broadcast(_G142, server, _G127)) m.put_this (1); m.put_atom (gg_echo__0,2); m.put_struct (broadcast__3,3); m.set_y_value (1); /* 'Host' */ m.set_atom (server__0); m.set_y_value (0); /* 'Message' */ m.deallocate (); m.exec (dlplib.op_call_3); break; case 7: m.end_rule (); break; } // switch return m.success; } // wsgame_score:showGameScore/0 exec() // wsgame_score:showGameScore/0 decls. public SymbolDescriptor data__23__0; public SymbolDescriptor op__dot__2; public SymbolDescriptor sl_sr__0; public SymbolDescriptor tell__0; public SymbolDescriptor game_score__0; public SymbolDescriptor data__24__0; public SymbolDescriptor this__0; public SymbolDescriptor gg_echo__0; public SymbolDescriptor broadcast__3; public SymbolDescriptor server__0; // end of wsgame_score:showGameScore/0 decls. public boolean init (DLP m) { data__23__0 = m.define_symbol ("~ngame score: ~w~n".intern(), 0); op__dot__2 = m.define_symbol (".".intern(), 2); sl_sr__0 = m.define_symbol ("[]".intern(), 0); tell__0 = m.define_symbol ("tell".intern(), 0); game_score__0 = m.define_symbol ("game_score".intern(), 0); data__24__0 = m.define_symbol ("game score: ~w~n".intern(), 0); this__0 = m.define_symbol ("this".intern(), 0); gg_echo__0 = m.define_symbol ("gg_echo".intern(), 0); broadcast__3 = m.define_symbol ("broadcast".intern(), 3); server__0 = m.define_symbol ("server".intern(), 0); return true; } // wsgame_score:showGameScore/0 init() } // wsgame_score:showGameScore/0 final class wsgame_score_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, 0) m.put_this (1); m.put_nreg (2); m.put_int (0,3); m.put_int (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, unknown) m.put_this (1); m.put_nreg (2); m.put_int (3,3); m.put_atom (unknown__0,4); m.deallocate (); m.exec (dlplib.assign_nlv_term_4); break; case 5: m.end_rule (); break; } // switch return m.success; } // wsgame_score:init_vars/0 exec() // wsgame_score:init_vars/0 decls. public SymbolDescriptor unknown__0; // end of wsgame_score:init_vars/0 decls. public boolean init (DLP m) { unknown__0 = m.define_symbol ("unknown".intern(), 0); return true; } // wsgame_score:init_vars/0 init() } // wsgame_score:init_vars/0 class wsgame_score extends Code { public static ObjectDescriptor object; public static MethodDescriptor setGameScore_4; public static MethodDescriptor getGameScore_4; public static MethodDescriptor getGameScoreStruct_1; public static MethodDescriptor getTeamScore_2; public static MethodDescriptor setTeamScore_2; public static MethodDescriptor showGameScore_0; public boolean init (DLP m) { object = m.define_object ("wsgame_score".intern(), 0, 6, 4); setGameScore_4 = m.define_method (object, 0, "setGameScore".intern(), 4); getGameScore_4 = m.define_method (object, 1, "getGameScore".intern(), 4); getGameScoreStruct_1 = m.define_method (object, 2, "getGameScoreStruct".intern(), 1); getTeamScore_2 = m.define_method (object, 3, "getTeamScore".intern(), 2); setTeamScore_2 = m.define_method (object, 4, "setTeamScore".intern(), 2); showGameScore_0 = m.define_method (object, 5, "showGameScore".intern(), 0); 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; } // wsgame_score init() } // class wsgame_score // end of unit wsgame_score code. // begin of unit wsclock_pulse code. final class wsclock_pulse_wsclock_pulse_0 extends Code { public boolean exec (DLP m) { switch (m.PSreg) { // head: wsclock_pulse case 0: m.allocate (3); //m.success = m.cut_level (0); m.end_head (); break; case 1: // goal: repeat m.call (dlplib.repeat_0); /*6*/ break; case 2: // goal: sleep(1000) m.put_int (1000,1); m.call (dlplib.sleep_1); /*6*/ break; case 3: // goal: get_clock(_G124) m.put_y_value (2,1); /* 'Time' */ m.call (1) /*2*/; /* get_clock_1 */ break; case 4: // goal: is_eval(_G124-1, _G129) m.put_struct (op__sub__2,1); m.set_y_value (2); /* 'Time' */ m.set_int (1); m.put_y_value (1,2); /* 'Left' */ m.call (dlplib.is_eval_2); /*6*/ break; case 5: // goal: set_clock(_G129) m.put_y_value (1,1); /* 'Left' */ m.call (2) /*2*/; /* set_clock_1 */ break; case 6: // goal: _G129<1 m.put_y_value (1,1); /* 'Left' */ m.put_int (1,2); m.call (dlplib.op_cmp_lt_2); /*6*/ break; case 7: // goal: ! m.cut_tail (0); m.deallocate (); break; case 8: m.end_rule (); break; } // switch return m.success; } // wsclock_pulse:wsclock_pulse/0 exec() // wsclock_pulse:wsclock_pulse/0 decls. public SymbolDescriptor op__sub__2; // end of wsclock_pulse:wsclock_pulse/0 decls. public boolean init (DLP m) { op__sub__2 = m.define_symbol ("-".intern(), 2); return true; } // wsclock_pulse:wsclock_pulse/0 init() } // wsclock_pulse:wsclock_pulse/0 class wsclock_pulse extends Code { public static ObjectDescriptor object; public static ObjectDescriptor _common_process_wsserver; public static MethodDescriptor wsclock_pulse_0; public static MethodDescriptor get_clock_1; public static MethodDescriptor set_clock_1; public boolean init (DLP m) { object = m.define_object ("wsclock_pulse".intern(), 1, 3, 0); _common_process_wsserver = m.header_object (object, "common_process_wsserver".intern(), 0); wsclock_pulse_0 = m.define_method (object, 0, "wsclock_pulse".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 init() } // class wsclock_pulse // end of unit wsclock_pulse code. // end of wsserver.pl code file.