home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga MA Magazine 1998 #6
/
amigamamagazinepolishissue1998.iso
/
coders
/
snma
/
arexx
/
easyasm.rexx
< prev
next >
Wrap
OS/2 REXX Batch file
|
1977-12-31
|
1KB
|
50 lines
/*
EasyAsm.rexx
This little ARexx program assembles files using SNMA Arexx host.
This one uses direct snma output, as opposed to ShellAsm.
To use, you must set snma to the following state:
rx "address snma set outfile on rxerr off keepsource off"
All the flags are not neccessarily required, but certainly useful.
(See documents, chapter 4.2.7 Arexx/SET for more info).
When you start snma, you can redirect output file to the "CON:..".
This is especially important if you use snma from the different Shell
you started it, as default output would otherwise go to the Shell
snma was stated from.
*/
if arg() ~= 1 THEN DO
say 'Usage: rx ShellAsm.rexx "CMDLINE"'
exit 5
end
arg cmd
address SNMA
call Assemble(cmd)
'FREE' /* free source, errors..., just in case*/
exit
/*
Following routine will assemble and display information about it
Now this one takes one argument , commandline
"Ram Disk:"
*/
Assemble:
options RESULTS
arg cmd
cmd=strip(cmd,B,'"') /* strip leading and trailing "s */
mydir=pragma('d')
mydir=insert('"',mydir,0)
mydir=insert('"',mydir,length(mydir))
'SET outfile on rxerr off keepsource off'
CHDIR mydir /* change the current directory of the snma */
say "Calling SNMA: ASM" cmd
ASM cmd /* assemble it */
return /* End of Assembly */