Something different - A GUI for Wizmo

[xxgeek]

Many years ago I came across a little assembly program that allows the user to create particles in space, add a sun, or blackhole, define the gravity of the sun, blackhole and particles, then watch it evolve.
www.grc.com/wizmo/wizmo.htm

Not all of the possible wizmo commands are being utilized.
Many of these commands deal with display, hibernation, monitors, shutdown, reboot......etc.
The GUI ONLY utilizes the commands for the screensaver/graphics capabilities.

I liked playing with this and trying different values, but it was cumbersome creating the shortcuts.

Just recently I put together a GUI to make it a bit easier to make changes, and run it again, and again.

All you need to do is goto the website above and download wizmo, and then put it in the same folder as the .bas file created with the code below.
Run the code, plug in some values, and hit the Run button.
Don't move your mouse, or touch any keys until you want it to stop.



    ' A GUI for wizmo - https://justbasiccom.proboards.com/thread/1011/different-gui-wizmo?page=1&scrollTo=7283
   'Created by xxgeek @  - https://justbasiccom.proboards.com/thread/1011/different-gui-wizmo?page=1&scrollTo=7277
   'Put the wizmo.exe file into the same folder as the ,bas or .tkn file created with the code below
   ver$ = "v1.1"
   dim line$(500)
   nomainwin
   WindowWidth = 700
   WindowHeight = 600
   UpperLeftX = int((DisplayWidth-WindowWidth)/2)
   UpperLeftY = int((DisplayHeight-WindowHeight)/2)
   groupbox #main.boundary,"Screen Boundary",270,15,70,125
   radiobutton #main.solid,"Solid",[setStop],[setStop],280,40,40,25
   radiobutton #main.elastic,"Elastic",[setElastic],[setElastic],280,70,50,25
   radiobutton #main.infinite,"Infinite",[setInfinite],[setInfinite],280,100,60,25
   groupbox #main.wellGroup,"Gravity Well",460,15,85,70
   radiobutton #main.sun,"Sun",[setSun],[setSun],470,40,40,25
   radiobutton #main.blakhole,"Black Hole",[setBlackhole],[setBlackhole],470,60,80,25
   statictext #main.wellGravity, "Well Mass", 470, 95, 50, 20
   textbox #main.wellText, 530, 90, 60, 20
   groupbox #main.partGroup,"Particles",5,15,225,65
   radiobutton #main.Particles, "Number of Particles",[setParticles],[setParticles], 10, 35, 110, 20
   textbox #main.partText, 125, 35, 50, 20
   statictext #main.partGravity, "Particle Mass", 50, 90, 70, 20
   textbox #main.gravText, 125, 85, 50, 20
   radiobutton #main.grid, "Use Particle Grid",[setGrid],[setGrid], 20, 55, 100, 20
   textbox #main.griddimx, 125, 50, 40, 20
   statictext #main.grid2, "X", 175, 55, 20, 20
   textbox #main.griddimy, 195, 50, 40, 20
   statictext #main.trails, "Trails Length", 55, 120, 70, 20
   textbox #main.trailLen, 125, 115, 40, 20
   checkbox #main.lineChk,"Particles in Diagonal Line ",[setline],[resetLine],15,145,140,25
   button #main.default, "Run", [run],UL 270, 150, 110, 50
   button #main.save, "Save Configuration", [save],UL 570, 190, 110, 30
   button #main.open, "Open Config File", [open],UL 450, 190, 110, 30
   button #main.del, "Select an Item to Delete", [delItem],UL 50, 205, 140, 30
   statictext #main.shake, "Mouse Sensitivity", 470, 150, 90, 20
   textbox #main.shakeNum, 560, 145, 40, 20
   statictext #main.header, "Select a Saved Configuration", 270, 225, 150, 15
   listbox #main.configs, configsList$(, [configSelected], 05, 240, 690, 360
   open "Wizmo GUI ";ver$ for dialog_modal_nf as #main
   #main "trapclose [quit]"
   linne$ = "noline"
   #main.shakeNum "50"
   #main.solid "set"
   #main.griddimx "!hide"
   #main.griddimy "!hide"
   #main.grid2 "!hide"
   #main.Particles "set"
   #main.default "!font 12"
   #main.configs "font 11 bold"
   #main.configs "singleclickselect"
   gosub [getConfigs]
   '#main.configs "reload"
   wait

[run]
   gosub [getValues]
   if shaik$ = "" or val(shaik$) = 0 then shaik$ = "50"
   run "wizmo particles=";val(parts$);" grid=";val(dimx$);",";val(dimy$);" gravity=";val(grav$);" ";bound$;" ";linne$;" trails=";val(trail$);" ";well$;wellMass$;" quiet shake=";val(shaik$);" graviton"
   wait

[setStop]
   bound$ = "stop"
   wait
[setElastic]
   bound$ = "elastic"
   wait
[setInfinite]
   bound$ = "infinite"
   wait
[setSun]
   well$ = "sun="
   wait
[setBlackhole]
   well$ ="blackhole="
   wait
[setline]
   linne$ = "line"
   wait
[resetLine]
   linne$ = ""
   wait

[setParticles]
   #main.griddimx ""
   #main.griddimy ""
   #main.partText "!show"
   #main.griddimx "!hide"
   #main.griddimy "!hide"
   #main.grid2 "!hide"
   wait

[setGrid]
   #main.partText ""
   #main.partText "!hide"
   #main.griddimx "!show"
   #main.griddimy "!show"
   #main.grid2 "!show"
   wait

[open]
   if fileExists(DefaultDir$, "configs.txt") then run "notepad ";DefaultDir$;"\configs.txt" else notice "No Config File Created Yet"
   wait

[save]
   gosub [getValues]
   if val(shaik$) = 0 or shaik$ = "" then shaik$ = "50"
   open "configs.txt" for append as #1
   #1 "wizmo particles=";val(parts$);" grid=";val(dimx$);",";val(dimy$);" gravity=";val(grav$);" ";bound$;" ";linne$;" trails=";val(trail$);" ";well$;wellMass$;" quiet shake=";val(shaik$);" graviton"
   close #1
   redim configsList$(500)
   gosub [getConfigs]
   #main.configs "reload"
   wait

