Sorry your browser is not supported!

set text font "arial" : set text size 12

a$="www.newturk.net"
ink rgb(255,255,0),0
text 0,0,a$
get image 1,0,0,text width(a$)+1,text height(a$)+1,1
make object plain 4,text width(a$),text height(a$)
texture object 4,1
ghost object on 4
  POSITION OBJECT 4,225,270,300

set text font "arial" : set text size 12

a11=1222313
ink rgb(255,255,0),0
SET CURSOR 0,0
PRINT a11
get image 1,0,0,40,12
make object plain 4,40,12
texture object 4,1
ghost object on 4
  POSITION OBJECT 4,225,270,300

WAIT KEY

LOAD ANIMATION "154_13.mpg",12
PLAY ANIMATION TO IMAGE 12,11,0,0,200,130
    MAKE OBJECT PLAIN 106,200,130
    TEXTURE OBJECT 106,11
    POSITION OBJECT 106,-102,30,300

LOAD ANIMATION "lion1.mpg",10
PLAY ANIMATION TO IMAGE 10,1,0,0,45,45
MAKE OBJECT CUBE 1,7
TEXTURE OBJECT 1,1
POSITION OBJECT 1,43,-75,0

oyuncuB=64

ink rgb(0,0,0),0
box 0,0,150,25
SET CURSOR 0,0
ink rgb(255,255,255),0
PRINT "Oyuncu B..: ",OyuncuB
get image 21,0,0,150,25,1
make object plain 21,150,25
texture object 21,21
ghost object on 21
POSITION OBJECT 21,270,240,300

WAIT KEY

DELETE OBJECT 21
oyuncuB=63232324

ink rgb(0,0,0),0
box 0,0,150,25
SET CURSOR 0,0
ink rgb(255,255,255),0
PRINT "Oyuncu B..: ",OyuncuB
get image 21,0,0,150,25,1
make object plain 21,150,25
texture object 21,21
ghost object on 21
POSITION OBJECT 21,270,240,300

WAIT KEY
END