Subject: Gen purpose EFI I/O pc board
From: Rotary Engine
Date: 12/30/2011, 5:09 AM
To: AAA Put this in the To box

Will work with just about any single board
computer.Converts any SBC into a rotary engine EFI system.
Dual I/O connectors. .025 square pins on .1 centers.
Standard on most SBC's.
Screw down terminal blocks on .15 centers.
Size 2.5 inches by 3.8 inches.

If I buy I will have to buy 3. Anybody want one?
Price will be $25 less parts.
Not done yet. I need to add traces.

Here is my fav SBC. Very powerful indeed. Can be programed in BASIC.
About $90. Talks to a PC or tablet  trough the USB.

http://www.zbasic.net/


I have some code already.

Sub Main()

Call PutPin(12, zxOutputLow) ' pin 12 CAS 1 will be at logic zero
Call PutPin(13, zxOutputLow) ' pin 13 CAS 2 will be at logic zero
dim x as long
'check and wait for CAS
'do
for x = 0 to 3000000 'develop only
If (GetPin(12)=1) then
Call rotor1
end if

if (GetPin(13) = 1) then
Call rotor2
end if
'loop
next x            'develop only
end sub 'main


sub rotor1()          'it is 22 degrees BTDC
Call PutPin(14, zxOutputHigh) ' trigger ign rotor1
dim add1 as integer
dim add2 as single
dim add3 as single
add1 = GetADC(82)   'MAP sensor val must be an integer
add2 = CSng(add1)
add3 = add2/10.23

' prepare for 100Hz Fast PWM using channel 2
Call OpenPWM(3, 250.0, zxFastPWM)
Call PWM(3, add3)                  ' generate PWM with
Debug.Print "  = " & CStr(add3);
Call PutPin(14, zxOutputLow) ' turn off ign trigger
end sub 'rotor1

sub rotor2()   'it is 158 degrees ATDC
'Debug.Print "rotor 2"
End Sub  'rotor2


Paul Lamar
-- 
The Rotary Engine NewsLetter. Powered by Linux.
ACRE NL web site. http://www.rotaryeng.net
Youtube key word PaulLamar2
Copyright 1998-2011 All world wide rights reserved.