[getConfigs]
   redim configsList$(500)
   if fileExists(DefaultDir$, "configs.txt") then
       open DefaultDir$;"\configs.txt" for input as #1
       while eof(#1) = 0
           x = x + 1
           line input #1, configsList$(x)
       wend
       close #1
   end if
   #main.configs "reload"
   return

[configSelected]
  #main.configs "selection? config$"
   if config$ <> "" and delItem = 1 then
       open "configs.txt" for input as #1
       open "configsTemp" for output as #2
       while eof(#1) = 0
           line input #1, oneLine$
           if oneLine$ = config$ then [notToday] else #2 oneLine$
           [notToday]
       wend
       close #1
       close #2
       kill "configs.txt"
       name "configsTemp" as "configs.txt"
       gosub [getConfigs]
       #main.configs "reload"
   end if
   if delItem = 0 then run config$
      delItem = 0
      #main.configs "select 0"
   wait

[getValues]
   #main.trailLen "!contents? trail$"
   #main.partText "!contents? parts$"
   #main.gravText "!contents? grav$"
   #main.griddimx "!contents? dimx$"
   #main.griddimy "!contents? dimy$"
   #main.shakeNum "!contents? shaik$"
   #main.wellText "!contents? wellMass$"
   return

[delItem]
   delItem=1
    wait

[quit]
   close #main
   end

   'function for checking file existence
function fileExists(path$, filename$)
   dim info$(0, 0)
   files path$, filename$, info$()
   fileExists = val(info$(0, 0)) 'non zero is true
end function
'

The possible systems are infinite.

This is another example of what can be done with Just Basic.
Using the command line of an exe file, we can create our own GUI's

Have fun!

P.S. If their is any interest in creating a GUI for the other commands wizmo will accept I would consider working on it.

If you find a glitch, please report it.

[plus]

Yeah I just saw this at LB, too many questions for someone that has no idea what are "good" numbers to use for all the numbers to fill.

Strongly recommend defaults for every item and number ranges listed where appropriate.

I have no idea what a wizmo is!

This thing just errors out when numbers are guessed at, see attached.


Is this supposed to work with some other file?

OK read directions downloaded Wizmo.exe and have separate folder setup for Wizmo. 
I ran the bas code and the thing now sits there with screen covered in little 5 radius pixel white balls with a yellow one in middle.
Nothing happens, but no error anymore. Not fun so far...

Here is something fun I just modded:
qb64phoenix.com/forum/showthread.php?tid=1717&pid=16532#pid16532

[xxgeek]

I guess I should have explained a little better, instead of expecting anyone to read the wizmo page.

You can use any values you like, but some values are going to look crazy.
It may take a while to get used to it.

1. You can choose a sun, or a blackhole as the "gravity well"
2. You must give the "gravity well" a mass or it is meaningless.

3. Trails will show a red trail of length given in pixels.
4. Number of particles can be any number.
5.The "particle gravity" applies to ALL particles, not individual ones.(wish I could change that)
6. The grid is # of particles X # of particles. If used, the original # of particles gets ignored (if populated)
7. "line" is an invisible line that lines up the particles.
8. Boundary option
"solid" - like hitting a wall
"elastic" - like bouncing off a wall
"infinite" - particles can go off screen, and come back (may take a while in some cases.)

2 examples should get you started
#particles 3 , particle gravity 8, with a sun, a gravity well of 100, using "solid" boundary
#particles 3 , particle gravity 8000, with a sun, a gravity well of 80000, using a "solid" boundary

It is almost a solar system creator, but not quite.
Play around. Create binary systems, or use the grid to create some amazing symetricals.
Use a blackhole instead of the sun.

Note, if you use scaling in Windows display you only see part of the screen.
It will work with many particles since written in machine code, it's fast.

I'll check out your link too.

I used to have a program where one COULD give each planet a mass, the sun a mass, and create your own solar systems, but an old backup drive It was on died a while back, and I can't remember the name of it. If you know of another one, please let me know.

Thanks for the feedback plus, I'll get back to you about the app in the link you posted soon, as in a day or so.

[plus]

Thanks for your descriptions, creating a solar system like system is good start to get feet wet. I had no idea what numbers to use for gravity and gravity well so I used 1 and 1 and that apparently makes for a very dull system.

So the grid starts starts particles all spread out evenly across space from what I gather.

Don't worry about getting back to me on my link, it's not JB but it is very interesting trend in Basic coding. We are no longer in DOS or Windows.

[tsh73]

1. You can choose a sun, or a blackhole as the "gravity well"
2. You must give the "gravity well" a mass or it is meaningless.

It sounds like radiobutton to me.

But in program it is a checkbox
which is made by code to behave as radiobutton (!)

EDIT

---

"Boundary" group behaves the same.

[xxgeek]

Made a couple of minor changes to help users understand the options, by renaming "well gravity" to "well mass" and "particle gravity" to "particle mass" , and moving the "well mass" button close to the "Gravity Well" options.

Years ago, I had a program where I could add planets, suns, blackholes, in any numbers, and individually give them mass, direction and speed. If anyone remembers the name of it, please let me know. It may have been a screensaver too, I cannot remember.

Thanks for the feedback. It helps improve the app.
btw - values can be left empty if desired.


    ' A GUI for wizmo - https://www.grc.com/wizmo/wizmo.htm
   'Created by xxgeek @  - https://justbasiccom.proboards.com/
   'Put the wizmo.exe file into the same folder as the ,bas or .tkn file created with the code below
   nomainwin
   WindowWidth = 500
   WindowHeight = 200
   UpperLeftX = int((DisplayWidth-WindowWidth)/2)
   UpperLeftY = int((DisplayHeight-WindowHeight)/2)
   groupbox #main.boundary,"Screen Boundary",260,15,70,125
   checkbox #main.solid,"Solid",[setStop],[resetStop],270,40,40,25
   checkbox #main.elastic,"Elastic",[setElastic],[resetElastic],270,70,50,25
   checkbox #main.infinite,"Infinite",[setInfinite],[resetInfinite],270,100,60,25
   statictext #main.gravwell,"Gravity Well",390,15,90,25
   checkbox #main.sun,"Sun",[setSun],[resetSun],400,40,40,25
   checkbox #main.blakhole,"Black Hole",[setBlackhole],[resetBlackhole],400,60,80,25
   statictext #main.wellGravity, "Well Mass", 360, 95, 50, 20
   textbox #main.wellText, 420, 90, 60, 20
   statictext #main.Particles, "Number of Particles", 10, 15, 100, 20
   textbox #main.partText, 115, 10, 50, 20
   statictext #main.partGravity, "Particle Mass", 30, 45, 70, 20
   textbox #main.gravText, 115, 40, 50, 20
   statictext #main.grid, "Grid Dimensions", 30, 75, 80, 20
   textbox #main.griddimx, 115, 70, 40, 20
   statictext #main.grid, "X", 165, 75, 20, 20
   textbox #main.griddimy, 185, 70, 40, 20
   statictext #main.trails, "Trails Length", 45, 105, 70, 20
   textbox #main.trailLen, 115, 100, 40, 20
   checkbox #main.lineChk,"Add Line",[setline],[resetLine],50,130,60,25
   button #main.default, "Run", [run],UL 340, 130, 100, 35
   open "Wizmo" for dialog_nf as #main
   #main "trapclose [quit]"
   linne$ = "noline"
   wait

[run]
   #main.trailLen "!contents? trail$"
   #main.partText "!contents? parts$"
   if blak$ = "" then
       #main.wellText "!contents? son$"
   else
       if son$ = "" then #main.wellText "!contents? blak$"
   end if
   #main.gravText "!contents? grav$"
   #main.griddimx "!contents? dimx$"
   #main.griddimy "!contents? dimy$"
 'uncomment for use in mainwin, copy/paste to save the interesting values  (a future listbox to choose saved values?)
 'print "wizmo particles=";val(parts$);" grid=";val(dimx$);",";val(dimy$);" gravity=";val(grav$);" ";linne$;" trails=";val(trail$);" ";bound$;" blackhole=";blak$;" sun=";son$;" quiet graviton"
   run "wizmo particles=";val(parts$);" grid=";val(dimx$);",";val(dimy$);" gravity=";val(grav$);" ";bound$;" ";linne$;" trails=";val(trail$);" ";bound$;" blackhole=";blak$;" sun=";son$;" quiet graviton"
   wait

[setStop]
   #main.solid "set"
   bound$ = "stop" : #main.infinite "reset" : #main.elastic "reset"
   wait
[resetStop]
   bound$ = ""
   #main.solid "reset"
   wait
[setElastic]
   #main.elastic "set"
   bound$ = "elastic" : #main.solid "reset" : #main.infinite "reset"
   wait
[resetElastic]
   bound$ = ""
   #main.elastic "reset"
   wait
[setInfinite]
   #main.infinite "set"
   bound$ = "infinite" : #main.elastic "reset" : #main.solid "reset"
   wait
[resetInfinite]
   bound$ = ""
   #main.infinite "reset"
   wait
[setSun]
   #main.wellText "!contents? son$"
   blak$ = ""
   #main.blakhole "reset"
   wait
[resetSun]
   #main.sun "reset"
   son$ =""
   wait
[setBlackhole]
   #main.wellText "!contents? blak$"
   son$ = ""
   #main.sun "reset"
   wait
[resetBlackhole]
   blak$ = ""
   #main.blakhole "reset"
   wait
[setline]
   linne$ = "line"
   wait
[resetLine]
   linne$ = ""
   wait

[quit]
   close #main
   end


[plus]

Yes better, I think something should be either or for grid or particle number since they are mutually exclusive.

Here is my favorite setting so far:

[xxgeek]

Thanks Anatoly, changed checkboxes to radiobuttons.

Added ability to save the configuration.

Once saved just click the Line in the listbox to activate.
After clicking an item in the listbox, the textboxes DO NOT re-populate with the new values.
It just runs the line selected, so don't move the mouse after selecting an item.

Also added another command for ability to increase mouse sensitivity.
Keeps the screensaver running if the mouse gets moved a little, depending on value.
0 - You'll need to hit the "any" key.
(1 - infinity) - You need to move the mouse that many pixels so don't go too big or..... "any" key.
Default is set at 50
500 saved configs max. - Or change all the Dim statements manually.

Makes it easier to share your configs with any other enthusiasts too.


plus
I like using very few particles, with low mass, infinite boundary, and nothing else, and try to keep everything in view on screen.
I also noticed that in many cases as you increase the masses, it speeds up the action.

The grid can make some really spectacular symmetrical systems. Try small grids and low masses, and watch the action.
Try all kinds of settings, this is an amazing little assembly program.
It can handle a 50X50 grid and still stay fluid, and fast on my PC.
That's 2500 particles being calculated.

Have fun. Post some of your favorite configs.
Open the config file and paste these lines into your configs.txt file, and save it using notepad, to try them

wizmo particles=6 grid=0,0 gravity=66 noline trails=0 blackhole= sun=555 quiet shake=50 graviton
wizmo particles=7 grid=0,0 gravity=70 infinite noline trails=0 blackhole= sun= quiet shake=50 graviton
wizmo particles=7 grid=3,3 gravity=70 stop noline trails=0 blackhole= sun= quiet shake=50 graviton
wizmo particles=7 grid=5,5 gravity=30 stop noline trails=0 blackhole= sun= quiet shake=50 graviton
wizmo particles=7 grid=5,5 gravity=250 stop noline trails=8 blackhole= sun= quiet shake=50 graviton
wizmo particles=7 grid=5,5 gravity=1000 infinite line trails=8 blackhole= sun= quiet shake=50 graviton



    ' A GUI for wizmo - https://justbasiccom.proboards.com/thread/1011/different-gui-wizmo?page=1&scrollTo=7283
   'Created by xxgeek @  - https://justbasiccom.proboards.com/thread/1011/different-gui-wizmo?page=1&scrollTo=7277
   'Put the wizmo.exe file into the same folder as the ,bas or .tkn file created with the code below
   ver$ = "v1.1"
   dim line$(500)
   nomainwin
   WindowWidth = 700
   WindowHeight = 600
   UpperLeftX = int((DisplayWidth-WindowWidth)/2)
   UpperLeftY = int((DisplayHeight-WindowHeight)/2)
   groupbox #main.boundary,"Screen Boundary",270,15,70,125
   radiobutton #main.solid,"Solid",[setStop],[setStop],280,40,40,25
   radiobutton #main.elastic,"Elastic",[setElastic],[setElastic],280,70,50,25
   radiobutton #main.infinite,"Infinite",[setInfinite],[setInfinite],280,100,60,25
   groupbox #main.wellGroup,"Gravity Well",460,15,85,70
   radiobutton #main.sun,"Sun",[setSun],[setSun],470,40,40,25
   radiobutton #main.blakhole,"Black Hole",[setBlackhole],[setBlackhole],470,60,80,25
   statictext #main.wellGravity, "Well Mass", 470, 95, 50, 20
   textbox #main.wellText, 530, 90, 60, 20
   groupbox #main.partGroup,"Particles",5,15,225,65
   radiobutton #main.Particles, "Number of Particles",[setParticles],[setParticles], 10, 35, 110, 20
   textbox #main.partText, 125, 35, 50, 20
   statictext #main.partGravity, "Particle Mass", 50, 90, 70, 20
   textbox #main.gravText, 125, 85, 50, 20
   radiobutton #main.grid, "Use Particle Grid",[setGrid],[setGrid], 20, 55, 100, 20
   textbox #main.griddimx, 125, 50, 40, 20
   statictext #main.grid2, "X", 175, 55, 20, 20
   textbox #main.griddimy, 195, 50, 40, 20
   statictext #main.trails, "Trails Length", 55, 120, 70, 20
   textbox #main.trailLen, 125, 115, 40, 20
   checkbox #main.lineChk,"Particles in Diagonal Line ",[setline],[resetLine],15,145,140,25
   button #main.default, "Run", [run],UL 270, 150, 110, 50
   button #main.save, "Save Configuration", [save],UL 570, 190, 110, 30
   button #main.open, "Open Config File", [open],UL 450, 190, 110, 30
   button #main.del, "Select an Item to Delete", [delItem],UL 50, 205, 140, 30
   statictext #main.shake, "Mouse Sensitivity", 470, 150, 90, 20
   textbox #main.shakeNum, 560, 145, 40, 20
   statictext #main.header, "Select a Saved Configuration", 270, 225, 150, 15
   listbox #main.configs, configsList$(, [configSelected], 05, 240, 690, 360
   open "Wizmo GUI ";ver$ for dialog_modal_nf as #main
   #main "trapclose [quit]"
   linne$ = "noline"
   #main.shakeNum "50"
   #main.solid "set"
   #main.griddimx "!hide"
   #main.griddimy "!hide"
   #main.grid2 "!hide"
   #main.Particles "set"
   #main.default "!font 12"
   #main.configs "font 11 bold"
   #main.configs "singleclickselect"
   gosub [getConfigs]
   '#main.configs "reload"
   wait

[run]
   gosub [getValues]
   if shaik$ = "" or val(shaik$) = 0 then shaik$ = "50"
   run "wizmo particles=";val(parts$);" grid=";val(dimx$);",";val(dimy$);" gravity=";val(grav$);" ";bound$;" ";linne$;" trails=";val(trail$);" ";well$;wellMass$;" quiet shake=";val(shaik$);" graviton"
   wait

[setStop]
   bound$ = "stop"
   wait
[setElastic]
   bound$ = "elastic"
   wait
[setInfinite]
   bound$ = "infinite"
   wait
[setSun]
   well$ = "sun="
   wait
[setBlackhole]
   well$ ="blackhole="
   wait
[setline]
   linne$ = "line"
   wait
[resetLine]
   linne$ = ""
   wait

[setParticles]
   #main.griddimx ""
   #main.griddimy ""
   #main.partText "!show"
   #main.griddimx "!hide"
   #main.griddimy "!hide"
   #main.grid2 "!hide"
   wait

[setGrid]
   #main.partText ""
   #main.partText "!hide"
   #main.griddimx "!show"
   #main.griddimy "!show"
   #main.grid2 "!show"
   wait

[open]
   if fileExists(DefaultDir$, "configs.txt") then run "notepad ";DefaultDir$;"\configs.txt" else notice "No Config File Created Yet"
   wait

[save]
   gosub [getValues]
   if val(shaik$) = 0 or shaik$ = "" then shaik$ = "50"
   open "configs.txt" for append as #1
   #1 "wizmo particles=";val(parts$);" grid=";val(dimx$);",";val(dimy$);" gravity=";val(grav$);" ";bound$;" ";linne$;" trails=";val(trail$);" ";well$;wellMass$;" quiet shake=";val(shaik$);" graviton"
   close #1
   redim configsList$(500)
   gosub [getConfigs]
   #main.configs "reload"
   wait

[getConfigs]
   redim configsList$(500)
   if fileExists(DefaultDir$, "configs.txt") then
       open DefaultDir$;"\configs.txt" for input as #1
       while eof(#1) = 0
           x = x + 1
           line input #1, configsList$(x)
       wend
       close #1
   end if
   #main.configs "reload"
   return

[configSelected]
  #main.configs "selection? config$"
   if config$ <> "" and delItem = 1 then
       open "configs.txt" for input as #1
       open "configsTemp" for output as #2
       while eof(#1) = 0
           line input #1, oneLine$
           if oneLine$ = config$ then [notToday] else #2 oneLine$
           [notToday]
       wend
       close #1
       close #2
       kill "configs.txt"
       name "configsTemp" as "configs.txt"
       gosub [getConfigs]
       #main.configs "reload"
   end if
   if delItem = 0 then run config$
      delItem = 0
      #main.configs "select 0"
   wait

[getValues]
   #main.trailLen "!contents? trail$"
   #main.partText "!contents? parts$"
   #main.gravText "!contents? grav$"
   #main.griddimx "!contents? dimx$"
   #main.griddimy "!contents? dimy$"
   #main.shakeNum "!contents? shaik$"
   #main.wellText "!contents? wellMass$"
   return

[delItem]
   delItem=1
    wait

[quit]
   close #main
   end

   'function for checking file existence
function fileExists(path$, filename$)
   dim info$(0, 0)
   files path$, filename$, info$()
   fileExists = val(info$(0, 0)) 'non zero is true
end function
'

[plus]

Very nice mods to your update xxgeek! The configs.txt file is practical memory bank. BTW it's configs.txt not config.txt, need that s.

[xxgeek]

Jun 10, 2023 22:25:24 GMT plus said:

Very nice mods to your update xxgeek! The configs.txt file is practical memory bank. BTW it's configs.txt not config.txt, need that s.

Thanks plus, the input helped. I get so used to my apps while I program them that I assume the whole world knows all the details as well as I do.

btw - It wasn't a problem with the s in configs so much as
I forgot to write a label and event for the "open config file" button

It'll be fixed in a few seconds in my last post.

[plus]

Don't forget your LB post:

Open the config file and paste these lines into your config.txt file, and save it using notepad, to try them

s still needed the same in that code too, I bet