pf code goes something like this:

CODE OSC ( n) 0 POP 42 OUT 0 hi 0 MOV 42 OUT NEXT
: BELL 1355 OSC
    [ HEX ] 61 INPUT 3 OR 61 OUTPUT 80 MS
            61 INPUT FC AND 61 OUTPUT 20 MS ;

It even works in the DOS box in windows.

> It is polyForth ISD-4 cF80186/pMSD so I guess I am in the wrong group.
> Sorry about that.
>
> Thanks,
>
> Mark
>
>
> -----Original Message-----
> From: sftalk-bounce_at_forth.com [mailto:sftalk-bounce_at_forth.com] On Behalf
> Of Appert, Kevin
> Sent: Friday, June 11, 2004 11:24 AM
> To: sftalk_at_forth.com
> Subject: [sftalk] Re: Assembler - Ring Bell
>
> Take the code from 7 EMIT and inline it. Or BELL (might be called BEL
> or BEEP in some cases).
>
> But seriously folks, what processor? If it's an 8088 or an LSI-11 I
> might be able to help you.
> Is it REALLY PF or is it SwiftForth?
>
> (Please note that I am not an employee or representative of Forth, Inc.)
>
> -----Original Message-----
> From: sftalk-bounce_at_forth.com [mailto:sftalk-bounce_at_forth.com]On Behalf
> Of Mark Ham
> Sent: Friday, June 11, 2004 10:10 AM
> To: sftalk_at_forth.com
> Subject: [sftalk] Assembler - Ring Bell
>
>
> How do you make the bell ring in PolyForth Assembler?
>
> Thanks in advance,
>
> Mark
> ----------------------------------------------------------------------
> sftalk_at_forth.com The SwiftForth programming discussion email list
> To unsubscribe, send subject "unsubscribe" to sftalk-request_at_forth.com
> For list command help, send subject "help" to sftalk-request_at_forth.com
> Message archives are located at http://www.forth.com/archive/sftalk
> ----------------------------------------------------------------------
> This list is a forum for SwiftForth users. For product support and bug
> reports, please send email to support_at_forth.com
> ----------------------------------------------------------------------
>
>
>
> ----------------------------------------------------------------------
> sftalk_at_forth.com The SwiftForth programming discussion email list
> To unsubscribe, send subject "unsubscribe" to sftalk-request_at_forth.com
> For list command help, send subject "help" to sftalk-request_at_forth.com
> Message archives are located at http://www.forth.com/archive/sftalk
> ----------------------------------------------------------------------
> This list is a forum for SwiftForth users. For product support and bug
> reports, please send email to support_at_forth.com
> ----------------------------------------------------------------------
>

----------------------------------------------------------------------
sftalk_at_forth.com The SwiftForth programming discussion email list
To unsubscribe, send subject "unsubscribe" to sftalk-request_at_forth.com
For list command help, send subject "help" to sftalk-request_at_forth.com
Message archives are located at http://www.forth.com/archive/sftalk
----------------------------------------------------------------------
This list is a forum for SwiftForth users. For product support and bug
reports, please send email to support_at_forth.com
----------------------------------------------------------------------
Received on Fri Jun 11 2004 - 13:29:05 PDT