ASUS G1S OLED display - I have found a way to set it :)

hi all i have a little modified the beta megascript of PREDATOR

and the gpu graph works

here the link:
http://sharebee.com/747adbe6

 

Nice try but you haven't optimized anything. Even worst, there are some errors inside which caused high CPU usage or LCDHype crash. The first noticeable reason I see is you don't check if MSN is running and use variables from the MSN plugin directly....which causes MSN to start if it's not running, which slows down LCDHype....

Anyway, nice screen, but my advice (and the main reason there is actually a megascript for this Asus G-series) is to keep the screen clean and readable. It's a small OLED screen, so you can't show everything (you see the results yourself). That's why there is a menu, there are different screens separated by information type.

Keep working on that, try to clean it out, make some compromises about what you can remove from there and what you can't and you'll get nice looking and useful screen.

 

Just updated the Megascript beta post with some images from the script. Here it is:
http://forum.notebookreview.com/showthread.php?p=3829556#post3829556

 

i know i havnt optimize anything but my CPU is 5% with everest & co, so i guess it doesnt drain so much.
ill see later for msn checking ut my msn is allways running ^^

hmm i present you a little evolution

http://sharebee.com/a868c595

 

That's better...

Instead of using anything from the plugin to show the MSN conversations, just use this:
%MSNlastchatcount()
It's a global variable declared in the Code.MSN script, it contains the chat count on the last check (as it name says).

PS: Instead of posting the whole megascript file, just post your screen code as TXT file, easier to use in the future

 

thanks ^^
what does this exactly means "lastcheckcount"

is this for freeing cpu charge ?

 

I already explained what it means. And yes consumes less CPU since it's a variable, not a function. The function takes time to execute and return result, the variable is just the ready to use result. Just use this variable instead of using any other code to check how much chats you have and you'll see the HUGE difference

 

i believe you predator
i remplaced this line and it still check my msn windows ^^ after the popup shows up

thx !!

 

I am trying to code a weather script but I cannot get it working. I am using the lcdweather plugin, which I know parses information from wetter . com's page for whatever city code you choose, but the only information I get is NA. Has that weather site changed their page layout, rendering the lcdweather plugin useless or something? If anyone has a working script using this plugin could you share it?

 

I've used that plugin few times, here's an image of the output:
http://lcdhype.de/index.php?showtopic=4647

Lately there's a new version of the weather plugin, you may want to try it. There are example scripts for that plugin in lcdhype forum gallery

 

Hmmm, I was already using version 1.6. I couldn't find any example scripts (ones that work, anyway) for weather in the gallery. Could you post a link if you know where some are?

Here is my problem: I just get NA for current weather stats and -1 for forecast even with the following simple script

Code:

#Header
  %UsePlugin('LCDWeather\lcdweather.dll',AddLocation,DE0001020)
#EndHeader

#GfxMode
  %UsePlugin('LCDWeather\lcdweather.dll',DE0001020,Name)
  %Common.CreateNewLine()
  %UsePlugin('LCDWeather\lcdweather.dll',DE0001020,Current,Temp)
#EndGfxMode

DE0001020 is Berlin, which I tested because I know the current weather data is there for Berlin on the website. I get NA for both lines.

On another note, is it possible to control the power, battery, and wireless LEDs in addition to the mail LED if the driver was written for it? I was thinking it would be cool to make a script where the lights flow from side to side if I got a Skype call. Also, what software do I need to write drivers for LCDHype?

 

Ok, got a weather script working. I ditched the plugin and rewrote the Vista sidebar gadget weather plugin to keep a log with the information I need in it. Then I wrote a script to display the information from the log file. If anyone is using Vista and wants the script and gadget here you go. Install MSNweather gadget for sidebar (download it online) and then replace the C:\Users\%yourusername%\AppDataLocal\Microsoft\Windows Sidebar\Gadgets\MSNWeather.Gadget\js\weather.js with the one in this zip file. Then just use this simple script. Feel free to make it more complex, this was just my first working version. I will get it going with forecast if I get the time and motivation.

Script:

Code:

#Header
/Common Header Info/
%CleanUp.ClearInputBuffer(All)
%CleanUp.ClearVRAM()
%LCD.Gfx_SetTextArea(0,0,127,31)
%Param.FastWrite(1)
%Common.SetPriority(300000)

%Param.RenderMode(Full)
#EndHeader


#GfxMode
%LCD.Gfx_SetFont('Tahoma',7,1)
%System.ReadFile('C:\Users\%yourusername%\AppData\Local\Microsoft\Windows Sidebar\Gadgets\MSNWeather.Gadget\output.txt',0)
%Common.CreateNewLine()
%Format.Offset(Vertical,-3)
%System.ReadFile('C:\Users\%yourusername%\AppData\Local\Microsoft\Windows Sidebar\Gadgets\MSNWeather.Gadget\output.txt',1)
%Common.CreateNewLine()
%Format.Offset(Vertical,-3)
%System.ReadFile('C:\Users\%yourusername%\AppData\Local\Microsoft\Windows Sidebar\Gadgets\MSNWeather.Gadget\output.txt',2)


#EndGfxMode

 

You can't control Battery LED, Power LED and Wireless LED, they are hardwired. Drivers/plugins can be written in Borland Delphi, LCDHype is written with Delphi. You could of course write plugins with Visual Studio or any other IDE/language but it would be easier on Delphi since LCDHype is written in it and would have best compatibility

 

Ok I finally got my computer back, and am getting everything back up to speed. Thanks for the great work Predator.

I updated the 8600 BMP file to be a 9500 m GS (which is what my Asus has). I have attached it for any one else with this video card.

 

Well Delphi seems a bit outside my price range. I guess I will just stick to scripting for now. Thanks for all your advances for the ASUS drivers and for the help Predator.

 

Anyone got this working for the G50's yet?

 

This driver can't work with G50 or G70, there are many differences between both laptops' OLEDs. There will be driver for G50/70 when I find more information about the OLED that G50 is using. Mind that nobody is helping me, I don't have G50 myself, I can't find any information on ASUS website nor the internet. I've asked ASUS for some technical information and they gave me nothing.

 

Predator thx again.

I'm not trying to nitpick, but just help with cleanup (where I can)

Line 50 of CPU Graph should be changed to

Code:

'   '%CPUMax()'%'

from

Code:

'   '%CPUMax()'°C'

It changes it to read from degrees C to Percent (which is what it is graphing). Very small fix, just trying to help.


And for those who want to use the Intel Icon CPU Temp Graph (I modified it a lil bit) (looks like the GPU Temp Graph) just replace your current CPU Temperature Module with this.

Code:

***********************************
*      CPU Temperature Graph      *
*      by Predator_MF             *
***********************************

#Header
  %KeyInit()
  %Common.SetPriority(800)
  %Param.AvoidPluginCleanUp()    

   /set graphics/
   %Graph.SetRefreshArea(0,0,127,31)
   %Graph.SetTextArea(0,0,127,31)
   %Graph.LoadBitmap('gfx\intel.bmp',0,0,0,0,24,17,0,NONE)
   %Graph.LoadBitmap('gfx\gpu110.bmp',34,0,0,0,11,6,0,NONE)

   %Graph.Font('Arial',8,1, Bold)
   %Graph.Pen(32,6,1)
   %Graph.LineTo(32,6,1)
   %Graph.Pen(32,12,1)
   %Graph.LineTo(32,12,1)
   %Graph.Pen(32,18,1)
   %Graph.LineTo(32,18,1)
   %Graph.Pen(32,24,1)
   %Graph.LineTo(32,24,1)
   %Graph.Pen(32,30,1)
   %Graph.LineTo(32,30,1)
  

#EndHeader


