|#| constant, @sleep, 60 |#| constant, @pixel r, 255 |#| constant, @pixel g, 255 |#| constant, @pixel b, 255 |#| constant, clear old mouse x, 1000000 |#| constant, clear old mouse y, 1000000 |#| constant, current mouse x -> old mouse x, 1000000 |#| constant, current mouse y -> old mouse y, 1000000 |#| constant, @mouse x -> current mouse x, 1000000 |#| constant, @mouse y -> current mouse y, 1000000 |#| constant, copy old mouse x -> @line x1, 1000000 |#| constant, copy old mouse y -> @line y1, 1000000 |#| constant, copy current mouse x -> @line x2, 1000000 |#| constant, copy current mouse y -> @line y2, 1000000 |clear old mouse x, old mouse x| |clear old mouse x| |clear old mouse y, old mouse y| |clear old mouse y| |current mouse x -> old mouse x, current mouse x| old mouse x |current mouse y -> old mouse y, current mouse y| old mouse y |current mouse x -> old mouse x| |current mouse y -> old mouse y| |@mouse x -> current mouse x, @mouse x| current mouse x |@mouse y -> current mouse y, @mouse y| current mouse y |@mouse x -> current mouse x| |@mouse y -> current mouse y| |copy old mouse x -> @line x1, old mouse x| , used old mouse x, @line x1 |copy old mouse y -> @line y1, old mouse y| , used old mouse y, @line y1 |copy current mouse x -> @line x2, current mouse x| , used current mouse x, @line x2 |copy current mouse y -> @line y2, current mouse y| , used current mouse y, @line y2 |copy old mouse x -> @line x1| |copy old mouse y -> @line y1| |copy current mouse x -> @line x2| |copy current mouse y -> @line y2| |used old mouse x| old mouse x |used old mouse y| old mouse y |used current mouse x| current mouse x |used current mouse y| current mouse y |clear old mouse position| , clear old mouse x:1000000 , clear old mouse y:1000000 |move current mouse position to old mouse position| , current mouse x -> old mouse x:1000000 , current mouse y -> old mouse y:1000000 |move @mouse position to current mouse position| , @mouse x -> current mouse x:1000000 , @mouse y -> current mouse y:1000000 |update mouse position| , @mouse position , clear old mouse position , move current mouse position to old mouse position , move @mouse position to current mouse position |check if mouse button is down| , @mouse is down , @mouse button |set line to white| , @pixel r:255 , @pixel g:255 , @pixel b:255 |set line position| , copy old mouse x -> @line x1:1000000 , copy old mouse y -> @line y1:1000000 , copy current mouse x -> @line x2:1000000 , copy current mouse y -> @line y2:1000000 |draw the line| @draw line |draw a line, @mouse button is down| , set line to white , set line position , draw the line |draw a line| |update| , update mouse position , check if mouse button is down , draw a line |poll inputs| @poll inputs |draw| @display |sleep| @sleep:16 |main loop| , poll inputs , update , draw , sleep , main loop || main loop