Differences

This shows you the differences between two versions of the page.

Link to this comparison view

forth-1-trabalho [2012/03/19 23:24]
clp [Condicionais:]
forth-1-trabalho [2012/03/19 23:49] (current)
clp [Ultimas palavras]
Line 109: Line 109:
  
  
-====== Condicionais======+===== Condicionais ======
 **IF-ELSE-THEN** **IF-ELSE-THEN**
-'': L (valor)'' + 
- ''0 < (testa se o valor e menor que zero)'' +   : L (valor) 
-IF. (retorna verdadeiro) +       0 < (testa se o valor e menor que zero) 
- ELSE. (retorna falso) +       IF. (retorna verdadeiro) 
- THEN. +       ELSE. (retorna falso) 
-+       THEN. 
-''+   
 +    
 +    
 +**CASE** 
 +   : Caso_de_teste 
 +         CASE 
 +            0 OF. ENDOF 
 +            1 OF. ENDOF 
 +            2 DE ENDOF 
 +            DUP. . "Entrada inválida!" 
 +         ENDCASE CR 
 +   ; 
 +    
 +    
 +===== Loop ====== 
 + 
 + 
 +**BEGIN...UNTIL** 
 + 
 +    : contagem regressiva  
 +    BEGIN 
 + DUP. CR (valor da duração do LOOP) 
 + 1 – DUP < 0 (até for menor que zero) 
 +    UNTIL 
 +    ; 
 + 
 + 
 +**DO...LOOP – vai imprimir “Ba” seguido de 4 “Na”** 
 +    : SPELL 
 +     . “Ba” 
 +     4 0 DO 
 +                . “Na” 
 +            LOOP 
 +    ; 
 + 
 + 
 +**BEGIN WHILE REPEAT** 
 + 
 +    :função  (soma de N inteiros) 
 +     Value 0 
 +     BEGIN 
 +     OVER 0> 
 +     WHILE 
 +     OVER + 
 +     SWAP 1 - 
 +     REPEAT 
 +     SWAP 
 +    ; 
 + 
 +===== Ultimas palavras ====== 
 + 
 +O trabalho foi feito a principio para que as pessoas tenham um leve conhecimento de como e a história da linguagem FORTH, desde sua área de atuação até mesmo a alguns comandos básicos. 
 + 
 +**Referências** 
 + 
 +[[http://www.forth.org]] 
 + 
 + 
 +[[http://www.softsynth.com/pforth/pf_tut.php#Defining a New Word]] 
 + 
 +[[http://www.forth.org/bournemouth/forth.html#2]]
 
forth-1-trabalho.1332210266.txt.gz · Last modified: 2012/03/19 23:24 by clp · [Old revisions]