TeaM KingS
[center]Ola Convidado, seja bem vindo ao TeaM KingS !

Nós temos tutoriais sobre o WarCraft World Editor: se você tiver alguma duvida pode perguntar que os moderadores ou membros experientes vão lhe ajudar.

Para melhor utilizar nossos recursos é extremamente recomendado que esteja logado em nosso fórum e que leia o nosso regulamento oficial.

Também temos fóruns sobre DotA AllstarS, com guias, estratégias, e muito mais!



(Off) Exercício de pascal

Página 1 de 2 1, 2  Seguinte

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

(Off) Exercício de pascal

Mensagem por Iky em 2012-05-07, 17:13

Sei que tem algos que mechem com programação (bills) e resolvi colocar aqui um exercicio de pascal, é um prototipo de criptografador, bem, perdi muito tempo fazendo entao vou divulgar XD
comentem por favor
download



Iky

Número de Posts : 2065
Data de inscrição : 06/04/2010
Reputação : 99 Pontos : 16924

Warning Necropost
10 / 10010 / 100


http://icaro.glauco

Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Bills em 2012-05-07, 20:17

Não sei pascal kkkkk Mas agora que você falou de criptografador, esse dias aprendi a fazer um compactador de arquivo, acho que são parecidos.

@edit

Pascal é interpretada? Como compilo pelo cmd?


Recomendo
Por que um jogo é bom? | Aprenda MUI | Mostre-se para nós!


Bills

Número de Posts : 1446
Data de inscrição : 04/12/2010
Reputação : 173 Pontos : 17549

Warning Necropost
35 / 10035 / 100


Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Iky em 2012-05-07, 21:39

compactador é? boa ideia, realmente é semelhante a idéia, o ruim é nao haver manipulação fácil de hashs, tanto que eu fiz com uma tablea de arrays XD

é copilada, coloquei apenas o codigo, para copilar tem que ter uma IDE, eu usei para escrever este codigo o pascalzim, um dos piores para avançados mas um dos melhores para iniciante, recomendo vc baixar ele pra copilar este codigo pq em pascal cada IDE tem umas particularidades e para nao dar erro, usar este .

sobre o programa, to fazendo, este é a primeira vez que saio tudo certinho, entao nao isculhambe a noobeza XD

EDIT:
algumas limitações que eu nao coloquei na descrição (idiotice):
limite de mensagem para criptografação de 3 linhas do console
key nao pode ultrapassar 1000
verficação de key para descriptografação ainda não implementado (sem tempo, fiz tudo num dia so, cabeça ainda doi)



Iky

Número de Posts : 2065
Data de inscrição : 06/04/2010
Reputação : 99 Pontos : 16924

Warning Necropost
10 / 10010 / 100


http://icaro.glauco

Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Bills em 2012-05-07, 22:50

Érrr... como usa seu programinha? Compilei, apertei 0, escolhi uma senha e depois escrevi algo e nunca mais descriptografei.


Recomendo
Por que um jogo é bom? | Aprenda MUI | Mostre-se para nós!


Bills

Número de Posts : 1446
Data de inscrição : 04/12/2010
Reputação : 173 Pontos : 17549

Warning Necropost
35 / 10035 / 100


Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Iky em 2012-05-08, 01:38

é, nao coloquei instruções, ele cria uma arquivo chamado descript.txt no local do pascalzim, se nao criou o anti-virus interrompeu o programa
neste arquivo ele coloca a criptografação
pra descriptografar
no menu escolha 1
e ele ira mostrar o texto, mensagens de ate 3 linhas n esqueça, essa é a 1versao e posteriomente tera mais coisas, ^^'



Iky

Número de Posts : 2065
Data de inscrição : 06/04/2010
Reputação : 99 Pontos : 16924

Warning Necropost
10 / 10010 / 100


http://icaro.glauco

Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Bills em 2012-05-08, 09:41

Está acontecendo o seguinte:

- digito "0"
- Ai digito "1" para não gerar uma senha
- E quando vou digitar o texto, volta pra o menu inicial (0,1,2).

