G50V - Anyone find a use for the OLED display?

Thanks for the suggestion, Predator. I have installed the latest version of the LCDMailbox plugin (v. 0.6) but can't seem to get it up and running. Any ideas? The file "servers.txt" reads (without the account details):
60
POP3|pop.gmail.com|995|(Username)|(Password)

Just to get it running, I tried the following script:

HTML:

#Header
  %Common.SetPriority(1000) 
   %Graph.SetTextArea(0,0,256,32) 
   %Param.RenderMode(Simple)
#EndHeader


#GfxMode

%Common.CreateNewLine(, 5, 5)
%LCD.Gfx_SetFont('Webdings',16,1)
'š'

%Common.CreateNewLine(, 40, 6)
%LCD.Gfx_SetFont('Aral',10,1)
%UsePlugin('LCDMailbox\LCDMailbox.dll',CountNewMails,0)
' New'

%Common.CreateNewLine(, 40, 17)
%UsePlugin('LCDMailbox\LCDMailbox.dll',CountMails,0)
' Total'
#EndGfxMode

 

Check out this script, you'll see how it's used:
http://lcdhype.condense.de/index.php?showtopic=1375&view=findpost&p=8465

 

alright, big news.

as for my system i solved the malfunction of the OLED display. only half of it, though. i deactived "Intel(R) ICH9-Familie USB2 erweiterter Hostcontroller - 293C" due to the high CPU usage for whatever reason, but disabling that also disabled the OLED. so activating the controller makes the OLED work but slows down the notebook. i didnt do any research if that 293C issue can be fixed in another way as yet because i need to get up early and gonna sleep now. maybe someone has a solution for this, either way im gonna have a look later this morning.

 

Thanks for the link, Predator. I found what the problem was: I was trying to connect to POP3 and IMAP servers that use SSL, which will not work with that mail plugin. However, the discussion thread entitled "A new way to display EMAILS in LCDHype !!!" on that same forum produced some good (but limited) results.

 

okay, i installed all available vista updates and for now it seems to work. hopefully, this isnt just by chance but i guess it would help to add that to your lcdhype thread, so other people having malfunctions can try if it works.

 

is it possible to make a ventrilo script for the oled display ?
to see who is in your room and possibly whos speaking?

 

how about a teamspeak one? lol

i had to ask =)

 

So, installing latest Vista updates you eliminate the high CPU usage, without disabling USB 293C controller? If so please confirm, that could be useful information.

 

Hi ! As I'm french, please excuse me for my bad english... I'm in need of your held because I'm working on a megascript for G50V, but I've never been programming anything before, so it's a little bit hard for me^^
I'm having a problem with the emule part of my script, which won't show Up and Down speed rate...
Also, I wanna know if there's a way to see on OLED when a file arrived in incoming directory ?
If you try the script, note that to get it working you need to check the "online-signature" box in the general settings of your mule, it will generate the onlinesig.dat file used by the script.
Thanks for any help, here's the script^^

Code:

#Header
%LCD.Gfx_SetFont('@Arial Unicode MS',7,1)
%Common.SetPriority(1500)
%LCD.Gfx_SetTextArea(0,0,256,32)
%LCD.Gfx_SetInvertMode(0)
/Pfad zum Emule Onlinesig.dat File/
%DefVar(dir,Local=C:\ProgramData\eMule\onlinesig.dat)

/Variablenberechnung/
%DefVar(a,Local=%System.ReadFile(%dir(),1))
%DefVar(b,Local=%String.Replace(%a(),%c(),'',IgnoreCase))
%DefVar(c,Local=%String.Copy(%a(),1,%String.Pos('|',%a())))
%DefVar(d,Local=%String.Copy(%b(),1,%String.Pos('|',%b())))
%DefVar(clients,Local=%String.Replace(%b(),%d(),'',IgnoreCase))
%DefVar(down,Local=%String.Copy(%a(),1,%Dec(%String.Pos('|',%a()),1)))
%DefVar(up,Local=%String.Copy(%b(),1,%Dec(%String.Pos('|',%b()),1)))
%DefVar(e,Local=%System.ReadFile(%dir(),0))
%DefVar(stat,Local=%String.Copy(%e(),1,%Dec(%String.Pos('|',%e()),1)))
%DefVar(f,Local=%String.Copy(%e(),1,%String.Pos('|',%e())))
%DefVar(g,Local=%String.Replace(%e(),%f(),'',IgnoreCase))
%DefVar(h,Local=%String.Copy(%g(),1,%String.Pos('|',%g())))
%DefVar(server,Local=%String.Copy(%h(),1,%Dec(%String.Pos('|',%h()),1)))
%DefVar(i,Local=%String.Replace(%g(),%h(),'',IgnoreCase))
%DefVar(ip,Local=%String.Copy(%i(),1,%Dec(%String.Pos('|',%i()),1)))
%DefVar(j,Local=%String.Copy(%i(),1,%String.Pos('|',%i())))
%DefVar(port,Local=%String.Replace(%i(),%j(),'',IgnoreCase))
#EndHeader

