It doesn't even establish addressability. Joe
On Tue, Sep 5, 2023 at 5:52 PM Bernd Oppolzer <bernd.oppol...@t-online.de> wrote: > It will not work, because almost every single instruction has an error > or two. > Every programmer with a little bit ASSMBLER experience can see this; > this ChatGPT program has no grasp of instruction formats, DCBs or the > proper > use of I/O macros. I will not go into the details here ... the ASSEMBLER > people know > what I'm talking about, and the others are not interested. > > Kind regards > > Bernd > > > Am 05.09.2023 um 18:00 schrieb Bill Johnson: > > Why do you doubt it? Is it because you hope it doesn’t? Certainly, one > of you assembler geniuses could test it. > > > > Like Mullins said, and others mentioned, most companies that run z/OS > don’t need assembler programmers. That numbers in the thousands if not ten > thousand. Whereas ISV’s who are the likely users of Assembler programming, > number in the hundreds, maybe. So install on Systems Programmers. > > > > > > Sent from Yahoo Mail for iPhone > > > > > > On Tuesday, September 5, 2023, 11:43 AM, Steve Thompson <ste...@wkyr.net> > wrote: > > > > I doubt it will assemble. And even if it does, the results are > > unpredictable, other than it will probably ABEND for one reason > > or another. > > > > There are no DCB, OPEN, CLOSE macros while GET and PUT are being > > used. > > > > Me thinks this AI system is confusing a few different assembly > > languages together. I wonder how close they came for DOS I/O. > > Steve Thompson > > > > > > > > On 9/5/2023 11:20 AM, Tom Marchant wrote: > >> You're right, Tom. That is not a program. Certainly not one that will > do what it claims to do. > >> > >> -- Tom Marchant On Mon, 4 Sep 2023 10:42:51 -0700, Tom Brennan > >> <t...@tombrennansoftware.com> wrote: > >>> I can't be sure I formatted it properly, but after looking over the > >>> code, I have nothing to say but WTF? 😄 > >>> > >>> PRINT NOGEN > >>> TITLE 'Simple Addition Program' > >>> ** Define storage for input numbers and result > >>> * > >>> NUM1 DS F First input number > >>> NUM2 DS F Second input number > >>> RESULT DS F Result of addition > >>> ** Main program > >>> * > >>> MAIN C 0 NUM1 Check if NUM1 is zero > >>> BE ZERO Branch to ZERO if true > >>> ** Read the first number from input > >>> * > >>> GET NUM1,NUMIN Read NUM1 from input > >>> LA 0,NUM1 Load NUM1 into register > >>> ** Read the second number from input > >>> * > >>> GET NUM2,NUMIN Read NUM2 from input > >>> A NUM1,NUM2 Add NUM1 and NUM2 > >>> ST NUM1,RESULT Store the result in RESULT > >>> ** Print the result > >>> * > >>> PUT RESULT,NUMOUT Print the result > >>> ** Terminate the program > >>> * > >>> SR 15,15 Set return code to 0 > >>> BR 14 Return to caller > >>> ** Define input and output areas > >>> * > >>> NUMIN DC F'0' Input buffer for numbers > >>> NUMOUT DC F'0' Output buffer for result > >>> ZERO DC F'0' Constant zero > >>> END MAIN End of program > >> ---------------------------------------------------------------------- > >> For IBM-MAIN subscribe / signoff / archive access instructions, > >> send email tolists...@listserv.ua.edu with the message: INFO IBM-MAIN > > ---------------------------------------------------------------------- > > For IBM-MAIN subscribe / signoff / archive access instructions, > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > > > > > > > > > ---------------------------------------------------------------------- > > For IBM-MAIN subscribe / signoff / archive access instructions, > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
