Recommended Posts

Everyone,

I've uploaded the calendar and weather scripts to deskmod with example configs.

this is straight from judge...follow the link.

well, as you know that was in january, and since then deskmod has shutdown and lost their files .. therefor it isnt there anymore ..

I got a really great cfg from a guy, but when I try to load it I get an error saying cannot access Program Files??

Any ideas, I really like the cfg :o

You need to modify the config for your system, especially if it contains any graphics or system meters. You can't just load it and expect it to work fine. If there are system meters like CPU time, network interface meters etc, the config file has to be modded to your system settings before they will work. And any graphics files have to be placed on your computer and the config has to point to the right files.

I'm using Space Guy's configuration. But the Weather Forecast and Outlooks are all returning, "Not Yet Executed." The Scripts are in the right folder (under scripts in my Samurize directory.) So I load up the Samurize editing program, I change the zip codes and do a test run from there. But I get an error "Invalid argument or call: Mid"

Does anyone know what this may be?

Picture of error.

post-45-1064598437.jpg

first samurize cfg! played with it since last night, pretty cool app. basic info using a few active scripts, no weather.. go outside. :) britney's torso added for good measure.

You'll excuse me if I didnt look at your samurize script. I was just too distracted by the presence of a curvy hip. :drool: :bounce: :omg:

I'm using Space Guy's configuration. But the Weather Forecast and Outlooks are all returning, "Not Yet Executed." The Scripts are in the right folder (under scripts in my Samurize directory.) So I load up the Samurize editing program, I change the zip codes and do a test run from there. But I get an error "Invalid argument or call: Mid"

Does anyone know what this may be?

Picture of error.