quando escolho "0" para definir senha, eu escolho a senha, mas não consigo digitar o texto.

PS: o arquivo .txt não é gerado.

Esse programa foi desenvolvido em ambiente windows?


Recomendo
Por que um jogo é bom? | Aprenda MUI | Mostre-se para nós!


Bills

Número de Posts : 1446
Data de inscrição : 04/12/2010
Reputação : 173 Pontos : 17549

Warning Necropost
35 / 10035 / 100


Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Iky em 2012-05-08, 10:59

sim, é seu antivirus, ta parando o programa, normal ¬¬
mas se contente em estudar o código, farei uma versao melhor em pouco tempo



Iky

Número de Posts : 2065
Data de inscrição : 06/04/2010
Reputação : 99 Pontos : 16924

Warning Necropost
10 / 10010 / 100


http://icaro.glauco

Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Bills em 2012-05-08, 11:13

Achei pascal muito pouca intuitiva. Pascal não é linguagem orientada né? Acredito que toda linguagem possui uma vantagem, qual seria a vantagem de pascal?


Recomendo
Por que um jogo é bom? | Aprenda MUI | Mostre-se para nós!


Bills

Número de Posts : 1446
Data de inscrição : 04/12/2010
Reputação : 173 Pontos : 17549

Warning Necropost
35 / 10035 / 100


Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Iky em 2012-05-08, 11:35

pascal meche diretamente com binario e tem muitas funções como em c++
pascal mesmo nao é orientada, mas tem delphi, que é pascal orientado a objeto



Iky

Número de Posts : 2065
Data de inscrição : 06/04/2010
Reputação : 99 Pontos : 16924

Warning Necropost
10 / 10010 / 100


http://icaro.glauco

Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Bills em 2012-05-08, 11:51

Iky escreveu:pascal meche diretamente com binario e tem muitas funções como em c++
pascal mesmo nao é orientada, mas tem delphi, que é pascal orientado a objeto

Andei lendo um pouco sobre pascal. Vi que inicialmente era usado para aprendizado, mas que depois começou a ganhar fama. Nada contra pascal, mas ainda prefiro meu C e meu Java. Ah que se foda!


Recomendo
Por que um jogo é bom? | Aprenda MUI | Mostre-se para nós!


Bills

Número de Posts : 1446
Data de inscrição : 04/12/2010
Reputação : 173 Pontos : 17549

Warning Necropost
35 / 10035 / 100


Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Iky em 2012-05-08, 11:58

C => cool
Java => cool, but para fazer um code rodar sem erro ou bug HeckNo



Iky

Número de Posts : 2065
Data de inscrição : 06/04/2010
Reputação : 99 Pontos : 16924

Warning Necropost
10 / 10010 / 100


http://icaro.glauco

Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Bills em 2012-05-08, 12:44

Adoro java, além de não depender de plataforma, possui uma documentação enorme. E C a linguagem que mais odeie, hoje é minha preferida para tudo. Estou até trabalhando em um précompilador de jass em C.


Recomendo
Por que um jogo é bom? | Aprenda MUI | Mostre-se para nós!


Bills

Número de Posts : 1446
Data de inscrição : 04/12/2010
Reputação : 173 Pontos : 17549

Warning Necropost
35 / 10035 / 100


Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Iky em 2012-05-08, 15:40

precopilador é? vc pode passar o code? me interesso XD
EDIT:
esqueci de falar, assim como c, pascal tb usa ponteiros ^^



Iky

Número de Posts : 2065
Data de inscrição : 06/04/2010
Reputação : 99 Pontos : 16924

Warning Necropost
10 / 10010 / 100


http://icaro.glauco

Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Bills em 2012-05-08, 16:45

Iky escreveu:precopilador é? vc pode passar o code? me interesso XD
EDIT:
esqueci de falar, assim como c, pascal tb usa ponteiros ^^

