sexta-feira, 23 de agosto de 2024

3D Plot

Provavelmente, já viram esta figura geométrica em algum lado...

Hoje à tarde, na publicação sobre o Concurso BASIC Apascalado, o Zé Oliveira tentou convencer-nos que seria necessário ter um curso de engenharia para fazer um programa destes. Essa afirmação até parece verdade porque ele desenhou esta figura geométrica com um programa de 600 linhas. Se não acreditam, podem ver aqui neste blog.

Mas, na pré-história dos microcomputadores, as pessoas tinham que se desenrascar com um curso de programação com apenas seis meses de duração e com um computador sem modo gráfico.

Agora, observem esta imagem:
Se eu vos disser que em 1970 esta imagem podia ser gerada com apenas uma dúzia de linhas, provavelmente não iriam acreditar.

Mas, podem ver para crer: 

50 DEF FN A(Z)=30*EXP (-Z*Z/100)
110 FOR X=-30 TO 30 STEP 1.5
120 LET L=0
130 LET Y1=5*INT (SQR (900-X*X)/5)
140 FOR Y=Y1 TO -Y1 STEP -5
150 LET Z=INT (25+FN A(SQR (X*X+Y*Y))-.7*Y)
160 IF Z<=L THEN GO TO 190
170 LET L=Z
185 PLOT 100+x,Z
190 NEXT Y
210 NEXT X

Clicar aqui. para correr o programa de 1975.
Clicar aqui. para fazer o download do programa de 1975.

Clicar aqui. para correr a versão melhorada de 2024.
Clicar aqui. para fazer o download do programa de 2024.

O utilizador pode controlar a resolução da imagem com um número entre 1 e 100. Para visualizar a imagem completa é necessário introduzir 100.

PS: É aconselhável correr estes programas num emulador e acelerar a velocidade - caso contrário, será necessário esperar muito tempo para ver as imagens.

5 comentários:

  1. THE SPECTRUM [ 22.11.2024] 99.99€

    Hoje, como se nada tivesse acontecido, a publicidade saiu e pode ser reservada. Espero que seja verdade, acho que você estará ciente e nos avise. Obrigado.

    ResponderEliminar
  2. https://www.game.es/DISPOSITIVOS/VARIOS/ELECTRONICA/THE-SPECTRUM-AZPIRI-LIMITED-EDITION/234939

    ResponderEliminar
    Respostas
    1. Já tinha visto, obrigado. :)

      Tenho algumas reservas quanto a anunciar ou dar destaque a produtos que venham do Paul Andrews. Depois da polémica do Vega + e outras nas quais ele esteve envolvido, estou um pouco de pé atrás relativamente a tudo o que vem da parte dele. Mas vou acompanhar.

      Eliminar
  3. Pelo que li, o produto vem da "Retro Games", a mesma do A500mini, C64 mini,...

    ResponderEliminar
    Respostas
    1. sim, que salvo erro tem ligações com o Andrews.

      Eliminar