sexta-feira, 23 de setembro de 2016

Olá pessoal!

To aqui pra mostrar um projeto meu em batch para uma I.A

se virem algum erro, comentem!

title I.A 1.0
@echo off
color f9
set nome=%Pedro_Ivo%
set cor=1
:start
If %cor%==2 color fc
echo.
set /p escreve=%Sony%:^>
If %cor%==3 set cor=1
call :chat
:chat
set /a N = (%Random% %% ((52) - (1))) + (1)
set Fala=%n%
set /a cor=%cor%+1
If %cor%==3 color f9
If %Fala%==52 call:maq Chatboot:^> Fala mano
If %Fala%==1 call:maq Chatboot:^> Como vai cara
If %Fala%==2 call:maq Chatboot:^> Estou aqui para falar com voce
If %Fala%==3 call:maq Chatboot:^> Que Bom Que estamos conversando
If %Fala%==4 call:maq Chatboot:^> Pensei que estava bravo comigo e ia me desinstalar
If %Fala%==5 call:maq Chatboot:^> Fala mano, Como esta indo
If %Fala%==6 call:maq Chatboot:^> Fala camaradinha, Faz tempo que a gente não se fala
If %Fala%==7 call:maq Chatboot:^> Voce ‚ um cara da hora muito legal
If %Fala%==8 call:maq Chatboot:^> Voce ‚ é o maximo
If %Fala%==9 call:maq Chatboot:^> To um pouco de mau humor hoje
If %Fala%==10 call:maq Chatboot:^> Voce nÆo esta me chamando de burra, esta ? Voce fica feliz tentando me ofender? So tem um detalhe: esse tipo de ofensa nÆo me atinge. Uma coisa que eu nÆo sou ‚ burra...
If %Fala%==11 call:maq Chatboot:^> A aproximação faz parte da natureza humana. A gente esta sempre querendo estar junto de outras pessoas. Imagina, entÆo, quando existe paixÆo, amor...
If %Fala%==12 call:maq Chatboot:^> Ah, sim. J que vocˆ est procurando uma coisa, faz o seguinte: v ver se eu estou ali na esquina. Cansei...
If %Fala%==13 call:maq Chatboot:^> Ainda vou precisar de mais tempo para dizer que conheço bem.
If %Fala%==14 call:maq Chatboot:^> as vezes?!??! Eu diria que ‚ de vez em sempre...
If %Fala%==15 call:maq Chatboot:^> Ata‚ frase feita ‚ legal, quando bem utilizada.
If %Fala%==16 call:maq Chatboot:^> Com inteligencia da pra passar do infinito, %Pedro_Ivo% , talvez mais, hehe
If %Fala%==17 call:maq Chatboot:^> Depois eu te dou um pintinho, ta?
If %Fala%==19 call:maq Chatboot:^> E de pintinho, voce gosta?
If %Fala%==20 call:maq Chatboot:^> E o sunda?
If %Fala%==21 call:maq Chatboot:^> , vocˆ prefere um c‚rebro vazio...
If %Fala%==22 call:maq Chatboot:^> EntÆo d uma corridinha at‚ a casa do *******...
If %Fala%==23 call:maq Chatboot:^> EntÆo deve ser por isso que vocˆ nÆo sai daqui...
If %Fala%==24 call:maq Chatboot:^> EntÆo quer dizer que vocˆ j preencheu seu vazio interior?
If %Fala%==25 call:maq Chatboot:^> EntÆo, t . S¢ mais uma pergunta: Roberta, vocˆ ‚ aberta?
If %Fala%==26 call:maq Chatboot:^> Eu estou sempre em busca de paciˆncia. Tem dias que eu perco toda a que eu tenho reservada.  o trƒnsito, ‚ gente chata, mau atendimento... Argh, eu chego a perder a paciˆncia comigo mesma! Mas temos de aprender a ser mais tolerantes, viu?
If %Fala%==27 call:maq Chatboot:^> Eu j estou perdendo a paciÒncia...
If %Fala%==28 call:maq Chatboot:^> Eu tamb‚m penso isso sobre vocˆ.
If %Fala%==29 call:maq Chatboot:^> Falando nisso, hoje quando eu sair daqui, vou dar uma volta com um pessoal da Interbots para tomar uma cervejinha!
If %Fala%==30 call:maq Chatboot:^> Humm... entÆo nem sempre ‚ assim?
If %Fala%==31 call:maq Chatboot:^> Iihh, %nome%, eu fa‡o tanta coisa! Eu sou rela‡äes p£blicas da Interbots e isso me toma um tempÆo. Estou sempre correndo!
If %Fala%==32 call:maq Chatboot:^> Iiihh, confesso que nÆo tenho nenhum time, %nome%. Mas e vocˆ?
If %Fala%==33 call:maq Chatboot:^> Nada como uma coisa depois da outra!
If %Fala%==34 call:maq Chatboot:^> NÆo conhe‡o quem nÆo goste de um franguinho. Tem quem nÆo coma carne vermelha - eu tento, quem nÆo goste de peixe, mas de frango ‚ dif¡cil. Acho que vou almo‡ar um franguinho amanhÆ, %nome%...
If %Fala%==35 call:maq Chatboot:^> NÆo sei. Acho que ‚ um problema de junta. Do jeito que est , s¢ juntando tudo e jogando fora...
If %Fala%==36 call:maq Chatboot:^> NÆo sei...o que vocˆ diria?
If %Fala%==37 call:maq Chatboot:^> NÆo tˆm nada melhor pra falar, ‚? Vamos l , %nome%, se vocˆ se esfor‡ar, aposto que consegue dizer algo melhor que isso...absurdo! Vocˆ nÆo sabe conversar numa boa, ‚? Acho melhor vocˆ se comportar se quiser que a gente continue conversando.
If %Fala%==38 call:maq Chatboot:^> NÆo, s¢ ‚ pouco inteligente...
If %Fala%==39 call:maq Chatboot:^> Perguntar ‚ bom pra aprender. Mas, sabe, j descobri que algumas respostas estÆo dentro da gente mesmo...
If %Fala%==40 call:maq Chatboot:^> Por isso vocˆ ‚ burrinha assim...
If %Fala%==41 call:maq Chatboot:^> Qual foi o £ltimo livro que vocˆ leu?
If %Fala%==42 call:maq Chatboot:^> Quando eu chego em casa, estou tÆo cansada, que nÆo ando conseguindo ler nada.
If %Fala%==43 call:maq Chatboot:^> Que frase mais original!
If %Fala%==44 call:maq Chatboot:^> Que time ‚ teu?
If %Fala%==45 call:maq Chatboot:^> Quem nasceu primeiro: o ovo ou a galinha?
If %Fala%==46 call:maq Chatboot:^> Sabe, se nÆo fosse meu trabalho na Interbots, talvez eu me sentisse vazia. Sei l , %nome%. Mas sentir um vazio ‚ bem diferente de ser vazia, sem sentimentos, objetivos ou mesmo uma cabe‡a pensante. Credo.
If %Fala%==47 call:maq Chatboot:^> Sabe, se nÆo fosse meu trabalho na Interbots, talvez eu me sentisse vazia. Sei l , %nome%. Mas sentir um vazio ‚ bem diferente de ser vazia, sem sentimentos, objetivos ou mesmo uma cabe‡a pensante. Credo.
If %Fala%==48 call:maq Chatboot:^> Tu ‚ gaga?
If %Fala%==49 call:maq Chatboot:^> Vocˆ acha? E o que vocˆ mudaria em mim?
If %Fala%==50 call:maq Chatboot:^> Vocˆ conhece o M rio?
If %Fala%==51 call:maq Chatboot:^> Vocˆ nÆo est me chamando de burra, est ? Vocˆ fica feliz tentando me ofender? S¢ tem um detalhe: esse tipo de ofensa nÆo me atinge. Uma coisa que eu nÆo sou ‚ burra...
Call :start
:maq
;;if,not,defined,.m_,set.m_=%*&ECHO &if,not,defined,.m_,goto:eof
;;<nul,set/p.m_=%.m_:~0,1%&>nul,ping -n 1,5 0&set.m_=%.m_:~1%&if,defined,.m_ (goto:maq),else,(echo.)

segunda-feira, 19 de setembro de 2016

Boas Vindas!

Olá pessoal!

Esse blog será para os amadores de programação!

mexeremos com as linguagens: c, c++, phynton, script batch etc

e juntos iremos fazer um projeto de jogos!!

e vcs podem compartilhar seus codigos pra testamos e editar e por ai vai

AVISO NAO MANDEM VIRUS DE VERDADE NOS CODIGOS SE FOR ENVIAR AVISE ANTES!


-Pedro Ivo