Vibrating rectangles: Difference between revisions

Create [https://1drv.ms/v/s!AqDUIunCqVnIg1MxKPi5DzwUbJEf Vibrating rectangles]

<br>

=={{header|C}}==

Dimensions of the rectangles, their number and the animation delay can be configured. Requires the [http://www.cs.colorado.edu/~main/bgi/cs1300/ WinBGIm] library.

/*Abhishek Ghosh, 15th September 2018*/

 

return 0;

}

 

=={{header|Go}}==

$ eog vibrating2.gif

</pre>

 

import (

log.Fatal(err2)

}

 

=={{header|Javascript}}==

</html>

</pre>

const SIZE = 400, WAIT = .025;

class VibRects {

vibRects.start();

}

 

=={{header|Perl}}==

Using the core module <code>Time::HiRres</code> to get sub-second <tt>sleep</tt>

 

binmode STDOUT, ":utf8";

use Time::HiRes qw(sleep);

print "\n";

}

 

{{works with|Rakudo|2018.06}}

===ANSI graphics===

Draws a series of concentric rectangles then rotates through the color palette. Every three seconds, chooses new random palette colors and reverses rotation direction.

 

my %r = :tl<┌>, :h<─>, :tr<┐>, :v<│>, :bl<└>, :br<┘>;

 

print "\n";

}

See: [https://github.com/thundergnat/rc/blob/master/img/vibrating-rectangles-perl6.gif Vibrating rectangles] (.gif image)

 

Fully animated SDL2 graphics lib version. Will adjust rendered rectangles to fill resized windows. Hit the space bar to toggle palette rotation direction.

 

 

my $width = 1200;

}

( $r, $g, $b ).map: ((*+$m) * 255).Int

 

=={{header|Ring}}==

# Project : Vibrating rectangles

 

win1.show()

return

Output:

 

[https://1drv.ms/v/s!AqDUIunCqVnIg1MxKPi5DzwUbJEf Vibrating rectangles]