Difference between revisions of "User talk:Perry Mizin"
Jump to navigation
Jump to search
Perry Mizin (talk | contribs) |
Perry Mizin (talk | contribs) |
||
| Line 9: | Line 9: | ||
'''txTxtLot = sendTextBatch''' | '''txTxtLot = sendTextBatch''' | ||
<lsl> | |||
txTxtLot(integer txch, string txtxt) { | txTxtLot(integer txch, string txtxt) { | ||
txtxt = llXorBase64StringsCorrect(llStringToBase64(txtxt), llStringToBase64(password)); | txtxt = llXorBase64StringsCorrect(llStringToBase64(txtxt), llStringToBase64(password)); | ||
| Line 23: | Line 23: | ||
llMessageLinked(LINK_ALL_CHILDREN, 6634934, (string)<0.25, 0, 0.25>, ""); | llMessageLinked(LINK_ALL_CHILDREN, 6634934, (string)<0.25, 0, 0.25>, ""); | ||
} | } | ||
</lsl> | |||
'''string rxTxtLot = receiveTextBatch''' | |||
string rxTxtLot = receiveTextBatch | <lsl> | ||
string rxTxtLot(key rxid, string rxmsg) | string rxTxtLot(key rxid, string rxmsg) | ||
{ | { | ||
| Line 43: | Line 43: | ||
return rxmsg; | return rxmsg; | ||
} | } | ||
</lsl> | |||
string rxTxtLotPrv = receiveTextBatchPrivate | string rxTxtLotPrv = receiveTextBatchPrivate | ||
<lsl> | |||
string rxTxtLotPrv(key prxid, string prxmsg) | string rxTxtLotPrv(key prxid, string prxmsg) | ||
{ | { | ||
| Line 61: | Line 62: | ||
return prxmsg; | return prxmsg; | ||
} | } | ||
</lsl> | |||
Revision as of 07:13, 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 <lsl> 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>, "");
} </lsl>
string rxTxtLot = receiveTextBatch <lsl> 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;
} </lsl>
string rxTxtLotPrv = receiveTextBatchPrivate
<lsl>
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;
} </lsl>