Red de conocimientos turísticos - Información de alquiler - Acerca del problema de llamar a subrutinas desde el asistente de claves

Acerca del problema de llamar a subrutinas desde el asistente de claves

dim N,A

N=0

Rem Texto completo

N=N 1

Si Ngt;5

N=1

EndIf

WaitKey A

Si A=32

Si N=1

Gosub 1

EndIf

Si N=2

Gosub 2

EndIf

Si N= 3

Gosub 3

EndIf

Si N=4

Gosub 4

EndIf <

Si N=5

Gosub 5

EndIf

Ir al texto

EndIf

Escrito al azar, probablemente se vea así