Ainda ta bem no inicio, estou precisando aprender mais sobre expressões regulares. Mas se vc gostar de interprestadores, no livro "C Completo e Total" ensina a fazer um com C no final do livro. Mas fique tranquilho, que quando ele estiver pronto será código aberto. =) Amo open source XD


Recomendo
Por que um jogo é bom? | Aprenda MUI | Mostre-se para nós!


Bills

Número de Posts : 1446
Data de inscrição : 04/12/2010
Reputação : 173 Pontos : 17549

Warning Necropost
35 / 10035 / 100


Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Iky em 2012-05-08, 19:42

ja vi um exemplo de interpretador em c, alias, esse exemplo me inspirou a fazer o criptografador (cheio de bugs e erros XDDD ), mas resolvi fazer em pascal para ganhar um estagio no colégio (o controlador do estagio é professor de programação do 3 e 4 ano )
Amo open source XD ²



Iky

Número de Posts : 2065
Data de inscrição : 06/04/2010
Reputação : 99 Pontos : 16924

Warning Necropost
10 / 10010 / 100


http://icaro.glauco

Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Iky em 2012-05-08, 22:45

fiz uma nova versao aqui
fala o que acha



Iky

Número de Posts : 2065
Data de inscrição : 06/04/2010
Reputação : 99 Pontos : 16924

Warning Necropost
10 / 10010 / 100


http://icaro.glauco

Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Bills em 2012-05-09, 00:33

Agora ficou show =) Funcionou legal aqui


Recomendo
Por que um jogo é bom? | Aprenda MUI | Mostre-se para nós!


Bills

Número de Posts : 1446
Data de inscrição : 04/12/2010
Reputação : 173 Pontos : 17549

Warning Necropost
35 / 10035 / 100


Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Iky em 2012-05-09, 12:09

se vc gostou do jeito que tava, veja a versao em GUI
download
o code ta junto



Iky

Número de Posts : 2065
Data de inscrição : 06/04/2010
Reputação : 99 Pontos : 16924

Warning Necropost
10 / 10010 / 100


http://icaro.glauco

Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Bills em 2012-05-09, 12:47

reparei que há problema com textos acentuados e também reparei que essa nova versão ficou enorme comparada com a outra '-'


Recomendo
Por que um jogo é bom? | Aprenda MUI | Mostre-se para nós!


Bills

Número de Posts : 1446
Data de inscrição : 04/12/2010
Reputação : 173 Pontos : 17549

Warning Necropost
35 / 10035 / 100


Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Iky em 2012-05-09, 13:30

é verdade, esse problema existe, e estou procurando resolve-lo, e quanto o tamanha, nao posso fazer nada em especial, a nao ser, formas mais simples de montar o alfabeto (provável). mas em relação o tamanho.. so posso fazer isso (acho)
eu notei uma coisa interessante, gui em pascal é tao simples quanto em java *--*'



Iky

Número de Posts : 2065
Data de inscrição : 06/04/2010
Reputação : 99 Pontos : 16924

Warning Necropost
10 / 10010 / 100


http://icaro.glauco

Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Bills em 2012-05-09, 17:33

Bom sobre o alfabeto, no meu compressor eu fazia em um txt separado.


Recomendo
Por que um jogo é bom? | Aprenda MUI | Mostre-se para nós!


Bills

Número de Posts : 1446
Data de inscrição : 04/12/2010
Reputação : 173 Pontos : 17549

Warning Necropost
35 / 10035 / 100


Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Iky em 2012-05-09, 17:39

já consertei o erro,sobre o alfabeto em um outro arquivo, o que acontece é que gera o alfabeto na hora
o link é o msm
EDIT:
olha so uma comparação q eu achei na net
Spoiler:

Código:

#include <stdio.h>
#include <file.h>
main( )
{
      char c;
      int fd;
      char filename[20];
      printf ("De nome do arquivo: ")
      gets(filename);
      fd = fopen(filename, o_RDONLY);
      while(read(fd, &c, 1) != 0)
          write(STDOUT, &c, 1);
      close(fd);
}

é o mesmo de

program list;
var
    c: char;
    infile: file of char;
    filename: packed array[1..20] of char;

