drkameleon

//
//  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

# Compile/Run/Debug Script
# For Objective-C/Cocoa Xcode projects
#
# Copyright (c) 2014
# Dr.Kameleon

# Usage:
# ./debug.sh PROJECT <DESTINATION>

project=$1

drkameleon

#!/usr/bin/env php
<?php
/*********************************************
 HTML::Obfuscator
 For PHP

 Copyright (c) 2014, Dr.Kameleon
 *********************************************
 Requirements:
 	node packer module

drkameleon

// 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');
}

drkameleon

    /*!
     * Bootstrap v2.3.1
     *
     * Copyright 2012 Twitter, Inc
     * Licensed under the Apache License v2.0
     * http://www.apache.org/licenses/LICENSE-2.0
     *
     * Designed and built with all the love in the world @twitter by @mdo and @fat.
     */.clearfix {
      *zoom: 1;

drkameleon

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

print ---
=========================
Brainf*ck compiler
In Arturo
=========================
---

tape:               [0]
jumps:              #[]
dataPointer:        0

drkameleon

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"]

drkameleon

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/}
    ]

drkameleon

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]