それで色々と実験していたのですが、あることに気づいたのでプログラムにしてみました。
あくまで自分が勝手に調べて得たデーターを元にしていますので保障は出来ませんが…
参考程度にしてください。ちなみにこのデーターを得た回路を示しておきます。

プログラムもこの回路を元に作られているので本当に
参考程度にしてください。
回路記号が微妙に違うのは気のせい…
右クリックから保存して名前の変更から「.jpg」を消して「.exe」にしてください。
名前はご自由に…

実行してみると分かると思いますが
かなりの手抜きプログラムです。
バグなどはコメントへどうぞ
出てきた抵抗値を付けると死んじゃったー
みたいな文句は受け付けません…参考ですよ、参考…