Oxygen Basic

Programming => Example Code => Topic started by: Aaron on March 16, 2014, 07:19:25 AM

Title: Termination
Post by: Aaron on March 16, 2014, 07:19:25 AM
Hello,

The world after the end of Windows.
Code: [Select]
include "ss.inc"
OpenWindow 640,480,1

sys x,y,startx,starty
single i, a

Sub Draw()
    startx = x-40 
    starty = y-60 
    Color 255,255,255,255
    DrawCircle startx+160, starty+100, 100
    'AACircle startx+160, starty+100, 100
End Sub

While Key(27)=0
Cls 0,0,0
For i=0, 6.4, 0.17
    x = sin(i+a) * 100 + 200
    y = cos(i+a) * 100 + 200
    Draw()
Next 
a +=1
if a >=360 then a=0
Sync
Wend
CloseWindow

.
Title: Re: Termination
Post by: JRS on March 16, 2014, 07:29:41 AM
Peter,

I don't think Windows is dead but any effort put into 32 bit Windows is risky. I have limited my 32 development to XP and will not be compiling any 32 bit code on my Windows 7 64 bit partition using the 32 bit SysWOW64 emulator. I plan to release a 32 bit Script BASIC 2.2 version for Windows XP and Linux but on going development for 32 bit will be a secondary effort and driven by demand.

John

Glad to see you back. On vacation?
Title: Re: Termination
Post by: Aaron on March 16, 2014, 07:41:14 AM
Code: [Select]
On vacation?
No, programming.

I love 32bit, 64Bit is out of date.  ;D
Title: Re: Termination
Post by: Aaron on March 16, 2014, 07:44:16 AM
Family Show.
Code: [Select]
include "gp.inc"
OpenWindow 128,128,1

sys x=1, button

Loadimage "shock/shock1.png",1
Loadimage "shock/shock2.png",1
Loadimage "shock/shock3.png",1
Loadimage "shock/shock4.png",1
Loadimage "shock/shock5.png",1
Loadimage "shock/shock6.png",1
Loadimage "shock/shock7.png",1
Loadimage "shock/shock8.png",1
Loadimage "shock/shock9.png",1
Loadimage "shock/shocka.png",1
Loadimage "shock/shockb.png",1
Loadimage "shock/shockc.png",1
Loadimage "shock/shockd.png",1
Loadimage "shock/shocke.png",1
Loadimage "shock/shockf.png",1
Loadimage "shock/shockg.png",1
Loadimage "shock/shockh.png",1
Loadimage "shock/shocki.png",1

while KeyDown(27)=0 
DrawImage x,0,0,0
iF MouseButton()=1 and Button()=0
   Button=1
   inc x
   iF x>18 Then x=1
End iF
iF MouseButton()=0 Then Button=0
Sync
wend
CloseWindow

.
Title: Re: Termination
Post by: JRS on March 16, 2014, 09:19:27 AM
Quote
I love 32bit, 64Bit is out of date.

To some that may sound humorous but for Windows users, it a painful fact.

I think Microsoft's new CEO should rename Windows to Layers and SysWOW64 to SysKOK64. (Kludge On Kludge)
Title: Re: Termination
Post by: Aurel on March 16, 2014, 10:04:13 AM
I love 32bit to....and i really don't get it all this punching from John about 32bit...
and what a heck is this so important when 80% of windows software is 32bit.
Is a really that different to run 32bit program on 64bit windows in syswow mode?
and if this is a emulator what a heck is then any GUI third party framework on linux
this is a server or emulator or whatever...blah blah blah.......
I really hate all this crap against window

from Pm user guide....
Put directly a spike-bomb at the linux wall and press the space bar, quick run away

 ;D ;D ;D
Title: Re: Termination
Post by: JRS on March 16, 2014, 10:16:38 AM
I don't think Microsoft cares what you think Aurel and your inability to maintain current OS standards. MS has huge corporate clients and lucrative supports contracts. These clients are running 64 bit system / servers / software which their vendors no longer supply or support 32 bit solutions. MS allowed a migration path with SysWOW64 as it did when they went from 16 bit to 32 bit. If XP (your current OS) end of life isn't a wakeup call then I don't know what else to say.

 
Title: Re: Termination
Post by: Aaron on March 16, 2014, 10:27:14 AM
Quote
(Kludge On Kludge)
  ;D

64Bit is kudge!
Title: Re: Termination
Post by: Aaron on March 16, 2014, 10:31:33 AM
Quote
Put directly a spike-bomb at the linux wall and press the space bar, quick run away

Cool Aurel  ;D  ;D
Title: Re: Termination
Post by: JRS on March 16, 2014, 11:04:21 AM
Quote
Put directly a spike-bomb at the linux wall and press the space bar, quick run away

Cool Aurel  ;D  ;D

Let me know when the Linux server hosting this forum (and 95% of all others) needs to go poof. You guys have been Linux users for years and you didn't even know it. (websites, phones, appliances, ...)
Title: Re: Termination
Post by: Aaron on March 16, 2014, 11:29:55 AM
Quote
Let me know when the Linux server hosting this forum (and 95% of all others) needs to go.
Good to know.
Title: Re: Termination
Post by: Aurel on March 16, 2014, 02:47:18 PM
Quote
You guys have been Linux users for years and you didn't even know it. (websites, phones, appliances, ...)

Oh man...most of people know that and this is not nothing new...
and yes we are 'linux user's when we are online.
And yes linux is very good for servers but is not better than windows server ..only
reason why is used is because is free and are not under virus attacks all the time .
Title: Re: Termination
Post by: JRS on March 16, 2014, 03:19:03 PM
Quote
And yes linux is very good for servers but is not better than windows server ..only
reason why is used is because is free and are not under virus attacks all the time .

You're right Aurel and everyone else is cheap and ignorant.  ::)

Windows is a poor OS for multi-tasking and why VM servers are based on Linux. Unless you're hooked into the other middleware software MS sells, most companies use cloud servers based on Linux.

I would say that Microsoft has failed with everything they have done for the last 10 years and set back computing by at least 20 years.
Title: Re: Termination
Post by: Aurel on March 16, 2014, 10:38:40 PM
Quote
I would say that Microsoft has failed with everything they have done for the last 10 years and set back computing by at least 20 years.

Yeah and because of that in the last 15 years Windows is major OS in the world for
home users.
And after all this years linux still cannot beat Windows in graphics,gui-s and games... ::)

By the way ..do we care when win98 gone ..no....
so most people now will use win7...