Translate application to Korean and convert encodings to UTF-8

This commit is contained in:
sanjeok77
2026-06-22 22:22:41 +09:00
parent dc9058e0da
commit f43e7fa915
61 changed files with 11582 additions and 11644 deletions
Regular → Executable
+103 -103
View File
@@ -1,103 +1,103 @@
#-----------------------------------------------------------#
# 罪と罰++ 二律背反 #
# Copyright(C) 2001-2002 by Vivid Studio. BLANK BOARD #
# Vivid Studio.[ http://www17.big.or.jp/~obochan/vivid/ ] #
# BLANK BOARD [ http://pom.to ] #
#-----------------------------------------------------------#
# お買い物 PC用パーツ1 Version 1.5 #
#--- [注意事項] --------------------------------------------#
# 1.このスクリプトは以下の利用規程に従って配布しています。 #
# http://www24.big.or.jp/~obo/game/ore_/gild/ #
#############################################################
# 以下処理 基本的にこれ以下はいじらないように。
#-------------------------------------------------------------------------------
# 武具(ショッピング)
sub bugu_s{
$log.=<<EOM;
<form action=$script method=$method name=ore_>
<input type=hidden name=id value="$id">
<input type=hidden name=pw value="$pw_p">
<input type=hidden name=cmd value=-1>
<table border=0 cellpadding=2 cellspacing=2 width=100%>
<tr align=center bgcolor="#ccccee">
<td>&nbsp;</td>
<td>武具</td>
<td>値段</td>
<td>回数</td>
<td>説明</td>
</tr>
EOM
foreach(11 .. $#dg_data){
$log .=qq|<tr align="center" bgcolor="#ccccee">\n|;
$log .=qq|<td><input type="radio" value="$_" name="cmd" class="a5">\n|;
$log .=qq|<td>$dg_data[$_][1]</td><td>$dg_data[$_][2]</td><td>$dg_data[$_][3]</td><td>$dg_data[$_][5]</td></tr>\n|;
}
$log .=qq|</table>\n|;
$log .=qq|<tt><br></tt><input type=submit value="購入/やめる" class="button1"></form>\n|;
}
#-------------------------------------------------------------------------------
# 防具(ショッピング)
sub bogu_s{
$log.=<<EOM;
<form action=$script method=$method name=ore_>
<input type=hidden name=id value="$id_p">
<input type=hidden name=pw value="$pw_p">
<input type=hidden name=cmd value=-1>
<table border=0 cellpadding=2 cellspacing=2 width=100%>
<tr align=center bgcolor="#ccccee">
<td>&nbsp;</td>
<td>防具</td>
<td>値段</td>
<td>回数</td>
<td>説明</td>
</tr>
EOM
foreach(11 .. $#df_data){
$log .=qq|<tr align="center" bgcolor="#ccccee">\n|;
$log .=qq|<td><input type="radio" value="$_" name="cmd" class="a5">\n|;
$log .=qq|<td>$df_data[$_][1]</td><td>$df_data[$_][2]</td><td>$df_data[$_][3]</td><td>$df_data[$_][5]</td></tr>\n|;
}
$log .=qq|</table>\n|;
$log .=qq|<tt><br></tt><input type="submit" value="購入/やめる" class="button1"></form>\n|;
}
#-------------------------------------------------------------------------------
# 道具(ショッピング)
sub dogu_s{
$log.=<<EOM;
<form action=$script method=$method name=ore_>
<input type=hidden name=id value="$id_p">
<input type=hidden name=pw value="$pw_p">
<input type=hidden name=cmd value=-1>
<table border=0 cellpadding=2 cellspacing=2 width=100%>
<tr align=center bgcolor="#ccccee">
<td>&nbsp;</td>
<td>道具</td>
<td>値段</td>
<td>回数</td>
<td>説明</td>
</tr>
EOM
foreach(11 .. $#di_data){
$log .=qq|<tr align="center" bgcolor="#ccccee">\n|;
$log .=qq|<td><input type="radio" value="$_" name="cmd" class="a5">\n|;
$log .=qq|<td>$di_data[$_][1]</td><td>$dg_data[$_][2]</td><td>$di_data[$_][3]</td><td>$di_data[$_][4]</td></tr>\n|;
}
$log .=qq|</table>\n|;
$log .=qq|<tt><br></tt><input type="submit" value="購入/やめる" class="button1"></form>\n|;
}
1;#削除不可
#-----------------------------------------------------------#
# 죄와 벌++ 이율배반 #
# Copyright(C) 2001-2002 by Vivid Studio. BLANK BOARD #
# Vivid Studio.[ http://www17.big.or.jp/~obochan/vivid/ ] #
# BLANK BOARD [ http://pom.to ] #
#-----------------------------------------------------------#
# 쇼핑 PC용 파츠1 Version 1.5 #
#--- [주의사항] --------------------------------------------#
# 1.이 스크립트는 이하의 이용규정에 따라 배포되고 있습니다. #
# http://www24.big.or.jp/~obo/game/ore_/gild/ #
#############################################################
# 이하 처리 기본적으로 이 이하는 수정하지 않도록.
#-------------------------------------------------------------------------------
# 무구(쇼핑)
sub bugu_s{
$log.=<<EOM;
<form action=$script method=$method name=ore_>
<input type=hidden name=id value="$id">
<input type=hidden name=pw value="$pw_p">
<input type=hidden name=cmd value=-1>
<table border=0 cellpadding=2 cellspacing=2 width=100%>
<tr align=center bgcolor="#ccccee">
<td>&nbsp;</td>
<td>무구</td>
<td>가격</td>
<td>횟수</td>
<td>설명</td>
</tr>
EOM
foreach(11 .. $#dg_data){
$log .=qq|<tr align="center" bgcolor="#ccccee">\n|;
$log .=qq|<td><input type="radio" value="$_" name="cmd" class="a5">\n|;
$log .=qq|<td>$dg_data[$_][1]</td><td>$dg_data[$_][2]</td><td>$dg_data[$_][3]</td><td>$dg_data[$_][5]</td></tr>\n|;
}
$log .=qq|</table>\n|;
$log .=qq|<tt><br></tt><input type=submit value="구매/그만두기" class="button1"></form>\n|;
}
#-------------------------------------------------------------------------------
# 방어구(쇼핑)
sub bogu_s{
$log.=<<EOM;
<form action=$script method=$method name=ore_>
<input type=hidden name=id value="$id_p">
<input type=hidden name=pw value="$pw_p">
<input type=hidden name=cmd value=-1>
<table border=0 cellpadding=2 cellspacing=2 width=100%>
<tr align=center bgcolor="#ccccee">
<td>&nbsp;</td>
<td>방어구</td>
<td>가격</td>
<td>횟수</td>
<td>설명</td>
</tr>
EOM
foreach(11 .. $#df_data){
$log .=qq|<tr align="center" bgcolor="#ccccee">\n|;
$log .=qq|<td><input type="radio" value="$_" name="cmd" class="a5">\n|;
$log .=qq|<td>$df_data[$_][1]</td><td>$df_data[$_][2]</td><td>$df_data[$_][3]</td><td>$df_data[$_][5]</td></tr>\n|;
}
$log .=qq|</table>\n|;
$log .=qq|<tt><br></tt><input type="submit" value="구매/그만두기" class="button1"></form>\n|;
}
#-------------------------------------------------------------------------------
# 도구(쇼핑)
sub dogu_s{
$log.=<<EOM;
<form action=$script method=$method name=ore_>
<input type=hidden name=id value="$id_p">
<input type=hidden name=pw value="$pw_p">
<input type=hidden name=cmd value=-1>
<table border=0 cellpadding=2 cellspacing=2 width=100%>
<tr align=center bgcolor="#ccccee">
<td>&nbsp;</td>
<td>도구</td>
<td>가격</td>
<td>횟수</td>
<td>설명</td>
</tr>
EOM
foreach(11 .. $#di_data){
$log .=qq|<tr align="center" bgcolor="#ccccee">\n|;
$log .=qq|<td><input type="radio" value="$_" name="cmd" class="a5">\n|;
$log .=qq|<td>$di_data[$_][1]</td><td>$dg_data[$_][2]</td><td>$di_data[$_][3]</td><td>$di_data[$_][4]</td></tr>\n|;
}
$log .=qq|</table>\n|;
$log .=qq|<tt><br></tt><input type="submit" value="구매/그만두기" class="button1"></form>\n|;
}
1;#삭제 불가