String append: Difference between revisions

Content added Content deleted
imported>Chinhouse
No edit summary
(Added various BASIC dialects (Chipmunk Basic, GW-BASIC, MSX Basic, Quite BASIC and XBasic))
Line 384: Line 384:
r₁
r₁
Return</syntaxhighlight>
Return</syntaxhighlight>



=={{header|BASIC}}==
=={{header|BASIC}}==
Line 400: Line 398:
</syntaxhighlight>
</syntaxhighlight>


==={{header|BASIC256}}===
<syntaxhighlight lang="freebasic">a$ = "He"
a$ = a$ & "llo"
a$ = a$ + " Wo"
a$ += "rld"
a$ &= "!"
print a$</syntaxhighlight>


==={{header|BBC BASIC}}===
==={{header|BBC BASIC}}===
Line 416: Line 421:
{{out}}
{{out}}
<pre>HELLO WORLD!</pre>
<pre>HELLO WORLD!</pre>

==={{header|Chipmunk Basic}}===
{{works with|Chipmunk Basic|3.6.4}}
<syntaxhighlight lang="qbasic">10 a$ = "Hello"
20 a$ = a$ + " World!"
30 print a$</syntaxhighlight>

==={{header|GW-BASIC}}===
{{works with|PC-BASIC|any}}
{{works with|BASICA}}
{{works with|Applesoft Basic}}
{{works with|Chipmunk Basic}}
{{works with|QBasic}}
{{works with|Quite BASIC}}
{{works with|MSX BASIC}}
<syntaxhighlight lang="qbasic">10 LET a$ = "Hello"
20 LET a$ = a$ + " World!"
30 PRINT a$</syntaxhighlight>


==={{header|IS-BASIC}}===
==={{header|IS-BASIC}}===
Line 421: Line 444:
110 LET S$=S$&" World!"
110 LET S$=S$&" World!"
120 PRINT S$</syntaxhighlight>
120 PRINT S$</syntaxhighlight>

==={{header|BASIC256}}===
<syntaxhighlight lang="freebasic">a$ = "He"
a$ = a$ & "llo"
a$ = a$ + " Wo"
a$ += "rld"
a$ &= "!"
print a$</syntaxhighlight>


==={{header|Liberty BASIC}}===
==={{header|Liberty BASIC}}===
Line 435: Line 450:
a$ = a$ ; "!"
a$ = a$ ; "!"
print a$</syntaxhighlight>
print a$</syntaxhighlight>

==={{header|MSX Basic}}===
The [[#GW-BASIC|GW-BASIC]] solution works without any changes.


==={{header|QBasic}}===
==={{header|QBasic}}===
Line 444: Line 462:
a$ = a$ + " World!"
a$ = a$ + " World!"
PRINT a$</syntaxhighlight>
PRINT a$</syntaxhighlight>

==={{header|Quite BASIC}}===
The [[#GW-BASIC|GW-BASIC]] solution works without any changes.


==={{header|Run BASIC}}===
==={{header|Run BASIC}}===
Line 459: Line 480:
PRINT a$
PRINT a$
END</syntaxhighlight>
END</syntaxhighlight>

==={{header|XBasic}}===
{{works with|Windows XBasic}}
<syntaxhighlight lang="qbasic">PROGRAM "String append"
VERSION "0.0000"

DECLARE FUNCTION Entry ()

FUNCTION Entry ()
a$ = "Hello"
a$ = a$ + " World!"
PRINT a$
END FUNCTION
END PROGRAM</syntaxhighlight>


==={{header|Yabasic}}===
==={{header|Yabasic}}===