/** Adds a responder to an Array of responders. */
public function addResponder(responder:IResponder):void {
if(responder == null) return;
for each(var responderInList:IResponder in _responders) {
if(responderInList == responder) return;
}
_responders.push(responder);
}
/** Removes a responder from an Array of responders. */
public function removeResponder(responder:IResponder):void {
if(responder == null) return;
for(var i:int=0; i < _responders.length; i++) {
if(_responders[i] == responder) {
_responders = _responders.splice(i, 1);
}
}
}
Tag Archive for list
snippets |
March 29, 2012
Add & Remove to Array
snippets |
March 27, 2012
Grouping keys of an associative list
;; it requires srfi-1 (lists), for fold-right.
(define (alist-group-keys alist)
(let ((create-cons-cell-or-append-to-existing
(lambda (current acum)
(let* ((key (car current))
(value (cdr current))
(cell (assoc key acum)))
(if cell ; Key already seen, append current value to the list
(begin
(set-cdr! cell (cons value (cdr cell)))
acum)
;else
(cons (list key value) acum))))))
(fold-right create-cons-cell-or-append-to-existing '() alist)))
;; Example. Given an alist of authors and books:
;
; (alist-group-keys '(("Roth, Henry" . "Call It Sleep")
; ("Roth, Henry" . "Mercy of a Rude Stream")
; ("Houllebecq, Michel" . "Extension du domaine de la lutte")
; ("Houllebecq, Michel" . "Plateforme")))
;
;; It would return the books grouped by author:
;
;(("Roth, Henry" "Call It Sleep" "Mercy of a Rude Stream")
; ("Houllebecq, Michel" "Extension du domaine de la lutte" "Plateforme"))
;
snippets |
March 5, 2012
Rapleaf Address Book API
<?php
/*
* Helper class for the Rapleaf Address Book API
* (http://www.rapleaf.com/apidoc/v2/abook)
* Gets the XML response from the Rapleaf server and parses it into a PHP object.
*
* Usage:
* 1. $abook = new RapleafAbook(api_key[,url]) to initialize
* 2. $result = $abook->getData(email, password) to query the API for a contact list
* See the function definitions for details.
*
* 03/01/2008
*
*/
class RapleafAbook {
var $url;
var $api_key;
var $status;
function RapleafAbook($api_key, $url = 'http://api.rapleaf.com/v2/abook') {
$this->api_key = $api_key;
$this->url = $url;
$this->status = '';
}
function getData($email, $pass) {
# assemble post_data string
$post_data = "login=$email&password=$pass";
$response = $this->sendPostRequest($this->url, $post_data);
# the return structure
$result = array(
'status' => '', # HTTP status code returned by the server
'error' => '', # error message if there are any
'contacts' => array(), # contact list if request succeeded
);
$result['status'] = $this->status;
if ($this->status == '200') { #OK
$result['contacts'] = $this->xmlToObj($response);
} elseif ($this->status == '400') {
$result['error'] = 'The request did not contain all required parameters: '.$response;
} elseif ($this->status == '401') {
$result['error'] = 'API key was not provided or is invalid.';
} elseif ($this->status == '420') {
$result['error'] = 'Login failed.';
} elseif ($this->status == '500') {
$result['error'] = 'There was an unexpected error on our server. This should be very rare and if you see it please contact <a href="mailto:developer@rapleaf.com">developer@rapleaf.com</a>.';
} elseif ($this->status == '520') {
$result['error'] = 'There was an error while reading the contacts from the address book.';
}
return $result;
}
# Parse the xml response text into an associative array
function xmlToObj($str) {
$xml = simplexml_load_string($str);
$result = array();
foreach ($xml->contact as $contact) {
$result[] = array('name' => (string) $contact['name'], 'email' => (string) $contact['email']);
}
return $result;
}
# Returns the xml response on success, sets the error message on failure
function sendPostRequest($url, $post_data) {
$ch = curl_init();
curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
curl_setopt($ch, CURLOPT_TIMEOUT, 20);
curl_setopt($ch, CURLOPT_URL, $url);
curl_setopt($ch, CURLOPT_POST, 1);
curl_setopt($ch, CURLOPT_POSTFIELDS, $post_data);
curl_setopt($ch, CURLOPT_HTTPHEADER,
array("Authorization: ".$this->api_key, "Content-Type: application/x-www-form-urlencoded")
);
$data = curl_exec($ch);
$this->status = curl_getinfo($ch, CURLINFO_HTTP_CODE);
curl_close($ch);
return $data;
}
}
?>
snippets |
February 27, 2012
list Tag C Sharp XML Documentation Comment
<list type="bullet" | "number" | "table"> <listheader> <term>term</term> <description>description</description> </listheader> <item> <term>term</term> <description>description</description> </item> </list>
snippets |
February 26, 2012
CSV formatter
class CsvFormat {
def convertListToCsv(list) {
def result = ''
list.each{row ->
row.each{col -> result += col + ','}
result = result[0..-2]
result += '
'
}
result
}
}
class CsvFormatTest extends GroovyTestCase {
void testConvertsListToCsv() {
assertEquals '1,2
3,4
', new CsvFormat().convertListToCsv([[1,2],[3,4]])
}
}
snippets |
February 25, 2012
Generate List of Letters in the Alphabet
map(chr, range(97, 123)) # ['a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j', 'k', 'l', 'm', 'n', 'o', 'p', 'q', 'r', 's', 't', 'u', 'v', 'w', 'x', 'y', 'z'] map(chr, range(65, 91)) # ['A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O', 'P', 'Q', 'R', 'S', 'T', 'U', 'V', 'W', 'X', 'Y', 'Z']
snippets |
February 16, 2012
North America Pull Down
<select> <option></option> <optgroup label="United States"> <option id="USA-AL" value="AL">Alabama (AL)</option> <option id="USA-AK" value="AK">Alaska (AK)</option> <option id="USA-AZ" value="AZ">Arizona (AZ)</option> <option id="USA-AR" value="AR">Arkansas (AR)</option> <option id="USA-CA" value="CA">California (CA)</option> <option id="USA-CO" value="CO">Colorado (CO)</option> <option id="USA-CT" value="CT">Connecticut (CT)</option> <option id="USA-DE" value="DE">Delaware (DE)</option> <option id="USA-DC" value="DC">District of Columbia (DC)</option> <option id="USA-FL" value="FL">Florida (FL)</option> <option id="USA-GA" value="GA">Georgia (GA)</option> <option id="USA-GU" value="GU">Guam (GU)</option> <option id="USA-HI" value="HI">Hawaii (HI)</option> <option id="USA-ID" value="ID">Idaho (ID)</option> <option id="USA-IL" value="IL">Illinois (IL)</option> <option id="USA-IN" value="IN">Indiana (IN)</option> <option id="USA-IA" value="IA">Iowa (IA)</option> <option id="USA-KS" value="KS">Kansas (KS)</option> <option id="USA-KY" value="KY">Kentucky (KY)</option> <option id="USA-LA" value="LA">Louisiana (LA)</option> <option id="USA-ME" value="ME">Maine (ME)</option> <option id="USA-MD" value="MD">Maryland (MD)</option> <option id="USA-MA" value="MA">Massachusetts (MA)</option> <option id="USA-MI" value="MI">Michigan (MI)</option> <option id="USA-MN" value="MN">Minnesota (MN)</option> <option id="USA-MS" value="MS">Mississippi (MS)</option> <option id="USA-MO" value="MO">Missouri (MO)</option> <option id="USA-MT" value="MT">Montana (MT)</option> <option id="USA-NE" value="NE">Nebraska (NE)</option> <option id="USA-NV" value="NV">Nevada (NV)</option> <option id="USA-NH" value="NH">New Hampshire (NH)</option> <option id="USA-NJ" value="NJ">New Jersey (NJ)</option> <option id="USA-NM" value="NM">New Mexico (NM)</option> <option id="USA-NY" value="NY">New York (NY)</option> <option id="USA-NC" value="NC">North Carolina (NC)</option> <option id="USA-ND" value="ND">North Dakota (ND)</option> <option id="USA-OH" value="OH">Ohio (OH)</option> <option id="USA-OK" value="OK">Oklahoma (OK)</option> <option id="USA-OR" value="OR">Oregon (OR)</option> <option id="USA-PA" value="PA">Pennyslvania (PA)</option> <option id="USA-PR" value="PR">Puerto Rico (PR)</option> <option id="USA-RI" value="RI">Rhode Island (RI)</option> <option id="USA-SC" value="SC">South Carolina (SC)</option> <option id="USA-SD" value="SD">South Dakota (SD)</option> <option id="USA-TN" value="TN">Tennessee (TN)</option> <option id="USA-TX" value="TX">Texas (TX)</option> <option id="USA-UT" value="UT">Utah (UT)</option> <option id="USA-VT" value="VT">Vermont (VT)</option> <option id="USA-VA" value="VA">Virginia (VA)</option> <option id="USA-VI" value="VI">Virgin Islands (VI)</option> <option id="USA-WA" value="WA">Washington (WA)</option> <option id="USA-WV" value="WV">West Virginia (WV)</option> <option id="USA-WI" value="WI">Wisconsin (WI)</option> <option id="USA-WY" value="WY">Wyoming (WY)</option> </optgroup> <optgroup label="Canada"> <option id="CAN-AB" value="AB">Alberta (AB)</option> <option id="CAN-BC" value="BC">British Columbia (BC)</option> <option id="CAN-MB" value="MB">Manitoba (MB)</option> <option id="CAN-NB" value="NB">New Brunswick (NB)</option> <option id="CAN-NL" value="NL">Newfoundland and Labrador (NL)</option> <option id="CAN-NT" value="NT">Northwest Territories (NT)</option> <option id="CAN-NS" value="NS">Nova Scotia (NS)</option> <option id="CAN-NU" value="NU">Nunavut (NU)</option> <option id="CAN-PE" value="PE">Prince Edward Island (PE)</option> <option id="CAN-SK" value="SK">Saskatchewan (SK)</option> <option id="CAN-ON" value="ON">Ontario (ON)</option> <option id="CAN-QC" value="QC">Quebec (QC)</option> <option id="CAN-YT" value="YT">Yukon (YT)</option> </optgroup> <optgroup label="Mexico"> <option id="MEX-AGS" value="AGS">Aguascalientes (AGS)</option> <option id="MEX-BCN" value="BCN">Baja California Norte (BCN)</option> <option id="MEX-BCS" value="BCS">Baja California Sur (BCS)</option> <option id="MEX-CAM" value="CAM">Campeche (CAM)</option> <option id="MEX-CHIS" value="CHIS">Chiapas (CHIS)</option> <option id="MEX-CHIH" value="CHIH">Chihuahua (CHIH)</option> <option id="MEX-COAH" value="COAH">Coahuila (COAH)</option> <option id="MEX-COL" value="COL">Colima (COL)</option> <option id="MEX-DF" value="DF">Distrito Federal (DF)</option> <option id="MEX-DGO" value="DGO">Durango (DGO)</option> <option id="MEX-GTO" value="GTO">Guanajuato (GTO)</option> <option id="MEX-GRO" value="GRO">Guerrero (GRO)</option> <option id="MEX-HGO" value="HGO">Hidalgo (HGO)</option> <option id="MEX-JAL" value="JAL">Jalisco (JAL)</option> <option id="MEX-EDM" value="EDM">México - Estado de (EDM)</option> <option id="MEX-MICH" value="MICH">Michoacán (MICH)</option> <option id="MEX-MOR" value="MOR">Morelos (MOR)</option> <option id="MEX-NAY" value="NAY">Nayarit (NAY)</option> <option id="MEX-NL" value="NL">Nuevo León (NL)</option> <option id="MEX-OAX" value="OAX">Oaxaca (OAX)</option> <option id="MEX-PUE" value="PUE">Puebla (PUE)</option> <option id="MEX-QRO" value="QRO">Querétaro (QRO)</option> <option id="MEX-QROO" value="QROO">Quintana Roo (QROO)</option> <option id="MEX-SLP" value="SLP">San Luis Potosà (SLP)</option> <option id="MEX-SIN" value="SIN">Sinaloa (SIN)</option> <option id="MEX-SON" value="SON">Sonora (SON)</option> <option id="MEX-TAB" value="TAB">Tabasco (TAB)</option> <option id="MEX-TAMPS" value="TAMPS">Tamaulipas (TAMPS)</option> <option id="MEX-TLAX" value="TLAX">Tlaxcala (TLAX)</option> <option id="MEX-VER" value="VER">Veracruz (VER)</option> <option id="MEX-YUC" value="YUC">Yucatán (YUC)</option> <option id="MEX-ZAC" value="ZAC">Zacatecas (ZAC)</option> </optgroup> </select>
snippets |
February 15, 2012
Blood Type Drop Down List for a Web Form
<select> <option>A Positive</option> <option>A Negative</option> <option>A Unknown</option> <option>B Positive</option> <option>B Negative</option> <option>B Unknown</option> <option>AB Positive</option> <option>AB Negative</option> <option>AB Unknown</option> <option>O Positive</option> <option>O Negative</option> <option>O Unknown</option> <option>Unknown</option> </select>
snippets |
February 15, 2012
Skin Tone Drop Down List for a Web Form
<select> <option>Albino</option> <option>Black</option> <option>Dark</option> <option>Yellow</option> <option>Dark Brown</option> <option>Fair</option> <option>Light</option> <option>Light Brown</option> <option>Medium</option> <option>Medium Brown</option> <option>Olive</option> <option>Ruddy</option> <option>Sallow</option> <option>Other</option> </select>
snippets |
February 15, 2012
Distinguishing Facial Hair Drop Down List for a Web Form
<select> <option>Mustache</option> <option>Beard</option> <option>Goatee</option> <option>Other</option> </select>