Draw a pixel: Difference between revisions

Content added Content deleted
No edit summary
(Added Microsoft Small Basic implementation, rearranged other implementations)
Line 1,233: Line 1,233:
SDL.delay(5000)
SDL.delay(5000)
</syntaxhighlight>
</syntaxhighlight>

⚫
=={{header|Mathematica}}/{{header|Wolfram Language}}==
⚫
<syntaxhighlight lang="mathematica">CreateWindow[PaletteNotebook[{Graphics[{Red, Point[{100, 100}]}]}], WindowSize -> {320, 240}]</syntaxhighlight>


=={{header|M2000 Interpreter}}==
=={{header|M2000 Interpreter}}==
Line 1,285: Line 1,282:
</syntaxhighlight>
</syntaxhighlight>
[https://www.dropbox.com/s/uscltz6pwy06jxv/DrawPixelForm.png?dl=0 OutPut]
[https://www.dropbox.com/s/uscltz6pwy06jxv/DrawPixelForm.png?dl=0 OutPut]

⚫
=={{header|Mathematica}}/{{header|Wolfram Language}}==
⚫
<syntaxhighlight lang="mathematica">CreateWindow[PaletteNotebook[{Graphics[{Red, Point[{100, 100}]}]}], WindowSize -> {320, 240}]</syntaxhighlight>

=={{header|Microsoft Small Basic}}==
<syntaxhighlight lang="smallbasic">GraphicsWindow.Width = 320
GraphicsWindow.Height = 240
GraphicsWindow.SetPixel(100, 100, GraphicsWindow.GetColorFromRGB(255, 0, 0))</syntaxhighlight>


=={{header|Nim}}==
=={{header|Nim}}==
Retrieved from "https://rosettacode.org/wiki/Draw_a_pixel"