99 Bottles of Beer/Assembly: Difference between revisions
Content added Content deleted
PatGarrett (talk | contribs) m (→{{header|360 Assembly}}: Superfluous blanks suppressed) |
(+ OASYS) |
||
Line 538: | Line 538: | ||
=={{header|MMIX}}== |
=={{header|MMIX}}== |
||
--> |
--> |
||
=={{header|OASYS Assembler}}== |
|||
The following example demonstrates the use of pointer variables (the argument <tt>,^#</tt> to the <tt>&VERSE#</tt> method), and therefore may not be as efficient as one which does not use pointer variables. |
|||
<lang oasys_oaa> |
|||
; Beer program with OASYS assembler. |
|||
[&] |
|||
%@*>"Type 'beer' for beer.~Type 'quit' to quit.~"PS |
|||
['BEER] |
|||
,#99>:+,#&VERSE#/"No more bottles of beer on the wall.~"PS |
|||
[&VERSE#,^#] |
|||
,^#<<PI" bottles of beer on the wall.~"PS |
|||
,^#<<PI" bottles of beer.~Take one down and pass it around,~"PS |
|||
,^#<,^#<<DN>,^#<<\ |
|||
,^#<<PI" bottles of beer on the wall.~"PS CR 1RF: 0RF |
|||
['QUIT] |
|||
GQ |
|||
</lang> |
|||
=={{header|X86 Assembly}}== |
=={{header|X86 Assembly}}== |