ぜろちゃんねるスクリプトを改造するスレ

1 ：名無しさん＠０ちゃんねる：2003/03/03 23:49 ID:ex.0cnXQ: ぜろちゃんねるスクリプトに、
haneやらkageやらdameやら
teletypeやらpreやらnukeanasanやら
おみくじやら何やらの機能を付けたりして改造するスレです。
335 ：名無しさん＠ぜろちゃんねる：04/04/02 13:54 ID:???: >>334
何がどのように負荷が減るの？
336 ：名無しさん＠ぜろちゃんねる：04/04/02 22:02 ID:KF6NkcbQ: 書き出すhtmlを、html4.0strictに適合させることってできない？
ソース書き換えるのよくわからないし、すごいマイナス点数になるんだけど...
337 ：7M. ◆dq7M./4Uw. ：04/04/02 23:05 ID:???: >336
ソースを書き換える以外に道は無い希ガス。
read.cgiが吐いてるのは当然その部分のそーす、
index.htmlのそーすは吐き出してる部分を直接いぢくる、と。
んで、perlの場合、
print "←このだぶるくをーてーしょんの中身が吐き出してる内容→";
なんだけれども、strictの場合属性値とかは全部""でかこまなあきまへんと。
↓続く
338 ：7M. ◆dq7M./4Uw. ：04/04/02 23:08 ID:???: perlはprint "";の中にだぶるくをーてーしょんがあるとエラーを出す。
つまり、
print "<html lang="ja">";←エラーが出る
だからこれを回避する為に、
こいつはperlの"じゃ無くて吐き出す"だぞ、って認識させるために
"を\"にしてえすけーぷする、つまし、
print "<html lang=\"ja\">";←エラーでなーい。
もしくは、
print qq|<html lang="ja">|;←エラーでなーい。
これに気をつけてあとはごりごりと書き換えすれば大丈夫ぢゃないかな。
多分。
339 ：名無しさん＠ぜろちゃんねる：04/04/03 00:03 ID:???: >>336
できませんよ。
点数なんてつまらないことを気にしなくてよし。
340 ：336：04/04/03 11:01 ID:uNW4vGJ6: >>337-338
ども。ごりごりとするしかないですか...

>>339
多くのブラウザに対応させるためにはいいと思うけど。
win系はいいけどunix系ではどう見えるのかしんぱいだし。
多くの人が見る掲示板だからこそそこら辺のところに気を使う必要があると思うんだよね。
341 ：名無しさん＠ぜろちゃんねる：04/04/03 15:24 ID:???: >>333
ありがとうございます。
レスが遅くなり申し訳ありませんでした。
342 ：名無しさん＠ぜろちゃんねる：04/04/03 15:34 ID:???: >>336
見た目の表示だけなら、該当個所を書き換えればstrictにできるけど
利用者は、どんな書き込みをするのか予想できないから
機種依存文字を代替文字に置換したり
連続<br>は非推奨だから連続したら１つにしたり
アンカーにtitle要素入れたり・・・ってところまで改造するんだよな？
343 ：336：04/04/03 15:54 ID:uNW4vGJ6: いや、そこまではいいや。トランスってところで。
でも、明らかな入れ子違いがあったりするからさ。
344 ：名無しさん＠ぜろちゃんねる：04/05/03 18:41 ID:???: ある文字列が書き込まれたら、そのレスへ対しての自動でそのレスへ対しての書き込みをするにはどのように改造したらいいのでしょう？

たとえば

