Guidance
指路人
g.yi.org
Guidance Forums / Rapid-Q Basic / new version of DIONA'S EYE  game

Register 
注册
Search 搜索
首页 
Home Home
Software
Upload

  
Forum List • Thread List • Reply • Refresh • New Topic • Search • Previous • Next First 1 Last
Message1. new version of DIONA'S EYE  game
#3602
Posted by: Ad 2004-03-26 14:58:31
I uploaded the latest version of the game (had not done much on it since the previous version I put up, now finished a new Dutch version). It is Dutch language only at the moment I'm afraid, but please DO try it and tell me of errors in it?

There is a tutorial / demonstration built into the game so watch that to see what the heck its all about  ;)

Guidance I took the liberty of referring to this site of yours within the game  :)  see the random texts that appear in-game (so the messages there keep going at a steady rate I put in several "filler" lines).
Message2. Re: new version of DIONA'S EYE  game
#3603
Posted by: Ad 2004-03-26 15:12:32
Well when I said I hadn't done much on it I didn't realize just how old the version (see under the GAMES in the download area) I had uploaded was ....

This new version uses the same basic logic but it is WAY more interesting; it uses proper graphics, a bonus system and  the hungry scarab (a device to force the player to hurry up a bit) as well as a few API calls for;

 1.)  finding the color currently used by Windows
 2.)  playing a Windows system sound

As these two things are usefull I thought I'd better show you how to do them.

Playing a Windows system sound;

add this line to the very start of your program
Declare Function MessageBeep Lib "user32.dll" Alias "MessageBeep" (ByVal wType As Long) As Long
then when you want a Windows system sound to be played use
Retval = MessageBeep (xxx)
where xxx is some value (try 305). I am not altogether sure of how to find the different sounds so just experiment with the value!

Checking Windows system colors;

add this line to the very start of your program
Declare Function GetSysColor Lib "user32" Alias "GetSysColor" (ByVal nIndex As Long) As Long
then when you want to get a colour value use
colour = GetSysColor(COLOR_3DFACE)
where COLOR_3DFACE is just one of the colours, namely the basic form color.
Message3. Re: new version of DIONA'S EYE  game
#3609
Posted by: guidance 2004-03-26 18:03:46
Thanks! I moved it into RapidQ/App_no_source/Games:
http://g.yi.org/f.php?f=16300#16299
Message4. Re: new version of DIONA'S EYE  game
#3632
Posted by: Ad 2004-03-28 13:26:37
I finished an English version of the game and uploaded it. See

   http://g.yi.org/f.php?f=16300

Forum List • Thread List • Reply • Refresh • New Topic • Search • Previous • Next First 1 Last
掌柜推荐
 
 
 
 
 
 
 
 
 
 
 
 
© Tue 2024-4-16  Guidance Laboratory Inc.
Email:webmaster1g.yi.org Hits:0