This script by Ferd Frederix may be used in any manner, modified, and republished.  Unless specified otherwise, my scripts are always free and open source.  Objects made with these scripts may be sold with no restrictions.  All I ask is that you point others to this location should they ask you about it and to not sell this script, unless it is for $0 L. Please help improve my work by reporting bugs and improvements.

  1 // This script will scan for avatars and pop open the screen for them ( if shared media is enabled). 
  2 // It creates  a chalkboard.  If  Shared media is not on, this  displays an image named "SharedMedia" to clue them in that they need to enable it or click it
  3 // It also forces the address bar to be minimal, to auto play, and prevent navigation away from this page.
  4 // Add this image to the same prim that holds this script:
  5 // http://dl.dropboxusercontent.com/u/31305726/SharedMedia.png
  6 
  7 
  8 // :License:  Creative Commons CC
  9 // :Author: Ferd Frederix
 10 // :Description:Shared media paper for collaborative chatting in any Virtual world.
 11  // Makes a box <2.8, 1.8, 0.10>
 12 // tapers the  x and y = 0.1 to make it framed
 13 // required shared media aka Media on a Prim (MOAP)
 14 
 15 string url = "http://sharejs.org/pad/pad.html#02tahXX";   // Change the url ending after the # for private channels
 16 
 17 float DISTANCE = 20.0;  // distance the picture will detect up an avatar, from 0.1 to 96.0.   Biggers numbers cause more lag
 18 float RATE = 5.0;       // seconds to scan for an avatar, lower numbers cause more lag but faster response.
 19 
 20 
 21 string no_viewer2 = "SharedMedia"; // an image to tell them they need to click things.
 22 integer side = 0;
 23 
 24 list rules = [
 25 PRIM_MEDIA_AUTO_ZOOM, TRUE,
 26 PRIM_MEDIA_AUTO_PLAY ,TRUE,
 27 
 28 // Permissions: choose one
 29 // PRIM_MEDIA_PERMS_INTERACT, PRIM_MEDIA_PERM_NONE ,   // view only
 30 //PRIM_MEDIA_PERMS_INTERACT, PRIM_MEDIA_PERM_OWNER , //  Just the owner of the prim
 31 //PRIM_MEDIA_PERMS_INTERACT, PRIM_MEDIA_PERM_GROUP , // Just group chat
 32 PRIM_MEDIA_PERMS_INTERACT, PRIM_MEDIA_PERM_ANYONE , 
 33 PRIM_MEDIA_PERMS_CONTROL,PRIM_MEDIA_PERM_NONE , 
 34 
 35 // Media controls:  : choose one
 36 //PRIM_MEDIA_CONTROLS, PRIM_MEDIA_CONTROLS_STANDARD,  // FULL SIZE CONTROL
 37 PRIM_MEDIA_CONTROLS, PRIM_MEDIA_CONTROLS_MINI,   // MINI CONTROL
 38 
 39 PRIM_MEDIA_AUTO_SCALE, FALSE,       // MUST be false to allow scrolling
 40 PRIM_MEDIA_WIDTH_PIXELS , 800,      
 41 PRIM_MEDIA_HEIGHT_PIXELS , 600,
 42 PRIM_MEDIA_CURRENT_URL ];
 43 
 44 
 45 list page_visible ;     // hold the texture when avtar is away
 46 list picture_image;     // holds the regular image
 47 list web_rules;
 48 
 49 
 50 default
 51 {
 52     state_entry() 
 53     {
 54         
 55         //make boxed picture frame and set it to glow.
 56        llSetPrimitiveParams([ PRIM_FULLBRIGHT,side, TRUE]);
 57        llSetScale(<2.8, 1.8, 0.10>);
 58        llSetPrimitiveParams([ PRIM_TYPE,PRIM_TYPE_BOX,0, <0,1,0>, 0, <0,0,0>, <0.950,0.950,0>, <0,0,0>]);
 59 
 60         web_rules = rules + url;
 61         page_visible = [
 62             PRIM_TEXTURE,       // command to set a texture 
 63             side,                  // on side 1
 64             "",         // the white default texture
 65             <0.56,0.39,0>,    // Repeats per face  0.56
 66             <-0.210,-0.210,0>,  // Texture Offset
 67             0                   // rotation in radians
 68         ];
 69         
 70           picture_image = [
 71             PRIM_TEXTURE,       // command to set a texture 
 72             side,                  // on side 1
 73             no_viewer2,         // the white default texture
 74             <1,1,0>,            // Repeats per face
 75             <0,0,0>,            // Texture Offset
 76             0                   // rotation in radians
 77         ];
 78 
 79         llClearPrimMedia(side);
 80         llSetPrimitiveParams(picture_image);
 81         llSensorRepeat("","",AGENT,DISTANCE,PI,RATE);
 82     }
 83     
 84     sensor(integer nh)
 85     {           
 86         llSetPrimitiveParams(page_visible);
 87         llSetPrimMediaParams(side,web_rules);
 88     }
 89 
 90     no_sensor()
 91     {
 92         llClearPrimMedia(side);
 93         llSetPrimitiveParams(picture_image);
 94     }
 95     
 96     on_rez(integer p)
 97     {
 98         llResetScript();
 99     }
100     
101 
102 }