begin
  write('De o nome do arquivo: ');
  readln(filename);
  reset(infile, filename);
  while not(eof(infile)) do
    begin
          read(infile, c);
          write(c)
    end;
  close(infile)
end.
EDIT2:
o meu programa passou de pascal para dephi (pascal oop)



Iky

Número de Posts : 2065
Data de inscrição : 06/04/2010
Reputação : 99 Pontos : 16924

Warning Necropost
10 / 10010 / 100


http://icaro.glauco

Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por tm5con em 2012-05-15, 03:37

Iky, usa o turbo pascal, o pascalzim esconde algumas funções do pascal, já o turbo oferece todas as funções do pascal, só que sua interface é mais complexa (Para min).


Não subestime aquele(a) que ainda não mostrou toda sua força.
Não aponte erros nem julgue-os, faça com que eles simplesmente não existam.
Foi com erros que aprendi a acertar.
Foi tentando que descobrir a "chance oculta".
Mesmo que sua chance for a minima possível tente, pois aquilo ainda é uma chance e os números surpreende quando você menos espera.
O exato sucesso foi criado pelo o exato erro.
Admiro aquela pessoa que usa uma linguagem formal para se comunicar com qualquer classe.
Não se inspire em uma pessoa que você gosta muito, seja melhor.
Não tente ser o melhor, em qualquer ocasião, só seja você mesmo.
Não pense assim "Sou o melhor" todo tempo, pois de onde você menos espera pode ter alguém melhor que você.

Ta afim de saber todas as informações recentes sobre o jogo twisted metal small brawl 5 city of newerth?Então, acesse o blog http://www.tm5con-war3.blogspot.com.br/

tm5con

Número de Posts : 113
Data de inscrição : 21/04/2012
Reputação : 19 Pontos : 7840

Warning Necropost
0 / 1000 / 100


http://www.tm5con-war3.blogspot.com.br

Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Iky em 2012-05-15, 03:40

ja mudei para o lazarus faz um tempo, o pascalzim era pra treinar funções basicas, mas essa fase ja foi...
tm, se interessa por programação? opna tb no meu ultimo post XD



Iky

Número de Posts : 2065
Data de inscrição : 06/04/2010
Reputação : 99 Pontos : 16924

Warning Necropost
10 / 10010 / 100


http://icaro.glauco

Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por tm5con em 2012-05-15, 03:51

Claro, que me interesso, tenho que aprender assembly para fazer um programa aqui.'-' To baixando ainda aqui o teu prog. net ta baixando a 3 kpbs '-'


Não subestime aquele(a) que ainda não mostrou toda sua força.
Não aponte erros nem julgue-os, faça com que eles simplesmente não existam.
Foi com erros que aprendi a acertar.
Foi tentando que descobrir a "chance oculta".
Mesmo que sua chance for a minima possível tente, pois aquilo ainda é uma chance e os números surpreende quando você menos espera.
O exato sucesso foi criado pelo o exato erro.
Admiro aquela pessoa que usa uma linguagem formal para se comunicar com qualquer classe.
Não se inspire em uma pessoa que você gosta muito, seja melhor.
Não tente ser o melhor, em qualquer ocasião, só seja você mesmo.
Não pense assim "Sou o melhor" todo tempo, pois de onde você menos espera pode ter alguém melhor que você.

Ta afim de saber todas as informações recentes sobre o jogo twisted metal small brawl 5 city of newerth?Então, acesse o blog http://www.tm5con-war3.blogspot.com.br/

tm5con

Número de Posts : 113
Data de inscrição : 21/04/2012
Reputação : 19 Pontos : 7840

Warning Necropost
0 / 1000 / 100


http://www.tm5con-war3.blogspot.com.br

Voltar ao Topo Ir em baixo

Re: (Off) Exercício de pascal

Mensagem por Conteúdo patrocinado Hoje à(s) 10:29


Conteúdo patrocinado


Voltar ao Topo Ir em baixo

Página 1 de 2 1, 2  Seguinte

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo


 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum