BBS: Inland Empire Archive Date: 01-29-93 (23:34) Number: 383 From: ROB MCKEE Refer#: NONE To: FRANCOIS ROY Recvd: NO Subj: Re: Break Key Info Conf: (2) Quik_Bas
Hello Francois! You wrote in a message to Zack Jones: ZJ> when you send a *BREAK* <Ctrl-END> when running Telix. Well I asked ZJ> Jeff Woods about it and here's the reply: ZJ> ZJ> Get the value of the address of the UART's Line Control Reg. ZJ> Turn off interrupts ZJ> To turn on a break, OR the LCR with 01000000b ZJ> To turn off a break, AND NOT the LCR with 01000000b ZJ> Turn on interrupts ZJ> FR> If anyone has translated this in QB, I'm *very* interested It is in Basic... <G> Port = &H3F8 ' COM1 'Port = &H2F8 ' COM2 'Port = &H3E8 ' COM3 'Port = &H2E8 ' COM4 Ni = INP(Port + 1) OUT Port + 1, 0 d = INP(Port + 3) c = d OR &H40 t! = TIMER OUT Port + 3, c DO: LOOP UNTIL TIMER - t! > .5 OUT Port + 3, d OUT Port + 1, Ni Catcha Later , I'll see you on the flip side - Rob xVxoxtxe Zack_Jones,Quik_Bas Moderator ^ Hail --- timEd/B6 * Origin: Flyer_Proof_Computer_Svs,V32B,V42B,XA (1:125/1212.13)
Books at Amazon:
Back to BASIC: The History, Corruption, and Future of the Language
Hackers: Heroes of the Computer Revolution (including Tiny BASIC)
Go to: The Story of the Math Majors, Bridge Players, Engineers, Chess Wizards, Scientists and Iconoclasts who were the Hero Programmers of the Software Revolution
The Advent of the Algorithm: The Idea that Rules the World
Moths in the Machine: The Power and Perils of Programming
Mastering Visual Basic .NET