Salvar tela

[fglima]

Preciso salvar o que está na tela do meu sistema e ainda adicionar algumas informaçoes no final do arquivo.
já tentei fazer assim

...
save screen to tela
set printer to "arq.txt"
set device to printer
? tela
....

Sóq ue o resultado são vários caracteres malucos

[Visitante]

Caro Colega...

O Savescreen cria um arquivo que só pode ser restaurado sobre a tela com o restorescreen, não serve para imprimir a tela.
:?
Caso queira imprimir a tela, a única forma de se ter a tela fielmente como está, é executar seu programa em janela e através do windows capturar a tela (com PrintScreen, colando em um programa de tratamento de figuras: Paint, Photoshop, etc) ou utilizando o Corel Capture, que vem com o CorelDraw.

Um Clip Abraço

[gvc]

Se eu não estou enganado, o 1º byte é o caracter e o 2º é a cor dele.
Se vc esta trabalhando em uma tela DOS, teste o seguinte:
Grave somente os bytes impares da variável que gravou a tela.

Teste e informe o resultado. tks.

[vagucs]

Isso mesmo, o primeir byte o caractere e o segundo o atributo

Código: Selecionar todos

save screen to teste
texto=""
for i=1 to len(teste) step 2
   texto+=substr(teste,i,1)
next
handle=fcreate("tela")
fwrite(handle,texto)
fclose(handle)

Como não tem salto de linha (Mas vc pode colocar), use o edit do DOS paraq ver a tela digitando o seguinte

Código: Selecionar todos

edit /78 tela