[pft] @BANNER.PFT, [/pft]
 
 
[pft] if v7081 = 'T' /* se for para analisar performance de tempo, mostra o clock*/ then @CLOCK.PFT fi, if v7080 = 'T' /* se for para depurar o programa, mostra as principais variaveis */ then @DEBUG.PFT fi, [/pft] [pft] if v7070 = 'hierarchic' then ''/ ''/ '', fi, [/pft]

[pft] if v7300 = 'i' then if v7070 = 'alphabetic_index' then 'Alphabetic Index' else if v7070 = 'kwic_index' then 'Keywords in Context Index' else 'Tree Index' fi fi, else if v7300 = 'e' then if v7070 = 'alphabetic_index' then 'Índice Alfabético' else if v7070 = 'kwic_index' then 'Índice Permutado' else 'Índice Jerárquico' fi fi, else if v7070 = 'alphabetic_index' then 'Índice Alfabético' else if v7070 = 'kwic_index' then 'Índice Permutado' else 'Índice Hierárquico' fi fi, fi, fi, [/pft]


  [pft] if v7070 <> 'hierarchic' then if v7300 = 'i' then 'Enter a word or a root: ' else if v7300 = 'e' then 'Ingrese palabra o raiz: ' else 'Digite palavra ou raiz: ' fi, fi, else if v7300 = 'i' then 'Enter a descriptor: ' else if v7300 = 'e' then 'Escriba un descriptor: ' else 'Escreva um descritor: ' fi, fi, fi, [/pft] [pft] ''/ ``/ '
', '', if v7070 = 'alphabetic_index' /* so vamos mostrar o piano se a task for alphabetic_index*/ then '

', if v7300 = 'i' then 'or select a letter to initiate the index' else if v7300 = 'e' then 'o seleccione una letra para iniciar el índice' else 'ou selecione uma letra para iniciar o índice' fi, fi, '

'/ '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', ''/, '
', '', fi, [/pft]
'/ '' '           ', if v7300 = 'i' then 'or navigate from tree top' else if v7300 = 'e' then 'o navegue a partir de las categorias' else 'ou navegue a partir das categorias' fi, fi, '' '
[pft] ''/ if v7070 = 'hierarchic' then '
', @TREE.PFT fi, ''/ @HIDDEN.PFT, [/pft] [pft] if v7081 = 'T' /* se for para analisar performance de tempo, mostra o clock*/ then @CLOCK.PFT fi, [/pft]