PureBasic Forums - English

Thanks PB - no offence intended.

I just hope anyone who pops into the Code in Basic site, enjoys what they find.

Not a lot at the moment it's true, but it's very new .. :D

I shall continue to visit this site, but I'll probably avoid posting.
I'm the wrong side of 75 now, and can do without ...

Hi folks,

Just thought you might like to know about a new website that's just started, for Basic programmers. :)

There are only a few members at the moment, but it's clear PureBasic is highly regarded. Unfortunately there have been no posts in the PureBasic section as yet. :(

Why bother? - well ...

In the FOR loop, work in tenths, hundreths or whatever you require .. :)

This example runs between 1.0 and 2.0 in tenths:


OpenConsole()
ClearConsole()

For i = 10 To 20

PrintN(StrF((i/10),1))

Next i

PrintN("Press any key to exit")
Input()
PrintN("Done")
Delay(2000)

End


best wishes ...

Thanks Spikey .. Hide it - Show it .. that works for me .. :)

I suppose what my makeshift method of re-writing the 'Exit' button text was doing, was to make it active - a sort of SetFocus.

@IdeasVacuum .. Oh no! you're on 5.11 already ?
'.. the Exit button does not get lines drawn on it, they go ...

Hi,

Here's a small program which draws patterns in a window whenever the 'Next' button is pressed.
I quite like these pretty pattern programs - you never know what will appear next .. :)

At line 120, is a the statement:
SetGadgetText(#B_Exit, "Exit")

If you comment out this line, you'll see ...

Hi davido .. I could possibly see you if I looked out my window ..

I'm just off Holly Road near Motor Components ..

Graham

Hi ts-soft ..

I was aware of the problem - but we can't let the virus maniacs win and ruin computing for the rest of us.

Fred's recent blog suggested people should contact the anti-virus companies with examples and get them to modify their false positives.

That's a start, but as a commercial ...

Hi,

It seems that the forum does not provide for users to upload contributions to the website.

This is a pity, since contributions of assorted applications provide interest and a learning facility.

Many years ago, Kale provided a link to a Xmas program he had written - the code is still in the ...

Thanks for the info Ash .. :)

It seems a pity this forum doesn't provide for users to upload contribution .zip files into appropriate areas.
The community would surely be more vibrant, and it would help people learning the language considerably.

Maybe there's a problem with capacity or something ...

@utopiomania and WilliamL ..

Thanks for the welcome guys .. :)

I nearly missed it as you'd resurrected this old thread ..

I'm not much good with PB yet - it feels strange after years with another Basic.

But I'm trying various things, and I'm quite impressed by this language. If only I can ...

netmaestro .. Beg your pardon .. I only just purchased PB Version 5.0 .. things are moving too fast ..

Graham

Thanks oreopa .. I hadn't thought of equating one constant to another .. that's a useful concept. Glad you thought my approach was OK. :)

c4s .. Yep, that's a good way of spreading the long constants out .. :)

netmaestro .. Oh! .. now you're just showing off .. :lol:
I see I've got a long way ...

Thanks eJan .. I'll take a look at that. :)

ts-soft .. that's true, but I still have to stare at the long lines .. :wink: .. and I'm not interested in cross-platform.

But it's not so much the window style parameters that I'm interested in comments on - I'm fairly happy to use the Hex values ...

Thanks for the reply Kiffi ..

Yes, I was aware of the PB window flags .. I'm trying to avoid them .. I hate typing very long parameters .. :wink:
By the time you've Or'ed together a string of them for a window style, the line's stretching off the page.

I'm also not too happy using magic Windows ...

Hi,

No big deal, but here's my first go at a window skeleton program.


; skeleton window

EnableExplicit
Define.l Event,wW,wH,run,textW
Define.s a$
#w1 = 1

;(Note: Window Flags: #SysMenu = $80000 #Max = $10000 #Min = $20000 #Size = $40000)
#Center = 1
#Full = $F0000 ;#SysMenu|#Max|#Min|#Size ...