Skip to content

Commit

Permalink
FIX
Browse files Browse the repository at this point in the history
  • Loading branch information
elenderg committed Apr 27, 2024
1 parent 9c4bb29 commit 1c65f76
Show file tree
Hide file tree
Showing 3 changed files with 19 additions and 11 deletions.
Binary file modified Algoritmos de Exemplo/stdin/stdin.exe
Binary file not shown.
24 changes: 16 additions & 8 deletions Algoritmos de Exemplo/stdin/stdin.pop
Original file line number Diff line number Diff line change
Expand Up @@ -10,9 +10,10 @@ Rotina para que se execute o programa:
Escreva "Digite alguma coisa: " para Stdout.
Leia um trecho desde a STDIN.
Remova o �ltimo caractere desde o trecho.
\Escreva "String digitada: " junto com o trecho junto com o texto CRLF para StdOut.
Desenfileire um evento.
Delegue o controle.
Escreva "String digitada: " junto com o trecho junto com o texto CRLF para StdOut.
\Aguarde 1 segundo.
\Desenfileire um evento.
\Delegue o controle.
Feche o programa.

Rotina para que se obtenha o N�mero Identificador do Fluxo de Entrada Padr�o:
Expand Down Expand Up @@ -41,15 +42,22 @@ Rotina para que se obtenha o modo do console:
Escreva "Modo do console: " junto com o modo do console junto com o texto CRLF para STDOUT.

Rotina para que se leia um trecho desde a STDIN:
Atribua 0 para um n�mero denominado lpNumberOfBytesRead.
Atribua 0 para um n�mero denominado quantidade de caracteres NULL restantes.
Atribua "" para o trecho.
Preencha o trecho com o caractere NULL usando 255.
Anexe o caractere NULL ap�s o trecho.
Preencha o trecho com o caractere NULL usando 256.
\Anexe o caractere NULL ap�s o trecho.
Processe "kernel32.dll" "ReadFile" com
O n�mero identificador do fluxo de entrada padr�o [hFile] e
O caractere inicial deste trecho [lpBuffer] e
256 [nNumberOfBytesToRead] e
Um n�mero [lpNumberOfBytesRead] \ O n�mero de bytes lidos ao usar o par�metro hFile s�ncrono.
e 0 [NULL]
O endere�amento deste lpNumberOfBytesRead [lpNumberOfBytesRead] \ O n�mero de bytes lidos ao usar o par�metro hFile s�ncrono.
e 0 [lpOverlapped = NULL]
Retornando um status de erro.
Se o status de erro for 0 [NULL],
Escreva "Erro ao ler do Console." junto com o texto CRLF para STDOUT.
Escreva "Erro ao ler do Console." junto com o texto CRLF para STDOUT.
Converta o lpNumberOfBytesRead para uma string.
Escreva "Bytes lidos: " junto com a string junto com o texto CRLF para Stdout.
Se o lpNumberOfBytesRead for menor do que 256,
Atribua 256 menos o lpNumberOfBytesRead para a quantidade de caracteres NULL restantes.
Remova os caracteres finais desde o trecho usando a quantidade de caracteres NULL restantes.
6 changes: 3 additions & 3 deletions Código-Fonte/Biblioteca padrão.pop
Original file line number Diff line number Diff line change
Expand Up @@ -9592,7 +9592,7 @@ Rotina para que se inicialize a janela do programa:
A janela principal do programa [hWnd]
e 1. [nCmdShow = SW_SHOWNORMAL]

Rotina para que se inicialize winsock:
Rotina para que se inicialize a infraestrutura WinSock:
Processe "ws2_32.dll" "WSAStartup" com \ Inicia o uso da DLL Winsock por um processo.
\ Documenta��o: -> https://learn.microsoft.com/pt-br/windows/win32/api/winsock/nf-winsock-wsastartup
2 [wVersionRequired]
Expand Down Expand Up @@ -12626,7 +12626,7 @@ Rotina para que se carregue as bibliotecas padr
Rotina para que se inicialize tudo;
Rotina para que se inicialize os componentes:
Inicialize o Component Object Model.
Inicialize winsock.
Inicialize a infraestrutura WinSock.
Inicialize gdi+.
Inicialize o talker.
Inicialize o m�dulo.
Expand All @@ -12642,7 +12642,7 @@ Rotina para que se inicialize os componentes:
Crie o console.

Rotina para que se comece para cima o cgi:
Inicialize winsock.
Inicialize a infraestrutura WinSock.
Inicialize o m�dulo.
Inicialize o cgi.

Expand Down

0 comments on commit 1c65f76

Please sign in to comment.