Squares

General FreeBASIC programming questions.
MrSwiss
Posts: 3307
Joined: Jun 02, 2013 9:27
Location: Switzerland

Re: Squares

Postby MrSwiss » Jun 14, 2019 22:35

@albert,

you might as well stop, to pollute this forum/thread, with your hallucinations.

Whatever you are smoking/throwing/sniffing must be very bad stuff ... I'd stop that, too.
(Whould be better for your health also.)
Richard
Posts: 2964
Joined: Jan 15, 2007 20:44
Location: Australia

Re: Squares

Postby Richard » Jun 14, 2019 22:48

@Albert.
You are clearly confusing Tesla's earthquake machine (debunked), with breaking wineglasses (proven).
You are writing crap which tells me you are now in a psychotic episode.
Take your medication, or contact your medical management team and get reassessed.
albert
Posts: 5311
Joined: Sep 28, 2006 2:41
Location: California, USA

Re: Squares

Postby albert » Jun 14, 2019 22:58

You use a seismic detector (like above) , and then tap the building with a sledge hammer and wait for the wave to return.
The return time is the required pulse rate.

In the video i posted a page back.. On breaking wine glasses
That's how they found the resonance of the wine glass..

They tapped the glass and used a frequency counter to record the vibrations 337.5 Hz , and then set the speaker to that frequency...
It wasn't earth quaking , so they had to increase the volume. At a higher volume it began earth quaking...

I'm not dreaming....

The wine glass was wobbling like a 1/4 inch.. I don't think the speaker was traveling 1/4 inch. ( so there was some waveform amplification. )
albert
Posts: 5311
Joined: Sep 28, 2006 2:41
Location: California, USA

Re: Squares

Postby albert » Jun 14, 2019 23:11

https://www.youtube.com/watch?v=BE827gwnnk4

If you watch the video all the way through.
Towards the end , they show the slow motion video of the waves in the glass , with blue waves coming out of the speaker in time with the vibrations.

Just like i said , you push the waves and each time they get a little bigger.


I don't think you could use a frequency counter on a bridge or building..
I don't know if the waves would be audible... ( the waves might be several seconds in between ?? fractions of a hertz.. )

That's why i said use a seismic detector to detect the waves. Instead of a frequency counter.

A building can earth quake the same as a wine glass...It works on the same principal..just lower frequencies.
In the Myth Busters video , on the bridge , they used a modified jack hammer set at the wrong frequency..
badidea
Posts: 1614
Joined: May 24, 2007 22:10
Location: The Netherlands

Re: Squares

Postby badidea » Jun 14, 2019 23:58

Topic summary:

Code: Select all

dim as string forumMember(...) = { _
   "Richard", "MrSwiss", "dodicat", "jj2007", _
   "dkr", "integer", "CoderJeff", "badidea" }

dim as string comment(...) = { _
   "That is nonsense", "Your are mixing things up", "You are hallucinating", _
   "Take your pills", "Your fantasies do not correspond with reality", _
   "Check your facts", "You are not thinking clearly", "Not possible", _
   "Study the basic concepts", "No.", "Stop this pollution", _
   "You are confusing things" }

color 12, 0 : print "Forum topic: ";
color 13, 0 : print "Squares"
sleep 1000, 1
randomize timer
while (1)
   for i as integer = 0 to int(rnd * 3)
      color 2, 0
      print "Albert: ";
      color 7,0
      print "Bla bla EQM bla 23 meter bla bla water bla bla resonant bla bla ..."
      sleep 1000, 1
   next
   color 3, 0
   print forumMember(int(rnd * (ubound(forumMember) + 1))) + ": ";
   color 7,0
   print comment(int(rnd * (ubound(comment) + 1)))
   sleep 1000, 1
wend
albert
Posts: 5311
Joined: Sep 28, 2006 2:41
Location: California, USA

Re: Squares

Postby albert » Jun 14, 2019 23:58

If you take the 4" wine glass in the video 337.5Hz , and zoom it out to 100 meters diameter. It's resonant frequency would be fractions of a hertz..

The skyscrapers take up a whole city block , like 100 meters..
albert
Posts: 5311
Joined: Sep 28, 2006 2:41
Location: California, USA

Re: Squares

Postby albert » Jun 15, 2019 0:07

For all you guys's knowledge and schooling and programming ability... You all seem a little thick..
albert
Posts: 5311
Joined: Sep 28, 2006 2:41
Location: California, USA

Re: Squares

Postby albert » Jun 15, 2019 0:19

I remember when i got my associates degree in "Electrical Engineering".
One guy in my class , that was a like a "D" student , got a job making $100,000 a year repairing lottery machines , for the Ohio lottery commission.

Me, i graduated "A+" student at 97.6 percent.. And all i could get was a minimum wage job repairing vending equipment.
I graduated 4th in my class...
albert
Posts: 5311
Joined: Sep 28, 2006 2:41
Location: California, USA

Re: Squares

Postby albert » Jun 15, 2019 0:42

I was thinking that:

You tap any kind of object with a hammer. and it sends waves through the object..
So i was thinking that all those waves in every object traveled at the same speed.. That was a mistake..

Tesla's "Earth Quake Machine" is indeed a resonator...

You tap the object , and record the wave frequency.. that's the resonant frequency.
You pulse the object with waves at that resonant frequency , with enough force , and it will resonate ( earth quake )

You could tap it with a solenoid , or use a speaker at that frequency , to make it earth quake.,

But in my experiments with the "Walk Buttons" on light poles.
Tapping the "walk button" with the side of my fist , like twice a second , makes the light pole wobble like an inch...
albert
Posts: 5311
Joined: Sep 28, 2006 2:41
Location: California, USA

Re: Squares

Postby albert » Jun 15, 2019 1:01

From Google on "bridge collapses soldiers marching"

Marching soldiers are cautioned to break stride on a bridge, lest they match the bridge's frequency of vibration. In April 1831, a brigade of soldiers marched in step across England's Broughton Suspension Bridge. ... If the mechanical resonance is strong enough, the bridge can vibrate until it collapses from the movement.May 22, 2013

The soldiers were all marching in stride ( like 2 steps a second )
Seems like 2 Hertz can destroy all types infrastructure.. light poles , steel stair rails , bridges , etc....
Richard
Posts: 2964
Joined: Jan 15, 2007 20:44
Location: Australia

Re: Squares

Postby Richard » Jun 15, 2019 2:04

Albert wrote:For all you guys's knowledge and schooling and programming ability... You all seem a little thick..
That is simply your perception. It is explained clearly by; https://en.wikipedia.org/wiki/Dunning%E ... ger_effect

You have only numbers and arithmetic. Unfortunately you cannot know what you are missing. We are in a position to see that you are in denial of the existence of all symbolic mathematics. That denial includes the definition of all physics related technical terms and symbols. You misapply those terms because you do not understand their meaning.

I am surprised that you claim to have an Associate Degree in Electrical Engineering. I would have expected advanced “new math” to be an essential prerequisite for such a course. Either you simply imagined it, or you have acquired a brain injury, and lost access to the entire field of symbolic mathematics since then.

This forum is for programming in FB. The Circles thread was for people who went round in circles. This thread is for squares, not the geometrical sort, but the people kind. If you cannot express your square ideas of physics in FB code then you should not be presenting those ideas here.
albert
Posts: 5311
Joined: Sep 28, 2006 2:41
Location: California, USA

Re: Squares

Postby albert » Jun 15, 2019 2:07

I don't know if this has any bearing on the "Earth Quake Machine"

But in chemistry, they have different types of bonds.

A first valence bond , they call an ionic bond..
In a first valence bond , the two atoms can move back and forth like a door hinge. it makes a gas or liquid , flexible molecule.

The more valences that are overlapped , create harder , less flexible molecules.
( water is like a first valence bond , Diamond is like a 7th valence bond )

Steel is a pretty hard molecule, but if you make a steel rod long enough , it will sag in the middle , under its own weight.

I don't know if you could take the bonding , sturdiness and apply it to longer lengths?

There has to be a way to determine the resonance , by size??

A 4" wine glass resonates at 337.5 Hz ,
What does an 8" wine glass resonate at??
What does a 16" wine glass resonate at??

There has to be a formula to determine resonance.. based on material type and span.

Like:
A steel rod 1 meter , resonates at ?? Hz
A steel rod 2 meters , resonates at ?? Hz
A steel rod 10 meters , resonntes at ?? HZ.
The resonance should be multiples at smaller spans..


