Pocket Burning Sand (Open Source)

[colin9876]

Ive swapped over my orignonal condense function to try out Hashing methods and Im comming to the conclusion that my condense method was faster, and better.

Condense(R,G,B)=int (R /(64)) *16 + int (G /64) *4 + int(B/64)
gives 64 possible indexs in rapid time and no need for a colors table either!

Unless Im missing something theres no available Hash function that maps large RGBs uniquely to small integers that has a 1to1 reverse look up??? so might as well use this condense method with the proviso that PSB doesnt use two v similar colors

[neilnapier]

I will add your update tothe front page in one second. Perhaps that source is more the sort of thing for the tap.

Yes reactions would be very good!

EDIT: You did the pensizes the same way I was doing by blue borders on the elements.

[neilnapier]

I will post this new one as the next update. Also don't you think that water slips too much?

[colin9876]

All looks great Neil! Good stuff

Re water slipping too much what do u mean? If you have the spread value less it takes longer to level out, especially on PPC. And it is water, not a highly viscous liquid??

[neilnapier]

Bit if souces when to be from the top to the bottom the water is spreading to much out and would cover the whole screen (if you look at BS water will go almost compleletly straight down with just a little bit spreading out)

[colin9876]

so change cloud to spread =1.4 thats used for the source, but keep water as spread=2

[neilnapier]

The system that you use for cloud is different from that to BS. For this reason I am not asking for a change in that. When the tap source is implemented then water would be needed to fall down from top to bottom along with 3 other elements.



EDIT: Clear isn't working.

[colin9876]

ok add the tap icon at the top with this code

style =8


Then in the timer
if n<8000 and style =8 then
n=bh1.AddElement(n,pensize,pensize,50,50,rgb(80,80 ,230),2,1) 'first stream from (50,50)
n=bh1.AddElement(n,pensize,pensize,80,50,rgb(230,5 0,50),2,1) 'second stream from (80,50)
etc
End if

[neilnapier]

Done, works great. I will post it once I have got an answer to this question:

How to you turn it into a toggle (ie turing it off on the next click)

EDIT: Also when it is turned on you can't create a solid object.

[colin9876]

to toggle say
if style<>8 then style=8 else style=1