Here is the example code:
Graphics 800,600,16
Setbuffer BackBuffer()
Repeat
If KeyHit(57) Then
Repeat
For x = 1 To 10
Color 128,x*10,128
Rect 25,25,400,400,True
Flip True
Cls
Next
Until KeyHit(1)
End If
For x = 1 To 10
Color 128,x*10,128
Rect 25,25,200,200,True
Flip True
Cls
Next
Until False
As long as the IF THEN is not executeded nothing is happening. As soon as the space key is hit and the IF THEN is executeded the swapfile is used and filled up ferry fast. Afther 5 minutes the error come up.
If the escape key is hit the use of the swapfile stays the same. Its not going down. Only if the program is terminated before the swap file is filled up memory is freed up again.
Graphics 800,600,16
Setbuffer BackBuffer()
Repeat
If KeyHit(57) Then
Repeat
For x = 1 To 10
Color 128,x*10,128
Rect 25,25,400,400,True
Flip True
Cls
Next
Until KeyHit(1)
End If
For x = 1 To 10
Color 128,x*10,128
Rect 25,25,200,200,True
Flip True
Cls
Next
Until False
As long as the IF THEN is not executeded nothing is happening. As soon as the space key is hit and the IF THEN is executeded the swapfile is used and filled up ferry fast. Afther 5 minutes the error come up.
If the escape key is hit the use of the swapfile stays the same. Its not going down. Only if the program is terminated before the swap file is filled up memory is freed up again.