[TI-83|BASIC] ERR:MEMORY

[KnEuTeR]

ik heb nooit wat te doen in de les dus ga ik af en toe maar wat klooien met me TI-83, (grafische rekenmachine) spelletjes spelen enzo...

maar nu ben ik dus bezig zelf een "spelletje" te maken, ik heb het al voor elkaar dat ik een paar pixels heb die ik kan laten bewegen over me scherm met mijn cursors, maar als het programma 10 seconden draait dan krijg ik een ERR:MEMORY... volgens mij is de lus niet zo goed ofzo, hoe zou ik dit kunnen oplossen?

hier eens stukje van de code:

code:

ClrDraw
AxesOff
1->X
1->Y
Goto A

Lbl A
GetKey -> K

If K=24
Then
X-1 -> X
Goto B

Else
If K=25
Then
Y-1 -> Y
Goto B

Else
IF K=26
Then
X+1 -> X
Goto B

Else
IF K=34
Then
Y+1 -> Y
End

Goto A

Lbl B
Pxl-On(X,Y)
Pxl-On(X+1,Y)
Pxl-On(X,Y+1)
Pxl-On(X+1,Y+1)
Goto A

[Marcj]

Hoeveel geheugen heb je nog vrij dan?? Vooral dat tekenen vindt de GR niet echt lekker

[KnEuTeR]

Op woensdag 27 maart 2002 17:56 schreef Marcj het volgende:
Hoeveel geheugen heb je nog vrij dan?? Vooral dat tekenen vindt de GR niet echt lekker

gewoon nog 10 kB ofzo (van de 24kB), maar ik denk dat het aan het programma ligt, want spelletjes enzo werken ook gewoon hoor...

[Limhes]

je programma moet gewoon werken (in principe), maar wat hierboven ook al gezegd werd, het geteken kost de TI83 veel kracht en geheugen...
volgens mij maar één oplossing: z80 assembly

[Marcj]

Volgens mij mis ik een paar end's. Maar ik kan het nu ff niet testen. Want het is:

If
Then
Else
End

of anders:

If
Then
Else
If
Then
End
End

Ik zou persoonlijk gewoon de else weg halen en dan helemaal aan het eind in zetten goto A

edit:

code:

ClrDraw
AxesOff
1->X
1->Y

Lbl A
GetKey -> K

if K=24
then 
x-1 -> x
goto b
end

(enz..)

goto a

lbl b
(teken)
goto a

[eamelink]

Ja, je zou na alle "Goto B"'s een END moeten zetten.

[KnEuTeR]

Op woensdag 27 maart 2002 18:15 schreef eamelink het volgende:
Ja, je zou na alle "Goto B"'s een END moeten zetten.

heb ik gedaan en alle ELSE heb ik weggehaald, nu crashed ie niet meer tnx

[KnEuTeR]

weeten jullie nog leuke tutirol sites over games/proggies bouwen met TI-83 enzo?

[KnEuTeR]

Op woensdag 27 maart 2002 18:19 schreef KnEuTeR het volgende:

[..]

heb ik gedaan en alle ELSE heb ik weggehaald, nu crashed ie niet meer tnx

damn, hij crashed nog WEL, maar dan na 2 minuten ofzo

gare shit man wat kan het dan nog zijn?

[StratoFarmer]

het -isniet- teken heb ik hier niet,
dus gebruik ik <>

code:

ClrDraw
AxesOff
1->X
1->Y
0->K

While K <> 105

0 -> K
While K = 0
GetKey -> K
End

If K=24:X-1 -> X
If K=25:Y-1 -> Y
If K=26:X+1 -> X
IF K=34:Y+1 -> Y

Pxl-On(X,Y)
Pxl-On(X+1,Y)
Pxl-On(X,Y+1)
Pxl-On(X+1,Y+1)

End

Disp "The End"

Zo zou ik het doen

[StratoFarmer]

ohja, probeer gewoon zo min mogelijk goto statements te gebruiken...anders raak je heulemoal in de war!

[supersook]

Ik heb ooit hetzelfde probleem gehad. Het probleem is als je met goto's en labels werkt is dat dat constant geheugen vreet, en ook steeds meer > gewoon een giant memmory leak. Je kunt idd beter in Z80 ASM gaan schrijven, maar dan moet je wel iets meer sjoege hebben van proggen. Een tussen oplossing is om een zootje variabelen te maken waarmee je de boel aanstuurd, en dan met if constructies kijken of iets moet gebeuren of niet. Een nadeel hieraan is dat je op een gegeven moment, bij een wat groter programma, snelheidsproblemen krijgt, omdat hij de hele lijst afwerkt waar er maar 1 if functie wat moet doen.

[StratoFarmer]

Bij grotere programma's gebruik ik altijd hulpprogramma's die eigenlijk functioneren als losse procedures (subs).

Maakt het veel overzichtelijker en efficient.

(je kunt dan eventueel later nog de referenties naar zo'n sub vervangen door de echte code met het knopje "RCL")

[Skinkie]

Doe is clear all entry's wil ook nog wel is een hoop geheugen vrij maken. (das wat je de laatste keren hebt ingerampt)

[froggie]

Op woensdag 27 maart 2002 18:20 schreef KnEuTeR het volgende:
weeten jullie nog leuke tutirol sites over games/proggies bouwen met TI-83 enzo?

Kijk eens op TIcalc.org daar hebben ze een aantal goede docs over assembly, is een aantal keer sneller dan BASIC wat bij spelletjes wel zo belangrijk is.

[NetForce1]

Een leuke site is ook wel: hyperbyte