以前作ったものをを改良しました。

実際の実戦データより上の部分のフォーム入力は、
1k当たりのプレイ数を計算するためです。

1. 小役カウンタ非搭載機では
　$per= 総BIG枚数 + REG回数*(REG枚数+REG払出し枚数) + 投資分のコイン - 最終獲得コイン;

2. 小役カウンタ搭載。BIGでリセットされる機種では
　$per= 総BIG枚数 + REG回数*REG枚数 + 投資分のコイン - 最終獲得コイン;

3. 小役カウンタ搭載。BIGでリセットされない機種では
　$per= 総BIG枚数 - (BIG回数*BIG払出し) + REG回数*REG枚数 + 投資分のコイン - 最終獲得コイン;

から、$per を求めて
1k当たりのプレイ数 = 総プレイ数 * 50 / $per

より計算しました。