人狼ＢＢＳ作成日記７２

こんどは入力時の、役職チェックについて考えてみます。
占い設定や襲撃設定といった、役職者の能力に関する入力は、占い師や人狼だけが可能になるようにする必要があると思います。
ですから、入力時にそのログインしているキャラクターの役職をチェックしてみることにします。

}elsif( $Query_Tbl{'mode'} == 53){
  if( $Query_Tbl{ 'msg0' } ne "" and  $Query_Tbl{ 'msg1' } ne ""){
    &FILEIN_MSG;
    if( $Login_Index > -1 and $Char_Life[$Login_Index] != 1 
　　　　 and $Char_Cast[$Login_Index] eq "fortune" ){
      &FILEOUT_FORTUNE;
    }
  }
  print "Location: $Cgi_Main\n\n";
}

上記は占い設定の場合の入力チェックになります。ログインしている（Login_Index > -1）かつ、キャラクターが生きている（Char_Life が1でない）かつ、役職（Char_Cast）が占い師（fortune）の場合にだけ、ファイルへの書き込みを許可するという感じですね。