TinyPTC Ext

[Rbz]

Good tip Benny
Worked first time.

After including windows.bi

Code: [Select]

dim as integer mouse   
mouse=ShowCursor(0)

Have some good Karma Benny

Nice 

Is it possible to add a function that will retrieve the HWND of the window opened by PTC?

Jim

Sorry Jim, ~3 months delayed , if you still want this feature I can add it for you...

[Jim]

If you're tinkering, yes, it would be very handy.  Often you need the hwnd to pass to Windows API functions, especially GDI (if you want the DC, for example) and DirectX (for pretty much anything).
HWND ptc_get_window() or something.  Maybe you need to make it return just a dword to avoid breaking loads of code not including windows.bi.
Jim

[Rbz]

Ok Jim, I have updated it (first post attachment), I must confess it's very useful function, for example, someone can setup directx 9 and use some handy texture loaders etc...

Here's a little example, it just hide and show ptc main window:

Code: [Select]

option explicit
option static

'-------------------------------------
' Includes.---------------------------
'-------------------------------------
#include "tinyptc_ext.bi"
#include "windows.bi"

'Screen width x height
Const XRES = 800
Const YRES = 600
dim shared buffer(XRES*YRES) as integer

ptc_setdialog(0,"",1,0)

If( ptc_open( "ptc_getwindow", XRES, YRES ) = 0 ) Then
    End -1
End if

dim shared hwnd as HWND
hwnd = ptc_getwindow()

dim flag as integer
flag=0


while(GetAsyncKeyState(VK_ESCAPE)<>-32767)
   
    if(flag=0) then   
        ShowWindow(hwnd, SW_HIDE)
    else
        ShowWindow(hwnd, SW_SHOW)
    end if
   
    Sleep(2000)
    flag=flag xor 1

    ptc_update(@buffer(0))
    erase buffer
           
wend


[.:] Druid [:.]

Simply brilliant!  I finally updated my version and it's really impressive (for me at least hehe)

karma for everybody involved

[Shockwave]

Simply brilliant!  I finally updated my version and it's really impressive (for me at least hehe)

karma for everybody involved

It was about time you updated You make some really nice programs that deserve a smooth refresh rate.

[Rbz]

Library updated!

Added Mousewheel functions:

- ptc_setmousewheel
- ptc_getmousewheel

And here a simple example:

Code: [Select]

'-------------------------------------
' Includes.---------------------------
'-------------------------------------
#include "tinyptc_ext.bi"
#include "windows.bi"

'Screen width x height
Const XRES = 640
Const YRES = 480

dim shared buffer(XRES*YRES) as integer

dim shared as integer x,y1,y2
dim shared as double angle
dim c as integer

c = &hff4466ff

'No dialog
ptc_setdialog(0,"",1,0)

'Set mousewheel default values
'Range = 1 (Movement range)
'Delta = 0 (Start value for delta)
ptc_setmousewheel(1, 0)

If( ptc_open( "Mouse Test", XRES, YRES ) = 0 ) Then
    End -1
End if

    while(GetAsyncKeyState(VK_ESCAPE)<>-32767)
       
            y1 = 80 + sin(angle)*20
            angle += 0.05
           
            for x=0 to 639
                buffer(x+(y1*XRES)) = c
            next

            y2 = 400 + cos(angle)*20
           
            for x=0 to 639
                buffer(x+(y2*XRES)) = c
            next
                     
            cls
            locate 1,1
            print "Mouse Xpos: ";ptc_getmousex()
           
            locate 2,1
            print "Mouse Ypos: ";ptc_getmousey()
           
            locate 4,1
            print "Left Mouse Button: ";ptc_getleftbutton()

            locate 5,1
            print "Right Mouse Button: ";ptc_getrightbutton()

            locate 7,1
            print "MouseWheel: ";ptc_getmousewheel()

            ptc_update(@buffer(0))
           
            erase buffer
           
    wend


[WidowMaker [retired]]

Is it possible to add a function that will retrieve the HWND of the window opened by PTC?

Jim

Is this what ruined the window setup of this great lib?

[Jim]

Shouldn't do - all it is doing is exposing a variable from the innards of ptc that lets any program reference the window handle - which is needed to initialise Direct3D or to pass to many other Windows functions.

Jim

[Rbz]

Is it possible to add a function that will retrieve the HWND of the window opened by PTC?

Jim

Is this what ruined the window setup of this great lib?

Just for further reference you can read here why WidowMaker was so worried about it.

[Rbz]

*Library updated!

-Windowed mode bug removed

[Clyde]

Wicked stuff Rbz

Thanks dude

[Shockwave]

Widowmaker was jumping for joy yesterday

He's using the new one on the next issue of the charts.
Nice one Rbz, K+

[Clyde]

Ive also noticed that tinyptc_ext.a is considerably smaller than before too.

[energy]

A bit late by never to late!!!   
Here is the Purebasic version this cool Lib.
Purebasic Users are now able to use this fantastic lib from Rbraz too!
in this package are all sources and Purebasic User lib for Version PB4.xx

Cheers and have fun
eNeRGy

[Shockwave]

Hi Rbz,

What are the screen limitations of ptc_ext?

I had problems when trying to open larger screens than 800 * 600.. 1024 * 768 just didn't work properly at all.

[Rbz]

Hmm, I can open a screen of 1280 x 1024 without any problems, windowed mode and full screen.

But I can't open a 320 x 240 full screen mode, my graphics card doesn't support it anymore.

[Shockwave]

Maybe it's my card then. I can do 320*240 no problem.

[Moroboshisan]

Hi rbz,

I hard about some kind of trouble with nvidia cards, old resolutions support (modex and dos resolution support) was disabled in firmwares for some unknown reason... maybe a different card would work fine...

[Rbz]

Indeed, I've a Nvidia 8800, I've also heard that those modes will be back (or I was dreaming about), dunno when

[Clyde]

I've noticed a strange occurrence when running in a window, that it doesnt clear itself properly, plus when you move the window around there's an unwanted effect which i can just about summarize as I dont know the technical term, it's similar to a blur.