Samuraize Part4

覚えてくれてる方はいらっしゃるでしょうか・・
以前このｽﾚで励まし慰められた30才引きこもり気味専業主婦です。
あれから勇気づけられ大好きだった２ｹﾞﾄもせず
無心になってiniを弄り続け、やっとの思いで出来上がったのですが・・・
・・そうですか・・新ﾊﾞｰｼﾞｮﾝが出ていたんですね・・

また引きこもって2ｹﾞﾄの日々になりそうです…

>>950
えぇと、試験が一段落ついたので、今からでも取り掛かれるのですが…
こちらとしては、αが取れるまでは様子を見ようかと思っています。
StableVersionが出るまでとは言いませんので、もー少し待っていただけないでしょうか。

んでもまぁ、要望が多ければ今すぐ作っても構わないんで。
今すぐ欲しい！ってな方はお気軽に挙手(･∀･)ﾉｼどーぞ。

>>952
覚えてますよー。
覚えてるどころか何を隠そう、宣伝と間違ったのはこの私です。
めげずにガムバってくだされ。( ･∀･)ノ旦 ｵﾁｬﾄﾞｿﾞｰ

samurizeをインスコして、使おうとしたら、
「必要なDLLファイルPDH.DLLが見つかりませんでした」
ってエラーメッセージが出たんで、ググルでPDH.DLL探して見つけて放りこんだんでつ。
んで、もう出来るだろうと思って起動したら、お次は

「PDH.DLLファイルは開始できません。ファイルを調べて、問題を見つけてください。」

っていうエラーメッセージが出たんでつ。･ﾟ･つД`)･ﾟ･
対策知ってる人いましたら是非教えてくだされ！

↑
コピペ・マルチ

>>953
了解です〜。確かにまだ大幅変更が無いとも言えないですしね。
まぁタイミング見計らってのんびりやって下さいませ。
期待しすぎて負担かけちゃ悪いと思いつつも、期待して待つでつ。

てゆーか漏れが950か……。なんだかんだでもうすぐPart4も埋まりますな。

>>952
あはは、こいつぅ

>>957
マサルさん？

本家表示されねー・・・

>>953
ありがとう・ﾟ･(つД`)･ﾟ･ ｶﾞﾝｶﾞﾘﾏｽ‥

NikkanTV.vbsの時間表示が変わったわけだが…

nikkanTVの表示　00<br> [ニュース] 見たいな感じになっちゃってるけど
書式返られちゃったの？

漏れもだ
どうすりゃ正常になるんかな？

ニッカンスポーツ・コムにとってsamurizeは邪魔なんだろうな。

nikkanは書式というかウェブデザインが変わったと思う…
これはもうだめかな…

progtime = FindFromText(progpos, progtext, vbTab & vbTab, vbLf, "")

の後に

progtime = Left(progtime, 2)

ってやればいいのかな？
VBScriptはやった事がないからこれが最善かどうかはわからないけど
ウチはこれで動きますた。

ちなみに↑はNikkanTV.vbsの事で。

progtime = FindFromText(progpos, progtext, vbTab & vbTab, vbLf, "")

を検索して

progtime = FindFromText(progpos, progtext, vbTab & vbTab, vbLf, "")
progtime = Left(progtime, 2)

みたいにすれば動きますた、という事で。

>>967
行けました。サンクス。

>>967
でけた!ありが�d!!

>>949さん
晒しときました。全然大したこと無いので、期待しないでね…
スクリプトどうもでした。

↑　ID違うけど948です。

「ありがと」言われて言いにくいけど、ちょい訂正。
上記の

progtime = Left(progtime, 2)

の部分を

If InStr(progtime, "<br>") = 3 Then
progtime = Left(progtime, 2)
Else
progtime = Left(progtime, 5)
End If

に訂正してもらいたいのだが。

progtime = FindFromText(progpos, progtext, vbTab & vbTab, vbLf, "")
If InStr(progtime, "<br>") = 3 Then
progtime = Left(progtime, 2)
Else
progtime = Left(progtime, 5)
End If

