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

capitalex / tree.lua

0 лайк(-ов)

0 форк(-ов)

1 файл(-ов)

Последняя активность 1 month 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 файл(-ов)

Последняя активность 1 month 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 файл(-ов)

Последняя активность 1 month 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

capitalex / tictactoe.io

0 лайк(-ов)

0 форк(-ов)

1 файл(-ов)

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

1	Cell := Object clone do (
2	state := nil
3	occupy := method(player,
4	state = player
5	)
6	empty := method(state isNil)
7	asString := method(
8	if(state isNil, return "_")
9	state
10	)

capitalex / tak.nv

0 лайк(-ов)

0 форк(-ов)

1 файл(-ов)

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

1	\|\|
2	:: tak 7 4 8
3	:: print return
4
5	\|:: tak $x $y $z \|
6	:: check if $y less than $x
7	:: if Yes then recurse tak $x $y $z
8	:: if Nah then return $z
9
10	\|:: check if $x $want than $y :@math: $want\| :vote: Yes

capitalex / main.wul

0 лайк(-ов)

0 форк(-ов)

2 файл(-ов)

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

1	{ @code [
2	local objects = {}
3	local id = 0
4	] }
5
6	{ @ initialize LOVE event handlers
7	, spawn 1000 circles
8	}
9

capitalex / main.processor.wul

0 лайк(-ов)

0 форк(-ов)

4 файл(-ов)

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

1	{
2	@ make player at 100 100
3	, move player by 20 50
4	, @lamb pprint
5	}
6
7	@processor @ ;
8	@ move player by $x $y {
9	@processor @ ; @process switch to @ewe ;
10	@ewe ( #player @ewe.peek move by $x $y 4 @lamb.invoke @ewe.done ) ;

capitalex / main.wul

0 лайк(-ов)

0 форк(-ов)

3 файл(-ов)

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

1	{
2	@ make player at 100 100
3	, move player by 20 50
4	, @lamb pprint
5	}
6
7	@ move player by $x $y {
8	@ewe ( #player @ewe.peek move by $x $y 4 @lamb.invoke ) ;
9	}

capitalex / crummy.cr

0 лайк(-ов)

0 форк(-ов)

1 файл(-ов)

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

1	require "./event"
2
3	module Crummy
4	# Enum holding various ASCII control codes. Not all code are present in this
5	# enum.
6	enum ControlChar
7	Null
8	StartHeading
9	StartText
10	EndText

capitalex / ewe.wul

0 лайк(-ов)

0 форк(-ов)

1 файл(-ов)

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

1	@ewe @ewe.dup ; @ewe.stack $ {
2	@ewe.stack ( $ $ )
3	}
4
5	@ewe @ewe.swap ; @ewe.stack ( $x $y ) {
6	@ewe.stack ( $y $x )
7	}
8
9	@ewe @ewe.drop ; @ewe.stack ( $x ) { }