#GfxMode
   %KeyCheck()

   /%ReadCPUTemps()  /        

   %Param.OverlayMode()
   %If(%List.Count(CPUTPeaks) > 0) Then
   {
      %Graph.Pen(%CPUTStartX(),%Dec(%Dec(%CPUTStartY(),1),%CPUTPeaks(0)),1)
      %Loop.For(i,1,%List.Count(CPUTPeaks),1)
      {
         %Graph.LineTo(%Inc(%CPUTStartX(),%Mul(%CPUTSteps(),%i())),%Dec(%Dec(%CPUTStartY(),1),%CPUTPeaks(%Dec(%i(),1))),1)
         %Graph.Pen(%Inc(%CPUTStartX(),%Mul(%CPUTSteps(),%i())),%Dec(%Dec(%CPUTStartY(),1),%CPUTPeaks(%Dec(%i(),1))),1)
      }
   }
   %Common.CreateNewLine(,0,-2)
   %Format.AlignRight()
   %GetCPUT()'°C'
#EndGfxMode

 

you just to develop speed lcd refresh rate . it not timing flash with song . thank you .

 

I randomly get a end GFX error that popped up (2x) I didn't copy it becuase a simply script restart fixed it. Now though the script won't even start. When I try to run it in LCDHype I get this message:
Row 523 - Undefined function call or varible not found (LogoOffset). This is the last line in the System.Main module. Has anyone else run into this? I didn't touch anything near that. I redownloaded and tried again and it works with the download, but when I change things back to TGPU1 it breaks.

 

Are you sure you haven't done any other changes ? For example adding/removing/renaming a script or something ?

 

I am sure. Right now it doesn't even seem to get out of System.Main.

Edit * I think I got it!

What happened was this:

Line 084 of System.Main:
/%List.Add(MenuNames,'Winamp Bars/stereo')/

I commented it out becuase I don't use winamp. and rather than have it eve worry about trying to skip it. But there is a / in the name. I removed that and there must be an extra comment / somewhere else that is throwin the whole thing off.

 

