Все фрагменты от capitalex

capitalex / cups-bytecode-interpreter.nv

0 лайк(-ов)

0 форк(-ов)

1 файл(-ов)

Последняя активность 1 year ago

1	\|move instruction pointer\|
2	@instruction pointer
3
4	\|fetch next instruction\|
5	@decode instruction
6
7	\|@current instruction is halt\|
8
9	\|@current instruction is inc\|
10	, @increment source register

capitalex / fast-counter-to-bits.nv

0 лайк(-ов)

0 форк(-ов)

1 файл(-ов)

Последняя активность 1 year ago

1	\|x to bits\|
2	, fill b[3] with x:8, is b[3] filled?
3	, fill b[2] with x:4, is b[2] filled?
4	, fill b[1] with x:2, is b[1] filled?
5	, fill b[0] with x:1, is b[0] filled?
6
7	\|release x, x to consume\| x
8	\|release x\|
9
10	\|consume x, x to consume\|

capitalex / mod-24.nb

0 лайк(-ов)

0 форк(-ов)

1 файл(-ов)

Последняя активность 1 year ago

1	\|make a copy of A, A\| make a copy of A, duplicate A
2	\|make a copy of A\|
3
4	\|duplicate A\| A, copy of A
5
6	\|is A a multiple of 24?\|
7	, make a copy of A,
8	, divide the copy by 24
9	, multiply the result by 24:1000
10	, did we get the same number?:1000

capitalex / mix-paint.nv

0 лайк(-ов)

0 форк(-ов)

1 файл(-ов)

Последняя активность 1 year ago

1	\|red paint, blue paint, mix paint\|
2	, purple paint
3	, mix paint
4
5	\|\| red paint:100
6	, blue paint:32
7	, mix paint:10

capitalex / 00.screen-ports-currently.lua

0 лайк(-ов)

0 форк(-ов)

2 файл(-ов)

Последняя активность 1 year ago

1	return function(lvera)
2
3	local screen = love.graphics.newCanvas()
4	lvera:add_port({"@set resolution"}, function(counters)
5	love.window.setMode(counters["@resolution x"], counters["@resolution y"])
6	screen = resize(old_screen)
7	counters["@resolution x"] = 0
8	counters["@resolution y"] = 0
9	counters["@set resolution"] = 0
10	end)

capitalex / paint.generated.lua

0 лайк(-ов)

0 форк(-ов)

1 файл(-ов)

Последняя активность 1 year ago

1	local min, max, huge = math.min, math.max, math.huge
2	return function(counters, ports)
3	if counters["@set resolution"] > 0 then
4	ports[1].hook(counters)
5	return true
6	elseif counters["@set pixel"] > 0 then
7	ports[2].hook(counters)
8	return true
9	elseif counters["@draw line"] > 0 then
10	ports[3].hook(counters)

capitalex / draw.nv

0 лайк(-ов)

0 форк(-ов)

3 файл(-ов)

Последняя активность 1 year ago

1	\|#\| constant, @sleep, 60
2	\|#\| constant, @pixel r, 255
3	\|#\| constant, @pixel g, 255
4	\|#\| constant, @pixel b, 255
5	\|#\| constant, clear old mouse x, 1000000
6	\|#\| constant, clear old mouse y, 1000000
7	\|#\| constant, current mouse x -> old mouse x, 1000000
8	\|#\| constant, current mouse y -> old mouse y, 1000000
9	\|#\| constant, @mouse x -> current mouse x, 1000000
10	\|#\| constant, @mouse y -> current mouse y, 1000000

capitalex / test.nv

0 лайк(-ов)

0 форк(-ов)

2 файл(-ов)

Последняя активность 1 year ago

1	\|#\| constant, a, 1000000
2
3	\|move, a, a\| move, move, b
4	\|move\|
5
6	\|\| move, a:1000000

capitalex / fizzbuzz.poqs

0 лайк(-ов)

0 форк(-ов)

1 файл(-ов)

Последняя активность 1 year ago

1	: {run fizzbuzz from $x to $y} >
2	{current number is $x} {run fizzbuzz to $y} :
3
4	: {run fizzbuzz to $n} {current number is $n} >
5	{fizz $n} {buzz $n} {number is $n} :
6
7	: {run fizzbuzz to $stop-value} {current number is $n} >
8	{run fizzbuzz to $stop-value}
9	{next number from $n} {fizz $n} {buzz $n} {number is $n} {wrote ""} :

capitalex / averages.poqs

0 лайк(-ов)

0 форк(-ов)

1 файл(-ов)

Последняя активность 1 year ago

1	We've collected the following data points --
2	- {data point of #4}
3	- {data point of #1}
4	- {data point of #7}
5	- {data point of #8}
6	- {data point of #1}
7
8	Let's find the average of these values. We've got a tally running, we
9	should continue accumulating values --

1	\|#\| constant, @sleep, 60
2	\|#\| constant, @pixel r, 255
3	\|#\| constant, @pixel g, 255
4	\|#\| constant, @pixel b, 255
5	\|#\| constant, clear old mouse x, 1000000
6	\|#\| constant, clear old mouse y, 1000000
7	\|#\| constant, current mouse x -> old mouse x, 1000000
8	\|#\| constant, current mouse y -> old mouse y, 1000000
9	\|#\| constant, @mouse x -> current mouse x, 1000000
10	\|#\| constant, @mouse y -> current mouse y, 1000000

1	\|#\| constant, a, 1000000
2
3	\|move, a, a\| move, move, b
4	\|move\|
5
6	\|\| move, a:1000000