Cómo reproducir recursos de imágenes en un lenguaje sencillo

.Ventana de ensamblaje ensamblaje 1

.Variable de ensamblaje Imagen, conjunto de bytes, "0"

.Variable de ensamblaje Puntero, entero

.Subrutina __Ventana de inicio_ creada

Imagen = { #Imagen1, #Imagen2, #Imagen3, #Imagen4, #Imagen5 }

Puntero = 1

PictureBox1.DisplayMode = 1

DisplayPicture ()

.Subroutine_Button1_Clicked

Pointer = Puntero - 1

.Si es verdadero (puntero < 1 )

Puntero = Obtener miembros de la matriz (imágenes)

.Si es verdadero, final

Mostrar imágenes ()

.Subroutine_Button2_Clicked

Puntero = Puntero + 1

.Si es verdadero (puntero > buscar miembro de la matriz (imagen))

puntero = 1

.Finalizar si es verdadero

Mostrar imagen ()

La subrutina muestra la imagen

Cuadro de imagen 1.imagen = imagen [puntero]

.