Wizardry and Steamworks

Wizardry and Steamworks Logo Landscape

Wizardry and Steamworks

Wizardry and Steamworks are a development group to be found in Second Life. The leaders of the group are Kira Komarov and Flax Quirina. We specialize on scripting in Second Life, however anything that pushes the boundaries of what is currently possible in Second Life is of interest to us.

Member Wiki Mirrors

• WaS-K - Kira Komarov

FUS (Frequently Used Snippets)

Frequently Used Snippets (FUS) are short snippets that are generic enough to be included in any script. Just as you have generic types, generic functions, these represent an abstraction over Second Life script programming methodologies particular to Wizardry and Steamworks [WaS] and although they aren't delivered in the form of scripts, they can be used in any script by inserting them at the right places.

Private Channel Key-Hash

Extremely useful, taken from llDialog.

Inline Usage <lsl> integer comChannel = ((integer)("0x"+llGetSubString((string) /* llGetOwner(), llGetCreator(), llDetectedKey(0), id */,-8,-1)) & 0x3FFFFFFF) ^ 0xBFFFFFFF; </lsl>

Endless Menu with Back and Next

This generates an endless menu with Back and Next buttons by arranging a list dynamically whenever the Back and Next buttons are pressed. It has been used in several scripts with some variations.

Global Primitives <lsl> list menu_items = []; list key_items = []; integer mitra = 0; list cList = [] </lsl> Global Functions <lsl> list mFwd() {

   if(mitra+1>llGetListLength(menu_items)) return cList;
   cList = llListInsertList(llListInsertList(llList2List(menu_items, ++mitra, (mitra+=9)), ["<= Back"], 0), ["Next =>"], 2);
   return cList;

}

list mBwd() {

   if(mitra-19<0) return cList;
   cList = llListInsertList(llListInsertList(llList2List(menu_items, (mitra-=19), (mitra+=9)), ["<= Back"], 0), ["Next =>"], 2);
   return cList;

} </lsl> Inline Usage <lsl>

           integer itra;
           for(itra=0, mitra=0, menu_items=[]; itra< llGetListLength(/* list */); ++itra) {
               menu_items += llList2String(/* list */, itra);
           }
           cList = llListInsertList(llListInsertList(llList2List(menu_items, mitra, (mitra+=9)), ["<= Back"], 0), ["Next =>"], 2);
           llDialog(/* Key to prompt */, /* Dialog Text */, cList, /* channel */);

</lsl>

Generic Notecard Reader

This is a generic notecard loader. In this variation, it does not set a timer to check whether the notecard has been loaded.

Global Primitives <lsl> key nQuery = NULL_KEY; integer nLine = 0; list nList = []; //pragma inline string nName = "New Notecard"; </lsl> Reading <lsl>

       integer itra;
       for(itra=0. accessList=[]; itra<llGetInventoryNumber(INVENTORY_NOTECARD); ++itra) {
           if(llGetInventoryName(INVENTORY_NOTECARD, itra) == nName)
               jump found_notecard;
       }
       llInstantMessage(llGetOwner(), "Failed to find notecard.");
       return;

@found_notecard;

       nQuery = llGetNotecardLine(nName, nLine);

</lsl> Dataserver <lsl>

   dataserver(key id, string data) {
       if(id != nQuery) return;
       if(data == EOF) return;
       if(data == "") jump next_line;
       list nList += data;

@next_line;

       nQuery = llGetNotecardLine(nName, ++nLine);
   }

</lsl> Extension: Return if key/name NOT in nList <lsl>

       if(!~llListFindList(nList, (list)/* llDetectedKey(0), llDetectedName(0) */)) return;

</lsl>

RLV: Wearables & Attachment Lists as Strings

A pain to type.

Local preferred, global if needed <lsl> //pragma inline list CLOTHES = [ "gloves", "jacket", "pants", "shirt", "shoes", "skirt", "socks", "underpants", "undershirt" ]; //pragma inline list ATTACHMENTS = [ "none", "chest", "skull", "left shoulder", "right shoulder", "left hand", "right hand",

                    "left foot", "right foot", "spine", "pelvis", "mouth", "chin", "left ear", "right ear", 
                    "left eyeball", "right eyeball", "nose", "r upper arm", "r forearm", "l upper arm", 
                    "l forearm", "right hip", "r upper leg", "r lower leg", "left hip", "l upper leg", 
                    "l lower leg", "stomach", "left pec", "right pec", "center 2", "top right", "top", 
                    "top left", "center", "bottom left", "bottom", "bottom right" ];

