Re: Where do I start?

Ok, I need a short segment of assembly done for me (because I don't quite
understand most of this yet...

There is a buffer that the tget uses to return stuff from the screen
called INBUF

INBUF   DS   XL128
INBUFLN EQU  *-INBUF

There is a protected field in the screen
where I want to display the text that was in INBUF

Actually I thought I would be cute and have IBBUF simply
be the same memory as this DISPLY so I could check it out.

Please step through INBUF and change the code '11 xx' to some
special character like '#'. This is the mark between data items
11 is sentinel, and the next byte is the buffer address.
I don't know what TSO puts after the last data item text.

Also please replace bytes 1 and 2 with #s
(these are the aid key and cursor location)

*  INPUT BUFFER IS NO LONGER PART OF THE OUTPUT STREAM
*
         DC       X'115AD1'        SBA
         DC       X'1DE0'          SF (PROTECTED)
DISPLY   DC       C'................................'
         DC       C'................................'
         DC       C'................................'
         DC       C'................................'

Here is where I plan to insert the donated code:

*
*  GO TO USER FOR INPUT
*
LOOP     TPUT     STREAM,STREAMLN,FULLSCR
         TGET     INBUF,INBUFLN,ASIS
*
         CLI INBUF,X'F3'
         BE EXIT
*
*        MOVE STUFF FRON INBUF INTO DISPLY
*
* -------------your code here --------------------
         B  LOOP                  CONTINUE
*
EXIT     STLINENO LINE=1
         STFSMODE OFF
         STTMPMD  OFF

And remeber good comments will help Ron stop asking for silly stuff!

: ^ )   (but are not required because beggars musn't be choosers)

Thanks!