AbcText
Jump to navigation
Jump to search
LSL Portal | Functions | Events | Types | Operators | Constants | Flow Control | Script Library | Categorized Library | Tutorials |
Display script
This script is an experimentation to operate the property of persistence of particles to show the matrix of corresponding points in every characters. Billing is refresh every 30 sec
////////////////////////////////////////////////////////////////////
//
// AbcText
// by Ange Capalini
// Originally Written 10/31/2011
// code released to the public domain
//
////////////////////////////////////////////////////////////////////
//==================================================================
// INSTRUCTIONS
//==================================================================
//
// - set Max Particles to 4096
// - create white cube "board" <15.500, 0.010, 0.800>
// - create red cube "cursor" <0.050, 0.010, 0.030> & drop AbcText
// - link cursor (child) to board (root)
// - send message <= 25 char. to chanel 20
// - that's all folk's
//
/////////////////////////////////////////////////////////////////////
//===========================================
// CONSTANTS
//===========================================
float Size_Point = 0.1; //pixel size
string Txt_Point = ""; //pixel texture
vector Color_Point = < 0., 0., 1. >; //pixel color
vector Size_Affich = <15.5, .01, .8>; //display size
//===========================================
// GLOBALS VARIABLES
//===========================================
list Alphabet = [ " ",
"A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M",
"N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z",
"a", "b", "c", "d", "e", "f", "g", "h", "i", "j", "k", "l", "m",
"n", "o", "p", "q", "r", "s", "t", "u", "v", "w", "x", "y", "z",
"0", "1", "2", "3", "4", "5", "6", "7", "8", "9",
":", "'", ",", "!", "?", "#", ".", "/", "-", "é", "è", "à" ];
//char matrix 6 x 5 points
list Matrices = [ " ",
"011001001010010111101001000000", //A
"111001001011100100101110000000",
"011001000010000100000110000000",
"111001001010010100101110000000",
"111001000011100100001110000000",
"111001000011100100001000000000",
"011101000010110100100111000000",
"100101001011110100101001000000",
"111000100001000010001110000000",
"001100001000010100100110000000",
"100101010011000101001001000000",
"100001000010000100001110000000",
"100011101110101100011000100000",
"100101101010110100101001000000",
"011001001010010100100110000000",
"111001001010010111001000000000",
"011001001010010100100110000010",
"111001001010010111001001000000",
"011101000001100000101110000000",
"111000100001000010000100000000",
"100101001010010100100110000000",
"100101001010100101000100000000",
"100011010110101101010101000000",
"100101001001100100101001000000",
"100101001001110000100110000000",
"111100001001100100001111000000", //Z
"000000110010010100100111000000", //a
"100001110010010100101110000000",
"000000110010000100000110000000",
"000100111010010100100111000000",
"000000111010010101000111000000",
"011001000011000100001000000000",
"011001001010010011100001001100",
"100001110010010100101001000000",
"100000000010000100001000000000",
"001000000000100001000010011000",
"100001001010100110101001000000",
"100001000010000100001000000000",
"000001101010101101011010100000",
"000001110010010100101001000000",
"000000110010010100100110000000",
"111001001010010111001000010000",
"011101001010010011100001000010",
"000001010011000100001000000000",
"000000111011000001101110000000",
"010001110001000010000100000000",
"000001001010010100100111000000",
"000001001010010100100110000000",
"000001010110101101010101000000",
"000001001001100011001001000000",
"100101001010010011100001001100",
"000001111000100010001111000000", //z
"011001001010010100100110000000", //0
"011000010000100001000010000000",
"111000001001100100001111000000",
"111000001001100000101110000000",
"001000110010100111100010000000",
"111101000011100000101110000000",
"011001000011100100100110000000",
"111100001000100010000100000000",
"011001001001100100100110000000",
"011001001001110000100110000000", //9
"000000000000100000000010000000", //:
"000100010000000000000000000000",
"000000000000000000100010000000",
"001000010000100000000010000000",
"001000101000010001000000000100",
"010101111101010111110101000000",
"000000000000000000000010000000",
"000010001000100010001000000000",
"000000000001110000000000000000",
"000100110010010101000111000000",
"010000111010010101000111000000",
"010000110010010100100111000000" //à
];
list Particle_Parameters=[];
vector Origine;
string Texte;
integer id_Phrase;
integer len_Phrase;
integer id_Lettre;
string Lettre;
string matrice_Lettre;
vector point_zero;
integer x;
integer z;
//===========================================
// SET PARTICLES
//===========================================
init_particles(){
Particle_Parameters = [
PSYS_SRC_TEXTURE, Txt_Point,
PSYS_PART_START_SCALE, < Size_Point, Size_Point, FALSE >,
PSYS_PART_END_SCALE, < Size_Point, Size_Point, FALSE >,
PSYS_PART_START_COLOR, Color_Point,
PSYS_PART_END_COLOR, Color_Point,
PSYS_SRC_BURST_PART_COUNT, (integer)1,
PSYS_SRC_BURST_RATE, (float) 0.0,
PSYS_PART_MAX_AGE, (float) 30.0,
PSYS_SRC_PATTERN, (integer) 1,
PSYS_PART_FLAGS,
PSYS_PART_EMISSIVE_MASK
];
}
//===========================================
// SET DISPLAY
//===========================================
affichage (string phrase) {
integer len_Phrase = llStringLength(phrase)-1;
for(id_Phrase = 0; id_Phrase <= len_Phrase;++id_Phrase){
Lettre = llGetSubString(phrase, id_Phrase, id_Phrase);
id_Lettre = llListFindList(Alphabet, [Lettre]);
matrice_Lettre = llList2String(Matrices, id_Lettre);
z=0;
do{
x=0;
do{
if( (integer)llGetSubString(matrice_Lettre, x + 5*z, x + 5*z) ) {
llSetLinkPrimitiveParamsFast(LINK_THIS, [PRIM_POSITION, point_zero + < x*Size_Point, 0.0, -z*Size_Point > ]);
llParticleSystem( Particle_Parameters );
llSleep(0.12);
llParticleSystem( [] );
}
} while( ++x <= 4);
} while( ++z <= 5);
point_zero += < 6. * Size_Point, 0.0, 0.0 >; //locate next char
}
}
/////////////////////////////////////
/////////////////////////////////////
/////////////////////////////////////
/////////////////////////////////////
default {
state_entry() {
llListen(20, "", llGetOwner(), "");
init_particles();
Origine = < (-0.48 * Size_Affich.x) , (-1.25 * Size_Point) , (0.3 * Size_Affich.z) >; //raz cursor
}
listen( integer channel, string name, key id, string msg ) {
Texte = msg;
point_zero = Origine; //raz cursor
llSetTimerEvent(30.);
affichage(Texte);
}
timer(){
point_zero = Origine; //raz cursor
affichage(Texte);
}
on_rez(integer param) {llResetScript();}
changed(integer mask) {if(mask & CHANGED_OWNER) {llResetScript();}}
}