Difference between revisions of "User talk:Perry Mizin"

From Second Life Wiki
Jump to navigation Jump to search
Line 10: Line 10:


// txTxtLot = sendTextBatch  
// txTxtLot = sendTextBatch  
txTxtLot(integer txch, string txtxt)
txTxtLot(integer txch, string txtxt)
{
{
Line 27: Line 28:
    
    
// string rxTxtLot = receiveTextBatch
// string rxTxtLot = receiveTextBatch
string rxTxtLot(key rxid, string rxmsg)
string rxTxtLot(key rxid, string rxmsg)
{
{
Line 43: Line 45:


// string rxTxtLotPrv = receiveTextBatchPrivate
// string rxTxtLotPrv = receiveTextBatchPrivate
string rxTxtLotPrv(key prxid, string prxmsg)
string rxTxtLotPrv(key prxid, string prxmsg)
{
{

Revision as of 06:46, 13 December 2009

Bienvenid@

Hola, soy Perry Mizin y este será mi humilde intento de contribucion al proyecto "traductor universal de google" creado por Hank Ramos. No os riais

Welcome

Hello, I am Perry Mizin and this will be my humble try to contribute with the project "universal google translator" created by Hank Ramos. Don´t laugh



// txTxtLot = sendTextBatch

txTxtLot(integer txch, string txtxt) {

   txtxt = llXorBase64StringsCorrect(llStringToBase64(txtxt), llStringToBase64(password));
   while (llStringLength(txtxt) > 508) //If string is 509 characters or longer 
   {
       llSay(txch, llGetSubString(txtxt, 0, 507)); //send 508 character chunk
       txtxt = llGetSubString(txtxt, 508, -1);  //delete 508 character chunk
   }
   llSay(txch, txtxt);  //send out any remainder chunk or original chunk
   // Perry Mizin doesn´t understand the aim of the following if.    
   if (llStringLength(txtxt) == 508)
       llSay(txch, (string)(txch*4958654));
   llMessageLinked(LINK_ALL_CHILDREN, 6634934, (string)<0.25, 0, 0.25>, ""); 

}


// string rxTxtLot = receiveTextBatch

string rxTxtLot(key rxid, string rxmsg) {

   integer rxliPos;
   string  rxtmpStr = "";
   while (~llListFindList(sayCache, (list)rxid))
   {
       rxliPos = llListFindList(sayCache, [rxid]);
       rxtmpStr = (rxtmpStr="") + rxtmpStr + llList2String(sayCache, rxliPos + 1);
       sayCache = llDeleteSubList(sayCache, rxliPos, rxliPos + 1);
   }
   rxmsg = rxtmpStr + rxmsg;
   rxmsg = llBase64ToString(llXorBase64StringsCorrect(rxmsg, llStringToBase64(password)));
   return rxmsg;

}

// string rxTxtLotPrv = receiveTextBatchPrivate

string rxTxtLotPrv(key prxid, string prxmsg) {

   integer prxliPos;
   string  prxtmpStr = "";
   while (~llListFindList(sayCachePrivate, (list)prxid))
   {
       prxliPos = llListFindList(sayCachePrivate, [prxid]);
       prxtmpStr = (prxtmpStr="") + prxtmpStr + llList2String(sayCachePrivate, prxliPos + 1);
       sayCachePrivate = llDeleteSubList(sayCachePrivate, prxliPos, prxliPos + 1);
   }
   prxmsg = prxtmpStr + prxmsg;
   prxmsg = llBase64ToString(llXorBase64StringsCorrect(prxmsg, llStringToBase64(password)));
   return prxmsg;

}