Hi Community,
At testing the functionality of some graphical Functions
i have written an small Snippet. But it does not what i want!
The first is shown perfectly.
The second only shows an black Box and
The third i have never seen.
A) Why?
B) What is the internal Difference of an Bitmap and an Image?
C) For me an Bitmap is an Image and reverse Order too.
What i can/do not see at this Point?
set window on
set window layout 0,1,1
minimize window
restore window
set window position 0,0
set window size 640,480
set window title "Sprite And Image Testing"
set text font "Lucida Console"
set text size 14
set text transparent
cls
sync rate 0
sync on
sync : sync
randomize timer()
rem THIS RUNS PERFECTLY
load image "images\01.jpg", 1, 1
cls
for x=1 to 640-1 step 2
for y=1 to 480-1 step 2
dot x, y, rgb(64,64,64)
next y
next x
print "TEST 1"
x = rnd (100)
y = rnd (100)
paste image 1, 10+x, 10+y
sync
sleep 5000
rem WHY I DON'T SEE THE CONTENT OF MY COPIED AREA? (Only Black Area)
load bitmap "images\iconset.jpg", 1
rem load bitmap "images\iconset.bmp", 1 : rem there is no difference
cls
print "TEST 2"
x = rnd (100)
y = rnd (100)
print current bitmap()
set current bitmap 0
print current bitmap()
rem bmp1 source-coors screen target-coords
copy bitmap 1, 1, 1, 64, 64, 0, 10+x, 10+y, 74+x, 74+y
sync
sleep 5000
rem WHY I DON'T SEE THE CONTENT OF MY COPIED AREA FROM BITMAP?
set current bitmap 1
get image 2, 1,1,64,64
cls
print "TEST 3"
x = rnd (100)
y = rnd (100)
paste image 2, 10+x, 10+y
sync
sleep 5000
end
____________________________________________________________
I'am Sorry for my (possibly) bad English
Greetings from Germany