Apontamentos - Mini Bloco de notas

Apontamentos
Este é uma especie de mini bloco de notas, o programa escreve ficheiros e vê ficheiros.
Útil para escrever rápidas e pequenas notas.
Este é um programa um pouco mais avançado, ele usa comandos como "<INCLUIR_AVANÇADO>" que serve para fazer operações mais avanças com vareaveis e aqui neste caso serve para colocar uma vareável dentro de outra vareavel.
Todos os apontamentos vão ser gravados num ficheiro chamado Data.bat.










//Criar um ficheiro para salvar os apontamentos
SE_NÃO_EXISTE data.bat (
MOSTRAR VAR teste=teste > data.bat
)

NOME_DA_JANELA Apontamentos
TAMANHO_DA_JANELA VERTICAL=20 HORIZONTAL=50
COR: F0

<INCLUIR_AVANÇADO>

MARCA.topo
CHAMAR data.bat
VAR x=0
LIMPAR_TEXTO
MOSTRAR                  --------------
MOSTRAR                   Apontamentos
MOSTRAR                  --------------
ESPAÇO

MOSTRAR [1] Novo apontamento
MOSTRAR [2] Ver apontamentos
MOSTRAR [3] Sair

INSERIR x=
SE: %x% IGUAL_A 1 VAI_PARA aponta
SE: %x% IGUAL_A 2 VAI_PARA ver
SE: %x% IGUAL_A 3 TERMINAR_PROGRAMA
LIMPAR_TEXTO
VAI_PARA topo


MARCA.aponta
ESPAÇO
MOSTRAR Nome do apontamento
INSERIR nome=

LIMPAR_TEXTO
INSERIR texto=

MOSTRAR VAR !nome!=%texto% >> data.bat


MOSTRAR Apontamento Salvo como %nome%
PAUSAR
VAI_PARA topo




MARCA.ver
MOSTRAR Apontamento que deseja ver:
INSERIR x=

MOSTRAR !%x%!
PAUSAR
VAI_PARA topo