Variable(?) After Center Text does not work.

Author

Message

Dark Frager

14

Years of Service

User Offline

Joined: 16th Mar 2010

Location: The Void.

Posted: 17th May 2012 18:37 Edited at: 17th May 2012 18:39

Link

Hi,

I just began coding in DBPro yesterday and started using TDK's tutorials.

I have began working on a small 2D RPG project, however I am having trouble with variables (I think that's what this is called)

My problem is this:

I am trying to set a health value (so Health: 100) but entering it in the editor like this

if charactertype# = 1 then center text 400,300,"Health: ";Health#

gives a syntax error.

I've tried to the hardest of my ability but I am not able to work this problem out.

Here is the rest of my code:

Rem Stupid RPG Game.
Rem Made by Dark Frager
Rem Magic, Do not touch.

Rem Sets Display mode, foreground colour, ink colour.

Set Display Mode 800,600,16
CLS RGB (255,255,255)
ink RGB(255,0,0),RGB(255,255,255)

Rem Character Creation

center text 400,300,"Made By Dark Frager"
wait 5000
CLS
center text 400,300,"Welcome to 2D RPG V1"
wait 2000
cls
center text 400,300,"Please enter your character name..."
input "Character Name: ";Name$
cls
center text 400,250,"What class do you want to play?"
center text 400,300,"1. Warrior"
center text 400,350,"2. Mage"
Repeat
  I$=Inkey$()
Until Asc(I$)>48 and Asc(I$)<55
CLS
If I$="1" Then Print "Your character will be a Warrior"
If I$="2" Then Print "Your character will be a Mage."
If I$="1" Then CharacterType# = 1
If I$="2" Then CharacterType# = 2
wait 2000
cls
Rem Initialize Character types and Stats + Abilites etc..

if CharacterType# = 1 then Print "Your character is a warrior."
if CharacterType# = 1 then Health# = 100
if CharacterType# = 1 then Armour# = 200
if CharacterType# = 1 then Energy# = 100
if CharacterType# = 1 then Center Text 400,1,"Health: 100"
if CharacterType# = 1 then Center Text 400,11,"Armour: 200"
if CharacterType# = 1 then Center Text 400,21,"Energy: 100"

if CharacterType# = 2 then Print "Your character is a mage."

Rem Create the Game Field.

wait key

+ Code Snippet

Rem Stupid RPG Game.
Rem Made by Dark Frager
Rem Magic, Do not touch.

Rem Sets Display mode, foreground colour, ink colour.

Set Display Mode 800,600,16
CLS RGB (255,255,255)
ink RGB(255,0,0),RGB(255,255,255)

Rem Character Creation

center text 400,300,"Made By Dark Frager"
wait 5000
CLS
center text 400,300,"Welcome to 2D RPG V1"
wait 2000
cls
center text 400,300,"Please enter your character name..."
input "Character Name: ";Name$
cls
center text 400,250,"What class do you want to play?"
center text 400,300,"1. Warrior"
center text 400,350,"2. Mage"
Repeat
  I$=Inkey$()
Until Asc(I$)>48 and Asc(I$)<55
CLS
If I$="1" Then Print "Your character will be a Warrior"
If I$="2" Then Print "Your character will be a Mage."
If I$="1" Then CharacterType# = 1
If I$="2" Then CharacterType# = 2
wait 2000
cls
Rem Initialize Character types and Stats + Abilites etc..

if CharacterType# = 1 then Print "Your character is a warrior."
if CharacterType# = 1 then Health# = 100
if CharacterType# = 1 then Armour# = 200
if CharacterType# = 1 then Energy# = 100
if CharacterType# = 1 then Center Text 400,1,"Health: 100"
if CharacterType# = 1 then Center Text 400,11,"Armour: 200"
if CharacterType# = 1 then Center Text 400,21,"Energy: 100"


if CharacterType# = 2 then Print "Your character is a mage."


Rem Create the Game Field.




wait key

If anyone could help me that would be greatly appreciated.

Thanks!

Edit: Just fyi,

+ Code Snippet

if CharacterType# = 1 then Center Text 400,1,"Health: 100"
if CharacterType# = 1 then Center Text 400,11,"Armour: 200"
if CharacterType# = 1 then Center Text 400,21,"Energy: 100"

is where the problem is. The values have been replaced with text as a placeholder.

Fruitella's a badman sweet, do you get me?

Back to top

Profile PM Email

MrValentine

AGK Backer

13

Years of Service

User Offline

Joined: 5th Dec 2010

Playing: FFVII

Posted: 17th May 2012 19:07

Link

Quote: ""Health: ";Health#"

I believe should be...

Quote: ""Health: ",Health#"

Back to top

Profile PM

Dark Frager

14

Years of Service

User Offline

Joined: 16th Mar 2010

Location: The Void.

Posted: 17th May 2012 19:10

Link

Thanks for the response.

But it still gives a syntax error

Fruitella's a badman sweet, do you get me?

Back to top

Profile PM Email

LBFN

17

Years of Service

User Offline

Joined: 7th Apr 2007

Location: USA

Posted: 17th May 2012 19:11 Edited at: 17th May 2012 19:14

Link

You need to use str$(YourVariable) to display it on the screen, like this:

+ Code Snippet

if CharacterType# = 1 then Center Text 400,1,"Health: " + str$(Health#)
if CharacterType# = 1 then Center Text 400,11,"Armour: " + str$(Armour#)
if CharacterType# = 1 then Center Text 400,21,"Energy: " + str$(Energy#)

It is worth mentioning that floats (variables that have the # sign after the name) are typically used when higher precision is needed (3D location in space for example, where you have a decimal point). If the CharacterType, health, armour and energy values are always going to be integers, then I would suggest you use an integer instead of a float.

Another thought is maybe you should choose something relatively easy for your first project. Typically a game of pong is challenging enough to create, yet is doable as a first game. An RPG seems like a lot to take on at first.

EDIT: Also, you could write it a little more efficiently using an if / endif:

+ Code Snippet

if CharacterType# = 1 
    Center Text 400,1,"Health: " + str$(Health#)
    Center Text 400,11,"Armour: " + str$(Armour#)
    Center Text 400,21,"Energy: " + str$(Energy#)
endif

Anyway, good luck to you.

So many games to code.......so little time.

Back to top

Profile PM Email

Dark Frager

14

Years of Service

User Offline

Joined: 16th Mar 2010

Location: The Void.

Posted: 17th May 2012 19:22

Link

Thanks for your response.

That worked.

And I know that an RPG is a bit too much for a beginner, but it's always worth giving it a try.

Fruitella's a badman sweet, do you get me?

Back to top

Profile PM Email

MrValentine

AGK Backer

13

Years of Service

User Offline

Joined: 5th Dec 2010

Playing: FFVII

Posted: 17th May 2012 19:31

Link

thanks LBFN you are always fantastic not seen you for a couple of weeks have you been busy?

Dark Frager

still begin with something small like a platformer or break down the various elements of your RPG and make small demos to get more experience before putting it all together

thats my approach at present. [I too have begun creating an RPG still in written phase right now... concept art is next... bought a graphics tablet for that phase]

Back to top

Profile PM

LBFN

17

Years of Service

User Offline

Joined: 7th Apr 2007

Location: USA

Posted: 17th May 2012 19:57

Link

Hey Mr V, thanks much. Busy as always, hope things are going great for you.

Dark Frager, the reason I suggest an easier game is that programming is a skill that needs to be developed. One thing to guard against is discouragement. It is possible to get discouraged when you keep trying different things and they don't work right or at all, or you have to keep asking for information and it doesn't come as quickly as you want or at all. On the other end, there is a good feeling of accomplishment when you are able to complete a project. You then move onto something else that presents new challenges and you learn new things. You build confidence in your skills and it makes for an enjoyable pastime.

So many games to code.......so little time.

Back to top

Profile PM Email

MrValentine

AGK Backer

13

Years of Service

User Offline

Joined: 5th Dec 2010

Playing: FFVII

Posted: 17th May 2012 20:05

Link

LBFN doing good too busy as well

but this forum is so addictive

Dark Frager yeah also, sometimes procrastination comes into play...

I want to also add, if you are making an RPG, make sure you take walks in a nature reserve or local park which has lots of trees for massive amounts of inspiration!

[its what I have been doing this week... SO MUCH INFORMATION!!!... oh and textures ^^]

Back to top

Profile PM

Dark Frager

14

Years of Service

User Offline

Joined: 16th Mar 2010

Location: The Void.

Posted: 19th May 2012 18:35

Link

Since I don't want to litter the board with new threads, I'll just ask the question in this thread

.

So, I've learned how to load sprites into my games and etc... everything is fine, except for the fact that when I load a sprite it removes any text that I put in with the center text command. I've looked this up and someone mentioned "bitmap fonts" which then I also looked up, but I didn't find anything useful/down to the point.
Can anyone point me in the right direction or suggest what to do?

Thanks for the help!

Fruitella's a badman sweet, do you get me?

Back to top

Profile PM Email

nonZero

13

Years of Service

User Offline

Joined: 10th Jul 2011

Location: Dark Empire HQ, Otherworld, Silent Hill

Posted: 19th May 2012 20:38

Link

I think the text problem is because once you use sprites, you invoke the 3D Backdrop. Therefore, your TEXT command must be repeated in the loop. Example:

+ Code Snippet

SYNC RATE 60
BACKDROP ON                // Activate 3D backdrop. Comment this out next run
TEXT 1, 20, "This text is NOT displayed"
DO
      TEXT 1, 40, "This text is displayed"
LOOP

Back to top

Profile PM Email Website

Dark Frager

14

Years of Service

User Offline

Joined: 16th Mar 2010

Location: The Void.

Posted: 20th May 2012 00:18 Edited at: 20th May 2012 00:19

Link

Thanks for your response.

Your code works fine, but in my case it does not work wherever I place it. Could you suggest what do or where the lines should be placed? Thanks!

Here is my code:

` ***** Included Source File *****

` Sets Display mode, foreground colour, ink colour.

Set Display Mode 800,600,16
hide mouse
CLS RGB (255,255,255)
ink RGB(255,0,0),RGB(255,255,255)

` Define movement variables.

x = 50
y = 50

` Character Creation

center text 400,300,"Made By Dark Frager"
	wait 5000
	CLS
center text 400,300,"Welcome to 2D RPG V1"
	wait 2000
	cls
center text 400,300,"Please enter your character name..."
	input "Character Name: ";Name$
	cls
center text 400,250,"What class do you want to play?"
center text 400,300,"1. Warrior"
center text 400,350,"2. Mage"
Repeat
  I$=Inkey$()
Until Asc(I$)>48 and Asc(I$)<55
	CLS
If I$="1" Then Print "Your character will be a Warrior"
If I$="2" Then Print "Your character will be a Mage."
If I$="1" Then CharacterType = 1
If I$="2" Then CharacterType = 2
	wait 2000
	cls
` Initialize Character types and Stats + Abilites etc..

` Warrior Class

if CharacterType = 1 then Print "Your character is a warrior."
if CharacterType = 1 then Health = 100
if CharacterType = 1 then Armour = 200
if CharacterType = 1 then Energy = 100

` Mage Class

if CharacterType = 2 then Print "Your character is a mage."
if CharacterType = 2 then Health = 100
if CharacterType = 2 then Armour = 50
if CharacterType = 2 then Mana = 100

` Create the Game Field.

if CharacterType = 1 then Center Text 400,1,"Health: " + str$(Health)
	if CharacterType = 1 then Center Text 400,11,"Armour: " + str$(Armour)
	if CharacterType = 1 then Center Text 400,21,"Energy: " + str$(Energy)

if CharacterType = 2 then Center Text 400,1,"Health: " + str$(Health)
	if CharacterType = 2 then Center Text 400,11,"Armour: " + str$(Armour)
	if CharacterType = 2 then Center Text 400,21,"Mana: " + str$(Mana)

load image "GrassBackground1.bmp",3
sprite 3,0,0,3

if CharacterType = 1 then load image "WarriorChar1.bmp",1
if CharacterType = 2 then load image "MageChar1.bmp",2

do

if rightkey() = 1 then inc x
  if leftkey() = 1 then dec x
  if upkey() = 1 then dec y
  if downkey() = 1 then inc y

if CharacterType = 1 then sprite 1,x,y,1
if CharacterType = 2 then sprite 2,x,y,2

set sprite priority 1,1
set image colorkey 255,255,255

sync
loop

wait key

+ Code Snippet


` ***** Included Source File *****


` Sets Display mode, foreground colour, ink colour.


Set Display Mode 800,600,16
hide mouse
CLS RGB (255,255,255)
ink RGB(255,0,0),RGB(255,255,255)

` Define movement variables.

x = 50
y = 50

` Character Creation

center text 400,300,"Made By Dark Frager"
	wait 5000
	CLS
center text 400,300,"Welcome to 2D RPG V1"
	wait 2000
	cls
center text 400,300,"Please enter your character name..."
	input "Character Name: ";Name$
	cls
center text 400,250,"What class do you want to play?"
center text 400,300,"1. Warrior"
center text 400,350,"2. Mage"
Repeat
  I$=Inkey$()
Until Asc(I$)>48 and Asc(I$)<55
	CLS
If I$="1" Then Print "Your character will be a Warrior"
If I$="2" Then Print "Your character will be a Mage."
If I$="1" Then CharacterType = 1
If I$="2" Then CharacterType = 2
	wait 2000
	cls
` Initialize Character types and Stats + Abilites etc..

` Warrior Class

if CharacterType = 1 then Print "Your character is a warrior."
if CharacterType = 1 then Health = 100
if CharacterType = 1 then Armour = 200
if CharacterType = 1 then Energy = 100

` Mage Class

if CharacterType = 2 then Print "Your character is a mage."
if CharacterType = 2 then Health = 100
if CharacterType = 2 then Armour = 50
if CharacterType = 2 then Mana = 100

` Create the Game Field.

	if CharacterType = 1 then Center Text 400,1,"Health: " + str$(Health)
	if CharacterType = 1 then Center Text 400,11,"Armour: " + str$(Armour)
	if CharacterType = 1 then Center Text 400,21,"Energy: " + str$(Energy) 

	if CharacterType = 2 then Center Text 400,1,"Health: " + str$(Health)
	if CharacterType = 2 then Center Text 400,11,"Armour: " + str$(Armour)
	if CharacterType = 2 then Center Text 400,21,"Mana: " + str$(Mana) 

load image "GrassBackground1.bmp",3
sprite 3,0,0,3

if CharacterType = 1 then load image "WarriorChar1.bmp",1
if CharacterType = 2 then load image "MageChar1.bmp",2

do

  if rightkey() = 1 then inc x
  if leftkey() = 1 then dec x
  if upkey() = 1 then dec y
  if downkey() = 1 then inc y

if CharacterType = 1 then sprite 1,x,y,1
if CharacterType = 2 then sprite 2,x,y,2

set sprite priority 1,1
set image colorkey 255,255,255

sync
loop 




wait key

Fruitella's a badman sweet, do you get me?

Back to top

Profile PM Email

nonZero

13

Years of Service

User Offline

Joined: 10th Jul 2011

Location: Dark Empire HQ, Otherworld, Silent Hill

Posted: 20th May 2012 08:36

Link

In your case I suggest rendering your text to a bitmap and spriting it. It it were just a few lines I'd say WHILE (counter): TEXT etc: ENDWHILE but you've multiple instances of TEXT: WAIT KEY so take my first option - it's easier. The reason WAIT KEY doesn't work is due to the lack of refreshing (program is suspended in a small loop the checks for inputs). Hope this clarifies.

Back to top

Profile PM Email Website

Dark Frager

14

Years of Service

User Offline

Joined: 16th Mar 2010

Location: The Void.

Posted: 20th May 2012 10:24

Link

Thanks for your response.

I'll try your suggestion and I know that Wait Key does not work but I kept it in there for some reason.

Fruitella's a badman sweet, do you get me?

Back to top

Profile PM Email

LBFN

17

Years of Service

User Offline

Joined: 7th Apr 2007

Location: USA

Posted: 20th May 2012 14:37

Link

I don't have your media, so I cannot run this, but here is some suggested code for you. You can program it more efficiently. I haven't done everything for you, but hopefully, you can learn from it. Setting the COLORKEY continually in the main do - loop is a waste of time, you should set it initially in the code. I don't know why you would set sprite 1's priority to 1, as either sprite 1 or 2 will be on the screen, so it is unnecessary.

` Sets Display mode, foreground colour, ink colour.

Set Display Mode 800,600,16
hide mouse
CLS RGB (255,255,255)
ink RGB(255,0,0),RGB(255,255,255)
set image colorkey 255,255,255
` Define movement variables.

x = 50
y = 50

` Character Creation

center text 400,300,"Made By Dark Frager"
    wait 5000
    CLS
center text 400,300,"Welcome to 2D RPG V1"
    wait 2000
    cls
center text 400,300,"Please enter your character name..."
    input "Character Name: ";Name$
    cls

Repeat
    center text 400,250,"What class do you want to play?"
    center text 400,300,"1. Warrior"
    center text 400,350,"2. Mage"
    I$=Inkey$()
    sync
Until Asc(I$)>48 and Asc(I$)<50
CLS
If I$="1" Then Print "Your character will be a Warrior"
If I$="2" Then Print "Your character will be a Mage."
If I$="1" Then CharacterType = 1
If I$="2" Then CharacterType = 2
    wait 2000
    cls
` Initialize Character types and Stats + Abilites etc..

` Warrior Class

if CharacterType = 1 
    Print "Your character is a warrior." 
    Health = 100 :  Armour = 200 : Energy = 100
    load image "WarriorChar1.bmp",1
    sync : wait 2000
endif
` Mage Class

if CharacterType = 2 then Print "Your character is a mage." : sync : wait 1200
if CharacterType = 2 then Health = 100
if CharacterType = 2 then Armour = 50
if CharacterType = 2 then Mana = 100

load image "GrassBackground1.bmp",3
sprite 3,0,0,3

if CharacterType = 2 then load image "MageChar1.bmp",2

do
    if rightkey() = 1 then inc x
    if leftkey() = 1 then dec x
    if upkey() = 1 then dec y
    if downkey() = 1 then inc y
    gosub DisplayInfo
    if CharacterType = 1 then sprite 1,x,y,1
    if CharacterType = 2 then sprite 2,x,y,2
    sync
loop 
end

DisplayInfo:
    ` Create the Game Field.
    Center Text 400,1,"Health: " + str$(Health)
    Center Text 400,11,"Armour: " + str$(Armour)
    Center Text 400,21,"Energy: " + str$(Energy) 
return

+ Code Snippet

` Sets Display mode, foreground colour, ink colour.


Set Display Mode 800,600,16
hide mouse
CLS RGB (255,255,255)
ink RGB(255,0,0),RGB(255,255,255)
set image colorkey 255,255,255
` Define movement variables.

x = 50
y = 50

` Character Creation

center text 400,300,"Made By Dark Frager"
    wait 5000
    CLS
center text 400,300,"Welcome to 2D RPG V1"
    wait 2000
    cls
center text 400,300,"Please enter your character name..."
    input "Character Name: ";Name$
    cls

Repeat
    center text 400,250,"What class do you want to play?"
    center text 400,300,"1. Warrior"
    center text 400,350,"2. Mage"
    I$=Inkey$()
    sync
Until Asc(I$)>48 and Asc(I$)<50
CLS
If I$="1" Then Print "Your character will be a Warrior"
If I$="2" Then Print "Your character will be a Mage."
If I$="1" Then CharacterType = 1
If I$="2" Then CharacterType = 2
    wait 2000
    cls
` Initialize Character types and Stats + Abilites etc..

` Warrior Class

if CharacterType = 1 
    Print "Your character is a warrior." 
    Health = 100 :  Armour = 200 : Energy = 100
    load image "WarriorChar1.bmp",1
    sync : wait 2000
endif
` Mage Class

if CharacterType = 2 then Print "Your character is a mage." : sync : wait 1200
if CharacterType = 2 then Health = 100
if CharacterType = 2 then Armour = 50
if CharacterType = 2 then Mana = 100


load image "GrassBackground1.bmp",3
sprite 3,0,0,3

if CharacterType = 2 then load image "MageChar1.bmp",2

do
    if rightkey() = 1 then inc x
    if leftkey() = 1 then dec x
    if upkey() = 1 then dec y
    if downkey() = 1 then inc y
    gosub DisplayInfo
    if CharacterType = 1 then sprite 1,x,y,1
    if CharacterType = 2 then sprite 2,x,y,2
    sync
loop 
end

DisplayInfo:
    ` Create the Game Field.
    Center Text 400,1,"Health: " + str$(Health)
    Center Text 400,11,"Armour: " + str$(Armour)
    Center Text 400,21,"Energy: " + str$(Energy) 
return

There's more I could do to help, but I simply don't have the time. I do hope this is helpful.

So many games to code.......so little time.

Back to top

Profile PM Email

Dark Frager

14

Years of Service

User Offline

Joined: 16th Mar 2010

Location: The Void.

Posted: 20th May 2012 16:52 Edited at: 20th May 2012 18:11

Link

Wow! Thanks for that, LBFN. I can't believe you actually put your time into sorting all this out for me. BIG thank you!

Quote: " I don't know why you would set sprite 1's priority to 1, as either sprite 1 or 2 will be on the screen, so it is unnecessary. "

Thats because, when I load the "GrassBackground1.bmp" it covers the whole screen, and when the character sprite is loaded, it is covered by the Grass background so I had to set it's priority.

Thanks for your help!!!

EDIT: I still can't figure out the text issue, I'll keep trying with what I can. If need be, I can supply the files for the game, or otherwise I'll just look into bitmap fonts since that seems to be the main solution.

Fruitella's a badman sweet, do you get me?

Back to top

Profile PM Email

nonZero

13

Years of Service

User Offline

Joined: 10th Jul 2011

Location: Dark Empire HQ, Otherworld, Silent Hill

Posted: 20th May 2012 19:47

Link

Here's some stuff that may help with the text thing - Or rather an example of what I explained (a little vaguely) in my earlier post. This example showcases some stuff you can do to overcome your text woes. Didn't have time to make a lot of comments, hopefully there are enough to follow it.

#CONSTANT    mytext      99

GLOBAL nativex AS INTEGER: nativex = DESKTOP WIDTH()
   GLOBAL nativey AS INTEGER: nativey = DESKTOP HEIGHT()

SET DISPLAY MODE nativex, nativey, 32
   BACKDROP ON: SYNC RATE 60

// Print text to the screen that won't display:
   TEXT 1, 0, "This doesn't display!"

// The wait method
   count = TIMER()
   WHILE (TIMER() - count) < 1000
         TEXT 1, 20, "This will display for 1 second..."
   ENDWHILE

// Second method
   CREATE BITMAP 1, nativex, 80         `Using the same screen xres for the sake of illustration. Y value is derived from no. of lines
   SET CURRENT BITMAP 1
   CENTER TEXT nativex / 2, 0, "COOL AWESOME GAME THING!"
   CENTER TEXT nativex / 2, 20, "------------------------"
   CENTER TEXT nativex / 2, 60, "Coding by: Mr Awesome"
   CENTER TEXT nativex / 2, 80, "Graphics by: DarkBasicGuru"
   GET IMAGE mytext, 0, 0, nativex, 80, 1 `Now grab the image. Look GET IMAGE up in the DBPro help. The texture flag's important.
   SET CURRENT BITMAP 0                   `Drawing back to screen
   DELETE BITMAP 1                        `Save memory, win prizes
   SPRITE mytext, 0, 0, mytext            `place the sprite
   WHILE SCANCODE() + MOUSECLICK() = 0
         CENTER TEXT nativex / 2, 200, "PRESS OR CLICK TO EXIT!!!"
   ENDWHILE

+ Code Snippet

   #CONSTANT    mytext      99

   GLOBAL nativex AS INTEGER: nativex = DESKTOP WIDTH()
   GLOBAL nativey AS INTEGER: nativey = DESKTOP HEIGHT()

   SET DISPLAY MODE nativex, nativey, 32
   BACKDROP ON: SYNC RATE 60

// Print text to the screen that won't display:
   TEXT 1, 0, "This doesn't display!"

// The wait method
   count = TIMER()
   WHILE (TIMER() - count) < 1000
         TEXT 1, 20, "This will display for 1 second..."
   ENDWHILE

// Second method
   CREATE BITMAP 1, nativex, 80         `Using the same screen xres for the sake of illustration. Y value is derived from no. of lines
   SET CURRENT BITMAP 1
   CENTER TEXT nativex / 2, 0, "COOL AWESOME GAME THING!"
   CENTER TEXT nativex / 2, 20, "------------------------"
   CENTER TEXT nativex / 2, 60, "Coding by: Mr Awesome"
   CENTER TEXT nativex / 2, 80, "Graphics by: DarkBasicGuru"
   GET IMAGE mytext, 0, 0, nativex, 80, 1 `Now grab the image. Look GET IMAGE up in the DBPro help. The texture flag's important.
   SET CURRENT BITMAP 0                   `Drawing back to screen
   DELETE BITMAP 1                        `Save memory, win prizes
   SPRITE mytext, 0, 0, mytext            `place the sprite
   WHILE SCANCODE() + MOUSECLICK() = 0
         CENTER TEXT nativex / 2, 200, "PRESS OR CLICK TO EXIT!!!"
   ENDWHILE

Back to top

Profile PM Email Website

Dark Frager

14

Years of Service

User Offline

Joined: 16th Mar 2010

Location: The Void.

Posted: 20th May 2012 20:00 Edited at: 20th May 2012 20:31

Link

Awesome! That worked. Thank you for that

Edit: Messed around with the code for a bit to suit my needs and it still works fine. Big thanks to everyone to helped!

Edit2: Another small question: If I use inc or dec to decrease the values (in my case:

+ Code Snippet

"Health: " + str$(Health)

) will I have to update the bitmap manually (as in getting the image everytime the value is changed) or does it change on screen itself?

Fruitella's a badman sweet, do you get me?

Back to top

Profile PM Email

nonZero

13

Years of Service

User Offline

Joined: 10th Jul 2011

Location: Dark Empire HQ, Otherworld, Silent Hill

Posted: 20th May 2012 20:43

Link

Quote: "If I use inc or dec to decrease the values will I have to update the bitmap manually"

Unfortunately yes. In such a case you may suffer some performance loss. These situations may require the non-bitmap version (the plain TEXT method) unless you're using a tiny area as GET IMAGE slows down the program significantly. You'll have to play around with that and just see what the performance costs are (as per your needs).

Back to top

Profile PM Email Website

Dark Frager

14

Years of Service

User Offline

Joined: 16th Mar 2010

Location: The Void.

Posted: 20th May 2012 21:01

Link

Ok thanks!

Fruitella's a badman sweet, do you get me?

Back to top

Profile PM Email

LBFN

17

Years of Service

User Offline

Joined: 7th Apr 2007

Location: USA

Posted: 21st May 2012 01:09

Link

Quote: " I don't know why you would set sprite 1's priority to 1, as either sprite 1 or 2 will be on the screen, so it is unnecessary. "

Quote: "Thats because, when I load the "GrassBackground1.bmp" it covers the whole screen, and when the character sprite is loaded, it is covered by the Grass background so I had to set it's priority."

My bad; I should have said that you should set sprite 1's priority before the main DO - LOOP. You don't need to continually set it like you are.

So, have you solved printing the text issue then?

So many games to code.......so little time.

Back to top

Profile PM Email

Dark Frager

14

Years of Service

User Offline

Joined: 16th Mar 2010

Location: The Void.

Posted: 21st May 2012 18:54

Link

Yes I have, nonZero's post a few posts up helped me with this.

Fruitella's a badman sweet, do you get me?

Back to top

Profile PM Email

Sorry your browser is not supported!

Newcomers DBPro Corner / Variable(?) After Center Text does not work.