sábado, 28 de diciembre de 2019

Programa 11 - Dibujar un círculo utilizando DRAW - AMSTRAD

En esta nueva entrada os muestro el código para dibujar un círculo pero esta vez utilizando la función DRAW en lugar de la función PLOT.




Código BASIC

10 MODE 1
20 ORIGIN 320,200
30 DEG
40 MOVE 0,190
50 FOR a=0 TO 360 STEP 10
60 DRAW 190*SIN(a),190*COS(a)
70 NEXT

No hay comentarios:

Publicar un comentario