me too :(

does this script aslo works with countries outside the us?

dim RefreshTime

'enter number of minutes you want to wait between refreshes from weather.com
RefreshTime = 40

Function CityName(ZipCode)
 CityName = GetText("Local Forecast for ", " (", 0, ZipCode)
End Function

Function Temp(ZipCode)
 Temp = GetText ("http://image.weather.com/web/common/wxicons/52/", "°F", 124,ZipCode)& "?"
end function

Function TempFeelsLike(ZipCode)
 feel = GetText ("Feels Like", "°F", 4, ZipCode)
 If feel = "N/A" then
  TempFeelsLike = Temp(ZipCode)
 else
  TempFeelsLike = feel & "?"
 end if
end function

Function TempAndTempFeel(ZipCode)
 If TempFeelsLike(ZipCode) = "" OR TempFeelsLik(ZipCode) = Temp(ZipCode) then
  TempAndTempFeel = Temp(ZipCode)
 else
  TempAndTempFeel = Temp(ZipCode) & " (" & TempFeelsLike(ZipCode) & ")"
 end if
end function

Function Symbol(ZipCode)
 dim icons
 icons = array("","B","B","D","D","A","B","A","B","B","B","B","B","A","A","A","A","D","B","","","","","","","","S","","R","","R","","Q","M","R","D","I","E","E","","A","A","A","R")
 icon = GetText ("SRC=http://image.weather.com/web/common/wxicons/52/", ".gif", 0, ZipCode)
 if icon > 43 then
  Symbol = ""
 else
  Symbol = icons(icon)
 end if
end function

Function Condition(ZipCode)
 Condition = GetText ("°F", "</B></TD>", 82,ZipCode)
end function

Function Humidity(ZipCode)
 Humidity = GetText ("Humidity:", "%", 47,ZipCode) & "%"
end function

Function Wind(ZipCode)
 Wind = GetText ("Wind:", "</TD>", 48,ZipCode)
 Wind = Replace (Wind, " ", " ")
end function

Function UVIndex(ZipCode)
 UVIndex = GetText ("UV Index:", "</TD>", 47,ZipCode)
 UVIndex = Replace (UVIndex, " ", " ")
end function

Function DewPoint(ZipCode)
 DewPoint = GetText ("Dew Point:", "°", 47,ZipCode) & "?"
end function

Function Visibility(ZipCode)
 Visibility = GetText ("Visibility:", "</TD>", 47,ZipCode)
end function

Function Pressure(ZipCode)
 Pressure = GetText ("Pressure:", "</TD>", 48,ZipCode)
end function

Function UpdateTime(ZipCode)
 UpdateTime = GetText (", at", " Time", 1,ZipCode)
 UpdateTime = Replace (UpdateTime, "Eastern ", "")
 UpdateTime = Replace (UpdateTime, "Mountain ", "")
 UpdateTime = Replace (UpdateTime, "Pacific ", "")
 UpdateTime = Replace (UpdateTime, "Central ", "")
 UpdateTime = Replace (UpdateTime, "Standard", "")
 UpdateTime = Replace (UpdateTime, "Daylight", "")
 If TimeDiff(ZipCode) > RefreshTime Then
  UpdateTime = UpdateTime & "(" & TimeDiff(ZipCode) & " mins)"
 End If

end function

Private Function path(ZipCode)
 path = GetTempPath & ZipCode & ".tmp"
End Function

Private Function GetTempPath
 set fso=CreateObject("Scripting.FileSystemObject")
 GetTempPath = fso.GetSpecialFolder(2) & "\weather.com.forecast\" 
 if not fso.FolderExists(GetTempPath) then 
  fso.CreateFolder(GetTempPath)
 End if
End Function

Private Function TimeDiff(ZipCode)
 dim fs,f,diff
 file = path(ZipCode)
 set fs=CreateObject("Scripting.FileSystemObject")
 if fs.fileexists(file) then
  set f=fs.GetFile(file)
  diff = datediff( "n", f.DateLastModified, now())
 else
  diff = -1
 end if
 set f=nothing
 set fs=nothing
 TimeDiff = diff
End Function

Private Function RandomNum
 Randomize Timer
 RandomNum = Int(Rnd * 1000)
end function

Private Function start(source, pos, offset)
 source = Mid(source, instr(source, pos)+len(pos)+offset)
 Start = Source
End Function

Private Function endd(source, pos, offset)
 source = Mid(source, 1, instr(source, pos)-1-offset)
 endd = Source
End Function

Private Function GetText(ini,Fin,offset,ZipCode)
 If TimeDiff(ZipCode) < 0 Then
  GetText = Writefile(ZipCode)       'file doesn't exist so fetch it
 Else
  If TimeDiff(ZipCode) > RefreshTime Then        'see if it needs refreshing
   GetText = Writefile(ZipCode) 'refresh it
  End If
 End If
 GetText = GetFileContents(ini,Fin,offset,ZipCode)           'read it's contents

End Function

Private Function GetFileContents(ini,Fin,offset,ZipCode)
 Set file_obj = CreateObject ("Scripting.FileSystemObject")
 Set file_path = file_obj.GetFile(path(ZipCode)) ' Creates the connection to the file
 set file = file_path.OpenAsTextStream (1, -2) ' Opens the file for reading
 html = file.readall
 File.Close ' Closes the file
 Set file_path = nothing ' Resets variable
 Set file_obj = nothing ' Resets variable
 html = start(html, ini, offset)
 html = endd(html, Fin, 0)
 GetFileContents = html
End Function

Private Function Writefile(ZipCode)
 GetURL = "http://beta.weather.com/weather/local/" & ZipCode & "?" & RandomNum

 Dim Http
 Set Http = CreateObject("Microsoft.XMLhttp")
 Http.Open "GET",GetURL,False
 Http.Send
 HtmlResult = Http.ResponseText
 Set Http = Nothing
 Set fs=CreateObject("Scripting.FileSystemObject")
 If (fs.FileExists(path(ZipCode))) Then
  Set aFile = fs.GetFile(path(ZipCode))
  aFile.Delete
  set aFile = nothing
 End If
 Set f=fs.CreateTextFile(path(ZipCode), true, true)
 f.Write HtmlResult
 f.Close
 Set f=Nothing
 Set fs=Nothing
End Function

what do i need to change in this config to make the temp in C instead of F?

can someone post me the calendar pic that is found in one of the posts in this super long thread?

it has a red top part

i tried to find it a while ago but its lost due to neowin's lost of data some time ago...

i also tried to pm the guy who posted the pic (i don't remember who)..no response..

Edited by hermit

sorry I know this has been requested before but I am looking for the script from judge like the one that is here

http://www.deviantart.com/view/1165070/

deskmod is down, samurize dosent have it, deviant dosent have it, the links at the first of the thread are dead also

if anyone has it or know if anywhere that does it would be appreciated

thanks

I don't think anyone has a copy of that script anymore, there must have been many html changes on weather.com from when judge originally made that to now, which means that the script would most likely no longer work. Just use his desktopweather script (v0.41 available at www.samurize.com and mod that yourself. You can get a similar effect quite easily.

Btw, here's something I came up with, after a hour or so tinkering.

My latest samurized desktop

This topic is now closed to further replies.
  • Recently Browsing   0 members

    • No registered users viewing this page.
  • Posts

    • We need a game update frequency setting. * Right now your recent games will be auto updated overnight, and your unrecent games won't be updated. The bifurcation of recent and unrecent is fine, but we should be able to control the update frequency for both, with any of the following options: 1. Don't auto update 2. Auto update weekly 3. Auto update overnight 3. Auto update immediately (push) i.e. When I'm playing a lot, I want my recently played games to have push updates, so if a dev releases an update at 4pm, it's already downloaded on my Xbox by the time I get home. The current overnight cadence leaves a lot of wasted time waiting for updates on slow connections. My infrequently played games in ok with deferring to overnight, or maybe weekly, but let the users control their frequency. Basing it on data and last played sounds smart but ignores the human reality that often when I'm busiest and have the least time for games is when it sucks the most to come home and find a huge update list waiting for you.
    • Genocide is intent to exterminate and both the Israeli government AND its people openly declare, even boast about their intent to exterminate Arabs. This society of sick psychopaths has even made songs about it. Zionist means believing Israel should exist as an religious ethno-state where only Jews have rights and everyone else is second class citizen. As for the blood libel thing, we already know zionists get off on killing children. We also know Israel is a safe heaven for all the pedophiles and rapists of the world. Honestly, after what we saw in the Epstein files, I wouldn't put anything past this depraved death cult. Of course all atrocities committed by tHe wOrLds mOsT mOrAl aRmY are always "unproven or taken out of context". Unfortunately for them, their soldiers are dumb enough to leave a trail of their war crimes all over social media. Then again, when you live in a society that's obsessed with death and destruction, posting videos of yourself in the act of ransacking homes and desecrating religious monuments earns you brownie points I guess. Israel is the only society in the world where people come out on the roads for the right to **** prisoners. Also claiming that the BBC said this and AP said that without so much as a link has gotten me curious. Are all zionists this dumb? I really hope you aren't getting paid for this because this is some low effort propaganda.
    • Microsoft is bringing big performance improvements to OneDrive on Mac by Taras Buria Microsoft has announced a major update for the OneDrive client on macOS. Today, the company released version 26.098, promising significantly faster sync, optimized CPU usage, a smaller memory footprint, and better energy efficiency. In a newly published blog post, Microsoft acknowledged that changes implemented in OneDrive for Mac in 2022 brought some unwanted side effects. Due to architectural changes and the need to keep the OneDrive sync engine unchanged, Microsoft created a hidden cache folder. With time, it would cause reliability and performance issues for customers. Now, Microsoft is ditching the old engine for native sync, delivering a faster, more reliable experience. As a result of this change, OneDrive for Mac now integrates more deeply into the operating system, offers about two times faster sync performance, and uses fewer system resources. While the hidden folder still exists, the app only uses it to store files that have not been uploaded yet, link file types, and macOS-related packages. In total, even when holding hundreds of files, the temporary folder does not take more than a couple of megabytes on the drive. Besides optimizations, the new sync engine enables external drive support, allowing you to keep your OneDrive folder on a removable drive (it should meet all the requirements). Microsoft is now rolling out the updated OneDrive client for Microsoft 365 Insiders. To check if your Mac has the new sync engine, go to the About tab and check the app version. If it ends with something like 26H, you are on the new engine. If not, you are on the old one. Microsoft says it will take a few weeks to complete the rollout to Insiders, but it won't say when to expect the update in the stable channel. Big performance updates for OneDrive on Mac came right after Microsoft confirmed it would soon kill document editing in Office 2019 for Mac due to expiring certificates. This change will force users to look for alternatives or switch to Microsoft 365.
    • Sorry but that makes no sense. What does using the same laptop have to do with anything? 
  • Recent Achievements

    • Week One Done
      StaticMatrix earned a badge
      Week One Done
    • Rookie
      lamborghiniv10 went up a rank
      Rookie
    • One Month Later
      pinnclepd earned a badge
      One Month Later
    • First Post
      X-No-file earned a badge
      First Post
    • One Month Later
      johnjacobb40 earned a badge
      One Month Later
  • Popular Contributors

    1. 1
      +primortal
      517
    2. 2
      PsYcHoKiLLa
      211
    3. 3
      +Edouard
      147
    4. 4
      Steven P.
      92
    5. 5
      ATLien_0
      82
  • Tell a friend

    Love Neowin? Tell a friend!