| View previous topic :: View next topic |
| Author |
Message |
DoT_PiTcH Contributor

Joined: 07 Aug 2002 Posts: 85
|
Posted: Sun Dec 08, 2002 7:20 pm Post subject: Direct X??? |
|
|
Is There A DLL That Will Let You Use Direct X feature For Games...
thank y ou in advence..
Will |
|
| Back to top |
|
 |
SnarlingSheep Professional Member


Joined: 13 Mar 2001 Posts: 759 Location: Michigan
|
Posted: Mon Dec 09, 2002 3:17 am Post subject: |
|
|
You should be able to use the Gadget DLL to tap into the DirectX API, good luck on that though...
Maybe mindpower can give you some info on it, I sure can't  _________________ -Sheep
My pockets hurt... |
|
| Back to top |
|
 |
Mac Professional Member

Joined: 08 Jul 2000 Posts: 1585 Location: Oklahoma USA
|
Posted: Mon Dec 09, 2002 4:58 am Post subject: |
|
|
What kind of games are ya interested in?
Don't forget that VDS is a scripting language,
and will have speed limitations, so don't plan
on building a QUAKE clone...
Cheers, Mac  _________________ VDSug.dll does file IO, check/disable menu items,
non-VDS dlls, draw functions and more...
Free download (30k dll size) at:
http://www.vdsworld.com/download.php?id=361
 |
|
| Back to top |
|
 |
marty Professional Member


Joined: 10 May 2001 Posts: 789
|
Posted: Mon Dec 09, 2002 1:04 pm Post subject: |
|
|
| I agree with SnarlingSheep, Gadget is the one you need. With it you could use the OpenGL library also.Its possible to use any API such as the ones for DirectX.. |
|
| Back to top |
|
 |
Skit3000 Admin Team

Joined: 11 May 2002 Posts: 2166 Location: The Netherlands
|
Posted: Mon Dec 09, 2002 2:08 pm Post subject: |
|
|
| Well, maybe Will tries to use the DirectX engine, which only has to get the commands from VDS, which aren't many, I think.... |
|
| Back to top |
|
 |
DoT_PiTcH Contributor

Joined: 07 Aug 2002 Posts: 85
|
Posted: Mon Dec 09, 2002 9:39 pm Post subject: |
|
|
thanks.... and no it isnt a quake clone... i was thinking more of a graal/zelda game....
thaks for the help..
will |
|
| Back to top |
|
 |
PGWARE Web Host

Joined: 29 Dec 2001 Posts: 1566
|
|
| Back to top |
|
 |
Mac Professional Member

Joined: 08 Jul 2000 Posts: 1585 Location: Oklahoma USA
|
Posted: Mon Dec 09, 2002 11:28 pm Post subject: |
|
|
VDS can prolly handle 2D games (especially "turn-based"
ones) with layouts similiar to this screenshot:
http://hem.passagen.se/ulkis/onlineworlds/graal_screen.html
Simple arcade type stuff can be done in a loop, it just
depends on how complex actions/play are. CPU speed
will have a greater affect than many other languages.
I've thought about making a simple raycasting DLL for
VDS just to see exactly what could be done with it...
Here's some raycasting in pure VDS, but it's slooooow
doing the math...
http://www.vdsworld.com/forum/viewtopic.php?t=358
Cheers, Mac  _________________ VDSug.dll does file IO, check/disable menu items,
non-VDS dlls, draw functions and more...
Free download (30k dll size) at:
http://www.vdsworld.com/download.php?id=361
 |
|
| Back to top |
|
 |
vdsalchemist Admin Team

Joined: 23 Oct 2001 Posts: 1448 Location: Florida, USA
|
Posted: Tue Dec 10, 2002 2:16 pm Post subject: |
|
|
Hi All,
Actually DirectX uses COM objects and Gadget is not quite ready to handle that yet. I do have a couple of other examples coming out soon for both OpenGL and Morfit3D. I hope to have them ready before Christmas. The Morfit3D SDK is already working with a couple of examples. And later this week I hope to have an example for OpenGL to show everyone  _________________ Home of
Give VDS a new purpose!
 |
