Advertisement
Guest User

Untitled

a guest
Mar 3rd, 2012
176
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. integer kanal = 135790;
  2. string plec = "?";
  3. integer wylaczNasluch = 1;
  4. integer lapkaNasluchu;
  5.  
  6. ustawRotacje(vector xyz) {
  7.     vector xyz_angles = xyz;
  8.     vector angles_in_radians = xyz_angles*DEG_TO_RAD;
  9.     rotation rot_xyzq = llEuler2Rot(angles_in_radians);
  10.     llSetRot(llGetRot()*rot_xyzq);
  11. }
  12.  
  13. default {
  14.     state_entry() {
  15.         lapkaNasluchu = llListen(kanal, "", llGetOwner(), "");
  16.         plec = (string)llGetPrimitiveParams([PRIM_TEXT]);
  17.         if(plec != "0" || plec != "1") {
  18.             llOwnerSay("@getdebug_avatarsex="+(string)kanal);
  19.         }
  20.         llSetTimerEvent(20);
  21.     }
  22.     listen(integer channel, string name, key id, string message) {
  23.         if(message == "0" || message == "Kobieta") {
  24.             llSetText("0", <1.0, 1.0, 1.0>, 0);
  25.             llOwnerSay("Ustawiono plec: kobieta");
  26.             llSetPos(<0,0,-0.02>);
  27.             ustawRotacje(<0,0,0>);
  28.             plec = "0";
  29.             wylaczNasluch = 1;
  30.         }
  31.         else if(message == "1" || message == "Mezczyzna") {
  32.             llSetText("1", <1.0, 1.0, 1.0>, 0);
  33.             llOwnerSay("Ustawiono plec: mezczyzna");
  34.             llSetPos(<0,0,0>);
  35.             ustawRotacje(<0,0,0>);
  36.             plec = "1";
  37.             wylaczNasluch = 1;
  38.         }
  39.         else if(message == "-1") {
  40.             llDialog(llGetOwner(), "Jaka jest Twoja plec?", ["Kobieta", "Mezczyzna"], kanal);
  41.             wylaczNasluch = 0;
  42.         }
  43.     }
  44.     timer() {
  45.         if(plec != "0" || plec != "1" || plec != "-1") {
  46.             llDialog(llGetOwner(), "Jaka jest Twoja plec?", ["Kobieta", "Mezczyzna"], kanal);
  47.             wylaczNasluch = 0;
  48.         }
  49.         if(wylaczNasluch == 1) {
  50.             llSetTimerEvent(0);
  51.             llListenRemove(lapkaNasluchu);
  52.             llSetScriptState(llGetScriptName(), FALSE);
  53.         } else {
  54.             llSetTimerEvent(120);
  55.         }
  56.     }
  57. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement