1. Arabic/Assembly
DATA SEGMENT
MSG DB " ","$"
DATA ENDS
CODE SEGMENT
ASSUME CS:CODE, DS:DATA
START:
MOV AX,DATA;INTILIZE
MOV DS, AX
MOV AH,09H;PRINT STRING
LEA DX, MSG
INT 21H
STOP:
MOV AX,4C00H;TERMINATE
INT 21H
CODE ENDS
END START
2.Afrikaans/Ada
with TEXT_IO;
use TEXT_IO;
procedure Happy is
pragma MAIN;
begin
PUT ("Gelukkige Nuwe Jaar");
end Happy;
3.Albanian/Algo
BEGIN
FILE F(KIND=REMOTE);
EBCDIC ARRAY E[0:11];
REPLACE E BY "Gzuar Vitin e Ri";
WHILE TRUE DO
BEGIN
WRITE(F,*,E);
END;
END.
4. Armenian/APL
' '
5. Amharic/ASP
|