|
| Back to top |
|
 |
vdsalchemist Admin Team

Joined: 23 Oct 2001 Posts: 1448 Location: Florida, USA
|
Posted: Tue Dec 10, 2002 2:24 pm Post subject: |
|
|
Hi All me again,
I have also posted a VB_to_Gadget converter to my website. It is not perfect and it does make mistakes but it will cut down the number of lines you would have to retype. It will also take away the guess work when it comes to trying to figure out what variable types to use and things of that nature. _________________ Home of
Give VDS a new purpose!
 |
|
| Back to top |
|
 |
FreezingFire Admin Team

Joined: 23 Jun 2002 Posts: 3508
|
Posted: Tue Dec 10, 2002 10:10 pm Post subject: |
|
|
Here is an example of a simple graphics-type game that Mac posted in
the archive (pretty impressive )
| Code: | rem -- VDS3/VDS4 compatible --
rem -- Thanks to Garrett for the basic idea --
OPTION SCALE, 96
OPTION DECIMALSEP, "."
%%car0x = 140
%%car0y = 220
TITLE By Mac
DIALOG CREATE,"Mac's Car Demo",0,@diff(@div(@sysinfo(SCREENWIDTH),2),250),500,440
DIALOG ADD,STYLE,Style1,Arial,10,,BLACK,YELLOW
DIALOG ADD,STYLE,Style2,Arial,10,,GRAY,RED
DIALOG ADD,STYLE,Style3,Arial,12,,LTBLUE,BLACK
DIALOG ADD,STYLE,Style4,Arial,12,B,WHITE
DIALOG ADD,STYLE,Style5,Arial,12,B,DKGREEN
DIALOG ADD,BUTTON,Lower,15,280,20,20,"<",,Style5
DIALOG ADD,BUTTON,Higher,15,300,20,20,">",,Style5
DIALOG ADD,TEXT,Delaytxt,18,330,,,"Delay Factor = 2"
DIALOG ADD,BUTTON,SensLower,40,280,20,20,"<",,Style5
DIALOG ADD,BUTTON,SensHigher,40,300,20,20,">",,Style5
DIALOG ADD,TEXT,Senstxt,43,330,,,"Steering sensitivity = 2"
DIALOG ADD,TEXT,JoyBackground,220,280,200,200,,,Style1
DIALOG ADD,TEXT,Joystick,320,380,10,10,,,Style3,CLICK
DIALOG ADD,TEXT,Joytxt,205,280,,,"Joystick Control - Click to grab/release it."
rem -- Grass, road, stripes --
DIALOG ADD,TEXT,Grass,0,10,260,440,,,Style5
DIALOG ADD,TEXT,Road,0,40,200,440,,,Style2
%y = 0
REPEAT
DIALOG ADD,TEXT,Stripe%y,@prod(%y, 40),140,2,10,,,Style4
%y = @succ(%y)
UNTIL @greater(%y, 11)
rem -- Border --
DIALOG ADD,TEXT,Top,0,0,500,10,,,Style1
DIALOG ADD,TEXT,Left,0,0,10,430,,,Style1
DIALOG ADD,TEXT,Right,0,490,10,430,,,Style1
DIALOG ADD,TEXT,Bottom,430,0,500,10,,,Style1
rem -- Car 0 assembly --
DIALOG ADD,TEXT,Body0,%%car0y,@diff(%%car0x, 12),24,40,,,Style3
DIALOG ADD,TEXT,Fglass0,@sum(%%car0y, 19),@diff(%%car0x, 10),20,5,,,Style1
DIALOG ADD,TEXT,Rglass0,@sum(%%car0y, 31),@diff(%%car0x, 7),14,6,,,Style1
DIALOG ADD,TEXT,Hlight0,@diff(%%car0y, 5),@diff(%%car0x, 13),,,"* *",,Style1,TRANSPARENT
DIALOG ADD,TEXT,Tlight0,@sum(%%car0y, 35),@diff(%%car0x, 13),,,"* *",,Style2,TRANSPARENT
DIALOG ADD,TEXT,Lines0,@sum(%%car0y, 1),@diff(%%car0x, 11),,,"/ || \"@cr()"\ || /",,Style3,TRANSPARENT
DIALOG SHOW
rem -- Record of stripe positions --
LIST CREATE, 1
LIST LOADTEXT, 1,
"0
"40
"80
"120
"160
"200
"240
"280
"320
"360
"400
%%delay = 2
%%sensitivity = 2
:EVLOOP
REPEAT
if %%grab
%%stripenum = 0
REPEAT
%%stripepos = @item(1, %%stripenum)
if @greater(440, %%stripepos)
%%stripepos = @sum(%%stripepos, 4)
else
%%stripepos = 0
end
LIST PUT, 1, %%stripepos
DIALOG SETPOS, "Stripe"%%stripenum, %%stripepos
%%stripenum = @succ(%%stripenum)
UNTIL @greater(%%stripenum, 11)
end
GOSUB Delay
%e = @event()
UNTIL %e
goto %e
:LowerBUTTON
if @greater(%%delay, 0)
%%delay = @pred(%%delay)
DIALOG SET, Delaytxt, "Delay Factor = "%%delay
end
goto EVLOOP
:HigherBUTTON
%%delay = @succ(%%delay)
DIALOG SET, Delaytxt, "Delay Factor = "%%delay
goto EVLOOP
:SensLowerBUTTON
if @greater(%%sensitivity, 1)
%%sensitivity = @pred(%%sensitivity)
DIALOG SET, Senstxt, "Steering sensitivity = "%%sensitivity
end
goto EVLOOP
:SensHigherBUTTON
%%sensitivity = @succ(%%sensitivity)
DIALOG SET, Senstxt, "Steering sensitivity = "%%sensitivity
goto EVLOOP
:JoystickCLICK
if %%grab
%%grab = ""
DIALOG SETPOS, Joystick, 320, 380
else
%%grab = 1
end
goto EVLOOP
:CLOSE
EXIT
rem --------------------- GOSUB ---------------------
:Delay
%%mousex = @diff(@mousepos(X), @sum(@winpos("Mac's Car Demo",L),3))
%%mousey = @diff(@mousepos(Y), @sum(@winpos("Mac's Car Demo",T),22))
if %%grab
if @both(@both(@greater(%%mousex, 280), @greater(480, %%mousex)), @both(@greater(%%mousey, 220), @greater(420, %%mousey)))
DIALOG SETPOS, Joystick, @diff(%%mousey, 5), @diff(%%mousex, 5)
%z = @prod(@diff(%%mousey, 220), %%delay)
if @both(@greater(%%mousex,400), @greater(250, %%car0x))
%%car0x = @sum(%%Car0x, %%sensitivity)
end
if @both(@greater(360, %%mousex),@greater(%%car0x, 30))
%%car0x = @diff(%%Car0x, %%sensitivity)
end
else
DIALOG SETPOS, Joystick, 320, 380
%%car0x = 140
%%grab = ""
end
DIALOG SETPOS,Body0,%%car0y,@diff(%%car0x, 12)
DIALOG SETPOS,Fglass0,@sum(%%car0y, 19),@diff(%%car0x, 10)
DIALOG SETPOS,Rglass0,@sum(%%car0y, 31),@diff(%%car0x, 7)
DIALOG SETPOS,Hlight0,@diff(%%car0y, 5),@diff(%%car0x, 13)
DIALOG SETPOS,Tlight0,@sum(%%car0y, 35),@diff(%%car0x, 13)
DIALOG SETPOS,Lines0,@sum(%%car0y, 1),@diff(%%car0x, 11)
end
if @greater(%z, 0)
REPEAT
%z = @pred(%z)
UNTIL @greater(1, %z)
end
exit |
_________________ FreezingFire
VDSWORLD.com
Site Admin Team |
|
| Back to top |
|
 |
|
|
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum You can attach files in this forum You can download files in this forum
|
|