Difference between revisions of "Binary Clock v1.1"
Jump to navigation
Jump to search
(this script could use simplifying) |
m (lsl code tagging) |
||
| Line 1: | Line 1: | ||
{{LSL Header}} | {{LSL Header}} | ||
== Binary Clock V1.1 == | == Binary Clock V1.1 == | ||
< | <lsl> | ||
// Binary Clock Script | // Binary Clock Script | ||
// By Fox Diller | // By Fox Diller | ||
| Line 181: | Line 181: | ||
} | } | ||
} | } | ||
</ | </lsl> | ||
{{LSLC|Library|Binary Clock}} | {{LSLC|Library|Binary Clock}} | ||
Revision as of 13:00, 30 March 2008
| LSL Portal | Functions | Events | Types | Operators | Constants | Flow Control | Script Library | Categorized Library | Tutorials |
Binary Clock V1.1
<lsl> // Binary Clock Script // By Fox Diller // OMG INSANITY!
list bTime; list oTime;
integer token;
string dec2bin(integer dec) {
if (dec == 0) return "0000"; if (dec == 1) return "0001"; if (dec == 2) return "0010"; if (dec == 3) return "0011"; if (dec == 4) return "0100"; if (dec == 5) return "0101"; if (dec == 6) return "0110"; if (dec == 7) return "0111"; if (dec == 8) return "1000"; if (dec == 9) return "1001"; return "0000";
}
BuildClock() {
integer shiftraw = (integer)llGetWallclock();
integer hours = shiftraw / 3600;
integer minutes = (shiftraw % 3600) / 60;
integer seconds = shiftraw % 60;
bTime = [hours / 10, hours % 10,
minutes / 10, minutes % 10,
seconds / 10, seconds % 10];
}
displayBDC() {
integer current_rowA = llList2Integer(bTime, 0);
integer old_rowA = llList2Integer(oTime, 0);
if (current_rowA != old_rowA)
{
string rowA = dec2bin(current_rowA);
integer Acol0 = (integer)llGetSubString(rowA, 3, 3);
integer Acol1 = (integer)llGetSubString(rowA, 2, 2);
llMessageLinked(2, Acol0, "", "");
llMessageLinked(3, Acol1, "", "");
} else if (!current_rowA) {
llMessageLinked(2, 0, "", "");
llMessageLinked(3, 0, "", "");
}
integer current_rowB = llList2Integer(bTime, 1);
integer old_rowB = llList2Integer(oTime, 1);
if (current_rowB != old_rowB)
{
string rowB = dec2bin(current_rowB);
integer Bcol0 = (integer)llGetSubString(rowB, 3, 3);
integer Bcol1 = (integer)llGetSubString(rowB, 2, 2);
integer Bcol2 = (integer)llGetSubString(rowB, 1, 1);
integer Bcol3 = (integer)llGetSubString(rowB, 0, 0);
llMessageLinked(4, Bcol0, "", "");
llMessageLinked(5, Bcol1, "", "");
llMessageLinked(6, Bcol2, "", "");
llMessageLinked(7, Bcol3, "", "");
} else if (!current_rowB) {
llMessageLinked(4, 0, "", "");
llMessageLinked(5, 0, "", "");
llMessageLinked(6, 0, "", "");
llMessageLinked(7, 0, "", "");
}
integer current_rowC = llList2Integer(bTime, 2);
integer old_rowC = llList2Integer(oTime, 2);
if (current_rowC != old_rowC)
{
string rowC = dec2bin(current_rowC);
integer Ccol0 = (integer)llGetSubString(rowC, 3, 3);
integer Ccol1 = (integer)llGetSubString(rowC, 2, 2);
integer Ccol2 = (integer)llGetSubString(rowC, 1, 1);
llMessageLinked(8, Ccol0, "", "");
llMessageLinked(9, Ccol1, "", "");
llMessageLinked(10, Ccol2, "", "");
} else if (!current_rowC) {
llMessageLinked(8, 0, "", "");
llMessageLinked(9, 0, "", "");
llMessageLinked(10, 0, "", "");
}
integer current_rowD = llList2Integer(bTime, 3);
integer old_rowD = llList2Integer(oTime, 3);
if (current_rowD != old_rowD)
{
string rowD = dec2bin(current_rowD);
integer Dcol0 = (integer)llGetSubString(rowD, 3, 3);
integer Dcol1 = (integer)llGetSubString(rowD, 2, 2);
integer Dcol2 = (integer)llGetSubString(rowD, 1, 1);
integer Dcol3 = (integer)llGetSubString(rowD, 0, 0);
llMessageLinked(11, Dcol0, "", "");
llMessageLinked(12, Dcol1, "", "");
llMessageLinked(13, Dcol2, "", "");
llMessageLinked(14, Dcol3, "", "");
} else if (!current_rowD) {
llMessageLinked(11, 0, "", "");
llMessageLinked(12, 0, "", "");
llMessageLinked(13, 0, "", "");
llMessageLinked(14, 0, "", "");
}
integer current_rowE = llList2Integer(bTime, 4);
integer old_rowE = llList2Integer(oTime, 4);
if (current_rowE != old_rowE)
{
string rowE = dec2bin(current_rowE);
integer Ecol0 = (integer)llGetSubString(rowE, 3, 3);
integer Ecol1 = (integer)llGetSubString(rowE, 2, 2);
integer Ecol2 = (integer)llGetSubString(rowE, 1, 1);
llMessageLinked(15, Ecol0, "", "");
llMessageLinked(16, Ecol1, "", "");
llMessageLinked(17, Ecol2, "", "");
} else if (!current_rowE) {
llMessageLinked(15, 0, "", "");
llMessageLinked(16, 0, "", "");
llMessageLinked(17, 0, "", "");
}
integer current_rowF = llList2Integer(bTime, 5);
integer old_rowF = llList2Integer(oTime, 5);
if (current_rowF != old_rowF)
{
string rowF = dec2bin(current_rowF);
integer Fcol0 = (integer)llGetSubString(rowF, 3, 3);
integer Fcol1 = (integer)llGetSubString(rowF, 2, 2);
integer Fcol2 = (integer)llGetSubString(rowF, 1, 1);
integer Fcol3 = (integer)llGetSubString(rowF, 0, 0);
llMessageLinked(18, Fcol0, "", "");
llMessageLinked(19, Fcol1, "", "");
llMessageLinked(20, Fcol2, "", "");
llMessageLinked(21, Fcol3, "", "");
} else if (!current_rowF) {
llMessageLinked(18, 0, "", "");
llMessageLinked(19, 0, "", "");
llMessageLinked(20, 0, "", "");
llMessageLinked(21, 0, "", "");
}
}
default {
touch_start(integer total_number)
{
if (!token && llDetectedKey(0) == llGetOwner())
{
oTime = [];
bTime = [];
llSetTimerEvent(1.0);
token = 1;
llOwnerSay("On!");
}
else if (token && llDetectedKey(0) == llGetOwner())
{
llSetTimerEvent(0);
token = 0;
llOwnerSay("Off!");
}
}
timer()
{
bTime = oTime;
BuildClock();
displayBDC();
}
} </lsl>