aq696@cleveland.Freenet.Edu (Charles Perlingiero) (05/25/91)
Information at bottom... 40 ND%(0) = 1: REM Keyboard node active 50 ND%(1) = 0: REM Slot 1 node inactive 60 ND%(2) = 1: REM Slot 2 node active 70 FOR A = 0 TO 2:ND$(A) = "": NEXT A 80 D$ = CHR$ (4) 90 GOTO 1000 200 REM Input key <--- I need to take the byte directly from the port, like the keyboard scan, but the modem doesn't work with the same locations. 220 IN$ = "": IF PEEK ( - 16384) > 127 THEN GET IN$ 240 RETURN 1000 REM Scan all active ports 1020 FOR A = 0 TO 2 1040 IF ND%(A) THEN PRINT D$;"in#";ND%(A): GOSUB 200 <-- I'm using the in#2 to set the input slot. 1060 IF IN$ = "" THEN 1100 1080 NB$(A) = NB$(A) + IN$ 1100 GOSUB 3000 1120 NEXT A 1130 GOTO 1000: REM Continue scan 3000 REM Check to see if something is in the buffers 3020 FOR A = 0 TO 2 3040 IF NB$(A) = "" THEN 3080 3060 IF NB$(A) < > "" THEN PRINT "Buffer ";A;" contains the following: ";NB$(A):NB$(A) = "" 3080 NEXT A: RETURN I know there must be a way to do this, since an Apple II can be used from remote by doing a pr#2 and in#2 at the same time. I just need to know the locations to peek and poke too. I can live with the pr#2, but you can't use the in#2 and the get command for my purpose, it stops the whole program. This is just one of the things I wanted to work on, does anyone have the source code (or partial source code for DDial, I just need to see the hardware routines...). I'm going to attempt to write a 2 line BBS, simple, but a little more complex that DDial (chatting and true message bases). If someone could write me a couple machine language routines for the Apple II, it would be greatly appreciated. Although, I don't know how far I will get. I don't know much about the Apple II. The Commodore 64 was my machine, I knew all the tricks for that machine. Apple seems to keep the general public blinded. (or maybe its because I'm a late comer to the II world.). -- ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: Charles Perlingiero Internet: aq696@cleveland.freenet.edu ^^ = Who the heck is that? What the heck is that = ^^ :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
geniusman@pro-hindugods.cts.com (Chris Moylan) (05/26/91)
In-Reply-To: message from aq696@cleveland.Freenet.Edu Try picking up a copy of ModemWorks by Morgan Davis, the creator of ProLine BBS systems. It allows full modem operations and includes an xmodem file protocol and many other commands, including those of AmperWorks which is a set of extra BASIC related commands. Like copying and appending files. Chris ------------------------------------------------------------------------------- Chris Moylan ProLine: geniusman@pro-hindugods CoSysop: The Hindu Love Gods BBS Internet: geniusman@pro-hindugods.cts.com 313/644-0481 UUCP: crash!pro-hindugods!geniusman 300-9600 bps v.32/v.42/v.42bis ARPA: crash!pro-hindugods!geniusman@nosc.mil -------------------------------------------------------------------------------