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

    • "TeamViewer is the fast, simple and friendly solution for remote access over the Internet" Regarding the "friendly" description, has is stopped unceremoniusly booting your session after a couple of minutes accusing you of using it in a commercial environment?!
    • I hate religious supremacist genocidal maniacs. How antisemitic of you to imply that's what all Jews are like. Still no links I see. I guess when you're a zionists, backing your claims with proof doesn't matter. bEliEvE mE oR yOuRe hItLeR.
    • Moto G Stylus has better specs and a stylus. Search for the specs to see if they they're important to you. 
    • Funny how people who don't use OneDrive feel the need to give their opinion.
    • Win11Debloat 06.10.2026 by Razvan Serea Win11Debloat is a lightweight, easy to use PowerShell script that allows you to quickly declutter and customize your Windows experience. It can remove pre-installed bloatware apps, disable telemetry, remove intrusive interface elements and much more. The script also includes many features that system administrators and power users will enjoy. Such as a powerful command-line interface, support for Windows Audit mode and the option to make changes to other Windows users. All changes made by Win11Debloat can be easily reversed, and most removed apps can be restored via the Microsoft Store. A full guide on how to undo the changes is available here. Win11Debloat features: Below is an overview of the key features and functionality offered by Win11Debloat. Please refer to the wiki for more information about the default settings preset. Remove a wide variety of preinstalled apps. Click here for more info. Disable telemetry, diagnostic data, activity history, app-launch tracking & targeted ads. Disable tips, tricks, suggestions & ads across Windows. Disable Windows location services & app location access. Disable Find My Device location tracking. Disable 'Windows Spotlight' and tips & tricks on the lock screen. Disable 'Windows Spotlight' desktop background option. Disable ads, suggestions and the MSN news feed in Microsoft Edge. Hide Microsoft 365 ads on the Settings 'Home' page, or hide the 'Home' page entirely. Disable & remove Microsoft Copilot. Disable Windows Recall. Disable Click to Do, AI text & image analysis tool. Prevent AI service (WSAIFabricSvc) from starting automatically. Disable AI Features in Edge. Disable AI Features in Paint. Disable AI Features in Notepad. Disable the Drag Tray for sharing & moving files. Restore the old Windows 10 style context menu. Turn off Enhance Pointer Precision, also known as mouse acceleration. Disable the Sticky Keys keyboard shortcut. Disable Storage Sense automatic disk cleanup. Disable fast start-up to ensure a full shutdown. ...and more. Once you’ve downloaded the Win11Debloat file (Get.ps1), just follow these quick steps: Locate the Get.ps1 script file. Right-click the file and select Run with PowerShell from the context menu. If prompted by User Account Control (UAC), select Yes to grant the script the necessary administrative permissions. Win11Debloat 06.10.2026 release notes: This release brings some long-requested features alongside a host of fixes. For starters, Win11Debloat can now automatically detect previously applied tweaks for the logged-in user. And reverting them is as simple as unchecking the corresponding setting. The script now also fully supports running under the SYSTEM account, which has also made it possible to apply changes to users who are still logged in. This makes it far easier to integrate Win11Debloat into your automations and deployments. What's changed: Add confirmation dialogs & warning for Windows Terminal Removal by @Raphire Add Support for running the script under SYSTEM account by @soccerzockt in #609 With this, support was also added for applying changes to users that are still logged-in. Add option to show & undo previously applied tweaks by @Raphire in #599 Add additional options to change the All Apps view in the start menu (Hide, Grid, Category, List) by @Raphire in #599 Clean up logging of exceptions during Appx Package uninstallation via Write-Verbose by @HetCreep in #617 Improve log output in Get.ps1/Get-Dev.ps1 and clean up file exclusions by @Raphire Remove RemoveCommApps and RemoveW11Outlook app removal parameters. Use -RemoveApps parameter instead by @Raphire in #599 Resolve nested quoting bug in Run.bat when path has spaces, see #583 by @Raphire in #599 Fix desync issue when toggling "Only Show Installed" checkbox too fast by @Raphire in #599 Fix: add missing keys in Sysprep/Undo regfiles for Disabling Recall and Windows Suggested content by @Raphire in #599 Fix 'Disable Animations' Sysprep settings not being set for new users by @Raphire in #599 Fix typo in Disable_Game_Bar_Integration Sysprep registry file by @Raphire Note The -RemoveCommApps and -RemoveW11Outlook command-line parameters for uninstalling a few specific apps have been removed with this release. If you previously relied on these parameters, please see this wiki page for alternative methods of removing these apps. Download: Win11Debloat 06.10.2026 | Open Source View: Win11Debloat Home Page | Screenshots 1| 2 Get alerted to all of our Software updates on Twitter at @NeowinSoftware
  • Recent Achievements

    • One Month Later
      Sopa flores earned a badge
      One Month Later
    • First Post
      StaticMatrix earned a badge
      First Post
    • 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
  • Popular Contributors

    1. 1
      +primortal
      508
    2. 2
      PsYcHoKiLLa
      207
    3. 3
      +Edouard
      156
    4. 4
      Steven P.
      89
    5. 5
      ATLien_0
      79
  • Tell a friend

    Love Neowin? Tell a friend!