------------------------------------------------
8 ：名無しさん：04/05/03 12:40
ぬるぽ
------------------------------------------------
と書き込まれた場合に自動で↓のようにレスをつけます
------------------------------------------------
9 ：名無しさん：04/05/03 12:40
>>8
○○○
-------------------------------------------------
みたいな感じです。
どうかよろしくお願いします。
345 ：7M. ◆dq7M./4Uw. ：04/05/03 21:17 ID:???: 0chに移植するのがめんどい。ので適当に
if($FORM{'message'}=~/ぬるぽ/){
open(DAT,">>../$FORM{'bbs'}/dat/$FORM{'key'}.dat");
print DAT "名無し<>sage<>$DATE<>ドカッ<>";
close DAT;
}
変数名は勝手にあわせれ。
346 ：名無しさん＠ぜろちゃんねる：04/05/04 09:57 ID:???: EUC-JP出力に変えたいのですが
何を書き直せばいいですか？
347 ：名無しさん＠ぜろちゃんねる：04/05/04 11:46 ID:???: いろいろ
348 ：名無しさん＠ぜろちゃんねる：04/05/04 21:20 ID:???: >>345と大分違うですが、自動返信（自動ぬるぽ叩き機）が完成しました。
349 ：名無しさん＠ぜろちゃんねる：04/05/05 18:40 ID:???: >>348
ほすぃ…
350 ：348：04/05/27 18:25 ID:???: >>349
書くのはメンドクサイ。
aragorn.plのsub Overを参考に新しいサブルーチンで自動返信の文を書く。
varda.plの
--------------------------------
if ($A->IsOver() == 1){ # 限界を超えた
$A->Over(); # Over情報付加
}
--------------------------------
これを参考にIsOverを自動返信のサブルーチン名に変える。

決まった文字が入力された場合に自動返信するならvarda.plの
$work = "$name<>$mail<>$date<>$text<>$subj\n"; # 行データ作成
ここらへんの下にif文でも加えて引っかかったらflag=1なんかでも付けて返信させればよろしい。

