Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

IEC documentation edit #591

Merged
merged 2 commits into from
Dec 25, 2024
Merged

IEC documentation edit #591

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
2 commits
Select commit Hold shift + click to select a range
6871451
Update words.adoc
Whammo Dec 24, 2024
25aebaf
Only the examples require io
Whammo Dec 25, 2024
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
3 changes: 2 additions & 1 deletion forth/iec.fs
View file
Open in desktop
Original file line number Diff line number Diff line change
@@ -1,4 +1,3 @@
require io

code listen ( dv -- )
here 1+
Expand Down Expand Up @@ -67,6 +66,8 @@ $ffa5 jsr, \ acptr
w ldx, lsb sta,x
rts, end-code

require io

: iqt readst ioabort ; \ legacy of if quit then

: tfname ( addr len -- )
Expand Down
4 changes: 2 additions & 2 deletions manual/words.adoc
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -347,11 +347,11 @@ These words allow access to serial devices without accessing the file system, an
((listen)) _( dv -- ioresult )_ :: Send IEC listen to dv.
((second)) _( command+sa -- ioresult )_ :: Send IEC command and secondary address after listen.
((unlisten)) _( -- )_ :: Send IEC unlisten to all channels.
((ciout)) _( -- u )_ :: Puts a data byte onto the serial bus using full handshaking.
((ciout)) _( u -- )_ :: Puts a data byte onto the serial bus using full handshaking.
((talk)) _( dv -- ioresult )_ :: Send IEC talk to dv.
((tksa)) _( command+sa -- ioresult )_ :: Send IEC command and secondary address after talk.
((untalk)) _( -- )_ :: Send IEC untalk to all channels.
((acptr)) _( u -- )_ :: Get a byte of data from the serial bus using full handshaking.
((acptr)) _( -- u )_ :: Get a byte of data from the serial bus using full handshaking.


====
Expand Down