Predator,
Can you tell me which line to toggle for the GLED's on the side? I have Fraps installed and don't mind if they flash when over 25/30, but would like them off when not. (I have to use bandana's to block the light while I sleep).

My guess is it was line 132 under System.Main:

Code:

 %DefVar(GLED_ON, Global=3) / FPS Detect = 3 /

And that's what I have right now. but its always on. Am I missing an edit somewhere? Or even to default it to off. Thanks

 

Yeah, removing the "/" sign from the text breaks the whole megascript apart, I've talked with LCDHype author and he's aware of that bug, I hope it would be fixed in the future.

Code:

 / You may change default GLED option here /
 %DefVar(GLED_ON, Global=1)

GLED_ON is variable that enables/disables the GLED, here are the values:
0 = OFF
1 = ON
2 = Blink
3 = FPS Detect

So, if you change the text to %DefVar(GLED_ON, Global= 0), the GLED will be OFF by default. I guess there should be one more option there to explicitly define the state of the GLED state when it's not blinking on FPS Detect mode.

 

Hi, Excellent script predator!

I've got a few problems that you may be able to help me with.

1. the screensaver. how do I change the time that the screensaver comes on? I looked in the system main and changed some of the numbers but i didn't seem to do anything, is it somewhere in the screensaver script??
2. wifi. how do i get it to show my infomation? again i changed the number from 1-20 and i get nothing, what part do I change?
3. msn. when I set the autochange feature to change every 10, 15 etc when it gets to msn and stays there, I then have to change it manually, why is this, can i stop it?
I got the g1s.

Thanks

 

I got a question, everest won't show gpu temps with the trial version.

i was wondering if there is a way to read gpu temperatures, from say... Ntune's nvmonitor.

so ill have cpu usage, ram usage, cpu temp, and gpu temp (from nvmonitor).

because thats one of the things i would like to know while gaming.


The best i've come up with is event logging in nvmonitor, but i have no clue how to make a script that will read the last reading and display it with the other bars.

 

#Header
%Common.SetPriority(1000)
%CleanUp.ClearVRAM()

%Graph.SetTextArea(0,0,127,31)
%Graph.Font('small fonts',6,1)

%DefVar(EverestPLG='everest\everest.dll')
%DefVar(CPUtemp)
%DefVar(GPUtemp)
%DefVar(CPUused)
%DefVar(RAMused)
#EndHeader

#GfxMode
%Format.Offset(Vertical,-2)
%Assign(CPUused,%System.CPU(Usage))
'CPU : '%CPUused()'%'
%Format.Bar(Horizontal,72,6,0,100,%CPUused(),1,1,54,0)

%Common.CreateNewLine()
%Format.Offset(Vertical,-2)
%Assign(RAMused,%System.Memory(MemoryLoad))
'RAM : '%RAMused()'%'
%Format.Bar(Horizontal,72,6,0,100,%RAMused(),1,1,54,8)

%Common.CreateNewLine()
%Format.Offset(Vertical,-2)
%Assign(CPUtemp,%UsePlugin(%EverestPLG(),TCPU,value))
'CPU : '%CPUtemp()'°'
%Format.Bar(Horizontal,72,6,0,100,%CPUtemp(),1,1,54,16)

%KeyCheck()
#EndGfxMode#Header
/insert header code here/
#EndHeader

#TextMode
/insert textmode script code here/
#EndTextMode

#GfxMode
/insert gfxmode script code here/
#EndGfxMode






this is 3 bars, there is space for one more bar. Which i would like to use to display GPU temps from nvmonitor logs

 

also, you can set the maximum size of the log, so you can set it to like 50mb, and when that fills up (if ever) just remake the log with the same name.

but how to read from logs!

 

%Common.CreateNewLine()
%Format.Offset(Vertical,-2)
%Assign(GPUtemp,%UsePlugin(%EverestPLG(),TGPU1DIO,value))
'GPU: '%GPUtemp()'°'
%Format.Bar(Horizontal,72,8,0,100,%GPUtemp(),1,1,54,16)

ok, i just need that to read from the log file instead of everest, is that possible?

 

Yeah, it's possible to read file, the function is:

Code:

%System.ReadFile('C:\file.txt',1)

From there on, you'll have to write your own function that parses the log file and finds the temperature string. It's not that hard job, here are some tips:

Assign to a variable the log file text, this is necessary so you won't need to read the file every time you have to get something from it inside the function. This will speed up things especially if the file is that big -

Code:

%Assign(logfile, %System.ReadFile('C:\file.txt',1) )

Use the LCDHype search functions to find the temperature string inside, functions you should use are:
%String.Pos(St,MyString)
%String.Copy(MyString,3,6)
Read the LCDHype help for those functions.

 

1. System.Main, line #113:

Code:

 / Timeout (minutes) to turn OLED saver /
 %DefVar(ScreenSaverTimeOut, Global= 3 )

How more self explaining do you want it to be

2. There is one major change in the Megascript 2.0, that is it detects the network adapter by it's name, so you don't have to search which number it is. WiFi screen, line #15:

Code:

 / Your network adapter name, this next function searches all adapters 
 and assigns the first one that has this string /
 %DefVar(NetworkName='4965')

Again, self explaining code, you just replace the 4965 with some recognizable part of your WiFi adapter's name. Read the Megascript 2.0 beta post here (the second link in my signature)

3. There's no such bug and there shouldn't be - this script is tested to work on G1S with XP and Vista, so if it's really working this way there's something messed up with your megascript code. The MSN alert should popup for 10 seconds and then (if no other messages are recieved) it should switch back to the last "normal" screen.

 

%Format.Offset(Vertical,-2)
%Assign(CPUused,%System.CPU(Usage))
'CPU : '%CPUused()'%'
%Format.Bar(Horizontal,72,6,0,100,%CPUused(),1,1,54,0)

%Common.CreateNewLine()
%Format.Offset(Vertical,-2)
%Assign(RAMused,%System.Memory(MemoryLoad))
'RAM : '%RAMused()'%'
%Format.Bar(Horizontal,72,6,0,100,%RAMused(),1,1,54,8)

%Common.CreateNewLine()
%Format.Offset(Vertical,-2)
%Assign(CPUtemp,%UsePlugin(%EverestPLG(),TCPU,value))
'CPU : '%CPUtemp()'°'
%Format.Bar(Horizontal,72,6,0,100,%CPUtemp(),1,1,54,16)

%Common.CreateNewLine()
%Format.Offset(Vertical,-2)
'GPU: '%UsePlugin('rivatuner\RivaTuner.dll','Core temperature')'°'
%Format.Bar(Horizontal,72,6,0,100,%GPUtemp(),1,1,54,24)


almost done editing scripts for my use, but one last thing is bugging me.

everything, except GPU temp has it's own little nifty bar next to it that moves as temps/% increases.

how do i give gpu temp it's own bar

 

%Common.CreateNewLine()
%Format.Offset(Vertical,-2)
%Assign(GPUtemp,%UsePlugin('%rivatuner\RivaTuner.dll',Core temperature))
'GPU: '%UsePlugin('rivatuner\RivaTuner.dll','Core temperature')'°'
%Format.Bar(Horizontal,72,6,0,100,%GPUtemp(),1,1,54,24)

doesn't work


edit

%Common.CreateNewLine()
%Format.Offset(Vertical,-2)
%Assign(GPUtemp,%UsePlugin('%rivatunerPLG\RivaTuner.dll',Core temperature))
'GPU: '%GPUtemp()'°'
%Format.Bar(Horizontal,72,6,0,100,%GPUtemp(),1,1,54,24)

gives me

GPU:

thats it =/


edit

%Common.CreateNewLine()
%Format.Offset(Vertical,-2)
%Assign(GPUtemp,%UsePlugin(%rivatunerPLG(),Core temperature,value))
'GPU: '%GPUtemp()'°'
%Format.Bar(Horizontal,72,6,0,100,%GPUtemp(),1,1,54,24)

this one gives

GPU: wrong parameter

 

OOOOO at the top, i didnt

%DefVar (rivatunerPLG='rivatuner\rivatuner.dll')

time to see if adding that works

EDIT: added that to the top, now im back to GPU: (degree sign)

%Common.CreateNewLine()
%Format.Offset(Vertical,-2)
%Assign(GPUtemp,%UsePlugin('rivatuner\rivatuner.dll','Core temperature'))
'GPU: '%GPUtemp()'°'
%Format.Bar(Horizontal,72,6,0,100,%GPUtemp(),1,1,54,24)

now giving

GPU: (the right temperature), but still no graphical bar

edit. I just realized that the gpu temp is a decimal, 68.00, unlike the others which are just whole numbers, would this be affecting the bar display?

 

w/e

#Header
%Common.SetPriority(1000)
%CleanUp.ClearVRAM()

%Graph.SetTextArea(0,0,127,31)
%Graph.Font('small fonts',6,1)


%DefVar(EverestPLG='everest\everest.dll')
%DefVar(CPUtemp)
%DefVar(GPUtemp)
%DefVar(CPUused)
%DefVar(RAMused)
#EndHeader

#GfxMode

%Format.Offset(Vertical,-2)
%Assign(GPUtemp,%UsePlugin('rivatuner\rivatuner.dll','Core temperature'))
'GPU: '%GPUtemp()'°'
%Format.Bar(Horizontal,72,6,0,100,%GPUtemp(),1,1,54,0)

%Common.CreateNewLine()
%Format.Offset(Vertical,-2)
%Assign(CPUtemp,%UsePlugin(%EverestPLG(),TCPU,value))
'CPU : '%CPUtemp()'°'
%Format.Bar(Horizontal,72,6,0,100,%CPUtemp(),1,1,54,8)

%Common.CreateNewLine()
%Format.Offset(Vertical,-2)
%Assign(CPUused,%System.CPU(Usage))
'CPU : '%CPUused()'%'
%Format.Bar(Horizontal,72,6,0,100,%CPUused(),1,1,54,16)

%Common.CreateNewLine()
%Format.Offset(Vertical,-2)
%Assign(RAMused,%System.Memory(MemoryLoad))
'RAM : '%RAMused()'%'
%Format.Bar(Horizontal,72,6,0,100,%RAMused(),1,1,54,24)

%KeyCheck()
#EndGfxMode#Header

displays GPU temp, cpu temp and a bar showing it graphically, cpu% usage and a bar like previous and ram% usage with a bar.

if anyone know how to give gpu temp a bar, please say so =)

 