説明が少し下手だと思うが勘弁(´･ω･`)
351 ：名無しさん＠ぜろちゃんねる：04/05/28 19:44 ID:8OTQG6mc: >>81
joyful2chとhoge2chは配布が終了しています
Joyful2ch-Meと棋譜板を代りにどぞ
http://www.supra.cx/joyful2chMe/index.html
http://ekis.ma.cx/download/kifboard.html
352 ：名無しさん＠ぜろちゃんねる：04/05/30 05:24 ID:???: ねぎまの付け方を教えてください。
353 ：7M. ◆dq7M./4Uw. ：04/05/30 17:56 ID:???: 0chって串規制はエラー出して弾いてしまうのでわ？

$name="ねぎまのAA " . $name;
354 ：7M. ◆dq7M./4Uw. ：04/05/30 17:57 ID:???: すまぬ途中で送信してしまった（汗
>353を串規制の条件判断の後に入れればいいと思う。
変数名は適切に変更してちょ。
355 ：名無しさん＠ぜろちゃんねる：04/05/31 18:55 ID:+IiLRavI: >>354
どこに入れるの？詳しく
356 ：名無しさん＠ぜろちゃんねる：04/06/02 21:50 ID:bBYBEDSs: 昔のように曜日を表示するようにできませんか？
357 ：名無しさん＠ぜろちゃんねる：04/06/02 23:05 ID:???: >>356
すれば？
358 ：名無しさん＠ぜろちゃんねる：04/06/03 04:56 ID:???: なんだか荒れてます？
359 ：名無しさん＠ぜろちゃんねる：04/06/03 19:55 ID:???: 曜日は普通に表示させられるだろう
そのくらいは自分でやってくれ
360 ：356：04/06/03 21:24 ID:???: すいません、できました。
ありがとうございます。
361 ：名無しさん＠ぜろちゃんねる：04/06/13 16:28 ID:AF1xN1/k: たとえば900番とか950番目のレスの末尾に「次スレよろしく！」とか
1番レスに「専用ブラウザ使って下さい」とか
１行メッセージを自動付加するようにできないでしょうか・・・・。

応用すれば、任意のメッセージに広告URLを流したりも出来ますし・・・。

識者の方、どうかお願いします。
362 ：名無しさん＠ぜろちゃんねる：04/06/13 19:54 ID:???: 簡単じゃん。
363 ：361：04/06/14 04:35 ID:nE+d13Cc: その簡単なことが分からないので、質問させていただいたのです・・・。
簡単と言うことですので、どうかお教えいただけませんでしょうか。
364 ：名無しさん＠ぜろちゃんねる：04/06/14 18:48 ID:VqoJcvIo: 確かに簡単。
もっと分かりやすく説明してくれよ
365 ：361：04/06/14 19:18 ID:yd6FKmLo: http://buffaloes.s31.xrea.com/test/read.cgi/jikkyou/1081669758/900
の900のような感じです。同じぜろちゃんねる使ってるようなので・・・。
366 ：名無しさん＠ぜろちゃんねる：04/06/15 20:40 ID:???: そこの管理人に教えてもらえばいいだろう？
367 ：名無しさん＠ぜろちゃんねる：04/06/17 00:25 ID:???: とりあえず、本家read.cgiのVerUPがあった。
建てすぎ規制関連で大幅なシステム変更。（大幅なのか？）
いわゆるkusoシステム導入だそうだ。
可能なら誰か搭載よろ。（まぁ、これが必要なほど繁盛してる板があるのかどうか…）
>【スレ立て規制】　mesh だけ規制強化する?
>http://qb5.2ch.net/test/read.cgi/operate/1086942520/
368 ：名無しさん＠ぜろちゃんねる：04/06/17 01:27 ID:???: >367
bbs.cgiでは？
369 ：名無しさん＠ぜろちゃんねる：04/06/17 20:45 ID:???: 2chのProxyチェック方法
http://sv2ch.baila6.jp/chk_proxy.cgi
370 ：名無しさん＠ぜろちゃんねる：04/06/18 17:15 ID:???: HTMLのデザインしやすい感じにしてくんろ。
ヘッダとフッタが分かれてて、うんざり。
371 ：名無しさん＠ぜろちゃんねる：04/06/23 10:21 ID:DGQvvNM2: すみません。xrea鯖なんですが
>>13の
> しかしこのスクリプトは最初から広告弾きの記述があるために
> 自分で広告欄にxreaの広告設定をしなくてはいけない。
というのは、具体的にどのファイルのどこに書き加えれば良いのでしょう。
372 ：名無しさん＠ぜろちゃんねる：04/06/23 12:48 ID:???: >>371
admin.cgi
↓
各種編集処理
↓
告知欄の編集
↓
PC用告知欄内容
↓
<tr><td>
ここに広告
</tr></td>
373 ：名無しさん＠ぜろちゃんねる：04/06/23 12:57 ID:???: >>372
ありがとうございます。
その設定にして、掲示板の更新もしたのですが、緑の横棒（何もないテーブル）が表示されるだけなんですが
反映されるまで、タイムラグがあるんでしょうか？
それと携帯も同じ方法で良いのでしょうか？

スレ違いかも知れませんが、よろしくお願いします。
374 ：373：04/06/23 18:19 ID:???: すみません。ノートン先生が邪魔してただけでした。。。
375 ：名無しさん＠ぜろちゃんねる：04/06/25 17:03 ID:ALI9kTwA: >81
325のJoyful2ch-MeですがURLが変わってしまいました
http://www.supra.cx/index.html
376 ：名無しさん＠ぜろちゃんねる：04/07/08 10:09 ID:YT78faYY: ０ちゃんねるを利用させてもらってます、凄く良いシステムですよね。
この掲示板の発言数ランキング機能をつけたいのですが
Perlの素人ができるものでしょうか？既存のCHATや掲示板のランキング
のスクリプトを流用して可能ならば、大まかな方法をそれとなく教えて
もらいたいです。いきなりすみません・・・
377 ：376：04/07/08 10:10 ID:YT78faYY: http://www.cj-c.com/sp/cbbs.cgi?mode=ran&no=2
http://www.cj-c.com/sample/upb.cgi?mode=ran
こんなのです。。
378 ：7M. ◆dq7M./4Uw. ：04/07/08 13:25 ID:???: ttp://moreover.hp.infoseek.co.jp/cgi-bin/rescnt.txt
ちゃんと動かしてないから正常に作動するかはしらないけど、（無責任
379 ：376：04/07/08 17:51 ID:YT78faYY: >>378 7Mさん、ありがとうございます！組み込んでみます。
うまくできたら報告しまーす！
380 ：名無しさん＠ぜろちゃんねる：04/07/08 19:22 ID:???: 一様通りすがりですが、使って見ました。

161行目の
($path,$name) = split /=/;
の部分を
($path,$name) = split /<>/;
に変えたらできました。
381 ：名無しさん＠ぜろちゃんねる：04/07/09 11:33 ID:???: >>378 これを設置してみたいんですが、どこのフォルダに
おけばいいんですか？
382 ：名無しさん＠ぜろちゃんねる：04/07/09 16:32 ID:NSiPdQFk: testディレクト内
383 ：376：04/07/09 19:19 ID:bkjKLtNI: できましたー！７Mさんありがとうございました！
384 ：名無しさん＠ぜろちゃんねる：04/07/15 17:53 ID:???: 2chのread.cgiのように最新のレスを含まないときに「新着レスの表示」を「続きを読む」に変えられないでしょうか？
また、1000に達したときにここの部分を表示しないように出来ませんか？

どなたか宜しくお願いします。
385 ：名無しさん＠ぜろちゃんねる：04/07/15 21:44 ID:???: >>384
2chでも最新のレスを含まないときに「新着レスの表示」になるよ。
っていうか、2ｃｈの場合は昼間と全部読めない時間帯でそういう点など
いくつか微妙に表示が変わる部分がいくつかあるんだよね。
386 ：名無しさん＠ぜろちゃんねる：04/07/15 23:10 ID:???: >>384
２ちゃんの動きがそうなら、正式版で対応してもらえると思うので
そっちにかいた方がいいかも。
このスレは２ちゃんに無い機能とかをつけるためのスレだから。
（でも、最近リリースが無いのでここでもいいような気もするけど）
387 ：384：04/07/16 19:50 ID:???: >>385
いくつかの鯖を見ましたが、やはり最新のレスが含まれないときには
「続きを読む」と文字列が変わるようですが、こちらの勘違いなのでしょうか？
（こちらの言葉足らずだったかも知れません。手を煩わせて申し訳ないです。）

>>386
ご指摘ありがとうございます。
しかし、正式に対応するものなのかどうか自信があまりありませんので、
できればこのスレでご回答いただけないでしょうか？
388 ：名無しさん＠ぜろちゃんねる：04/07/18 14:10 ID:???: >>387
read.cgiの以下の個所を変更する

・100行目を以下のように変更

PrintThreadFoot($T,$M,$G,$A);　# フッタ部分

・215行目を以下の様に変更

my　($T,$M,$G,$A) = @_;

・240行目あたりから以下のように追加・変更

if($A->GetResNum() < $rmax){
　$path = $G->CreatePath($M,0,$M->Get('BBS'),$M->Get('KEY'),"$ed-");
　if($A->GetResNum() == $ed){
　　$T->Print("<a href=\"$path\">新着レスの\表\示</a></center><hr>");
　}
　else{
　　$T->Print("<a href=\"$path\">続きを読む</a></center><hr>");
　}
}

試してないんで動かなかったら適当にデバグしてね。
あと全角空白はTABまたは半角空白にして
389 ：384：04/07/18 19:48 ID:???: >>388
わざわざご伝授いただきありがとうございます。
早速やってみたいと思います。
本当にありがとうございました。
390 ：名無しさん＠ぜろちゃんねる：04/07/18 20:19 ID:???: 管理モードで表示されるリモホが不完全なので完璧に表示されるようにしたいのです。
何か方法はありますか？ちなみに2003年10月のバージョンを使ってます。
391 ：名無しさん＠ぜろちゃんねる：04/07/21 16:41 ID:???: >>390
peregrin.pl弄ればＯＫ
392 ：名無しさん＠ぜろちゃんねる：04/07/23 14:48 ID:???: 0ch BBS 2004-02-21を使用しております。
メール欄にsageを書き込んでも下がらないようにするにはどのようにしたら宜しいのでしょうか？

もう1件ありまして、特定のスレを常時age（一番上に固定）する場合も
分かりましたらご教授下さい。
393 ：名無しさん＠ぜろちゃんねる：04/07/25 01:55 ID:???: >>391
ありがとうございました。なんとか表示されました（つД｀）
394 ：名無しさん＠ぜろちゃんねる：04/07/28 15:11 ID:???: >>392

＞メール欄にsageを書き込んでも下がらないようにする

varda.pl
223～230行目あたりのifブロックの
$B->SetAGE($M->Get('KEY'));
以外の行をすべてコメントアウト。

＞特定のスレを常時age（一番上に固定）する

鯖の負担を考えなければ、
age処理を行った後に、
常時ageスレのスレッドキーでもう一回age処理、ってのが
いちばん手っ取り早そうだけどね。
395 ：名無しさん＠ぜろちゃんねる：04/09/08 06:19 ID:DGSl0px2: ニュー速VIPの新機能使えるように改造してみないか？
http://ex7.2ch.net/test/read.cgi/news4vip/1094574635/
396 ：名無しさん＠ぜろちゃんねる：04/10/10 14:51 ID:???: >>395
もう某所で開発しているらしい。
が、向こうも忙しいようなので
向こうのサポートページで知恵を出して頂ければ有り難い。

DL元↓
http://tgu-log.hp.infoseek.co.jp/vip_quality.html

サポート
http://tgu-log.hp.infoseek.co.jp/cgi-bin/2ch/nullre/
397 ：名無しさん＠ぜろちゃんねる：04/10/19 00:27 ID:7FekWsMo: 総合質問スレの118です。
教えてもらったリンク先を見てふと気が付いたのですが、0chって書き込みログが見れますよね。
そこに、サブスクライバIDをそのまま表示するようにするにはどうやればいいのでしょうか？
現在はwbcc.s...ezweb.ne.jpという風に全て表示されない状態です。

ご指導よろしくお願いしますm(__)m
398 ：名無しさん＠ぜろちゃんねる：04/10/19 06:46 ID:???: m
399 ：名無しさん＠ぜろちゃんねる：04/10/19 23:03 ID:???: >>397
peregrin.plの190～195行目を削除
400 ：名無しさん＠ぜろちゃんねる：04/10/20 14:49 ID:oLG1dLHk: 030614にはperegrin.plというのは無いでつ
ムリポなんでしょうか（ ´Д⊂ヽ
401 ：名無しさん＠ぜろちゃんねる：04/10/21 03:22 ID:???: >>400
そんな古いの使っちゃ駄目。
402 ：名無しさん＠ぜろちゃんねる：04/11/12 00:09 ID:UT1KNNrA: 空改行を抑止するにはどこをどう弄ればいいでしょうか？
比較的長文の書き込みが多いので、書き込み行数自体はゆるめにしてあるのですが…。
バージョンはtest041030 です。
403 ：名無しさん＠ぜろちゃんねる：04/11/12 01:08 ID:???: >>402
連続改行が３個あったら２個なるようにしてみては？
404 ：y@su ◆8oZYsxYASU ：04/11/12 23:52 ID:C6LMFN5Y: 2chブラウザ対応の板を作ってるんだけど、
ぜろちゃんねるの作り方を真似て書き直したりしてもOKなんですか？
405 ：y@su ◆8oZYsxYASU ：04/11/12 23:53 ID:C6LMFN5Y: あ、なんか変だな。
406 ：名無しさん＠ぜろちゃんねる：04/11/13 00:10 ID:???: >>404
./test/readme/readme.txt　参照

> 本スクリプトはスクリプトとしての著作権は放棄しませんが、再配布、改造、改変などは自由にしてもらって
> かまいません。また、indexやread.cgi使用時に出る著作権表示(0ch BBS ver.xxx)も気に入らなければ、消し
> たり、好きな表示に変えてもらっても構いません。
> 「２ちゃんねる型」というものに関しては、どうやらひろゆき氏が著作権だか何かを持っているらしいです。
>
> なお、この文書は一部２ちゃんねるの初心者向きな説明も入っていますので、生粋の２ちゃんねらは軽く読み
> 飛ばしてください。
407 ：y@su ◆8oZYsxYASU ：04/11/13 07:04 ID:2yxSstCw: >>406
お、ども。書いてあったんですね。
自分のは今のところライブラリを使ってないんでそのぐらいかな。
あとindex.htmlとsubback.htmlをファイルで出力してるのを初めて知った。
色んな2ch型BBSスクリプト見て仕様を理解していってる感じです。。。
408 ：名無しさん＠ぜろちゃんねる：04/11/16 22:53 ID:???: どなたか教えてください。
test040221＋repair040803で指定したスレだけを
強制ID表示にしたくスクリプトを書き直したましたのですが、
指定外のスレについても、1だけはIDが表示されてしまいます。
(2以降はID非表示になります。また、指定したスレは全レスID強制表示になります)

弄ったのはgaladriel.plの670行目付近　sub ConvertDateで、
次のソースを書き加え、logディレクトリにforceid.cgiファイル(スレッドキーを羅列したもの)
を置きました。

※↓my $host = $S->Get('host');　の次行に追加
my $key = $S->Get('key');
my $force=0;
open(forceID_file,'../板ディレクトリ/log/forceid.cgi');
my @force=<forceID_file>;
foreach $forceid(@force){
if($forceid =~/$key/){$force = 1;}
}
close(forceID_file);
※↓CAP権限ない場合の条件分岐に追加
elsif ($force == 1) {$id = " ID:$id";}

長くなってしまい申し訳ありません。
どうか宜しくお願い致します。
409 ：408：04/11/20 20:13 ID:???: すみません、>>408の件、解決しました。

6行目を訂正
if($forceid =~/$key/){$force = 1;}
↓
if( ($forceid =~/$key/) && ($key ne '') ){$force = 1;}

新スレにはkeyが存在しないため、「forceid.cgiファイル」内の
空改行等にマッチングしてしまったことが原因みたいです。

あと、↓も直さないとダメだ・・・
open(forceID_file,'../板ディレクトリ/log/forceid.cgi');
　　　　　　　　　　　 ~~~~~~~~~~~~~~
板が二つ以上あったら対応できないです。
初心者ですみません・・・
410 ：408：04/11/20 20:53 ID:???: 度々すみません。>>409後段ファイルパスの指定について
次のようにしたいのですが、500エラーが出てしまいます。

my $M;
my $keypath = $M->Get('BBSPATH') . '/' . $M->Get('BBS') . '/log/forceid.cgi';
open(forceID_file,$keypath);

試しに2行目を次のようにしてみたら、問題なく動きました。
my $keypath = '../板ディレクトリ/log/forceid.cgi';

melkor.plは、設置サーバーパス以外は弄っていません。
何がいけないのでしょうか。
411 ：名無しさん＠ぜろちゃんねる：04/11/20 23:57 ID:???: >>410
$Mにはちゃんとmelkorオブジェクト入ってるの？
単なる変数の$Mに->Getとかやったら当然エラーだよ。
412 ：408：04/11/21 12:30 ID:???: >>411
ご指摘の通りみたいです。
私はまだオブジェクトという概念が理解しきれていないので、
調べてリトライしてみます。
ありがとうございました。
413 ：名無しさん＠ぜろちゃんねる：04/11/21 19:12 ID:???: 禁断の壷に対応するように改造することはできないのですか？
414 ：名無しさん＠ぜろちゃんねる：04/11/22 10:51 ID:???: 壷は2ch以外は見れないんじゃ？
415 ：名無しさん＠ぜろちゃんねる：04/11/22 21:43 ID:ra0ZXwmk: 掲示板メニューの表示先（デフォルトではブランクつまり別プラウザ）を指定できないっすか？
別のプラウザで開くのでなくて同位置とかに変えるのはどこを変えればいいんすかね？
416 ：名無しさん＠ぜろちゃんねる：04/11/23 13:03 ID:???: >>415
スレ開く時に別窓開きたくない、という意味なら
varda.plのsub PrintIndexMenu
# 先頭メニュー作成
# 残りメニュー作成
で、target属性を変更してみたら？
417 ：◆qRsKcF1Luc ：05/01/11 22:08 ID:???: test
418 ：名無しさん＠ぜろちゃんねる：05/01/12 22:02 ID:JQO4T50+: ID/PASSで入場制限させたいんですが
そういうスクリプトはありますか？
419 ：名無しさん＠ぜろちゃんねる：05/01/12 22:14 ID:ql17BmXA: >418
BASIC認証とか使ってみては？
420 ：名無しさん＠ぜろちゃんねる：05/01/13 12:25 ID:rAHP55/o: BASIC認証http://www.komonet.ne.jp/~php/program/chap24.htm
421 ：418：05/01/13 12:27 ID:???: >419,420
ありがとうございました。
早速やってみます。
422 ：名無しさん＠ぜろちゃんねる：05/01/23 20:58 ID:???: >>161-169辺りでも出ていますが、
##などが付いた行だけ文字色を背景色にできないでしょうか
admin.cgiが動かなくなっても使う時だけ
一時的にファイルを戻せばいいと思うので・・・
423 ：名無しさん＠ぜろちゃんねる：05/01/24 13:30 ID:???: >>422
その機能は実装されていますよ。
elrond.plのコメントアウト個所を元に戻すだけ。
424 ：名無しさん＠ぜろちゃんねる：05/01/27 21:45 ID:???: >>423
スミマセン、そのやり方を教えてもらえませんか？
スクリプトの知識は全く無いので・・・
425 ：名無しさん＠ぜろちゃんねる：05/01/27 22:30 ID:???: >>424
最新版（2004-10-30）のelrond.pl
PrintResReadメソッド内250行目のコメントアウトを元に戻す

#$text = $G->ConvertSpecialQuotation($M,$text,0); # 特殊テキスト変換
↓
$text = $G->ConvertSpecialQuotation($M,$text,0);# 特殊テキスト変換

同様にPrintResIndexメソッド内の291行目のコメントアウトを元に戻す

#$text = $G->ConvertSpecialQuotation($M,$text,0); # 特殊テキスト変換
↓
$text = $G->ConvertSpecialQuotation($M,$text,0); # 特殊テキスト変換

これで動作するはず。
試してないので動かなかったら勘弁。
426 ：名無しさん＠ぜろちゃんねる：05/01/28 01:07 ID:???: >>425
424ではありませんが、助かりました
ありがとうございました
427 ：424：05/01/28 23:09 ID:???: >>425
ありがとうございます
428 ：名無しさん＠ぜろちゃんねる：05/02/11 06:59 ID:cnroLNWk: BBQ あらしお断りシステム http://bbq.uso800.net/code.html
を利用するには、↓の書き換えでいいのでしょうか？

１、まずは、module/varda.pl の 358 行目を書き換え
　if ($G->IsProxy($host)) {
　　　　　↓
　if ($G->IsProxy()) {

２、次に、module/galadriel.pl の IsProxy をごっそり入れ替える
　　sub IsProxy
　　{
　　　#BBQを利用した串規制
　　　my $RADDR = $ENV{'REMOTE_ADDR'}
　　　$RADDR =~ /^(\d+)\.(\d+)\.(\d+)\.(\d+)$/;
　　　my $query_addr = "$4.$3.$2.$1.niku.2ch.net";
　　　my $addr = join('.', unpack('C*', gethostbyname($query_addr)));
　　　if ($addr eq '127.0.0.2') {
　　　　return 1;
　　　}
　　　return 0;
　　}

書いてはみたものの、まったく自信がありません・・・
429 ：名無しさん＠ぜろちゃんねる：05/02/13 15:45 ID:f11Xtbx2: ■悪徳商法マニアックス吉本敏洋の正体は２ちゃんねる！

悪徳商法マニアックス管理者「吉本敏洋」の正体は、２ちゃんねる運営で
株式会社ウェディングは、２ちゃんねる相手に裁判をしているといえる。
２ちゃんねるプロ固定の隠された悪事と、
それを支援する善人面紀藤正樹弁護士にメスを入れる。

http://www.freeml.com/message/second_work@freeml.com/0022990
http://www.freeml.com/message/onodera@freeml.com/0029517
http://www.freeml.com/message/nijino_kakehasi@freeml.com/0006215
http://www.freeml.com/message/nb007@freeml.com/0000030
http://www.freeml.com/message/miyo34@freeml.com/0004561
http://www.freeml.com/message/minnagennki@freeml.com/0032548
http://www.freeml.com/message/marin30@freeml.com/0011687
http://www.freeml.com/message/maki33@freeml.com/0016433
http://www.freeml.com/message/loveryladys@freeml.com/0010193
http://www.freeml.com/message/kame71@freeml.com/0020096
http://www.freeml.com/message/jyudexi@freeml.com/0020453
http://www.freeml.com/message/gsbland@freeml.com/0003309
http://www.freeml.com/message/fukuoka-net-busi@freeml.com/0007938
http://www.freeml.com/message/exciting@freeml.com/0006672
http://www.freeml.com/message/dondoncm@freeml.com/0028371
http://www.freeml.com/message/cmyk@freeml.com/0001637
430 ：名無しさん＠ぜろちゃんねる：05/02/14 18:16 ID:???: >>428
バージョン書いてくれないと困るな～
とりあえず、以前にこの板で教えて貰ったスクリプト書くね。
俺のはそれで問題なく動いてるから。
ちなみに、test040221 + 040803 です。

#galadriel.pl
sub IsBBQ
{
my $BBQ = 0;

if (gethostbyname(join(".",reverse(split(/\./,$ENV{'REMOTE_ADDR'})
)).".niku.2ch.net") eq "\x7f\x00\x00\x02")
{ $BBQ = 1; } # BBQリストに載っていれば 1

return $BBQ;
}
# BBQここまで

varda.plは、それでいいと思う。
サブルーチン名は適当に書き換えてね。
431 ：名無しさん＠ぜろちゃんねる：05/02/15 07:29 ID:???: >>430さん、スクリプトありがとうございます。
さっそく実装してみたいと思います。

あと、バージョンは test041030 です。
すみませんでした。
432 ：572：05/03/03 18:11 ID:???: http://tolkien.s7.xrea.com/test/read.cgi/jikken/1095620027/576さんから
こちらのスレに誘導して頂きました。

ちょっと類を見ない変更ですが
スレを立てた時（>>１の最初の書込み）だけ
日付けや時間が記載されるが
その後に続くレス等には
日付けや時間が記載されないようにしたいのです。
そんな設定のスクリプトを
どなたか考えて頂けませんか？

どうか、どうかよろしく御願いいたします。
433 ：572：05/03/03 18:12 ID:???: バージョンは test041030 です。
434 ：名無しさん＠ぜろちゃんねる：05/03/03 19:58 ID:A2r8Gxu2: >>432
滅茶苦茶難しい
435 ：名無しさん＠ぜろちゃんねる：05/03/03 20:34 ID:???: >>432-433
galadriel.plの698行目を変更
変更前
$date = "$date$id";
変更後
require('./module/aragorn.pl');
my $A = new ARAGORN;
if($A->GetResNum() == 1){ $date = "$date$id"; }
else{ $date = "$id";}

でどうだろ？自分ので試してないので、できなかったらごめん

243KB

掲示板に戻る全部前100 次100 最新50

READ.CGI - 0ch+ BBS 0.7.5 20220323
ぜろちゃんねるプラス