This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env arturo | |
do {grafito.art} | |
do [ | |
lemma: function [wrd, lng, ps][ | |
f: form.new.unique [name: wrd] | |
res: word #[ | |
lang: to :string lng, | |
pos: to :string ps, |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
{ | |
"nand": 2, | |
"clamp": 2, | |
"info": 1, | |
"fdiv": 2, | |
"atanh": 1, | |
"regex?": 1, | |
"move": 2, | |
"all?": 1, | |
"first": 1, |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Created: temp/ | |
>> copy | |
copy is working well! | |
>> copy.directory - with empty folders | |
copy empty directory is working well! |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Created: temp/ | |
>> copy | |
Hello, world! | |
>> copy.directory - with empty folders | |
temp/dest/file.txt |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
labels: ["a", "b", "c", "d", "e", "f", "g", "h"] | |
items: ["uno", "dos", "tres", "Uno", "perversión", "ábaco", "abismo", "aberración"] | |
dic: function []-> #.raw flatten @[couple labels items] | |
revdic: function []-> #.raw flatten @[couple items labels] | |
verify: function [what][ | |
toDo: [sort] ++ what | |
bl: do toDo ++ [items] |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
RC: "https://rosettacode.org" | |
GreenLine: color #green repeat "=" 50 | |
sanitizeUrl: function [url]-> replace replace url "pagefrom=" "" "%27" "'" | |
filterLines: function [lines, pattern]-> select lines 'line [contains? line pattern] | |
getNextPageUrl: function [lines][ | |
loop filterLines lines {next page</a>} 'line [ | |
return sanitizeUrl first match line {/pagefrom=(.+)#mw-pages/} | |
] |
This file has been truncated, but you can view the full file.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
a: #[name: "John", surname: "Doe"] | |
b: #[name: "Jane", surname: "Doe", address: #[country: "Spain", city: "Madrid"]] | |
c: #[name: "Bill", age: 36] | |
a: #[name: "John", surname: "Doe"] | |
b: #[name: "Jane", surname: "Doe", address: #[country: "Spain", city: "Madrid"]] | |
c: #[name: "Bill", age: 36] | |
a: #[name: "John", surname: "Doe"] | |
b: #[name: "Jane", surname: "Doe", address: #[country: "Spain", city: "Madrid"]] | |
c: #[name: "Bill", age: 36] | |
a: #[name: "John", surname: "Doe"] |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
print --- | |
========================= | |
Brainf*ck compiler | |
In Arturo | |
========================= | |
--- | |
tape: [0] | |
jumps: #[] | |
dataPointer: 0 |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
memSize: 100 | |
interpret: function [code][ | |
m: map 0..memSize []->0 | |
p: 0 | |
continue: true | |
replace 'code "," "set m p input ------ " | |
replace 'code ">" "inc 'p " | |
replace 'code "<" "dec 'p " | |
replace 'code "+" "set m p (get m p)+1 " |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
// To be copy-pasted in the "Following" Twitter page | |
var profiles = $(".ProfileCard.js-actionable-user"); | |
for (var i=0; i<profiles.length; i++) { | |
var p = profiles[i]; | |
var status = $($(p).find(".FollowStatus")[0]).text().trim(); | |
var button = $(p).find(".user-actions-follow-button"); | |
if (status!="follows you") $(button).trigger('click'); | |
} |
NewerOlder