PureBasic Forums - English

AtomUpgrader

@mk-soft, So I changed your code a little and the problem has shown itself.

;-TOP

Procedure UpdateWindow()
Protected dx, dy
dx = WindowWidth(0)
dy = WindowHeight(0) - StatusBarHeight(0) - MenuHeight()
; Resize Gadgets
EndProcedure

Procedure Main()
Protected dx, dy, image

#WinStyle = #PB ...

AtomUpgrader

that code shows blinking:
OpenWindow(0, 0, 0, 300, 300, "test", #PB_Window_ScreenCentered)
CreateImage(0, 240, 240, 32) ; only with 32-bits depth
ImageGadget(0, 20, 20, 240, 240, 0)
Repeat
Repeat
e = WindowEvent()
If e = #PB_Event_CloseWindow
End
EndIf
Until Not e
SetGadgetState(0, ImageID(0 ...

AtomUpgrader

Sorry, ok

AtomUpgrader

Global test.l

Procedure AlertThread(Parameter)
Repeat
test + 1
Debug "1: " + str(test)
Delay(2000)
ForEver
EndProcedure

CreateThread(@AlertThread(), 0)
Repeat
Debug "2: " + str(test)
Delay(2000)
ForEver

Displayed

2: 0
1: 1
2: 11潳䱲瑥整ㅲ
1: 2
1: 32‱‽റ㬊䌠
2: 3
2: 1:
2: 1:
1: 52
2: 5

This is ...

AtomUpgrader

Code: Select all

Global.L x
x = 100
If x < 1.0*1
    Debug "100 < 1.0*1"
Endif
If x < 1.1*1
    Debug "100 < 1.1*1"
Endif

Please give out your results!

AtomUpgrader

You have purchased PB, but your online account may not yet be activated. Did you get a separate e-mail for the access data?
No, I did not. How much should I wait?
After you've paid the registration fee you will get your package in about 20 minutes as all is processed automatically. Be sure to ...

AtomUpgrader

I bought yesterday 1 license and since i can't download PB - I not see any mails with password to my login, and if I request password, then:
https://www.dropbox.com/s/s0vlgr451q91hlc/Screen%20003.PNG?dl=1
https://www.dropbox.com/s/07llxtexpu9z233/Screen%20002.PNG?dl=1
But i have e-mail:
https ...

AtomUpgrader

Is it possible to also use custom generated cube maps, refraction, deferred shading?

AtomUpgrader

Likely, you can do everything with shaders that support OGRE.

AtomUpgrader

I send messages with this code:
XIncludeFile "Com\COMatePLUS.pbi"
Define.COMateObject oSkype, oCall
oSkype = COMate_CreateObject("Skype4COM.Skype")
If oSkype
For n = 1 To 10
MessageMy.s = StrF( n)
oCall = oSkype\GetObjectProperty("SendMessage('test_skyper', '" + MessageMy + "')")
If oCall ...

AtomUpgrader

Now for create a mesh using it:

Code: Select all

MeshVertexColor
MeshVertexCount
MeshVertexNormal
MeshVertexPosition
MeshVertexTextureCoordinate

add like:

Code: Select all

MeshVertexTangent

This is necessary to correct the shading using the tangent space

AtomUpgrader

I would like to see in the new version made possible such as the following:
tr_1 = CreateRenderTexture(#PB_Any, CameraID (camera), W, H, #PB_Texture_ManualUpdate)
tr_2 = CreateRenderTexture(#PB_Any, CameraID (camera), W, H, #PB_Texture_ManualUpdate)
[...]
tr_6 = CreateRenderTexture(#PB_Any ...

PureBasic Forums - English

Search found 12 matches

Re: ImageGadget blinking

ImageGadget blinking

Re: Thread BUG?

Thread BUG?

The "100 < 1.1*1" problem

Re: Buyed PB and can't download.

Buyed PB and can't download.

Re: PerPixel Shader

Re: Ogre: Projective Decals

COMatePLUS - how to read messages in skype?

OGRE - mesh tangents

Good method to create Cube Map Texture