Article View: bit.listserv.asm370
Article #1615Help
From: Pete Davis
Date: Fri, 21 Feb 1992 03:56
Date: Fri, 21 Feb 1992 03:56
32 lines
1987 bytes
1987 bytes
I'm trying to do some direct console io using the CMS CONSOLE macro. I'm
kinda new to this, so let me explain the environment and the program:
I'm using VM/XA and VM/IS 6:
My program is something along these lines:
SCRDUMP CSECT
STM 14,12,12(13)
BALR 12,0
USING *,12
ST 13,SAVE+4
LA 13,SAVE
FSOPEN FCSB=MYFSCB
CONSOLE OPEN,PATH='PATH1',BUFFER=PTR,ERROR=ERR,EXIT=INTR
CONSOLE READ,PATH='PATH1',BUFFER=PTR,OPTIONS=(NOWAIT,RDBUF)
LR 7,0
ST 7,TOTCNT
etc....
Anyway, R0 returns a value of 32 and the 32 values pointed to are all zeros.
Any ideas? I Have to make it clear that assembly is pretty new to me, so I'm s
ure that I'm screwing up somewhere. We want to be able to read an entire screen
into a buffer and save it to a file.
We've checked all of the returned values via LINEDIT and some other steps. W
hat am I missing?
_Pete
------------------------------------------------------------------------
BitNet: HJ647C@GWUVM or HJ647C@GWUVM.BITNET
UE356C@GWUVM or UE356C@GWUVM.BITNET
GEnie: P.DAVIS5
Internet: HJ647C@GWUVM.GWU.EDU
UE356C@GWUVM.GWU.EDU
UUCP: uunet!cornellc.cit.cornell.edu!HJ647C%GWUVM.BITNET
------------------------------------------------------------------------
Technical Details
Message-ID:
<ASM370%92022023543743@UGA.CC.UGA.EDU>Path:
arc1-ca.pugleaf.net!sparky!uunet!paladin.american.edu!auvm!GWUVM.BITNET!HJ647CShow Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: fcdcb,179bf7562c03529c,start X-Google-Attributes: gidfcdcb,public X-Google-ArrivalTime: 1992-02-21 03:11:25 PST Comments: Gated by NETNEWS@AUVM.AMERICAN.EDU Path: arc1-ca.pugleaf.net!sparky!uunet!paladin.american.edu!auvm!GWUVM.BITNET!HJ647C Message-ID: <ASM370%92022023543743@UGA.CC.UGA.EDU> Newsgroups: bit.listserv.asm370 Date: Thu, 20 Feb 1992 23:56:34 EDT Sender: IBM 370 Assembly Programming Discussion List <ASM370@UGA.BITNET> From: Pete Davis <HJ647C@GWUVM.BITNET> Subject: Help