sanjeok77/ore
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Translate application to Korean and convert encodings to UTF-8

Browse Source
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
Download Patch File Download Diff File Expand all files Collapse all files
inc/ore_sub-shop-medical.cgi
Regular → Executable
+122 -122
View File
@@ -1,122 +1,122 @@
#-----------------------------------------------------------#
# 罪と罰++ 二律背反 #
# Copyright(C) 2001-2002 by Vivid Studio. BLANK BOARD #
# Vivid Studio.[ http://www17.big.or.jp/~obochan/vivid/ ] #
# BLANK BOARD [ http://pom.to/ ] #
#-----------------------------------------------------------#
# 診療所パーツ Version 1.1
#--- [注意事項] --------------------------------------------#
# 1.このスクリプトは以下の利用規程に従って配布しています。 #
# http://www24.big.or.jp/~obo/game/ore_/gild/ #
#-----------------------------------------------------------#
#-------------------------------------------------------------------------------
# 診療所
sub medical{
if($tm==120){
if($cmd<=0){
$log .= "またお越しください…<br>\n";
$tm = $cmd = 0;
&shop_menu;
# 治療-1
}elsif($cmd==1){
$S = ($lv < 50) ? $lv*2000 : 100000;
$log .= "…ここでは古の秘術によって体力と魔力を<br>瞬時に全快まで回復してさしあげられます<br>…ただし$SＧ\頂きますが…<br>\n";
$tm=125;
$log2 .=qq|<form action="$script" method="$method" name="ore_">\n|;
$log2 .=qq|<td align="center" valign="middle">\n| if($mv_mode eq 'pc');
$log2 .=qq|<input type="hidden" name="id" value="$id">\n<input type="hidden" name="pw" value="$pw">\n|;
$log2 .=qq|<select name=cmd size=1>\n|;
$log2 .=qq|<option value=0>やめる</option>\n|;
$log2 .=qq|<option value=1>治療</option>\n|;
$log2 .=qq|</select><br>\n|;
$log2 .=qq|<input type="submit" $button1 value="NEXT">$td_end</form>\n|;
# 性転換-1
}elsif($cmd==2){
$log.="ここでは性転換手術を受けられます。<br>ただし入院と手術費に20万G ほどかかりますが･･･<br>";
$tm=135;
$log2 .= qq|<form action="$script" method="$method" name="ore_">|;
$log2 .= qq|<td align="center" valign="middle">\n| if($mv_mode eq 'pc');
$log2 .= qq|<input type="hidden" name="id" value="$id">\n|;
$log2 .= qq|<input type="hidden" name="pw" value="$pw">\n|;
$log2 .= qq|<select name="cmd">\n|;
$log2 .= qq|<option value="0">逃げる</option>\n|;
$log2 .= ($sei==1) ?
qq|<option value="3">女になる</option>\n|:
qq|<option value="3">男になる</option>\n|;
$log2 .= qq|</select><br>\n|;
$log2 .= qq|<input type="submit" $button1 value="NEXT">$td_end</form>\n|;
}
# 治療-2
}elsif($tm==125){
if($cmd<=0){
$log .= "$nm は立ち去った。<br>\n";
$tm = $cmd = 0;
&shop_menu;
}else{
$S = ($lv < 50) ? $lv*2000 : 100000;
if($S < $gold){
$hp = $max_hp;
$mp = $max_mp;
$gold -= $S;
$log .= "$SＧを支払った…<br>体力と魔力が全回復した。<br>\n";
$tm = $cmd = 0;
&shop_menu;
}else{
$log .= "お金が足りないわ…<br>\n";
$tm=0;
&shop_menu;
}
}
# 性転換-2
}elsif($tm==135){
if($cmd<=0){
$log .= "$nm は何事も無かったように立ち去った。<br>\n";
$tm = $cmd = 0;
&shop_menu;
}else{
if($gold>=200000){
$gold-=200000;
$log.="ｵﾍﾟを開始します。目覚めるとそこは別世界になっていることでしょう。<br>";
$pr=$GMT*8;
if($sei==1){
$sei=2;
$sei2="女性";
}else{
$sei=1;
$sei2="男性";
}
$mes.= qq|麻酔から目を覚ました。$nm は $sei2 になった。|;
$tm = $cmd = 0;
$type='';
&call_main_st;
}else{
$log2.="お金が足りません。";
$tm = $cmd = 0;
&shop_menu;
}
}
}
}
1;
#-----------------------------------------------------------#
# 죄와 벌++ 이율배반 #
# Copyright(C) 2001-2002 by Vivid Studio. BLANK BOARD #
# Vivid Studio.[ http://www17.big.or.jp/~obochan/vivid/ ] #
# BLANK BOARD [ http://pom.to/ ] #
#-----------------------------------------------------------#
# 진료소 파츠 Version 1.1
#--- [주의사항] --------------------------------------------#
# 1.이 스크립트는 이하의 이용규정에 따라 배포되고 있습니다. #
# http://www24.big.or.jp/~obo/game/ore_/gild/ #
#-----------------------------------------------------------#
#-------------------------------------------------------------------------------
# 진료소
sub medical{
if($tm==120){
if($cmd<=0){
$log .= "또 오세요…<br>\n";
$tm = $cmd = 0;
&shop_menu;
# 치료-1
}elsif($cmd==1){
$S = ($lv < 50) ? $lv*2000 : 100000;
$log .= "…이곳에서는 고대의 비술을 통해 체력과 마력을<br>순식간에 전 회복해 드릴 수 있습니다.<br>…다만 $S G를 받겠습니다만…<br>\n";
$tm=125;
$log2 .=qq|<form action="$script" method="$method" name="ore_">\n|;
$log2 .=qq|<td align="center" valign="middle">\n| if($mv_mode eq 'pc');
$log2 .=qq|<input type="hidden" name="id" value="$id">\n<input type="hidden" name="pw" value="$pw">\n|;
$log2 .=qq|<select name=cmd size=1>\n|;
$log2 .=qq|<option value=0>그만두기</option>\n|;
$log2 .=qq|<option value=1>치료</option>\n|;
$log2 .=qq|</select><br>\n|;
$log2 .=qq|<input type="submit" $button1 value="NEXT">$td_end</form>\n|;
# 성전환-1
}elsif($cmd==2){
$log.="이곳에서는 성전환 수술을 받을 수 있습니다.<br>다만 입원 및 수술 비용으로 20만 G 정도 듭니다만…<br>";
$tm=135;
$log2 .= qq|<form action="$script" method="$method" name="ore_">|;
$log2 .= qq|<td align="center" valign="middle">\n| if($mv_mode eq 'pc');
$log2 .= qq|<input type="hidden" name="id" value="$id">\n|;
$log2 .= qq|<input type="hidden" name="pw" value="$pw">\n|;
$log2 .= qq|<select name="cmd">\n|;
$log2 .= qq|<option value="0">도망치기</option>\n|;
$log2 .= ($sei==1) ?
qq|<option value="3">여성이 된다</option>\n|:
qq|<option value="3">남성이 된다</option>\n|;
$log2 .= qq|</select><br>\n|;
$log2 .= qq|<input type="submit" $button1 value="NEXT">$td_end</form>\n|;
}
# 치료-2
}elsif($tm==125){
if($cmd<=0){
$log .= "$nm 님은 자리를 떠났다.<br>\n";
$tm = $cmd = 0;
&shop_menu;
}else{
$S = ($lv < 50) ? $lv*2000 : 100000;
if($S < $gold){
$hp = $max_hp;
$mp = $max_mp;
$gold -= $S;
$log .= "$S G를 지불했습니다…<br>체력과 마력이 모두 회복되었습니다.<br>\n";
$tm = $cmd = 0;
&shop_menu;
}else{
$log .= "돈이 부족하네요…<br>\n";
$tm=0;
&shop_menu;
}
}
# 성전환-2
}elsif($tm==135){
if($cmd<=0){
$log .= "$nm 님은 아무 일도 없었던 것처럼 자리를 떠났다.<br>\n";
$tm = $cmd = 0;
&shop_menu;
}else{
if($gold>=200000){
$gold-=200000;
$log.="수술을 시작합니다. 눈을 뜨면 그곳은 딴 세상이 되어 있겠지요.<br>";
$pr=$GMT*8;
if($sei==1){
$sei=2;
$sei2="여성";
}else{
$sei=1;
$sei2="남성";
}
$mes.= qq|마취에서 깨어났다. $nm 님은 $sei2이(가) 되었다.|;
$tm = $cmd = 0;
$type='';
&call_main_st;
}else{
$log2.="돈이 부족합니다.";
$tm = $cmd = 0;
&shop_menu;
}
}
}
}
1;