[07/15/11 12:46:16] [D3] i r Mr.weasel (STEAM_0:0:31200483) Ran: wire_expression_upload_data "@name %27Weasels Color Camera%27%0A@inputs Ds:wirelink%0A@persist Y Range E:entity O:entity%0A%0Ainterval(100)       #Increase if hard quota is exceeded%0A%0Aif(first() | changed(Ds)){ %0A    Range = 500     #Set the range of the Ranger trace here%0A    Ds[1048569]=3   #Changes Number Format to RRRGGGBBB%0A    E = entity()%0A    Y = 129%0A    O = owner()%0A}%0A%0Aif(O:keyUse()){%0A    Ds[1048574]=1   #Clears Digital Screen%0A    Y = 0           #Reset Y Value%0A}%0A    %0A   "
[07/15/11 12:46:16] [D3] i r Mr.weasel (STEAM_0:0:31200483) Ran: wire_expression_upload_data " for(X = 0,128){ #Loop code from X = 0 to X = 128%0A        if(Y>128){%0A            exit()      #When done stop the for loop until reset%0A        }%0A    Ranger = ranger(Range,(X-64)/64,(Y-64)/64)                              #Set up Ranger with X Y skew%0A    LDir = (E:pos()-Ranger:position()):normalized()                         #Find the Light Direction%0A    DistSc = (Range - Ranger:distance())/Range                               #Generate a variable between 0 and 1 to "
[07/15/11 12:46:16] [D3] i r Mr.weasel (STEAM_0:0:31200483) Ran: wire_expression_upload_data "darken into the distance%0A    Shade = Ranger:entity():getColor()*DistSc*LDir:dot(Ranger:hitNormal())  #Get the Shaded Colour of the pixel%0A    Clr = rgb2digi(Shade,3)                                                 #Turn Shade into the correct format%0A    Ds[X+ Y*128]= Clr                                                       #Plot pixel%0A}%0A%0AY++   #Goto next line%0A%0A"
[07/15/11 12:46:16] [D3] i r Mr.weasel (STEAM_0:0:31200483) Ran: wire_expression_upload_end