Quote from: Jeff Haas on October 25, 2023, 11:12:28 AMJon is active on the Parallax forums, he's been writing code and doing demos for the new Propeller 2. Chip Gracey finally got the updated Propeller done, and it's supposed to be impressive. I haven't gotten one, I have some HC-16 boards that are more than enough for me.
QuoteSince I've been working on other software things, I've learned C++ and Arduino. The cheap electronics from China have changed the entire scene, so I agree that that's probably part of why EFX closed.
Quote from: Jeff Haas on October 24, 2023, 04:13:54 PMHi Geo,
Unfortunately, you're right - EFX-Tek is dead. The forums were down for a few months but someone fixed them and put them back up, I guess people still wanted to get to the example code here.
QuoteI've been helping people with their programming questions because I can usually figure it out and it's fun.
QuoteYour only option for getting more Prop-1s is to see if any haunters on Haunt Forum or Halloween Forum are selling them off.
Jeff
QuoteErrata
Rev B. boards have the P6 and P7 configuration jumpers reversed – the SETUP pins marked P6 are actually
connected to P7 and vice-versa. This error was corrected on boards marked "Rev C" and higher.
Force_Release:
IF Trigger = IsOn THEN Force_Release
' =========================================================================
'
' File...... DavisGraveyard Footsteps
' Purpose...
' Author.... DavisGraveyard, updated by Jeff Haas
' E-mail....
' Started...
' Updated... 10/17/2023
'
' {$STAMP BS1}
' {$PBASIC 1.0}
'
' =========================================================================
' -----[ Program Description ]---------------------------------------------
' -----[ Revision History ]------------------------------------------------
' -----[ I/O Definitions ]-------------------------------------------------
SYMBOL Trigger = PIN6 ' SETUP = DN
SYMBOL Sio = 7 ' SETUP = UP; no ULN
' -----[ Constants ]-------------------------------------------------------
SYMBOL IsOn = 1 ' active-high I/O
SYMBOL IsOff = 0
SYMBOL TrOn = 1 ' active-high trigger
SYMBOL TrOff = 0
SYMBOL Baud = OT2400
' -----[ Variables ]-------------------------------------------------------
SYMBOL i = B0
SYMBOL timer = B2 ' for debounce loop
' -----[ Initialization ]--------------------------------------------------
Power_Up:
SEROUT Sio, OT2400, ("!!!!!AP8",%11,"X","!DC16",%11,"X")
Reset:
PINS = %00000000 ' all off
DIRS = %10111111 ' Set up outputs
' -----[ Program Code ]----------------------------------------------------
Main:
timer = 0 ' reset debounce timer
Check_Trigger:
PAUSE 5 ' scan delay
IF Trigger = TrOff THEN Main ' check trigger input
timer = timer + 5 ' update timer
IF timer < 100 THEN Check_Trigger ' check timer
'make some step sounds first
FOR i = 1 TO 7
SEROUT Sio, OT2400, ("!AP8",%11,"P",0)
PAUSE 1000
NEXT
'light up the last 7 steps
FOR i = 0 TO 6
SEROUT Sio, OT2400, ("!AP8",%11,"P",0)
SEROUT Sio, OT2400, ("!DC16",%11,"P",i,1)
PAUSE 1000
SEROUT Sio, OT2400, ("!DC16",%11,"P",i,0)
NEXT
PAUSE 1000
'rattle the solenoid
HIGH 1
PAUSE 7000
LOW 1
PAUSE 100
GOTO main
' -----[ Subroutines ]-----------------------------------------------------
' -------------------------------------------------------------------------
' -------------------------------------------------------------------------
' -------------------------------------------------------------------------
' -----[ User Data ]-------------------------------------------------------