Código del juego Matlab
% Puntuación de disparo y elaboración de objetivos
Borrar% Borrar variables.
n = 10; % número de anillos
th = (0:360)* pi/180;? %vector de ángulo
¿Estatura? %Crear ventana gráfica
¿Eje? ¿igualdad? % Igualar los intervalos de coordenadas.
¿Mantener? en %keepimage
cc = ' gcmyrbgcmy? % caracteres de color (1)
¿Para qué? I=1:n% período multiplicado por el número de anillos (2)
x = (n+1-I)* cos(th);? %abscisa
y =(n+1-I)* pecado(th);? %ordenada
Relleno(x, y, cc(i))% relleno de color (3)
End% finaliza el ciclo.
s = 0;? ¿Porcentaje de puntuación total borrada
ht1=text(-n,n-1,'','FontSize',16);? %Obtener el identificador de texto (4)
ht2=text(-n,-n+1,'','FontSize',16 %Obtener el identificador de texto (4)
¿para qué? I=1:n% número de ciclos.
[x, y]= ginput(1);? %Obtener coordenadas (5)
plot(x, y, 'k.', 'MarkerSize', 20)? %Dibujar un punto
Set(ht1,' String ', [' times:', num2str(i)])% Establecer el número de veces de la cadena (6)
r=sqrt (x^2+y^2);? %Encuentre la distancia de la diana del punto de tiro
m = n-piso (r); porcentaje de puntuación (7)
¿Y si? m & gt0? % si la puntuación es mayor que cero (8)
Text (x, y, num2str (m), ' fontsize ', 16) % muestra la puntuación (9).
s = s+m;? Porcentaje de puntuación acumulada
Set(ht2,' String ', [' puntuación total:', num 2 str(s)]% Establece la cadena de puntuación total (10).
Fin %End condition
End% finaliza el ciclo