Draw pixel 2: Difference between revisions

=={{header|Ada}}==

{{libheader|SDLAda}}

 

with SDL.Video.Windows.Makers;

Window.Finalize;

SDL.Finalise;

 

=={{header|C}}==

Same as the [[Draw_a_pixel]] task, uses the random number functions of stdlib.h to plot a random point. Requires the [http://www.cs.colorado.edu/~main/bgi/cs1300/ WinBGIm] library.

#include<graphics.h>

#include<stdlib.h>

return 0;

}

=={{header|Delphi}}==

{{libheader| Windows}}

{{libheader| Messages}}

{{libheader| SysUtils}}

program Draw_a_pixel2;

 

CreateWin(WIN_WIDTH, WIN_HEIGHT);

ShowModal();

=={{header|Factor}}==

{{works with|Factor|0.99 development release 2019-07-10}}

 

640 480 2dup "random yellow pixel" init-window [ random ] bi@

begin-drawing BLACK clear-background 2dup YELLOW draw-pixel

end-drawing

 

=={{header|FreeBASIC}}==

' compile with: fbc -s console

' or: fbc -s gui

WindowTitle "0, 0 is top left, pixel is at " & x & ", " & y & " hit any key to end program"

Sleep

 

=={{header|Go}}==

 

import (

}

}

 

{{out}}

</pre>

 

=={{header|javascript}}==

let canvas = document.createElement("canvas");

canvas.width = 640;

let y = Math.random() * 481;

ctx.fillRect(x, y, 1, 1);

 

=={{header|Julia}}==

 

const can = @GtkCanvas()

signal_connect(endit, win, :destroy)

wait(cond)

 

=={{header|Kotlin}}==

This is a variation of the [[Draw a pixel]] task and so therefore is the code to accomplish it.

 

import java.awt.Color

}

}

 

{{output}}

=={{header|Nim}}==

{{libheader|SDL2}}

import sdl2

 

renderer.present()

 

 

=={{header|Objeck}}==

use Game.Framework;

 

};

}

 

=={{header|Perl}}==

{{libheader|Gtk3}}

 

my $width = 640;

$cr->rectangle( int rand $width , int rand $height, 1, 1);

$cr->stroke;

 

=={{header|Phix}}==

{{libheader|Phix/pGUI}}

 

 

 

 

 

=={{header|Python}}==

{{libheader|Tkinter}}

{{libheader|random}}

def draw_pixel_2 ( sizex=640,sizey=480 ):

pos = random.randint( 0,sizex-1 ),random.randint( 0,sizey-1 )

root.mainloop()

 

 

=={{header|Racket}}==

 

 

(define WIDTH 640)

(send dc draw-point (random WIDTH) (random HEIGHT)))])

 

 

=={{header|Raku}}==

Coordinates of random pixel displayed in window title. To make the single pixel show up better I filled in the drawing area background with black to get better contrast.

 

use GTK::Simple::DrawingArea;

use Cairo;

 

my $ctx = $da.add-draw-handler( &rect-do );

 

=={{header|Ring}}==

 

load "guilib.ring"

see "green : " + mycolor.green() + nl

see "blue : " + mycolor.blue() + nl

Outputimage:

{{libheader|Scastie qualified}}

{{works with|Scala|2.13}}

import java.awt.Color

import scala.language.reflectiveCalls

println("Tests successfully completed with no errors found.")

 

 

=={{header|Wren}}==

{{libheader|DOME}}

import "graphics" for Canvas, Color

import "random" for Random

 

static getRGB(col) { "{%(col.r), %(col.g), %(col.b)}" }

 

=={{header|XPL0}}==

This is all that's required on the Raspberry Pi version of XPL0.