summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorIan C <ianc@noddybox.co.uk>2006-02-06 01:20:00 +0000
committerIan C <ianc@noddybox.co.uk>2006-02-06 01:20:00 +0000
commit74246cf8c80717989476fc0d97da505fe00e1483 (patch)
tree5ec52bcb0f2e2257502e188b999d0858d73039e1
parent77c403ea485552372eaffd6ce65992d94be9a4c8 (diff)
Fixed bug with image buffers (could be from new Blitz 3D)
-rw-r--r--shockwave.bb27
1 files changed, 8 insertions, 19 deletions
diff --git a/shockwave.bb b/shockwave.bb
index c01fc2e..6ce26c7 100644
--- a/shockwave.bb
+++ b/shockwave.bb
@@ -18,7 +18,7 @@
;
; -------------------------------------------------------------------------
;
-; $Id: shockwave.bb,v 1.11 2005-05-08 23:44:30 ianc Exp $
+; $Id: shockwave.bb,v 1.12 2006-02-06 01:20:00 ianc Exp $
;
Include "gfx/font.bb"
@@ -541,6 +541,7 @@ Repeat
EndIf
ProcessQSounds()
+ ;Info()
Flip
WaitTimer(timer)
@@ -680,8 +681,8 @@ End Function
Function Info()
Color 255,255,255
- Text 0,0,"M:"+MeshWidth(ship)+","+MeshHeight(ship)+","+MeshDepth(ship)
- Text 0,10,"S:"+MeshWidth(sw\id)+","+MeshHeight(sw\id)+","+MeshDepth(sw\id)
+ Text 0,100,"M:"+MeshWidth(ship)+","+MeshHeight(ship)+","+MeshDepth(ship)
+ Text 0,110,"S:"+MeshWidth(sw\id)+","+MeshHeight(sw\id)+","+MeshDepth(sw\id)
End Function
Function AddScore(s)
@@ -1377,9 +1378,8 @@ End Function
Function CreateVectex()
s=256
t=CreateTexture(s,s,1+4+8+256)
- i=CreateImage(s,s)
b=BackBuffer()
- SetBuffer ImageBuffer(i)
+ SetBuffer TextureBuffer(t)
Color 128,128,128
Rect 0,0,s,s,True
For f=0 To 128
@@ -1387,8 +1387,6 @@ Function CreateVectex()
Rect f,f,s-f*2,s-f*2,False
Next
SetBuffer b
- CopyRect 0,0,s,s,0,0,ImageBuffer(i),TextureBuffer(t)
- FreeImage i
Return t
End Function
@@ -1438,9 +1436,8 @@ End Function
Function CreateAsttex()
s=256
t=CreateTexture(s,s,1+4+8+256)
- i=CreateImage(s,s)
b=BackBuffer()
- SetBuffer ImageBuffer(i)
+ SetBuffer TextureBuffer(t)
Color 0,0,128
Rect 0,0,s,s,True
Color 64,64,255
@@ -1449,8 +1446,6 @@ Function CreateAsttex()
Rect 0,f,256,4,True
Next
SetBuffer b
- CopyRect 0,0,s,s,0,0,ImageBuffer(i),TextureBuffer(t)
- FreeImage i
Return t
End Function
@@ -1468,9 +1463,8 @@ End Function
Function CreatePowertex()
s=256
t=CreateTexture(s,s,1+4+8+256)
- i=CreateImage(s,s)
b=BackBuffer()
- SetBuffer ImageBuffer(i)
+ SetBuffer TextureBuffer(t)
Color 128,128,0
Rect 0,0,s,s,True
Color 255,255,0
@@ -1479,8 +1473,6 @@ Function CreatePowertex()
Rect 0,f,256,4,True
Next
SetBuffer b
- CopyRect 0,0,s,s,0,0,ImageBuffer(i),TextureBuffer(t)
- FreeImage i
Return t
End Function
@@ -1562,9 +1554,8 @@ End Function
Function CreateMaptex()
s=256
t=CreateTexture(s,s,1+4+8+256)
- i=CreateImage(s,s)
b=BackBuffer()
- SetBuffer ImageBuffer(i)
+ SetBuffer TextureBuffer(t)
Color 0,0,64
Rect 0,0,s,s,True
For f=0 To 128
@@ -1585,8 +1576,6 @@ Function CreateMaptex()
Color 0,0,128
Rect 0,0,s,s,False
SetBuffer b
- CopyRect 0,0,s,s,0,0,ImageBuffer(i),TextureBuffer(t)
- FreeImage i
Return t
End Function