drkameleon
/ testsorting.art
Created
January 10, 2023 16:33
Test sorting (in effect, test that sorting a Block and a Dictionary yields the same results; either in terms of the expected keys, or values)
This file contains hidden or 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 hidden or 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 hidden or 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 hidden or 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 hidden or 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 " |
drkameleon
/ autounfollow.js
Created
August 24, 2015 10:47
Automatically Unfollow those who are not following back
This file contains hidden or 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'); | |
| } |
This file contains hidden or 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 php | |
| <?php | |
| /********************************************* | |
| HTML::Obfuscator | |
| For PHP | |
| Copyright (c) 2014, Dr.Kameleon | |
| ********************************************* | |
| Requirements: | |
| node packer module |
drkameleon
/ debug.sh
Last active
August 29, 2015 14:07
Compile and Debug Cocoa/Objective-C from Terminal
This file contains hidden or 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
| # Compile/Run/Debug Script | |
| # For Objective-C/Cocoa Xcode projects | |
| # | |
| # Copyright (c) 2014 | |
| # Dr.Kameleon | |
| # Usage: | |
| # ./debug.sh PROJECT <DESTINATION> | |
| project=$1 |
drkameleon
/ PPTerminal.m
Created
October 4, 2014 07:35
Pseudo-asynchronous Block-based Objective-C -> PHP/Python/Ruby Bridge
This file contains hidden or 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
| // | |
| // PPTerminal.m | |
| // | |
| // Created by Dr.Kameleon on 9/28/14. | |
| // Copyright (c) 2011-2014 InSili.co. All rights reserved. | |
| // | |
| //----------------------------------------------------------- | |
| // Pseudo-asynchronous Block-based | |
| // Objective-C -> PHP/Python/Ruby Bridge | |
| // |
drkameleon
/ gist:24f5207a8aa0177b284b
Created
September 14, 2014 08:56
View-Based NSOutlineView Example
This file contains hidden or 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
| // | |
| // AppDelegate.m | |
| // sourceList | |
| // | |
| // Created by Dr.Kameleon on 9/14/14. | |
| // Copyright (c) 2014 InSili.co. All rights reserved. | |
| // | |
| #import "AppDelegate.h" |