罪と罰++二律背反
罪罰改造板3/16
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
単語検索
|
最終更新
|
ヘルプ
] [
リンク元
]
開始行:
* 2つ目の討伐の討伐数 [#bf042841]
- ページ: [[罪罰改造板3]]
- 投稿者: [[卑弥呼]]
- 優先順位: 低
- 状態: 完了
- カテゴリー: 罪罰管理者の雑談
- 投稿日: 2007-11-20 (火) 15:59:38
- バージョン:
** メッセージ [#xbac34c8]
討伐の簡単バージョンを作ったのですが、普通の討伐の回数と...
また、普通の討伐をやっても両方に加算されてしまいます。
どうしたらよいでしょうか。
参考までに2つ目の討伐のスプリクトを部分部分はっておきます
if($tm==55){
if($cmd==10){
my $btp = $ag + int(rand($lv)*0.8);
my $bte = $tag+ int(rand($tlv)*0.8);
if($btp>=$bte){
$log .="$nm は 脱兎の如く逃げ出した・・・<br>評価が著し...
$tm=0;
$v = int(2 + rand(4));
$rank_exe-=$v;
$sol=0;
$tnm='';
$ck=0;
$nation=0;#討伐
$type='';
$vv = int(rand(2));
if(!$vv){
$we2-- if($we2>0);
}
}else{
$log .="$nm は 脱兎の如く逃げ出した・・・<br>しかし! ...
$tm=65;
$rank_exe-=1;
}
と
# 賞金(自国優位)
if($nation==$camp){
$G =int($my_cg/(rand(6)+15));
$G =int(rand(500))+850 if(int(2000>=$G));
$G =int(rand(1500))+2900 if(int(5000<=$G));
}else{
if($nation==1){$G =int($cg1/(rand(11)+11));}
elsif($nation==2){$G =int($cg2/(rand(11)+11));}
elsif($nation==3){$G =int($cg2/(rand(11)+11));}
elsif($nation==4){$G =int($cg2/(rand(11)+11));}
elsif($nation==5){$G =int($cg2/(rand(11)+11));}
$G =int(rand(500))+500 if(int(1000>=$G));
$G =int(rand(1000))+2500 if(int(3500<=$G));
}
$exe+=$E;
$gold+=$G;
$tsol=int($tsol/2);
$log .="$cmp[$nation]から $G の賞金を得た!<br>\n";#...
$V =int(rand(4));
$sol_lv-=$V;
$rank_exe+=int($V*2)+5;
# 拾得物処理 1
if(int(rand(100))==0){
&syutoku1;
}else{
$sol=0;
$tnm='';
$ck = $tm = 0;
$nation=0;
$type='';
}
$we2++;
if($we2>250){
$log .="エルタニアの地に蔓延る魑魅魍魎の討伐の励みより $n...
$sogo =5;
$we2 =0;
}
なにかおかしい点があったら教えてください。
--------
- 自己解決しました -- [[卑弥呼]] &new{2007-11-22 (木) 23:...
#comment
終了行:
* 2つ目の討伐の討伐数 [#bf042841]
- ページ: [[罪罰改造板3]]
- 投稿者: [[卑弥呼]]
- 優先順位: 低
- 状態: 完了
- カテゴリー: 罪罰管理者の雑談
- 投稿日: 2007-11-20 (火) 15:59:38
- バージョン:
** メッセージ [#xbac34c8]
討伐の簡単バージョンを作ったのですが、普通の討伐の回数と...
また、普通の討伐をやっても両方に加算されてしまいます。
どうしたらよいでしょうか。
参考までに2つ目の討伐のスプリクトを部分部分はっておきます
if($tm==55){
if($cmd==10){
my $btp = $ag + int(rand($lv)*0.8);
my $bte = $tag+ int(rand($tlv)*0.8);
if($btp>=$bte){
$log .="$nm は 脱兎の如く逃げ出した・・・<br>評価が著し...
$tm=0;
$v = int(2 + rand(4));
$rank_exe-=$v;
$sol=0;
$tnm='';
$ck=0;
$nation=0;#討伐
$type='';
$vv = int(rand(2));
if(!$vv){
$we2-- if($we2>0);
}
}else{
$log .="$nm は 脱兎の如く逃げ出した・・・<br>しかし! ...
$tm=65;
$rank_exe-=1;
}
と
# 賞金(自国優位)
if($nation==$camp){
$G =int($my_cg/(rand(6)+15));
$G =int(rand(500))+850 if(int(2000>=$G));
$G =int(rand(1500))+2900 if(int(5000<=$G));
}else{
if($nation==1){$G =int($cg1/(rand(11)+11));}
elsif($nation==2){$G =int($cg2/(rand(11)+11));}
elsif($nation==3){$G =int($cg2/(rand(11)+11));}
elsif($nation==4){$G =int($cg2/(rand(11)+11));}
elsif($nation==5){$G =int($cg2/(rand(11)+11));}
$G =int(rand(500))+500 if(int(1000>=$G));
$G =int(rand(1000))+2500 if(int(3500<=$G));
}
$exe+=$E;
$gold+=$G;
$tsol=int($tsol/2);
$log .="$cmp[$nation]から $G の賞金を得た!<br>\n";#...
$V =int(rand(4));
$sol_lv-=$V;
$rank_exe+=int($V*2)+5;
# 拾得物処理 1
if(int(rand(100))==0){
&syutoku1;
}else{
$sol=0;
$tnm='';
$ck = $tm = 0;
$nation=0;
$type='';
}
$we2++;
if($we2>250){
$log .="エルタニアの地に蔓延る魑魅魍魎の討伐の励みより $n...
$sogo =5;
$we2 =0;
}
なにかおかしい点があったら教えてください。
--------
- 自己解決しました -- [[卑弥呼]] &new{2007-11-22 (木) 23:...
#comment
ページ名: