User:Jana Kamachi/Detect
< User:Jana Kamachi
Jump to navigation
Jump to search
Revision as of 02:44, 19 November 2007 by Jana Kamachi (talk | contribs) (New page: <pre> list dtc = []; list darl = []; integer darl_d = FALSE; integer cnt = 0; vector lastpos; vector curpos; default { state_entry() { llSensorRepeat("","",SCRIPTED,1.0,...)
list dtc = []; list darl = []; integer darl_d = FALSE; integer cnt = 0; vector lastpos; vector curpos; default { state_entry() { llSensorRepeat("","",SCRIPTED,1.0,PI*2,0.000000001); llSetTimerEvent(0.000001); lastpos = llGetPos(); } sensor(integer n_m){ integer i=0; list tmp; for(i=0;i<n_m;i++) { tmp+= [llDetectedName(i) + " owned by " + llKey2Name(llGetOwnerKey(llDetectedKey(i)))]; if(i>2) jump out; } @out; dtc = tmp; } timer(){ cnt = cnt + 1; if(llVecDist(lastpos,llGetPos()) > 1000){ llOwnerSay("Orbit Detect."); llOwnerSay("Possible Orbiters\n" + llDumpList2String(dtc,"\n")); cnt = 501; lastpos = llGetPos(); }else{ } if(cnt > 500){ lastpos = llGetPos(); cnt = 0; } } }