What you guys are saying:
Is , you can resonate a wine glass , but you can't resonate a building or bridge ( because they are composed of multiple types of materials..)
But when all those different types of material are all glued, riveted and bonded together , it creates a singular resonance..

A concrete bridge 100 meters , resonates at ?? Hz
A concrete block 1 meter , resonates at ( 100 meter bridge * ?? )

Someone needs to come up with a formula , that specifies the resonance based on dimensions , and material type...
Maybe you could use the molecular sturdiness , to determine the resonant frequency of a span??
albert
Posts: 5311
Joined: Sep 28, 2006 2:41
Location: California, USA

Re: Squares

Postby albert » Jun 15, 2019 2:55

Here's the orb from the space-ship..

It was an orb about a foot in diameter, and had lasers circling the orb all around..

Code: Select all

'written in FreeBasic for Windows
'http://www.freebasic.net
'Written by Albert Redditt 5/12-15/2010
'
dim as double x1, y1, x2, y2, zy1, zx1, zx2, zy2, x3, y3, x4, y4, x5, y5, x6, y6, deg, span, radians
dim as integer xctr, yctr, radius, divisions, fullcircle, toggle

screen 19
xctr = 400
yctr = 300
radius = 290
divisions = 45
span = 1
toggle = 0
do
    radians = atn(1) / divisions
    fullcircle = atn(1)*8 / radians

    for deg = 0 to fullcircle step 1

        y1 = radius * cos(deg*(span*radians)*radians)
        x1 = radius * sin(deg*(span*radians)*radians)
       
        zy1 = radius * cos(deg*(span*radians)*radians)
        zx1 = radius * sin(deg*(span*radians)*radians)

        y2 = radius * cos(deg*span*radians*radians)*cos(span*radians*span*deg*radians*radians*radians*deg*radians*deg*radians)
        x2 = radius * sin(deg*span*radians*radians)*cos(span*radians*span*deg*radians*radians*radians*deg*radians*deg*radians)
       
        zy2 = radius * cos(deg*span*radians*radians)*sin(span*radians*span*deg*radians*radians*radians*deg*radians*deg*radians)
        zx2 = radius * sin(deg*span*radians*radians)*sin(span*radians*span*deg*radians*radians*radians*deg*radians*deg*radians)

        if deg > 0 then
            'circle(xctr+x1,yctr+y2),3,9,,,,f
            line(xctr+x3,yctr+y3)-(xctr+x1,yctr+y2),9
            'circle(xctr+x2,yctr+y1),3,9,,,,f
            line(xctr+x4,yctr+y4)-(xctr+x2,yctr+y1),10
            'circle(xctr+zx2,yctr+zy1),3,9,,,,f
            line(xctr+x5,yctr+y5)-(xctr+zx2,yctr+zy1),12
        end if
       
        y3 = y2
        x3 = x1
       
        y4 = y1
        x4 = x2
       
        y5 = zy1
        x5 = zx2
   next
   
    sleep(20)
   
    select case toggle
        case 0
            span += 1
            if span > 57*5 then sleep(10):toggle = 1
            cls
        case 1
            span -= 1
            if span = -57*5 then sleep(10):toggle = 0
            cls
    end select
   
loop until inkey <> ""

END

jj2007
Posts: 1262
Joined: Oct 23, 2016 15:28
Location: Roma, Italia
Contact:

Re: Squares

Postby jj2007 » Jun 15, 2019 8:21

badidea wrote:Topic summary:
Nice idea but a little bit buggy (and I don't have the time now to fix it). Thanks for confirming that this is a real coding thread. For some time I was inclined to believe that "Squares" was some secret game where old FB insiders are pulling each others' legs. So much nonsense just couldn't be meant serious ;-)
badidea
Posts: 1614
Joined: May 24, 2007 22:10
Location: The Netherlands

Re: Squares

Postby badidea » Jun 15, 2019 11:46

Something else, does anyone know if this function has a name?

Code: Select all

function f1(a as single) as single
   return sgn(a) * a ^ 2
end function

print f1(+3.0) 'result +9
print f1(-3.0) 'result -9

Return to “General”

Who is online

Users browsing this forum: MSN [Bot] and 1 guest