Overgang van een lichtkrant naar een creatieve tekening

ik heb een lichtkrant gemaakt en daar onder de coördinaten van een tekening gezet maar het lukt me niet om de lichtkrant te laten stoppen en verder de tekening te laten zien.

:" "→Str0
:"OPDRACHT 7 : de LAATSTE OPDRACHT."→Str1
:"JA !HET IS ECHT WAAR,IK BEN KLAAR."→Str2
:"KLIK OP ENTER VOOR HET VOLGENDE JAAR!"→Str3
:Str0+Str1+Str0+Str2+Str0+Str3+Str0→Str4
:ClrHome
:Output(1,1,"***************** *****************")
:1→P
:Lbl 1
:If P+14length(Str4)
:1→P
:Output(2,2,sub(Str4,P,14))
:P+1→P
:For(A,0,100)
:End
:Goto 1
:STOP
:ClrHome
:ClrDraw
:PlotsOff
:Pxl-On (coördinaten)

Ik vermoed dat het iets te maken heeft met die GOTO Ik vermoed dat er iets te kort in staat want ook Stop werkte niet.
Kunnen jullie mij helpen a.u.b

Jordy
3de graad ASO - vrijdag 30 december 2011

Antwoord

Het is een rommeltje, vind ik.

For(A,0,100)
End

Dat is dan klaar? Als je daarna met GOTO naar LBL springt dan kom je daarna weer bij For(A,0,100) aan... enz... die zien we nooit meer terug.

Dat is slordig! Je kunt wel naar een subroutine springen met GOTO maar dan moet je daarna wel weer terug springen naar waar je vandaan kwam. Dit is echt vragen om moeilijkheden!

zaterdag 31 december 2011

©2001-2024 WisFaq