</lsl>

RLV: Rotate Avatar To Face Target

Primitives <lsl> vector targetpos = < /* x */, /* y */, /* z */ >; </lsl> Inline usage <lsl>

       vector pointTo = targetpos - llGetPos();
       float angleTo = llAtan2(pointTo.x, pointTo.y);
       llOwnerSay("@setrot:" + (string)angleTo + "=force")

</lsl>

Using llSensorRepeat as a Timer

Can be used as a second timer event. Explained in User:Kira Komarov/Trick or Treat.

Global primitives; <lsl> integer flag = 0; </lsl> Starting the sensor-timer <lsl>

       llSensorRepeat("", NULL_KEY, flag=1, 0.1, 0.1, 60);

</lsl> (No) Sensor <lsl>

   no_sensor() {
       if(flag) {
           --flag;
           return;
       }

       /* this area will be hit 60 
         * seconds after the llSensorRepeat() 
         * has been executed. */
   }

</lsl>

Planar or Grid Distance

File:WaS Planar Distance Kitty and Book.png

Distance is marked with red

The x,y planar distance between the kitty and the book is given by: <lsl> float length_of_red_primitive=llVecDist(<kitty.x,kitty.y,0>,<book.x,book.y,0>); </lsl>

This works for all planes: (x,y), (x,z) and (y,z) by eliminating one of the components - in this example, z.

Object Rotate to Face Object

File:WaS Kitty Rotates to Face Book.png

The rotation required to be applied to the kitty object in order to face the book.

The rotation is given by qΔ. <lsl> vector book_position = <83.889717, 92.310814, 500.5>; vector kitty_position = <82.306671, 92.310814, 501.714783>;

default {

   state_entry() {
       rotation qΔ = llRotBetween(<1,0,0>,llVecNorm(<book_position.x-kitty_position.x,
                                                     book_position.y-kitty_position.y,
                                                     book_position.z-kitty_position.z>));
       llSetRot(llGetRot() * qΔ);
   }

} </lsl> By eliminating a component x, y or z in llVecNorm the kitty may turn on only on certain axes.

Propulse an Object towards Target (Artillery)

This will hurl an object at a target using, in order:

1. High angle.
2. Low angle.
3. Abort if object won't even lift off.

More explanations at the Artillery article.

Global primitives <lsl> vector target = < /* x */, /* y */, /* z */ >; float velocity = /* some velocity */; </lsl> Inline usage <lsl>

       dΔ=llVecDist(<target.x,target.y,0>,<origin.x,origin.y,0>);
       valSin = 9.81*dΔ/llPow(velocity, 2); /* Attempt high angle. */
       if(valSin < -1 || valSin > 1) valSin = 9.81/llPow(velocity, 2); /* Attempt low angle. */
       if(valSin < -1 || valSin > 1) return; /* Won't even lift the object off the ground. Abort. */
       llSetVelocity(llVecNorm(<1,0,0>*llRotBetween(<1,0,0>,llVecNorm(<target.x-origin.x,target.y-origin.y, dΔ*llTan((90-RAD_TO_DEG*llAsin(valSin)/2) * DEG_TO_RAD) + llFabs(target.z-origin.z)>)))*velocity, FALSE);

</lsl>

Resources

All this work should be attributed to the Wizardry and Steamworks group under the GPLv3 license. You are free to use these resources and even commercialize the products using them as long as you attribute the components you got from here to the Wizardry and Steamworks [WaS] group.

These resources are originals, in the sense that they have been made, ground-up by Wizardry and Steamworks members.

Animations

File	Description
WaS Lighter Two_Hands.bvh‎	The avatar leans forward and places the left mouth (holding a cigarette) and the right hand over and in front of the left mouth (holding a lighter).
WaS-K AnkleLock Animation	Running this animation will lock your shoes to your ankles so they do not appear strange when being animated. See AnkleLock.
Butter	Ice cream

Sounds

File	Length	Description	Key
WaS Zippo Short Flick Spin Click.wav	00:01s	Zippo cap flicks open, the wheel is spun once, the zippo cap clicks shut.	bc1b20c7-fc34-6df2-2296-64be51390be2
Bread	Pie	Bread	Pie
Butter	Ice cream	Bread	Pie

Projects

• Kira Warp Core Drive
• N2K