Всі gists від capitalex

capitalex / stackthingl.txt

0 вподобань

0 форк(-ів)

1 файл(-ів)

Остання активність 1 month ago

1	$ x 0
2	$ y 1
3
4	: magnitude
5	@x @x * @y @y * + sqrt ;
6
7	3 >x 4 >y

capitalex / gistfile1.txt

0 вподобань

0 форк(-ів)

1 файл(-ів)

Остання активність 1 month ago

1	[ -- if 1
2	[] -- pop next bit
3	0101 -- duplicate encoded 1
4	0 -- cancel next block
5	0 -- cancel this block
6	]
7	[ -- if 1
8	1010 -- duplicate encoded 0
9	0 -- cancel this loop
10	]

capitalex / bits.txt

0 вподобань

0 форк(-ів)

1 файл(-ів)

Остання активність 1 month ago

1	$ echo "1[>1<[>[0]<00>0<0]>[<1>1>0]<]>>>>[0111100]1[1<]0>>>>>>>[10010]1[1<]0" \| ./bits.py -
2	█
3	░
4	█ █
5	█ █
6	█ ░
7	█ ░
8	░███░███████████████████████████
9	^-------------------------------

capitalex / functions.wont

0 вподобань

0 форк(-ів)

2 файл(-ів)

Остання активність 2 months ago

1	call isnt less than 1, call isnt greater than 2, ...
2	wont return, wont jump, ..., cant jump here.
3	wont return, wont jump, ..., cant jump here.
4	wont jump, ..., cant jump here.
5
6	call isnt less than 2, call isnt greater than 10, ...
7	wont return, wont jump, ..., cant jump here.
8	wont return, wont jump, ..., cant jump here.
9	wont jump, ..., cant jump here.

capitalex / peom.dont

0 вподобань

0 форк(-ів)

2 файл(-ів)

Остання активність 2 months ago

1	have what is DOESNT? ;
2
3	give DOESNT is an esolang
4	unless DOESNT , is , an , esolang
5	, a , rewriting , system
6	, that , which , what is left !! , not , taken
7	, where , everything , backwards
8	, it , left , untaken , DOESNT. ;
9
10	give a rewriting system

capitalex / bouncing.dont

0 вподобань

0 форк(-ів)

1 файл(-ів)

Остання активність 2 months ago

1	give <& .
2	unless @ , * , . , &> * !! ;
3
4	give @ &>
5	unless * , . , <&
6	, @ <& * , @ * !! , @ &> !!
7	, &> , * &> !! ;
8
9	give * &>
10	unless @ , * , . , &> * * , &> . !! , &> * . ;

capitalex / left-cursor.dont

0 вподобань

0 форк(-ів)

1 файл(-ів)

Остання активність 2 months ago

1	give * *
2	unless * * * , * <B !! , * * <B !! , <B , * . !! , . , * * . ;
3
4	give *
5	unless * * , * <B !! , <B , . , * . ;
6
7	give . unless * , <B ;
8
9	give <B * unless <B , * <B * , * <B . ;

capitalex / tree.lua

0 вподобань

0 форк(-ів)

1 файл(-ів)

Остання активність 4 months ago

1	local function table_stream(t)
2	return coroutine.wrap(function()
3	for _, v in ipairs(t) do
4	coroutine.yield(v)
5	end
6	end)
7	end
8
9	local function push(t, v)
10	table.insert(t, v)

capitalex / ewe.stackops.wul

0 вподобань

0 форк(-ів)

2 файл(-ів)

Остання активність 4 months ago

1	@ewe @ewe.pop ; @ewe.stack $name {
2	@ewe pop $name
3	}
4
5	@ewe @ewe.push ; @ewe.stack $name {
6	@ewe push $name
7	}
8
9	@ewe @ewe.peek ; @ewe.stack $name {
10	@ewe peek $name

capitalex / sparse_set.lua

0 вподобань

0 форк(-ів)

1 файл(-ів)

Остання активність 4 months ago

1	local function push(self, thing)
2	-- Attempt to recycle a previously freed ID
3	local id = self.free_ids[#self.free_ids]
4	table.remove(self.free_ids)
5	if not id then
6	-- Othewise generate a new ID
7	id = self.next_id
8	self.next_id = self.next_id + 1
9	end
10	-- Assign the ID, the push the object into items