REM 
REM *************************************************
REM * Dragon file header:                           *
REM * Start: $2401 Length: $00d4 Exec: $8b8d        *
REM *(Start: 09217 Length: 00212 Exec: 35725)       *
REM *************************************************
REM 
   10  CLS 
   50  FREAD "NORSK";N$
   51  FREAD "TYSK";T$
   55  IF   EOF ("TYSK")=1  THEN  70
   60  GO  SUB  100
   69  GO  TO  50
   70  CLOSE 1
   80  END 
  100  PRINT @0,T$: PRINT @32,"";: INPUT  T$
  101  IF  T$=N$  THEN   GO  TO  200
  102  PRINT @480,"GALT GJETTET"
  103  GO  TO  100
  200  PRINT @480,"RIKTIG GJETTET"
  201  RETURN