罪と罰++二律背反
罪罰/旧称号
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
単語検索
|
最終更新
|
ヘルプ
] [
リンク元
]
開始行:
[[罪罰/称号]]
*称号表示システム (旧システム)[#le2d455e]
-当サイトではこっちを使ってますが、罪罰/称号を使うの方が...
-称号の表示だけを切り替えることで自由に変更できるようにする
**./inc/ore_sub-system.cgi [#hf8e866f]
設定する称号をデコード
# sub decode
$sogo_sel = $in{'sogo_sel'};
表示する称号を保存する変数
# sub hash_data
$sogo_txt = $DAT{'sogo_txt'};
称号を保存
# dat_write
sogo_txt;$sogo_txt,
**./inc/ore_sub-infomation_pc.cgi [#v983b8d0]
切り替え処理を追加する
if(length($com)>80){ &error("全角40文字ま...
$com =~ s/\n//g;
$info_mes=$com;
}
# 称号
if($sogo_lv[$sogo_sel]>0){
$sogo_txt="$sogo_p[$sogo_sel] lv.$sogo_lv...
}
ファイルの最後に称号選択を追加
<input type=submit value="ポチッ/更新" class="button2" s...
<input type=reset value="クリア" class="button2" style=...
<br><br>
EOM
&sogo_list;
$log .= qq|</form></div>|;
sub sogo_list{
$sogo_no = 0;
$log .= qq| 称 号:<select name="sogo_sel">|;
foreach(@sogo_p){
if($sogo_lv[$sogo_no]>0 ){
$log.=qq|<option value="$sogo_no"|;
if($sogo_txt eq "$sogo_p[$sogo_no] lv.$so...
$log.=qq| selected |;
}
$log.=qq|>$sogo_no $sogo_p[$sogo_no]|;
$log.=qq| lv.$sogo_lv[$sogo_no|;
$log.=qq|</option>|;
}
$sogo_no++;
}
$log .= qq|</select>|;
}
**./inc/ore_sub-base.cgi [#va0d924f]
**./index.cgi [#z308769e]
[$sogo_txt]
**各BBSの処理 [#rcfaac06]
-campbbs.cgi
-park.cgi
-letter_noti.cgi
-ore_.cgi
戦争などで使われる称号は、名前を含めて$syogoに入れてある...
sub syogo{ $syogo = ($sogo > 0) ? "$nm [$sogo_p[$sogo]]:...
*参考 [#n7c6f1ee]
-罪罰改造掲示板/5の前称号保持方法があります
-罪罰称号レベルは、旧バージョンです。罪罰/称号と罪罰/称号...
終了行:
[[罪罰/称号]]
*称号表示システム (旧システム)[#le2d455e]
-当サイトではこっちを使ってますが、罪罰/称号を使うの方が...
-称号の表示だけを切り替えることで自由に変更できるようにする
**./inc/ore_sub-system.cgi [#hf8e866f]
設定する称号をデコード
# sub decode
$sogo_sel = $in{'sogo_sel'};
表示する称号を保存する変数
# sub hash_data
$sogo_txt = $DAT{'sogo_txt'};
称号を保存
# dat_write
sogo_txt;$sogo_txt,
**./inc/ore_sub-infomation_pc.cgi [#v983b8d0]
切り替え処理を追加する
if(length($com)>80){ &error("全角40文字ま...
$com =~ s/\n//g;
$info_mes=$com;
}
# 称号
if($sogo_lv[$sogo_sel]>0){
$sogo_txt="$sogo_p[$sogo_sel] lv.$sogo_lv...
}
ファイルの最後に称号選択を追加
<input type=submit value="ポチッ/更新" class="button2" s...
<input type=reset value="クリア" class="button2" style=...
<br><br>
EOM
&sogo_list;
$log .= qq|</form></div>|;
sub sogo_list{
$sogo_no = 0;
$log .= qq| 称 号:<select name="sogo_sel">|;
foreach(@sogo_p){
if($sogo_lv[$sogo_no]>0 ){
$log.=qq|<option value="$sogo_no"|;
if($sogo_txt eq "$sogo_p[$sogo_no] lv.$so...
$log.=qq| selected |;
}
$log.=qq|>$sogo_no $sogo_p[$sogo_no]|;
$log.=qq| lv.$sogo_lv[$sogo_no|;
$log.=qq|</option>|;
}
$sogo_no++;
}
$log .= qq|</select>|;
}
**./inc/ore_sub-base.cgi [#va0d924f]
**./index.cgi [#z308769e]
[$sogo_txt]
**各BBSの処理 [#rcfaac06]
-campbbs.cgi
-park.cgi
-letter_noti.cgi
-ore_.cgi
戦争などで使われる称号は、名前を含めて$syogoに入れてある...
sub syogo{ $syogo = ($sogo > 0) ? "$nm [$sogo_p[$sogo]]:...
*参考 [#n7c6f1ee]
-罪罰改造掲示板/5の前称号保持方法があります
-罪罰称号レベルは、旧バージョンです。罪罰/称号と罪罰/称号...
ページ名: