Scala
Faz parecido com Java, mas utiliza tecnicas multi-thread, começa processos para construir uma arma, matar o dragao, salvar a princesa, pegar a faca, e arrancar a cabeça do dragão. Mas como tudo aconteceu simultaneamente ele matou a princesa com a faca salvou o dragão e atirou na própria cabeça.
[quote=Marky.Vasconcelos]Melhorei a de Scala
Scala
Faz parecido com Java, mas utiliza tecnicas multi-thread, começa processos para construir uma arma, matar o dragao, salvar a princesa, pegar a faca, e arrancar a cabeça do dragão. Mas como tudo aconteceu simultaneamente ele matou a princesa com a faca salvou o dragão e atirou na própria cabeça. [/quote]
Chega se gabando que consegue matar o dragão 10 vezes mais rápido e das 888 novidades da nova versão da IDE.
Porém na hora H, descobre que as rotinas que ele necessita para matar o dragão ou estão com bugs ou não estão disponíveis para o
seu sistema operacional. Resultado: ele se rende ao dragão, senta e chora ao saber que terá que esperar até a próxima versão
da IDE e torcer para que as rotinas que ele necessita para matar o dragão estejam corrigidas entre as outras 888
novidades da nova versão.
10 ON ERROR RESUME NEXT
15 SCREEN 0, 0, 0
20 DEFINT A-Z
30 GOTO 120
80 GOSUB 530
90 GOTO 100
100 GOTO 260
120 Faz um GOSUB para a espada.
140 PRINCESA% = 1
150 END
260 Faz um GOTO para a linha que lê os dados do dragão do arquivo.
270 PRINT DRAGAO$
280 BEEP
290 X% = 3
300 RETURN
310 Lê as instruções de como matar o dragão usando PUT
320 Separa os campos do dragão com FIELD
327 IF I% > 4 THEN GOTO 140 ELSE GOTO 140
330 GOTO 90
330 Lê as características do dragão com GET
340 GOTO 400
350 Recupera os dados da princesa com GET
360 Salva a princesa num arquivo
370 GOTO 140
400 Faz um PUT do dragão em um arquivo.
410 FOR I% = 1 TO 10 STEP 1
420 Faz um GOSUB até a princesa
430 Lê a espada do arquivo
435 PRINT ESPADA$
440 NEXT
450 RETURN
460 WHILE X% = 1
470 Faz um READ dos dados da princesa
475 GOSUB 320
480 WEND
490 RETURN
530 Coloca o dragão na variável DRAGAO$.
540 Pede para o dragão lhe dizer o nome do arquivo usando INPUT e salva em A$.
550 Faz um GOTO para a linha aonde começa a parte de salvar o dragão.
560 GOTO 310
570 Salva a espada em um arquivo com PUT.
580 X% = 8
590-900 Instruções DATA
910 RETURN
No final, após aparecer “REDO FROM START” e na tela e depois “Undefined Line Number”, o dragão come macarrão com molho de programador Basic.
Abre o Microsoft Internet Explorer 9.0 Beta
Pesquisa o dragão no Bing.
Salva a foto do dragão em C:\Users\programadorms\My Documents\My Pictures
Adiciona a princesa no Microsoft MSN Live e lhe manda um e-mail pelo Microsoft Outlook Exchange com um anexo do Microsoft Word 2010 em formato .docx.
Registra a DLL do dragão no registro do Microsoft Windows Seven.
Verifica a autenticidade do dragão usando o Microsoft Windows Genuine Advantage.
Carrega a espada do system32.
Este programa executou uma operação ilegal e será fechado. Se o problema persistir entre em contato com a Microsoft. [Enviar relatório de erros]
Erro fatal 0E no VxD(01):0x504efa21. O sistema tornou-se instável. O aplicativo em uso será encerrado. Pressione Ctrl+Alt+Del novamente. Você perderá todos os dados não salvos de todas as aplicações. Pressione qualquer tecla para continuar.
Abre o Microsoft Internet Explorer 9.0 Beta
Pesquisa o dragão no Bing.
Salva a foto do dragão em C:\Users\programadorms\My Documents\My Pictures
Adiciona a princesa no Microsoft MSN Live e lhe manda um e-mail pelo Microsoft Outlook Exchange com um anexo do Microsoft Word 2010 em formato .docx.
Registra a DLL do dragão no registro do Microsoft Windows Seven.
Verifica a autenticidade do dragão usando o Microsoft Windows Genuine Advantage.
Carrega a espada do system32.
Este programa executou uma operação ilegal e será fechado. Se o problema persistir entre em contato com a Microsoft. [Enviar relatório de erros]
Erro fatal 0E no VxD(01):0x504efa21. O sistema tornou-se instável. O aplicativo em uso será encerrado. Pressione Ctrl+Alt+Del novamente. Você perderá todos os dados não salvos de todas as aplicações. Pressione qualquer tecla para continuar.[/quote]