The line where you output the GPU bar should be:
%Format.Bar(Horizontal,72,6,0,100,%GPUtemp(),1,1,54, 10)

You have put 0 there, that's why the GPU bar displays at x=54, y=0 (which is outside the visible area).

Also, you forgot to use KeyInit() or KeyInitNoSaver() in your header.

 

didn't work =/

 

thanks my problems were solved!

this is completley off topic but anyone wiv a g1s might be able to help, i'v searched lots of forums but haven't got a solid answer.

while playing games with updated driver i get a sec pause every 7 secs, the framerate go's from 60 to 49, how do I stop this? anyone else have the same problem?

thanks

 

Predator MF,

Excellent work this looks amazing and the Global DJ Broadcast, good taste in music to boot.

I did a search through the thread but couldn't figure out whether or not you'd cracked the G50V script yet.

If there's any way I can help let me know, and keep up the good work!

 

I haven't done anything for G50 yet, I have no time lately to do anything in this direction, but I'll contact you when I find some spare time for your help. Thanks

 

Code:

#Header
%Common.SetPriority(1000)
%CleanUp.ClearVRAM()

%Graph.SetTextArea(0,0,127,31)
%Graph.Font('small fonts',6,1)
%KeyCheck()

%DefVar(EverestPLG='everest\everest.dll')
%DefVar(CPUtemp)
%DefVar(GPUtemp)
%DefVar(CPUused)
%DefVar(RAMused)
#EndHeader

#GfxMode

%Format.Offset(Vertical,-2)
%Assign(GPUtemp,%UsePlugin('rivatuner\rivatuner.dll','Core temperature'))
'GPU: '%GPUtemp()'°'
%Format.Bar(Horizontal,72,6,0,100,%GPUtemp(),1,1,54,0)

%Common.CreateNewLine()
%Format.Offset(Vertical,-2)
%Assign(CPUtemp,%UsePlugin(%EverestPLG(),TCPU,value))
'CPU : '%CPUtemp()'°'
%Format.Bar(Horizontal,72,6,0,100,%CPUtemp(),1,1,54,8)

%Common.CreateNewLine()
%Format.Offset(Vertical,-2)
%Assign(CPUused,%System.CPU(Usage))
'CPU : '%CPUused()'%'
%Format.Bar(Horizontal,72,6,0,100,%CPUused(),1,1,54,16)

%Common.CreateNewLine()
%Format.Offset(Vertical,-2)
%Assign(RAMused,%System.Memory(MemoryLoad))
'RAM : '%RAMused()'%'
%Format.Bar(Horizontal,72,6,0,100,%RAMused(),1,1,54,24)

%KeyCheck()
#EndGfxMode

 

Predator-

I also have a G50, and am willing to help in anyway if your going to develop a better way to access the OLED. I'll PM you my private contact info, and hope you can find some use for me (and my G50) despite a poor knowledge of LED's or scripting =P.

Thanks for your efforts!

Edit: Am new to the forums, and couldn't find a way to PM you, maybe because I'm new?

 

Yes, it's because you're new. You need a couple of messages before you can do it -- I don't know how many exactly.

Check the forum though, there is a specific thread dedicated to the G50 OLED now, where Predator_MF reports on his ongoing efforts.

 

is the lcdhype site gone?

 

Yeah it seems down temporary, can't say gone

 

wats the difference between GPU temperature and the GPU Diode?


*edit*

also predator ur LED plugin i know it blinks the touchpad with bass for winamp anyway that could work for the LED's in the back of the monitor too? Those are always off for me now once i got rid of direct console...thanks

 

It works for G1/G2 Mail LED, Touchpad LED and Gaming LED (the green LEDs on G1S, the red LEDs on G2S)

 

Hi Predator! I have made your script graphical compatible with my g50 oled...
I need some help with the gaming led, i cant get it workin...

can you pm me with your msn or something?
Thx!

 

I have tried every link and torrent search everywhere and cant find a working link to download LCDhype would anybody be willing to send it to me? or post it on the form as an attachment.

THANKS!

 

i have a g50vt-x1 and the led is blue on the back so maybe they have different drivers?..wat would i have to change you think?..thanks for all the help