Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - ~Ar-S~

Pages: [1] 2 3
1
Purebasic / Re: Sync V2M Music 2 GLSL Shader
« on: June 01, 2020 »
1080 => That works perfectly.  :clap:

2
Purebasic / Re: PB Twister
« on: November 12, 2019 »
Very Nice ! :||

3
Thanks for sharing.  :goodpost:
But you say "Only native PB instructions"... And i see KK_DrawTransparentImage..
Please add a link to KK_xxxxx lib

I also see a small API (ShowCursor_)  :trans:

4
Purebasic / Re: Aggression / D-Bug remake
« on: November 12, 2019 »
Is works on my little big monster.
(Ryzen 3700 + GTX 1080 powered by windows 10 x64)

5
Purebasic / Re: DemoCoding - Tunnel Effect
« on: April 28, 2019 »
I continue to fight and wish that someday there will be a few small steps forward in terms of my health.
Then I would like to create more tutorials.

Um, I'm sad to hear that you have health concerns.
I really hope your problems will get better.
Take care of you.

6
Purebasic / Re: DemoCoding - Tunnel Effect
« on: April 23, 2019 »
I almost missed that great tutorial. Thank you Mr Va!n
I know this topic is very old but the same tutorial for a dot tunnel would be great.
thank you for sharing your knowledge.

Here is just a little 5.70 compatible modification

Code: [Select]
; *************************************************************************************
; *   P r o j e c t :    T u n n e l - F x
; *************************************************************************************
; *
; *   Part7: Moving Tunnel:
; *   ---------------------
; *   This is the last turorial part, where we will try to get the tunnel fx more
; *   interesting while moving the tunnel, by using SIN().
; *
; *   Source and Tutorial (c) by Thorsten Will aka va!n
; *   All rights reserved.
; *
; *************************************************************************************


DisableDebugger

; -------- Init Code --------

lTextureSize.l  = 256
lScreenWidth.l  = 640
lScreenHeight.l = 480

Dim aTexture  (lTextureSize  , lTextureSize   )
Dim aDistance (lScreenWidth*2, lScreenHeight*2)
Dim aAngle    (lScreenWidth*2, lScreenHeight*2)
Dim aBuffer   (lScreenWidth  , lScreenHeight  )

; -------- Generating Mapping Texture --------

For x.l = 0 To lTextureSize -1
  For y.l = 0 To lTextureSize -1
    aTexture(x,y) = (x * 256 / lTextureSize) ! (y * 256 / lTextureSize)
  Next
Next

; -------- Generating Distance and Angle Table --------

dDistance.d = 32.0
dParts.d    =  0.5
         
For x = 0 To lScreenWidth*2 -1     
  For y = 0 To lScreenHeight*2 -1
    aDistance(x,y) = Int(dDistance * lTextureSize / Sqr( (x-lScreenWidth) * (x-lScreenWidth) + (y-lScreenHeight) * (y-lScreenHeight) )) % lTextureSize
    dAngle.d = (dParts * lTextureSize * ATan2(y-lScreenHeight, x-lScreenWidth) / #PI)
    aAngle(x,y) = Int (256 - dAngle) & 255
  Next
Next

; *************************************************************************************

InitSprite()

OpenWindow(0,0,0,lScreenWidth,lScreenHeight,"",#PB_Window_ScreenCentered)
OpenWindowedScreen(WindowID(0),0,0,lScreenWidth, lScreenHeight,0,0,0,#PB_Screen_WaitSynchronization )

dSpeedX.d = 1.0
dSpeedY.d = 1.0

Repeat
  ; ------- Stuff for doing the animation -------
 
  dAnimation.d = dAnimation.d + 0.005
 
  lShiftX.l = Int(lTextureSize * dSpeedX.d * dAnimation.d)
  lShiftY.l = Int(lTextureSize * dSpeedY.d * dAnimation.d)

  lLookX = lScreenWidth /2 + Int(lScreenWidth /2 * Sin(dAnimation * 4.0 ))
  lLookY = lScreenHeight/2 + Int(lScreenHeight/2 * Sin(dAnimation * 6.0 ))

  ; -------- Calculate Texture coordinates and draw Tunnel -------

  StartDrawing(ScreenOutput())
    For y = 0 To lScreenHeight-1
      For x = 0 To lScreenWidth -1
        lCoordinateX.l = (aDistance(x+lLookX, y+lLookY) + lShiftX) % lTextureSize     
        lCoordinateY.l = (aAngle   (x+lLookX, y+lLookY) + lShiftY) % lTextureSize     
        aBuffer(x,y) = aTexture (lCoordinateX.l , lCoordinateY.l)
        Plot(x, y, RGB(0, 0, aBuffer(x,y) ))
      Next
    Next
  StopDrawing()

  FlipBuffers()
Until GetAsyncKeyState_(#VK_ESCAPE)

; *************************************************************************************

7
Purebasic / Re: 3D Starballs Library
« on: April 23, 2019 »
Hey.
Thanks.
I try it with PB 5.70 x64 and it works fine.
There is just a problem in the code. The KK_StarBallInfo() do not work, i ; it

8
Purebasic / [GAME] Free PB game
« on: November 16, 2018 »
BGames team's (Pollux, Yukin et Djes from the french forum) offers to us all their games until LJ3 made with PB



I let you see all content.
https://www.purebasic.fr/french/viewtopic.php?f=2&t=17499

PB forever  :updance:

9
I recoded all the size settings to make the game compatible with lower resolutions.
Could you try again KrazyK ?

10
Hehe Great Job. :clap: And nice bloody's...  :kewl:
Witch language to do this demo ?

11
Purebasic / Re: Old School Style Demo
« on: October 30, 2018 »
Very nice and proper.
I so like le little blink on the logo  ;D

12
Purebasic / Re: Psygnosis Agony MinIntro
« on: October 30, 2018 »
I love that forum  :cheers:

13
Purebasic / Re: Beast Tribute
« on: October 30, 2018 »
Veryyyyy nice.
I already saw a beast demo but not as complete as yours.
Really great job.
Thanks a lot for sharing.

14
Here is GHOST N PUMPKIN my small contest game

Some days to make... everything.
The collision tests are a little crappy... That makes the game harder  O0

Coded with PUREBASIC for windows x86 / x64

Windows Only

Press SPACE to START
Press ARROWS to MOVE
Press SPACE to FIRE during game
Press ESCAPE to EXIT

Special thanks to Boby from the french purebasic forum

EnJoY

-----EDIT------

Zip Update.
A have change a small value witch make a few gamer go to game over directly after start the game (i meet 2 people with that prob)

15
 :|| Great work !
Amazing GFX !

16
Yop yop.. i'll try to do something.. But no much time..

17
Purebasic / Re: PLATOO! A tiro skeet game (Demo)
« on: April 03, 2018 »
I've uploaded to purebasic official forum and everybody was so scared of an .exe... really piss me off and quit my wishes to coding for purebasic...  probably won't work on it anymore, just wanted to share and read some opinions so thanks again!
That's true..
If you haven't post a lot's of code before, they will be very paranoiac ^^ (do you post it to Annoncement ?)
But don't stop coding in PB for that. It's a good and fun language.
Cya

18
Purebasic / Re: ICS cracktro remakes
« on: April 03, 2018 »
Thanks ! :clap:
With the sources that could be much interresting  ;D

19
Purebasic / Psygnosis Agony MinIntro
« on: March 17, 2018 »
This is a small intro  to pay tribute to PSYGNOSIS and the superb AGONY on AMIGA. The most difficult was to recover and divert the SPRITES.
The archive contains some of the images (sprites and mod are in datasection), the code, the images.

Use Arrows to move the Owl.

EnJoY

20
Purebasic / Re: [Retroremake] Amstrad CPC for fun
« on: March 03, 2018 »
Thanks padman. It working with 5.62 x86 (but invalid access mem to the callFunctionFast with x64)  :clap:

Pages: [1] 2 3