Screen height/width wont work with variables??

Author

Message

CocaCola

16

Years of Service

User Offline

Joined: 23rd Mar 2010

Location: CocaCola.x CocaCola.y CocaCola.z

Posted: 3rd Apr 2011 09:34

Link

Im trying this code and getting errors.. I'm not sure why this won't work.

+ Code Snippet

Rem Project: Dark Basic Pro Project
Rem Created: Sunday, April 03, 2011

Rem ***** Main Source File *****
x  = screen width / 2
y = screen height / 2
text x, y, "HEY"
wait key

Always program as if the person maintaining your program is a psychopath that knows where you live

Back to top

Profile PM Email

Kevin Picone

23

Years of Service

User Offline

Joined: 27th Aug 2002

Location: Australia

Posted: 3rd Apr 2011 09:45

Link

They're functions, so DBpro is expecting the () after them

ie.

print screen width() / 2

Hmm, I wonder what's coming in 2011?

Back to top

Profile PM Website

CocaCola

16

Years of Service

User Offline

Joined: 23rd Mar 2010

Location: CocaCola.x CocaCola.y CocaCola.z

Posted: 3rd Apr 2011 09:50 Edited at: 3rd Apr 2011 09:58

Link

Thank you

I added the () to the end but it doesn't appear that the test is actually in the center. Is it just me or is it something with DBPro?

EDIT: Also on topic I used "ink rgb(0,255,0),rgb(0,0,255)" to try and color the text and the background, the text gets colored but not the background??
Rem Project: Dark Basic Pro Project
Rem Created: Sunday, April 03, 2011

+ Code Snippet

Rem ***** Main Source File *****
x  = screen width() / 2
y = screen height() / 2
do
ink rgb(255,0,0),rgb(0,255,0)
text x, y, "HEY"
wait 350
ink rgb(0,255,0),rgb(0,0,255)
cls
text x,y, "HEY"
wait 350
loop

Always program as if the person maintaining your program is a psychopath that knows where you live

Back to top

Profile PM Email

Hodgey

16

Years of Service

User Offline

Joined: 10th Oct 2009

Location: Australia

Posted: 3rd Apr 2011 09:59

Link

Quote: "it doesn't appear that the test is actually in the center. Is it just me or is it something with DBPro?"

No, DBPro is doing what it is supposed to do. When text is drawn it is a bunch of images so the image is drawn at those coordinates remembering that the default x,y coordinates of an image is at the top left of that image. Add the dot command in your little snippet and you can see where the true x and y coordinates are.

+ Code Snippet

x  = screen width() / 2
y = screen height() / 2
dot x, y
text x, y, "HEY"
wait key

A clever person solves a problem, a wise person avoids it - Albert Einstein

Back to top

Profile PM Email

CocaCola

16

Years of Service

User Offline

Joined: 23rd Mar 2010

Location: CocaCola.x CocaCola.y CocaCola.z

Posted: 3rd Apr 2011 10:05

Link

Thanks

Now I just need someone to answer my edit, please??

Always program as if the person maintaining your program is a psychopath that knows where you live

Back to top

Profile PM Email

Grog Grueslayer

Valued Member

21

Years of Service

User Offline

Joined: 30th May 2005

Playing: Green Hell

Posted: 3rd Apr 2011 10:26 Edited at: 3rd Apr 2011 10:27

Link

Quote: "I added the () to the end but it doesn't appear that the test is actually in the center. Is it just me or is it something with DBPro?"

It won't look like the text is in the center because it doesn't take into account the text size. It just starts at whatever x and y is but if you subtract the TEXT WIDTH()/2 from x and the TEXT HEIGHT()/2 from y you'll get the text in exactly the center.

Quote: "EDIT: Also on topic I used "ink rgb(0,255,0),rgb(0,0,255)" to try and color the text and the background, the text gets colored but not the background??"

The default for text is transparent. If you want to see the background color use SET TEXT OPAQUE to see the background color change.

+ Code Snippet

` Make the text show the background color
set text opaque

` Change text and background color
ink rgb(255,0,0),rgb(0,255,0)

` Set the string
a$="HEY"

` Offset text to the true center using the screen size and text size
x = screen width() / 2 - text width(a$) / 2
y = screen height() / 2 - text height(a$) / 2

` Show the text
text x, y, a$

` Change color to blue
ink rgb(0,0,255),0

` Show center of screen as blue dot
dot screen width()/2,screen height()/2

wait key

Back to top

Profile PM Email

LBFN

19

Years of Service

User Offline

Joined: 7th Apr 2007

Location: USA

Posted: 3rd Apr 2011 15:11

Link

You could also use the CENTER TEXT command:

+ Code Snippet

x  = screen width() / 2
y = screen height() / 2
set text opaque
do
    ink rgb(255,0,0),rgb(0,255,0)
    center text x, y, "HEY"
    wait 350
    ink rgb(0,255,0),rgb(0,0,255)
    cls
    center text x,y, "HEY"
    wait 350
loop

Back to top

Profile PM Email

Grog Grueslayer

Valued Member

21

Years of Service

User Offline

Joined: 30th May 2005

Playing: Green Hell

Posted: 3rd Apr 2011 18:50

Link

Unfortunately CENTER TEXT doesn't center text vertically. We can see how much off it is with bigger text (image attached if you don't feel like running the code). Of course the bigger the text the greater the distance from the actual center.

+ Code Snippet

` Make the text show the background color
set text opaque

` Make text size bigger 
set text size 100

` Change text and background color
ink rgb(255,0,0),rgb(0,255,0)

` Set the string
a$="HEY"

` Offset text to the true center using the screen size and text size
x = screen width() / 2 - text width(a$) / 2
y = screen height() / 2 - text height(a$) / 2

` Show the text red
text x, y, a$

` Change text back to transparent
set text transparent

` Change color to blue
ink rgb(0,0,255),0

` Show the text in blue
center text screen width()/2,screen height()/2,a$

` Show center of screen as blue dot
dot screen width()/2,screen height()/2

wait key

Back to top

Profile PM Email

Sorry your browser is not supported!

DarkBASIC Professional Discussion / Screen height/width wont work with variables??