こんな感じでよろ。
そうしないとちょいとバグるんでー。

うーん、インデントされない。
ま、いいけど。

>>966
神に感謝！

尻侍になってから本家サイトが不安定だ。

負荷減らす為に更新間隔を長くしよう！

アナログ時計できたらsysmetrixいらないな。。

>>972
訂正しましたヽ(´ー｀)ノ

>>976
http://samurize.no-ip.com/samurize/source/up0144.jpg
こんなのならできました。。。
時、分をかえすコンソールプログラム作って、その結果をAnalog表示させたものなんですが。
更新間隔が最小で1分っぽいので秒針表示はムリでした。
あとは画像で文字盤つければいけるのでは？

#ちなみに上の画像の、アナログ時計上部の時間表示は
別のソフトでやらせました。。。同時起動うまくいかなかった…なんでだろ？

PS:最大1分程度遅れて表示になるみたい…詳しくはup0145.zip内のreadmeで。。。

>>978
ほんとだ。。
秒針表示まではできるけど動かないね。。

デフォルトの時間表示をアナログにすれば秒針は取れるけど。。
無理やり合成させるか。。

NikkanTV.vbsの時間表示の件、
□ Scripts for TClock □スレにもっとスマートな方法がありました。
http://pc2.2ch.net/test/read.cgi/win/1043497952/570
http://pc2.2ch.net/test/read.cgi/win/1043497952/577


progtime = FindFromText(progpos, progtext, vbTab & vbTab, vbLf, "")

を

progtime = FindFromText(progpos, progtext, vbTab & vbTab, "<br>", "")

にするだけｗ


確かにそう。ウチも<BR>と大文字で書いてて動かなかったくちです。
なので前の方法になったんやけど、前のヤツはちゃんと小文字で<br>って書いてたり（汗

次スレ頼む。

次スレ立てるやつはsamuraizeじゃなくsamurizeだかんな
そこんとこよろしく。

>>980
(;´Д｀) ｱﾅﾀﾊﾎﾝﾄﾆｲｲｼﾄﾃﾞﾂﾈ

>>980だと、TV時間が表示されなくなったのは俺だけ？
番組やTV局はちゃんと表示されてます。

samurizeだぞ

サムリゼ！

そうだ！絶対にsamurizeだぞ！町が円なよ！

・初代スレ777氏の解説サイト
ttp://f2.aaacafe.ne.jp/~nichan/index.html

↑もう投げちゃったのかな？

1000が近い今こそひっそりと初晒し。

アドレスを忘れた罠
ttp://samurize.no-ip.com/samurize/source/up0147.jpg

>>989
TVスクリプトうｐしていただけませんか？
一応ろだ↓

ttp://xtp0001.s3.x-beat.com/cgi-bin/up/upup.html

もしくは、今回のnikkan変更で編集した所を、ここに貼ってください。

proglen = FindFromText(progpos, progtext, "COLSPAN=", ">", 0)
If proglen = 0 Then
output = output & vbCrLf
j = j + 1
ElseIf totalmin + proglen > curmin Then
progtime = FindFromText(progpos, progtext, vbTab & vbTab, "<br>", "")
If InStr(progtime, "<br>") = 3 Then
progtime = Left(progtime, 2)
Else
progtime = Left(progtime, 30)
End If
If Len(progtime) = 2 Then progtime = Right("0" & (basehour + Int(totalmin / 60)), 2) & ":" & progtime
If HideSigns Then

これだと時間とTV局しか表示されない・・
どうやれば番組名が出るようになろんでしょうか？

もうこれでいいや

ttp://samurize.no-ip.com/samurize/source/up0148.jpg

993

あ〜わからん

996

うんこでる

次スレいらんね

腹立つしへる

1000

このスレッドは１０００を超えました。
もう書けないので、新しいスレッドを立ててくださいです。。。