#TextMode

#EndTextMode
#GfxMode
%OnKeyDown()
%Common.CreateNewLine(, 0, -3)
%Common.Compare(%stat()=1)Then{ 'Connection réussie !' }Else
{
%Common.CreateNewLine()
'Veuillez connecter eMule !' 
}

%Common.CreateNewLine(, 0, 5)
'Download : '
%down()' Ko/s'
%Common.CreateNewLine(, 0, 13)
'Upload :     '%up()' Ko/s'
%Common.CreateNewLine(, 0, 21)
'Serveur : '%server()
%Common.CreateNewLine(, 170,-3)
'IP : '%ip()

#EndGfxMode

Edit : I managed to take the download speed info in a curious way, going step by step, but I don't know how to refresh the display...
Here's the script (it only displays download speed)

Code:

#Header
 /insert header code here/

%LCD.Gfx_SetFont('@Arial Unicode MS',7,1)
%Common.SetPriority(1)
%LCD.Gfx_SetTextArea(0,0,256,32)
%LCD.Gfx_SetInvertMode(0)
/Pfad zum Emule Onlinesig.dat File/
%DefVar(dir,Local=C:\ProgramData\eMule\onlinesig.dat)

/Variablenberechnung/
%DefVar(a,Local=%System.ReadFile(%dir(),1))
%DefVar(b,Local=%String.Replace(%a(),%c(),'',IgnoreCase))
%DefVar(c,Local=%String.Copy(%a(),1,%String.Pos('|',%a())))
%DefVar(d,Local=%String.Copy(%b(),1,%String.Pos('|',%b())))
%DefVar(clients,Local=%String.Replace(%b(),%d(),'',IgnoreCase))
%DefVar(down,Local=%String.Copy(%a(),1,%Dec(%String.Pos('|',%a()),1)))
%DefVar(up,Local=%String.Copy(%b(),1,%Dec(%String.Pos('|',%b()),1)))
%DefVar(e,Local=%System.ReadFile(%dir(),0))
%DefVar(stat,Local=%String.Copy(%e(),1,%Dec(%String.Pos('|',%e()),1)))
%DefVar(f,Local=%String.Copy(%e(),1,%String.Pos('|',%e())))
%DefVar(g,Local=%String.Replace(%e(),%f(),'',IgnoreCase))
%DefVar(h,Local=%String.Copy(%g(),1,%String.Pos('|',%g())))
%DefVar(server,Local=%String.Copy(%h(),1,%Dec(%String.Pos('|',%h()),1)))
%DefVar(i,Local=%String.Replace(%g(),%h(),'',IgnoreCase))
%DefVar(ip,Local=%String.Copy(%i(),1,%Dec(%String.Pos('|',%i()),1)))
%DefVar(j,Local=%String.Copy(%i(),1,%String.Pos('|',%i())))
%DefVar(port,Local=%String.Replace(%i(),%j(),'',IgnoreCase))
%DefVar(dl,Local=%String.Copy(%port(),5,5)
#EndHeader
#GfxMode
%Common.CreateNewLine(,0,0)
%Param.EnableScrolling(Horizontal,Ticker,1,256,0,0)
/'     --------                  ''a'%System.ReadFile(%dir(),1)
'                  b'%String.Replace(%a(),%c(),'',IgnoreCase)
'                   c'%String.Copy(%a(),1,%String.Pos('|',%a()))
'                d'%String.Copy(%b(),1,%String.Pos('|',%b()))
'                 clients'%String.Replace(%b(),%d(),'',IgnoreCase)
'              down'%String.Copy(%a(),1,%Dec(%String.Pos('|',%a()),1))
'              up'%String.Copy(%b(),1,%Dec(%String.Pos('|',%b()),1))
'                e'%System.ReadFile(%dir(),0)
'             stat'%String.Copy(%e(),1,%Dec(%String.Pos('|',%e()),1))
'                   f'%String.Copy(%e(),1,%String.Pos('|',%e()))
'                  g'%String.Replace(%e(),%f(),'',IgnoreCase)
'                    h'%String.Copy(%g(),1,%String.Pos('|',%g()))
'                    server'%String.Copy(%h(),1,%Dec(%String.Pos('|',%h()),1))
'                  i'%String.Replace(%g(),%h(),'',IgnoreCase)
'                 ip'%String.Copy(%i(),1,%Dec(%String.Pos('|',%i()),1))
'                    j'%String.Copy(%i(),1,%String.Pos('|',%i()))
'                  port'%String.Replace(%i(),%j(),'',IgnoreCase)/

%String.Copy(%port(),5,5)

#EndGfxMode

BTW here is the content of the files the script takes infos from (xxx = public ip and port) :
1|eDonkeyServer No1|xx.xxx.xxx.xx|xxxx
48.2|41.0|2566

 

hi, guys any more script to share??

 

I believe, like the ROG logo, that that is handled by the BIOS and out of the hands of LCDHype.

Hope to see that soon. What was done with the G1S and G2S makes me slightly jealous.

 

Not really, it's most likely hard-coded into the OLED's microcontroller, it does turn on before BIOS loads

 

Hi, here's a simple one, related to system status :

Code:

ID=%Common.SetPriority(1000)%Common.SetPriority(1000)script test 1
//ScreenDef
Title=Main
SpecCharFile=
#Header
 /insert header code here/
 %Common.SetPriority(1000)
 %Graph.SetTextArea(0,0,256,32)
 %Param.RenderMode(Simple)

 %UsePlugin('GLED\GLED.dll',LED, 1, 1%UsePlugin('Battery\BatteryPlugin.dll','Parameters'))

#EndHeader

#TextMode
 /insert textmode script code here/
#EndTextMode

#GfxMode
 /insert gfxmode script code here/


 / Heure /
 %Common.CreateNewLine(, 195, 0)
 %System.GetDateTime(hh:nn)

  / Batterie /
 %Common.CreateNewLine(, 180, 15)
 %UsePlugin('Battery\BatteryPlugin.dll',LifePercent)'%'

 / Police /
 %Graph.Font('Comic sans MS',7,1)
 %Common.CreateNewLine(, 210, 16)
 '  ('%UsePlugin('Battery\BatteryPlugin.dll',ACFlag)')'

 / CPU /
 %Common.CreateNewLine(, 0, -2)
 'CPU : '%UsePlugin('everest\everest.dll','TCPU','value')'°'
 %Common.CreateNewLine(, 55, -2)
 %System.CPU(Usage)'%'
 %Common.CreateNewLine(, 80, -2)
 '|'
  %Common.CreateNewLine(, 90, -2)
  %UsePlugin('everest\everest.dll','SCPUCLK','value')' MHz'
  %Common.CreateNewLine(, 170, -2)
 '|'

 /GPU/
 %Common.CreateNewLine(, 0, 9)
 'GPU : '%UsePlugin('everest\everest.dll','TGPU1DIO','value')'°'
  %Common.CreateNewLine(, 80, 9)
 '|'
   %Common.CreateNewLine(, 170, 9)
 '|'

  / RAM /
 %Common.CreateNewLine(, 0, 20)
 'RAM : '%UsePlugin('everest\everest.dll','SMEMUTI','value')'%'
  %Common.CreateNewLine(, 80, 20)
 '|'
 %Common.CreateNewLine(,90, 20)
 %UsePlugin('everest\everest.dll','SFREEMEM','value')' Mo libres'
   %Common.CreateNewLine(, 170, 20)
 '|'

 / 'test'
  %Common.CreateNewLine(, 200, 8)
 'test'
  %Common.CreateNewLine(, 8, 19)/
#EndGfxMode

//EndDef

You'll need everest ultimate and battery plugins...
It was my first try in scripting and I'm now working on other scripts... I'll post them here

Edit :
@Sanka : Salut de la part d'un autre francais paumé dans le coin avec son beau portable ^^

 

Hi ! I'm still working on my megascript for G50V, but as I knew nothing about programming, I'm now learning C/C++^^
As soon as it's ready, and after I ask to some people whom I took some parts of script, I'll share it on LCDHype forum, in that thread.
@stouf : [French mode^^]
Je le mettrai aussi sur ce site avec un petit tuto pour l'installer

Merry Xmas !

 

Is it normal for LCD Hype to use 58MB Ram when running? Thats crazy... I dont seem to have much CPU overhead but thats a lot of ram for such simpleness.

Also any updates on a driver for the back LEDS and touchpad light?

Thx and keep up the great work peeps!

 

32MB for LCDhype + 18MB everest here. I'm not using megascript.
I'm using this little script : View attachment script test 4.zip (everest ultimate + battery plugins needed)

I didn't manage to have the LED and touchpad working, next on the list..

 

I am new to all this so maybe I do something wrong. Here is everything I have done. (And no everest)

Installed LCDHype, updated it, installed OLED plugin, installed battery plugin.

Used one of the scipts posted here, the one with the CPU, Ram and Time (Thanks to that user for the script) and than I just changed it so instead of showing the laptop model it shows battery in that spot...

Here is the script..

#Header
%Common.SetPriority(2500)
%Graph.SetTextArea(0,0,256,32)
%Param.RenderMode(Simple)
%DefVar(CPUusage = 0)
%DefVar(hourPM,Local=0)
%DefVar(hourAM,Local=0)

#EndHeader

#GfxMode
%Assign(CPUusage, %System.CPU(Usage))

/TITLE/
%Common.CreateNewLine(, 1, 0)
%Graph.Font('Arial',8,1, Bold)
%Format.AlignLeft()
'Battery % '
%UsePlugin('battery\batteryplugin.dll',LifePercent)

/TIME/
%Assign(hourPM,%Dec(%System.GetDateTime(hh),12))
%Assign(hourAM,%Dec(%System.GetDateTime(hh),0))

%If(%hourPM() = 0)Then{%Assign(hourPM,%Dec(%System.GetDateTime(hh),0))}
%If(%hourAM() = 0)Then{%Assign(hourAM,%Dec(%System.GetDateTime(hh),-12))}

%Common.CreateNewLine(, -1, 0)
%Graph.Font('Arial',8,1,Bold)
%Format.AlignRight()
%If(%System.GetDateTime(h) < 12)
Then{%hourAM()%System.GetDateTime(':nn ')AM%System.GetDateTime(' mm/dd/yy dddd')}
Else{%hourPM()%System.GetDateTime(':nn ')PM%System.GetDateTime(' mm/dd/yy dddd')}

/CPU/
%Graph.Font('Arial',8,1, Bold)
%Common.CreateNewLine(, 1, 15)
%Format.AlignLeft()
'CPU'
%Common.CreateNewLine(, -200,15)
%Format.AlignRight()
%CPUusage() '%'
%Format.Bar(Horizontal,50,8,0,100,%CPUusage(),1,1,61,18)

/RAM/
%Common.CreateNewLine(, 129, 15)
%Format.AlignLeft()
'RAM'
%Common.CreateNewLine(, -56, 15)
%Format.AlignRight()
%Shr(%System.Memory(MemoryUsed), 10) 'MB'
%Format.Bar(Horizontal,50,8,0,%System.Memory(MemorySize),%System.Memory(MemoryUsed),1,1,205,18)


#EndGfxMode


And I clicked GO. lcdhype starts off at the 38meg mark but as I watch it the thing grows... Right now its at 51meg.

Did I do something wrong? Am I running the script wrong or do I need to do something else?

Also I cant get the battery thing working all the way. It works to show me battery % but wont show me time left... I just get a -1 on the screen.

Also how would I go about getting some type of screen saver on it? I see people say they done it but I am lost on this, ehe.

Thx!

 

You may check if the thing stops growing, and where.
I see nothing wrong with your script or method and I notice my process is consuming between 37MB and 41MB.

 

Up to 57meg right now.

Few side questions, anyone know why when I put
%UsePlugin('battery\batteryplugin.dll',LifeTime)

I just get -1 and not a real time left?

Also anyone know if any plans to recomplile this bad boy to 64-bit? I just hate x86 things, hehe

And last, (yea I know, sorry, haha) what about some type of OLED screen saver?

 

Those 40MB are quite normal, check out how much your Skype uses

 

It works on x64

 

Yea I know it works on x64, im using it on it, just would like x64 better.

As for the memory, I dont use skyp, so cant see how much it uses.

Is it safe to erase everything in the LCDhype folder except the Asus drivers for the g50? Just figure the less junk the better.

Thanks for your hard work btw.

 

Yes you can delete every other driver if you are not planning to use it (leave the Preview driver there it's needed for the preview window)

 

Here is the script I'm using (also modified from the original CPU/RAM/Date script). I added battery info (only when running on battery or when charging), got rid of the bold font, invert the screen when battery drops below 15% and most importantly, added a screen saver so it goes black after 10 minutes of inactivity (and comes back as soon as mouse/keyboard activity kicks in again).

Code:

#Header
   %Common.SetPriority(1)
   %Graph.SetTextArea(0,0,256,32)
   %Param.RenderMode(Simple)
   %DefVar(CPUusage = 0)
   %DefVar(battPct = 0)
   %DefVar(ScreenSaverOn, Global=0)
   %DefVar(hourPM,Local=0)
   %DefVar(hourAM,Local=0)
   %DefVar(BattPLG='battery\batteryplugin.dll')
   %DefFunc(BattPercent=%UsePlugin(%BattPLG(),LifePercent))
   %DefFunc(BattFlag=%UsePlugin(%BattPLG(),nBatteryFlag))
   %DefFunc(ACFlag=%UsePlugin(%BattPLG(),nACFlag))
   %DefFunc(LifeTime=%UsePlugin(%BattPLG(),LifeTime))
   %DefFunc(IdleTime=%UsePlugin(%BattPLG(),nSystemIdleTime))  
#EndHeader

#GfxMode   
  %Assign(CPUusage, %System.CPU(Usage))
  %Assign(battPct, %BattPercent())
  
 %If(%IdleTime() < 600000)
 Then
 {  
  %Assign(ScreenSaverOn, 0)
  
  /Battery/
  %If((%battPct() > 99) AND (%ACFlag() = 1))
  Then
  {
      %Graph.Rect(0,0,100,16,0,0)
  }
  Else
  {
     %Graph.Font('Arial',8,1,)
     %Format.Bar(Vertical,8,12,0,100,%battPct(),1,1,60,1)
     %Graph.Rect(62,0,65,1,1,1)
     %Common.CreateNewLine(, -200,0)
     %Format.AlignRight()
     %battPct() '%'
  }
  
  %If( %battPct() < 15 )
  Then
  {
    %Param.InvertMode(1)
  }
  Else
  {
    %Param.InvertMode(0)
  }
        
  /TIME/
  %Assign(hourPM,%Dec(%System.GetDateTime(hh),12))
  %Assign(hourAM,%Dec(%System.GetDateTime(hh),0))
  
  %If(%hourPM() = 0)Then{%Assign(hourPM,%Dec(%System.GetDateTime(hh),0))}
  %If(%hourAM() = 0)Then{%Assign(hourAM,%Dec(%System.GetDateTime(hh),-12))}
  
  %Common.CreateNewLine(, -1, 0)
  %Graph.Font('Arial',8,1,)
  %Format.AlignRight()
  %If(%System.GetDateTime(h) < 12)
      Then{%hourAM()%System.GetDateTime(':nn  ')AM%System.GetDateTime('  mm/dd/yy   dddd')}
      Else{%hourPM()%System.GetDateTime(':nn  ')PM%System.GetDateTime('  mm/dd/yy   dddd')}
  
  /CPU/
  %Graph.Font('Arial',8,1, )
  %Common.CreateNewLine(, 1, 15)
  %Format.AlignLeft()
  'CPU'
  %Common.CreateNewLine(, -200,15)
  %Format.AlignRight()
  %CPUusage() '%'
  %Format.Bar(Horizontal,50,8,0,100,%CPUusage(),1,1,60,18)
  
  /RAM/ 
  %Common.CreateNewLine(, 129, 15)
  %Format.AlignLeft()
  'RAM'
  %Common.CreateNewLine(, -56, 15)
  %Format.AlignRight()   
  %Shr(%System.Memory(MemoryUsed), 10) ' MB'
  %Format.Bar(Horizontal,50,8,0,%System.Memory(MemorySize),%System.Memory(MemoryUsed),1,1,205,18) 
}
Else
{
   %If(%ScreenSaverOn() = 0)
   Then
   {
      %Assign(ScreenSaverOn, 1)
      %Graph.Rect(0,0,256,32,0,0)
   }
}   
#EndGfxMode

The screen saver is really just drawing a black screen, I haven't had time to figure out how to do smart updates, etc but it takees care of my urgent need to get rid of the OLED burn. I was running for 4 days with the DirectConsole screens and got burn-in already so I know it's pretty sensitive.

 

Ahh I like, thx

It said their was an error on line 7 though, not sure if that matters.

Also for the battery, i was in hopes you found a way for it to know when charging or not to show but looks like you just look for a value > 99 but hey, some is better than nothing.

I had to change it to 97 on mine because while plugged in the battery will go below 100% thus will stay showing.... Also had to change the pull rate a little as it was crazy fast, hehe... I put mine to 2500. Helps save some CPU time.

But is better than I had mine, so thanks for sharing.

Only thing I would like to see now is CPU/GPU temp and network light. haha

I know people use everest to watch them, but I am running the NB Probe. Anyone got a way to jack the status from that? I just dont want to have to install anything else. hehe

 

Hello,
My poor contribution

Code:

*******************************
*          Foxies Script     *
*(Compilation of some scripts)*
*******************************
#Header
   %CleanUp.ClearVRAM()
   %Common.SetPriority(2000) 
   %Graph.SetTextArea(0,0,256,32) / defines an area you can write text /
   %Param.RenderMode(Simple) 
   %CleanUp.ClearInputBuffer(All)
   %Param.AvoidPluginCleanUp()

   /VARIABLES BATTERIE/
   %DefVar(BattPLG='battery\batteryplugin.dll')
   %DefFunc(BattPercent=%UsePlugin(%BattPLG(),LifePercent))
   %DefFunc(BattFlag=%UsePlugin(%BattPLG(),nBatteryFlag))
   %DefFunc(ACFlag=%UsePlugin(%BattPLG(),nACFlag))
   %DefFunc(LifeTime=%UsePlugin(%BattPLG(),LifeTime))
   %DefVar(battPct = 0)

 /VARIABLES SKYPE/
 %DefVar(stime=%System.Uptime())
 %DefVar(i=0)
   %DefVar(SkypeLine, Local='')
   %DefFunc(SkypeCheck, Local=
    %If(%UsePlugin('Skype\Skype.dll',ChatEvent) ! 0)
    Then{
      %UsePlugin('GLED\GLED.dll','LED', 1, 1/status/)
      %Assign(SkypeLine, 
      %Loop.For(i, 0, %Dec(%UsePlugin('Skype\Skype.dll',MissedChatCount),1), 1)
      { 
        / get the last line from every chat /
        '**['
        %UsePlugin('Skype\Skype.dll',MissedChatInfo, Name, %i()/chatnumber/)
        ']: '
        %UsePlugin('Skype\Skype.dll',MissedChatLine, %i()/chatnumber/, 0/chatline/)
        ' **    '
      }
      )
    }
   )
#EndHeader

#GfxMode
/1ere ligne:AFFICHAGE TEXTE/
%Common.CreateNewLine(, 0,0)
%Graph.Font('Arial',7,1,Bold)
'Status:'
/FIN DE LA LIGNE POUR TEXTE/

/1ere ligne:AFFICHAGE POUR LA BATTERIE/
%Common.CreateNewLine(, 35, 0)
%Graph.Font('Arial',7,1,Bold)

    %If((%ACFlag() = 1) AND (%BattFlag() = 1))  / Charged /
Then{
  
   /%BattFlag()/
  'Charge complète'
  }
  Else {
   %If((%ACFlag() = 1) AND (%BattFlag() = 128)) /No battery/
   
Then{
 
   /%BattFlag()/
  'Pas de Batterie...'
  }
  
%If((%ACFlag() = 1) AND ((%BattFlag() > 8) AND (%BattFlag() < 11))) / Charging /
Then{
  %Common.CreateNewLine(, 35, 0)
  %Graph.Font('Arial',7,1,Bold)
  '.. chargée à '%BattPercent()'%'
  }
   Else{
  %If((%ACFlag() = 0) AND (%BattFlag() ! 4)) /Battery /
  Then{
  / %Param.InvertMode(0)/
    %Common.CreateNewLine(, 35, 0)
    %Graph.Font('Arial',7,1,bold)
    'Temps restant: '
    %Common.CreateNewLine(, 105, 0)
    %Graph.Font('Arial',7,1,Bold)
    %If(%LifeTime() ! '-1') Then{
    %LifeTime()
    }
    Else{ / remaining time not calculated so show this /
     '-:--:--'
     }
    }
   }  
}
/FIN AFFICHAGE POUR LA BATTERIE/

/1eme ligne:AFFICHAGE DE LA LIGNE POUR LHEURE/
%Common.CreateNewLine(, 150, 0)
%Graph.Font('Arial',7,1,Bold)
%System.GetDateTime('dd mmmyy  hh:nn ') 
/FIN DE LA LIGNE POUR LHEURE/

/2ème ligne:AFFICHAGE DE LA LIGNE POUR LE CPU/
%Common.CreateNewLine(, 0, 10)
%Graph.Font('Arial',7,1,Bold)
'CPU: ' 
%System.CPU(Usage)'%'
/FIN DE LA LIGNE POUR LE CPU/

/2ème ligne:AFFICHAGE DE LA LIGNE SKYPE/
%Common.CreateNewLine(,85,8)
%Graph.Font('Harlow Solid Italic',15,1,)
%UsePlugin('Skype\Skype.dll',MyInfo, Name)

%Common.CreateNewLine(,155,10)
%Graph.Font('Arial',7,1,Bold)
'Etat:' %UsePlugin('Skype\Skype.dll',MyInfo, Status)

%Common.CreateNewLine(,155,20)
/%Common.SetPriority(20)/ /My probleme rate/
%Graph.Font('Segoe UI',7,1)
%Param.EnableScrolling(Horizontal,Ticker,1,150,1,0)
%SkypeCheck()
%SkypeLine()
/FIN AFFICHAGE DE LA LIGNE SKYPE/


/3ere ligne:AFFICHAGE DE LA LIGNE POUR LA RAM / 
%Common.CreateNewLine(, 0, 20)
%Graph.Font('Arial',7,1,Bold)
"Mry Libre: "
%Trunc(%Div(%System.Memory(MemoryFree),1024))" Mb"
/FIN AFFICHAGE DE LA LIGNE POUR LA RAM / 

#EndGfxMode

Voili, voilà, A+
NB: I have only the problem with Skype's Chat because i don't find the variable local for the refresh the last message!!

 

Sorry, guess ScreenSaverOn is a built-in variable. Here is an updated version with the variable fixed (though all it really does is not re-draw the black screen) and the polling interval reduced to a sane number (sorry, was experimenting).

If you go to the LCDHype forums in the original battery plugin post there is aa sample for detecting charging explicitly. I took the easy way out but may look at implementing the larger set of flags.

Code:

#Header
   %Common.SetPriority(2500)
   %Graph.SetTextArea(0,0,256,32)
   %Param.RenderMode(Simple)
   %DefVar(CPUusage = 0)
   %DefVar(battPct = 0)
   %DefVar(ScreenSaverIsOn, Global=0)
   %DefVar(hourPM,Local=0)
   %DefVar(hourAM,Local=0)
   %DefVar(BattPLG='battery\batteryplugin.dll')
   %DefFunc(BattPercent=%UsePlugin(%BattPLG(),LifePercent))
   %DefFunc(BattFlag=%UsePlugin(%BattPLG(),nBatteryFlag))
   %DefFunc(ACFlag=%UsePlugin(%BattPLG(),nACFlag))
   %DefFunc(LifeTime=%UsePlugin(%BattPLG(),LifeTime))
   %DefFunc(IdleTime=%UsePlugin(%BattPLG(),nSystemIdleTime))  
#EndHeader

#GfxMode   
  %Assign(CPUusage, %System.CPU(Usage))
  %Assign(battPct, %BattPercent())
  
 %If(%IdleTime() < 600000)
 Then
 {  
  %Assign(ScreenSaverIsOn, 0)
  
  /Battery/
  %If((%battPct() > 95) AND (%ACFlag() = 1))
  Then
  {
      %Graph.Rect(0,0,100,16,0,0)
  }
  Else
  {
     %Graph.Font('Arial',8,1,)
     %Format.Bar(Vertical,8,12,0,100,%battPct(),1,1,60,1)
     %Graph.Rect(62,0,65,1,1,1)
     %Common.CreateNewLine(, -200,0)
     %Format.AlignRight()
     %battPct() '%'
  }
  
  %If( %battPct() < 15 )
  Then
  {
    %Param.InvertMode(1)
  }
  Else
  {
    %Param.InvertMode(0)
  }
        
  /TIME/
  %Assign(hourPM,%Dec(%System.GetDateTime(hh),12))
  %Assign(hourAM,%Dec(%System.GetDateTime(hh),0))
  
  %If(%hourPM() = 0)Then{%Assign(hourPM,%Dec(%System.GetDateTime(hh),0))}
  %If(%hourAM() = 0)Then{%Assign(hourAM,%Dec(%System.GetDateTime(hh),-12))}
  
  %Common.CreateNewLine(, -1, 0)
  %Graph.Font('Arial',8,1,)
  %Format.AlignRight()
  %If(%System.GetDateTime(h) < 12)
      Then{%hourAM()%System.GetDateTime(':nn  ')AM%System.GetDateTime('  mm/dd/yy   dddd')}
      Else{%hourPM()%System.GetDateTime(':nn  ')PM%System.GetDateTime('  mm/dd/yy   dddd')}
  
  /CPU/
  %Graph.Font('Arial',8,1, )
  %Common.CreateNewLine(, 1, 15)
  %Format.AlignLeft()
  'CPU'
  %Common.CreateNewLine(, -200,15)
  %Format.AlignRight()
  %CPUusage() '%'
  %Format.Bar(Horizontal,50,8,0,100,%CPUusage(),1,1,60,18)
  
  /RAM/ 
  %Common.CreateNewLine(, 129, 15)
  %Format.AlignLeft()
  'RAM'
  %Common.CreateNewLine(, -56, 15)
  %Format.AlignRight()   
  %Shr(%System.Memory(MemoryUsed), 10) ' MB'
  %Format.Bar(Horizontal,50,8,0,%System.Memory(MemorySize),%System.Memory(MemoryUsed),1,1,205,18) 
}
Else
{
   %If(%ScreenSaverIsOn() = 0)
   Then
   {
      %Assign(ScreenSaverIsOn, 1)
      %Graph.Rect(0,0,256,32,0,0)
   }
}   
#EndGfxMode

 

you didnt have to post it again, eheh sorry was just pointing those out for anyone else.

But I am sure someone will be greatful you posted the updated one to save them the trouble.

I am still new to this side of it all but it is not too hard. I just dont have time to spend learning the tricks to get it how I really want it, so I will use the one you made in the meantime.

If I ever get around to doing my own will share for sure, but thanks again, and thanks to the original poster of it also.

All we need now is the driver for the LEDs for the touchpad and back of the screen and we are home free!

 

With the winamp's script made by MF_Predator in his megascript, my touchpad's light flickers, it just needs GLED plugin for lcdhype... All the lnks needed are in his sign (not certain of the english word for "signature" ?)

 

I'll see what I can do...next year

 

Ahh now thats just wrong... I read the first part and got all happy, than saw the big and looked back 2 words and got lol

But the year is up and I guess we will give you a break.

 

Hmm, that's a good point.

Happy New Year

 

Hi guys!! The project "MegaScript" for G50 and G70 is still alive?

I'm trying to continue the work of Predator, with a bit of success! For real is only an adjustment!!

There are news?

 

The megascript I'm making is almost done, I'll share it as soon as possible, but it'll be in French... I'm planning to translate it, no problem for the script, but for the tutorial it's harder... Btw if there's anyone here who knows to translate french to english better than I do, let me know

 

I can ask my buddy from Quebec to translate...he's comfortably bilingual.

 

Sanka I can help you! I'm italian, but I speak french and english well! If you want help, i'm here!

 

Thanks, it'll help me much ! As soon as the french tuto is done, I'll post a link here to download it But first I have to finish the script... Shouldn't be too long, one week, maybe two^^

EDIT : For those who understand french and wanna be aware of the evolution, you can check there

 

Way to go Please post it also here: http://www.lcdhype.condense.de/index.php?showforum=68 (Youtube video of it working would be nice also)

 

Sure I'll do, to be true that's exactly what I was planning to do, both for youtube and lcdhype forum
Some precisions about the megascript, it's based on cbap's and your (predator_MF) megascripts, with some adds from myself^^
I'm working with another french guy (Stouf, already seen on this forum, he's working on the structure of the script, the hardest part^^) for a version with pop ups system, but we have lots of ideas and much things to do before it's done, so this one will be available later...

 

Wouldn't it be cool if you had a little tetris game or a ping pong game in there while you're waiting for a game to load or because you died and you're currently in spectator mode...

Just throwing it out there...

 

There's a game made by KilledKenny (posted into the G1S OLED thread, somewhere after my megascript), it's a space shooter

 

Does this work on XP?

 

Seeing Predator_MF's sign (WinXP/Ubuntu), I think so^^

 

Here's my version, built on top of mikysee's.
Made it look cleaner, more neat, and added battery.

The goal was to keep it simple.

If anyone finds out how to display Volume, song title, and song length / remaining, let me know.

Also, between 6AM and 6PM, the screen is inversed -- this is to ensure that if a G50VT is to stay on 24/7, each LED will have an equal rate of burn, so that overall, there will be no burn-ins.

Known bugs:
- RAM number suddenly becomes a long chain of number for a split second
--> I know this happens, but I can't fix it because the value returned by LCDHype is not precise enough to get rid of smaller decimals. If there's a way to drop significant digits, let me know.

 

If you do the RAM math all as integers, get rid of any digits you don't want first and then convert itt to float to do the fractional amount it should work fine.

i.e. : 2,123,456 / 10000 = 212 -> float then / 100.0 = 2.12

Not sure LCDHype gives you that level of control over the numeric types but something along those lines should be possible.

 

AFAIK there's no control on variable type, and all the math is already done in order of magnitudes of bytes (I multiplied the value by 1000 before doing anything) and the division comes right at the end.

The problem exists because 212 will sometimes show 212.00004 and 2.12 will then show 2.1200004, etc.

 

Actually, the RAM display doesn't work for me properly either. The bar shows the correct amount but the letters display "0.00GB".
Bummer.

 

Hi ! Here is the code I have to display RAM, it works for me :

%Trunc(%Div(%System.Memory(MemoryUsed),1024))

Note that I run under Vista 32 bits, but I don't think it would make any difference^^

 

Is there any way to get LCDHype to control the side LEDs on the G50V so I won't have to mix LCDHYPE and direct console?

 

Thanks Sanka! Never knew there was a %Trunc function

Updated the RAM module, added Volume module, changed layout abit: