ごぜん日記

使用ツール

URL HomeScreenPlusPlus
URL MortScript 4.2
URL NegiTodayAgenda2006
URL NegiTodayTodo2006
URL TodayExpand
URL cmdRegistryNotifyApp
URL psShutXP

注意

・前の5zenテーマを使っている場合には天気予報等のタイマー設定を止めて下さい。
・無駄に更新が走ることになります。新しいテーマ上の [Setting] にて設定して下さい。
・表示情報にて不利益を被っても償えません。
・ハードリセットに陥っても償えません。
・プログラムランチャーの登録は空き領域タップで出来ます。削除は長押しです。
・ランチャーアイコンは自作して下さい。フォーマットはPngです。
・メールの表示はmopera Uメール基準になってます。他のが良かったら設定ファイル見直して下さい。１１３行目あたりです。
・電波状況表示タップでスタートメニューでます。
・CPU表示タップでタスクマネージャーでます。
・メモリ表示タップでメモリ情報詳細でます。
・電池情報表示タップでHomeScreenPlusPlusのメニューでます。
・NegiTodayAgenda2006 / NegiTodayTodo2006 の設定は8件表示 15px アイコン非表示 高さを調整あたりで調整してあります。表示ずれたら自分で直して。

Q&A

Q.横画面ないの？
A.T-01B買ったら本気出す。

Q.MortScriptがDownloadエラー出すんだけど
A.インストールしてるパッケージが違う。要確認

Q.画像データどうやって作ったの？
A.外人の作ったテーマから奪ってきて編集した。秘密だよ。

Q.○○が欲しいんですけど
A.希望だけは聞く。実装はしないかもしれん。Twitterかコメント欄に書いてくれ。 Twitter

Q.天気予報欄の下が寂しいんですけど
A.花粉情報が出てた。情報提供が終了したので消してある。好きに使って。

Q.HomeScreenPlusPlusがよくわかんないんだけど
A.俺もよく解らん。手探り。

Q.左下の数字何？
A.デバッグ表示。消し忘れた。


ダウンロード

プログラム登録部分がバグってました。差し替えお願いします。
Programフォルダ内の同名ファイルに上書きして下さい。

ダウンロード

[9回]

### ネット接続 ###
# out...(ret.)    0...接続している/接続した    1...接続失敗

sub NetConnect

    WifiNow                = regread( "HKLM" , "System\State\Hardware" , "Wifi" )
    CellularNow        = regread( "HKLM" , "System\State\Connections\Cellular", "Count")
    AsNow                    = regread( "HKLM" , "Drivers\USB\FunctionDrivers", "ActiveSyncConnected")
    ipAddr                = regread( "HKLM" , "Comm\Tcpip\Hosts\dtpt_peer" , "ipaddr" )
    ipAddrFlg            = RegValueExists( "HKLM" , "Comm\Tcpip\Hosts\dtpt_peer", "ipaddr" )

    if (CellularNow > 0)
        return(0)
    else
        if((WifiNow = 19) or (WifiNow = 23) or (WifiNow = 27))
            return(0)
        else
            if (AsNow = 1 && ipAddrFlg = TRUE)
                #ActiveSync接続済みでIPアドレス割り当て済み
                return(0)
            else
                if (AsNow = 1 && ipAddrFlg = FALSE)
                    #ActiveSync接続済みでIPアドレス割り当てなし
                    return (1)
                else
                    if (CellularNow = 0)
                        # 回線接続する
                        Connect(ConnectName[InternetConnect])
                        for p = 0 to 20
                            if (regread( "HKLM" , "System\State\Connections\Cellular" , "Count" ) > 0)
                                p = 20
                            else
                                Sleep( 500 )
                            endif
                        next
                        NetConnect    = regread("HKLM","System\State\Connections","Count")
                    endif
                    return( NetConnect = 0 )
                endif
            endif
        endif
    endif
endsub

一応０．５秒おきに接続確認して確認したら即抜け設定。
１０秒間だけ待機します。
いままでのは問答無用で８秒待機にしてたので待ち時間がなくなって快適かもよ～

[0回]

まだ３割・・・







問題はジョルダンの運行情報が見やすいかどうかだ。

http://www.jorudan.co.jp/unk/

件数制限してやればいいけど２ページで１６件ぐらいだと思うからはみ出る場合があるんだよなぁ。

[1回]

これ作ったの誰ですか！怒らないから出てきてデータ下さいお願いします。

元ネタ
http://blog.livedoor.jp/insidears/archives/52319714.html

の１４７

[6回]

適当に投下。
自己責任で。

FoxBox1.00 とご一緒にご利用下さい。

source ディレクトリの No01.bmp と No02.bmp を適当に編集すると幸せになれます。
めんどくさいので説明はなし。

作業を楽にするために PictBｅａｒ 用 のファイルは入れてあります。

母艦にて PhotoShifter をダウンロードして解凍後出てくる photoshifter.exe を convert.bat と同じディレクトリにコピーして convert.bat を実行すると fox ディレクトリに No01.bmp と No02.bmp から切り出したデータが吐き出されます。

縦画面しかないです。横画面は暇を持て余したら作るかも・・・たぶん・・・

いじょ。


FoxBox_DynaPlus100.zip ダウンロードサイト

[4回]