RosettaCodeData/Task/Unicode-variable-names/8th/unicode-variable-names.8th

20 lines
342 B
Plaintext

1 var, Δ
Δ @ n:1+ Δ !
Δ @ . cr
\ unicode silliness
: 念 ' G:@ w:exec ;
: 店 ' G:! w:exec ;
: ਵਾਧਾ ' n:1+ w:exec ;
: الوداع ' G:bye w:exec ;
: キャリッジリターン ' G:cr w:exec ;
: प्रिंट ' G:. w:exec ;
Δ 念 ਵਾਧਾ Δ 店
Δ 念 प्रिंट キャリッジリターン
الوداع