Use a relay on the AC. With a double pole switch you can keep track of when it is off and use an additional path through another relay to drive the mains relay.
As for the 6116, make sure to keep the enables\ pulled high. I've seen a circuit where they didn't do this and it flattened the battery in ...

It should be on Youtube within a day or so. You do want to watch online if you want to add a chat.
Dwight

There should be an interesting talk from Bil Herd, Bill Mensch an Eriv Schlaepfer.
There will be other stuff of general interest as well. There will be a talk on 6502 assembly as well.
It will be streaming so you can send in questions.

Join us on August first for a virtual VCF event!

We can't ...

For fig, I think this works:

: C-CONSTANT
<BUILDS C,
DOES> C@ ;

It can be faster but this is about as simple as I can get.
Dwight

It sounds like a create does ( Builds Does ) or whatever works for your Forth.
It you want it to be smart to deal with numbers larger and smaller than 255 you could deal with as well.
Dwight

Over the years, I've learned to deal with differences in Forth's.
I just got done with helping a fellow bring up a PetForth, that is a version of a early AppleForth.
It is quite different than fig Forth. It is a call threaded Forth. Unlike fig, it checks the stack on the usage of every word that ...

My disassemblers first find the first block of code to follow. It then has a blank text file with spaces with all the addresses to be covered. It puts instruction on the lines in place of the spaces. It then makes a list of every branch, subroutine call or jump address. It makes passes through the ...

This one seems to work. I even had the wrong instruction, not even matching my comment.
There were a number of other bugs as well. Th concept was good but the implementation was not.
The most embarrassing one was that I knew LDA 0E meant to fetch from page 0 address 000E but for some reason LDA 1F ...

I've been looking at my listing and think I've figured out WHILE. I believe it would be used:
BEGIN ... cond IF ... WHILE
cond is the condition for the IF operation. If the IF was true, it would execute the code after the IF to the WHILE and then loop back to the BEGIN. If the IF failed, it would ...

I thought about that. I've used ]LIT many times, especially when I have some complicated calculation on the side.
I've spent some more time looking at the assembler. The assembler does " operand mnemonic mod " which would have worked fine with the value off the stack. I think it would have worked ...

It doesn't have a lot of memory but it does run in 16K.
It doesn't have a ." ... " but the original instructions used a PRINT instead that wasn't included.
There is no LITERAL and no CMOVE.
It is call threaded so code inline is expected.
PRINT is an IMMEDIATE word that compiles into the dictionary ...

By what do you mean?

( note: I had a bug that has been changed in the code )
Dwight

I've made 3 bug fixes since first posted.

Here is my PRINT that I think will work. There is no immediate ' and I don't fully understand how to use the assembler so I'm just hacking the code in place. What I want to do is LDA # ( a number from the stack ) but I think the it expects to see a "LDA ...

Hi All
I'm working on a project for an old PET computer. It is a Pet Forth adapted for a Commodore Pet. It runs with BASIC 1 ROMs. I told you it was old. It runs at 800 hex. I don't have a Pet so have been working remotely.
There is a thread on the vcf Forum called Petsoft 6502 FORTH.
There is a ...

Symetric math is often better for polar math. Floored math is better for single lines or XY rectangular vectors. Symetric math makes zero an unique point. Floored math makes zero an offset. This can be vary important when doing multiple precision math on things like XY tables. Using math that rounds ...