LCDHype script for Asus G50/G70 LCDs.

lcdhype-asus-g50-g70.txt

#Header  
%KeyInit()  
%Param.AvoidPluginCleanUp()  
%Common.SetPriority(140)  
%Graph.SetTextArea(0,0,255,31)  
%Graph.Font('OCR-A',10,1)  
%DefVar(xPos,Local=105)  
%DefVar(yPos,Local=16)  
%DefVar(an=0)  
%DefVar(km,Global)  
%Graph.SetInvertArea(0,0,255,31)  
%Param.FastWrite(1)  
#EndHeader   

#GfxMode 
%Assign(stat,%WinAmp.Status()) 
%Assign(xy,%Inc(%xy(),0)) 
%Assign(an,%Inc(%an(),1)) 
%Graph.Rect(0,0,255,60,1,1) 
%Graph.LoadBitmap('gfx\Frame00'%an()'.bmp',-8,2,0,0,78,32,0,NONE)
/ %Graph.LoadBitmap('gfx\g1.bmp',-10,0,45,0,70,50,1,NONE) /  

%If((%an() = 7)) Then{ 
%Assign(an,0) 
%Assign(km, %Inc(%km(),0.01))} 

/----------------------------------------------------------------/  
%Format.Offset(Vertical,0) 
%Format.Offset(Horizontal,64) 
%LCD.Gfx_SetFont('Small fonts',6,0) 'He`s haunted by the memory               CPU: ' %UsePlugin('everest\everest.dll',SCPU1UTI,value) ' % - ' 
%UsePlugin('everest\everest.dll',SCPU2UTI,value) ' %' 
%Common.CreateNewLine() 
/----------------------------------------------------------------/  
%Format.Offset(Vertical,0) %Format.Offset(Horizontal,64) 'of a lost paradise... in his youth                   RAM: ' 
%UsePlugin('everest\everest.dll',SMEMUTI,value) ' %' 
%Common.CreateNewLine() 
/----------------------------------------------------------------/  
%Format.Offset(Vertical,0) 
%Format.Offset(Horizontal,64) 'or a dream... he can`t be precise...                  ' %System.GetDateTime(hh:nn:ss) 
%Common.CreateNewLine() 
/----------------------------------------------------------------/  

/Turn off Touchpad LED/ 
%UsePlugin('GLED\GLED.dll','LED', 0, 0)  
%KeyCheck() 
#EndGfxMode