; include 'system.inc'

incluir 'sistema.inc'

definir formato db ; define format db

.codigo, .datos    ; .code, .data

numerico a, b, c   ; a=0, b=1, c=2

texto hola=\
  'Hola Mundo'     ; text hi='Hi, World'    

macro nombre       ; macro name
  ; ...
final macro        ; end macro

partido a+b*c, p   ; match a+b*c, p
  si x=0           ; if x=0 
    ; ...
  mas si x=1       ; else if x=1
    ; ... 
  final si         ; end if
final partido      ; end match

iterar nombre, p   ; iterate/irp name, p
    ; ...
final iterar       ; end iterate/irp

funcion mensaje    ; function message
  decir 'Hola'     ;   say 'Hi'
finalf             ; endf    

; class POINT = integer x, y

clase PUNTO = entero x, y

espacio nombre     ; namespace name
  ; ...
final espacio      ; end namespace    

; FRENCH TRANSLATION

macro nom
  ; ...
fin macro

match a+b*c, p
  si x=0          ; if
    ; ...
  autre si x=1    ; else if
    ; ...
  fin si          ; end if
fin match

repeter nom, p    ; iterate/irp
  ; ...
fin repeter

fonction message
  dire 'bonjour'  ; say 'hello'
finf