【HYBRID W-ZERO3】天気の表示

TitaniumWeatherがどうにも問題を起こすのでHomeScreenCustomizerの天気に変更。
そのままでは表示がちょっと寂しいので、パネルの右側にHi、Lowと更新時刻、Todayの右下にアイコンを表示してみた。

SHCustom_480x854.cprのTAWeatherのCondensedにこれを追加。
&ltText ID=”Textx” Left=”360″ Top=”6″ Width=”240″ Height=”30″ FontFamily=”Tahoma” FontSize=”8″ FontStyle=”Regular”
Wrap=”False” VerticalAlignment=”Top” Trimming=”EllipsisCharacter”&gt
&ltTextStage TextOffsetType=”TextOffsetDropBottomRight” Color=”#00000000″ TextOffset=”1″ BlurFactor=”3″ Alpha=”1.0″/&gt
&ltTextStage TextOffsetType=”TextOffsetNone” Color=”#FFFFFFFF”/&gt
&lt/Text&gt
&ltText ID=”Textx3″ Left=”360″ Top=”36″ Width=”240″ Height=”30″ FontFamily=”Tahoma” FontSize=”8″ FontStyle=”Regular”
Wrap=”False” VerticalAlignment=”Top” Trimming=”EllipsisCharacter”&gt
&ltTextStage TextOffsetType=”TextOffsetDropBottomRight” Color=”#00000000″ TextOffset=”1″ BlurFactor=”3″ Alpha=”1.0″/&gt
&ltTextStage TextOffsetType=”TextOffsetNone” Color=”#FFFFFFFF”/&gt
&lt/Text&gt

このスクリプトをProgram Filesに置いて、
x1 = RegRead (“HKLM”,”SoftwareMicrosoftCHomeTAWeatherPage1″,”TodayHigh”)
x2 = RegRead (“HKLM”,”SoftwareMicrosoftCHomeTAWeatherPage1″,”TodayLow”)
x3 = RegRead (“HKLM”,”SoftwareMicrosoftCHomeTAWeatherPage1″,”DayOfWeek”)
x = x1 & “: ” & x2
RegWriteString(“HKLM”,”SoftwareMicrosoftCHomeTAWeatherCondensedPage”,”Textx”,x)
RegWriteString(“HKLM”,”SoftwareMicrosoftCHomeTAWeatherCondensedPage”,”Textx3″,x3)
frompath = RegRead (“HKLM”,”SoftwareMicrosoftCHomeTAWeatherPage1″,”Image”)
Copy(frompath ,”Windowstitaniumweather.png”,TRUE)
RedrawToday
Exit
このスクリプトをスタートアップに。
RunONPowerON(“Program FilesHome Screen Customizercopy.mscr”)
Exit

サスペンドからの復帰時にTodayの書き換えをさせて情報更新。
欠点は復帰時に少しもたつくことかw

※スクリプトをblogに書くのって難しい。
ちゃんと表示されなかったらごめんなさい。

Pocket

コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

twenty + 17 =