Robert Accettura's Fun With Wordage » calculator http://robert.accettura.com Robert Accettura's Personal Blog on Web Development and Tech Thu, 09 Feb 2012 01:43:47 +0000 en hourly 1 http://wordpress.org/?v=3.3.1 Budget Calculator Dice http://robert.accettura.com/blog/2010/08/22/budget-calculator-dice/ http://robert.accettura.com/blog/2010/08/22/budget-calculator-dice/#comments Mon, 23 Aug 2010 01:04:44 +0000 Robert http://robert.accettura.com/?p=4544 Continue reading →]]> When I was in High School somehow dice became popular for the 2000th time since the dawn of humanity. For some strange reason I felt the desire to build a little dice game in my TI 83 calculator in TI-BASIC. I had long forgotten about this, and recently stumbled upon it. I transcribed it to my computer recently since I don’t have one of those cables and decided to just throw it out there on the web.

Looking back on it, I could have written this a lot better ;-) . Regardless it’s a fun trip down memory lane. I believe I wrote most of this little gem while lifeguarding on a Sunday morning. Nobody drowned in the production of this code, I swear.

My favorite part may be the about text “DEPRIVING A VILLAGE SOMEWHERE OF AN IDIOT”. Someone at some point somewhere said that about me, and it stuck for years.

Downloads

dice.zip – includes source file (.tib) and compiled binary (.8xp) which I haven’t been able to test.

Released under BSD License. Feel free to hack and enjoy if it should tickle you.

Source

PROGRAM:DICE
ClrDraw
ClrHome
AxesOff
ZStandard
Horizontal -10
Horizontal 10
Vertical -10
Vertical 10
Text(7,17, "BUDGET CALCULATOR")
TEXT(17,36, "D I C E")
TEXT(27,30, "VERSION 1.1")
TEXT(44,10, "BY: ROBERT ACCETTURA")
TEXT(55,57, "{ ENTER }")
DelVar A
DelVar J
DelVar K
DelVar Q
DelVar R
DelVar S
PAUSE
Lbl M1
ClrHome
ClrDraw
Menu("What TO DO?","ROLL 1 DICE,1,"ROLL 2 DICE",2,"ROLL 3 DICE", 3, "WARNING",W, "ABOUT", X,"QUIT",Q)
Lbl 1
ClrHome
ClrDraw
DelVar A
randInt(1,6)->A
ZStandard
AxesOff
TEXT(5,5,"YOU ROLLED:")
TEXT(15,90, A)
TEXT(54,48,"{ENTER}")
Pause
ClrHome
ClrDraw
Menu("ROLL AGAIN?","YES",1,"NO",M1)
Lbl 2
ClrDraw
ClrHome
ZStandard
AxesOff
DelVar J
DelVar K
randInt(1,6)->J
randInt(1,6)->K
Text(5,5,"YOU ROLLED:")
Text(15,90,J
Text(25,45,"AND...")
Text(35,90,K)
Text(54,48,"{Enter}")
Pause
ClrHome
ClrDraw
Menu("ROLL AGAIN?","YES",2,"NO",M1)
Lbl 3
ClrHome
ClrDraw
ZStandard
AxesOff
DelVar Q
DelVar R
DelVar S
randInt(1,6)->Q
randInt(1,6)->R
randInt(1,6)->S
Text(5,5,"YOU ROLLED:")
Text(12,90,Q)
Text(19,45,"AND...")
Text(26,90,R)
Text(34,45,"AND...")
Text(41,90,S)
Text(54,62,"{Enter}")
Pause
ClrHome
ClrDraw
Menu("ROLL AGAIN?","YES",3,"NO",M1);
Lbl X
ClrHome
ClrDraw
AxesOff
ZStandard
Horizontal 10
Horizontal -10
Vertical 10
Vertical -10
Text(3,3,"ABOUT THIS PROGRAM:")
TEXT(13,9,"BY: ROBERT ACCETTURA")
TEXT(23,9,"ROBERT*ACCETTURA.COM")
TEXT(33,10,"DEPRIVING A VILLAGE")
TEXT(40,10,"SOMEWHERE OF AN IDIOT")
TEXT(54,48, "{ENTER}")
Pause
Goto M1
Lbl W
ClrDraw
ClrHome
Horizontal 10
Horizontal -10
Vertical 10
Vertical -10
AxesOff
Text(3,3,"WARNING:")
Text(10,20,"GAMBLING MAY BE")
Text(16,22,"HABIT FORMING")
Text(30,12,"NOT FOR GAMBLING USE")
Text(43,14,"USE AT YOUR OWN RISK")
Text(54,48,"{Enter}")
PAUSE
Goto M1
Lbl Q
AxesOn
Comment Count
]]> http://robert.accettura.com/blog/2010/08/22/budget-calculator-dice/feed/ 0 Calculator Phoning Home? Not Really http://robert.accettura.com/blog/2007/11/17/calculator-phoning-home-not-really/ http://robert.accettura.com/blog/2007/11/17/calculator-phoning-home-not-really/#comments Sat, 17 Nov 2007 22:22:16 +0000 Robert http://robert.accettura.com/archives/2007/11/17/calculator-phoning-home-not-really/ Continue reading →]]> Wasn’t sure what this is all about, but according to Little Snitch 2.0 (which is awesome by the way) the Calculator in Mac OS X 10.5 (Leopard) apparently phones home. Based on the url http://wu-calculator.apple.com one would assume that’s checking for updates (wu typically stands for web update). Though I find this somewhat odd considering Mac OS X has an update system that’s all encompassing. I decided to take a closer look. Earlier it was said that 10.5 was phoning home, though that turned out to not be the case.

Calculator Phoning Home

So I did a little sniffing around (literally packet sniffing), and here’s what I found. On load it sends the following (seemingly blank) request to apple for currency conversion info. The response is the exchange rate. I’ve got a copy for reference below for anyone who wants to see. Calculator seems to use CFNetwork to communicate (not surprising). What’s interesting is that this info doesn’t seem to be cached, every time you load calculator it’s requested.

So yes, it does technically ping the mothership, but no it doesn’t seem to send back any data worth being concerned about. The only thing noteworthy is the cookie. The cookie itself is characteristic of Omniture, an analytics company (who provides analytics services to Apple among many of the largest sites on the web). This seems like a side effect of the implementation (likely sharing stuff from webkit). I don’t think Omniture is pinged during this transaction, so unless Apple were recording that cookie and matching it against web analytics data. I’d consider that extremely unlike even if I put a tin foil hat on my head. I guess Apple could further neutralize any privacy concerns by modifying the implementation to not send a cookie. At that point they would only have your IP to go by (which could be behind a proxy and therefore isn’t very reliable). I don’t think think this is a privacy risk, but also don’t think it would be so bad for Apple to modify and drop the cookie to make it more anonymous. Or at least give the option to not request data every time.

The Request

User-Agent: CFNetwork/220
Content-Type: text/xml
Cache-Control: no-cache
X-Client-Id: -1509795197
Accept: */*
Accept-Language: en-us
Accept-Encoding: gzip, deflate
Cookie: s_vi=[CS]v1|xxxxxxxxxxxxxxxx-xxxxxxxxxxxxxxx[CE]; s_nr=000000000000; asbid=xxxxxxxxxxxxxxxxx
Content-Length: 292
Connection: keep-alive
Host: wu-calculator.apple.com


< ?xml version='1.0' encoding='utf-8'?>
<request devtype='Apple_OSX' deployver='APPLE_CALCULATOR_1_0' app='YAppleCalculatorApp' appver='1.0.0' api='finance' apiver='1.0.0 'acknotification='0000'>
	<query id='0' timestamp='1195332888' type='convertcurrency'>
		<from />
		<to />
		<amount />
	</query>
</request>

The Response

HTTP/1.1 200 OK
Date: Sat, 17 Nov 2007 20:54:54 GMT
X-YSTATUS: 200
Cache-Control: private
Connection: close
Transfer-Encoding: chunked
Content-Type: text/plain;charset=UTF-8
Content-Encoding: gzip


< ?xml version="1.0" encoding="UTF-8"?>
<response>
	<result type="convertcurrency" timestamp="1195334294">
		<list count="45" total="45">
			<conversion>
				<from>USD</from>
				<to>USD</to>
				<amount>1</amount>
				<convertedamount>1</convertedamount>
				<link />
			</conversion>
			<conversion>
				<from>USD</from>
				<to>AUD</to>
				<amount>1</amount>
				<convertedamount>1.1196329594</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=aud</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>BRL</to>
				<amount>1</amount>
				<convertedamount>1.7469999790</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=brl</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>GBP</to>
				<amount>1</amount>
				<convertedamount>0.4867370129</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=gbp</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>CAD</to>
				<amount>1</amount>
				<convertedamount>0.9739000201</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=cad</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>CNY</to>
				<amount>1</amount>
				<convertedamount>7.4257001877</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=cny</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>DKK</to>
				<amount>1</amount>
				<convertedamount>5.0836000443</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=dkk</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>EUR</to>
				<amount>1</amount>
				<convertedamount>0.6821979880</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=eur</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>HKD</to>
				<amount>1</amount>
				<convertedamount>7.7864999771</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=hkd</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>INR</to>
				<amount>1</amount>
				<convertedamount>39.2350006104</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=inr</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>JPY</to>
				<amount>1</amount>
				<convertedamount>111.0449981689</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=jpy</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>MYR</to>
				<amount>1</amount>
				<convertedamount>3.3459999561</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=myr</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>MXN</to>
				<amount>1</amount>
				<convertedamount>10.9315004349</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=mxn</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>NZD</to>
				<amount>1</amount>
				<convertedamount>1.3183920383</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=nzd</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>NOK</to>
				<amount>1</amount>
				<convertedamount>5.4686999321</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=nok</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>RUB</to>
				<amount>1</amount>
				<convertedamount>25.3402004242</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=rub</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>SGD</to>
				<amount>1</amount>
				<convertedamount>1.4494999647</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=sgd</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>ZAR</to>
				<amount>1</amount>
				<convertedamount>6.7150998116</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=zar</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>KRW</to>
				<amount>1</amount>
				<convertedamount>931.5100097656</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=krw</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>LKR</to>
				<amount>1</amount>
				<convertedamount>110.3750000000</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=lkr</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>SEK</to>
				<amount>1</amount>
				<convertedamount>6.3113999367</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=sek</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>CHF</to>
				<amount>1</amount>
				<convertedamount>1.1181999445</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=chf</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>TWD</to>
				<amount>1</amount>
				<convertedamount>32.3650016785</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=twd</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>THB</to>
				<amount>1</amount>
				<convertedamount>31.5000000000</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=thb</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>VEB</to>
				<amount>1</amount>
				<convertedamount>2147.3000488281</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=veb</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>BHD</to>
				<amount>1</amount>
				<convertedamount>0.3755500019</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=bhd</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>BND</to>
				<amount>1</amount>
				<convertedamount>1.4529000521</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=bnd</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>CLP</to>
				<amount>1</amount>
				<convertedamount>507.2999877930</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=clp</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>CYP</to>
				<amount>1</amount>
				<convertedamount>0.3995000124</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=cyp</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>CZK</to>
				<amount>1</amount>
				<convertedamount>18.1730003357</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=czk</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>HUF</to>
				<amount>1</amount>
				<convertedamount>173.6849975586</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=huf</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>ISK</to>
				<amount>1</amount>
				<convertedamount>59.8400001526</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=isk</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>IDR</to>
				<amount>1</amount>
				<convertedamount>9280.0000000000</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=idr</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>ILS</to>
				<amount>1</amount>
				<convertedamount>3.9275000095</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=ils</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>KZT</to>
				<amount>1</amount>
				<convertedamount>128.3500061035</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=kzt</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>KWD</to>
				<amount>1</amount>
				<convertedamount>0.2758750021</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=kwd</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>MTL</to>
				<amount>1</amount>
				<convertedamount>0.2924999893</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=mtl</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>MUR</to>
				<amount>1</amount>
				<convertedamount>29.8999996185</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=mur</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>NPR</to>
				<amount>1</amount>
				<convertedamount>71.0800018311</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=npr</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>OMR</to>
				<amount>1</amount>
				<convertedamount>0.3849500120</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=omr</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>PKR</to>
				<amount>1</amount>
				<convertedamount>61.1800003052</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=pkr</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>QAR</to>
				<amount>1</amount>
				<convertedamount>3.6367499828</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=qar</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>SAR</to>
				<amount>1</amount>
				<convertedamount>3.7300000191</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=sar</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>SKK</to>
				<amount>1</amount>
				<convertedamount>22.5949993134</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=skk</link>
			</conversion>
			<conversion>
				<from>USD</from>
				<to>AED</to>
				<amount>1</amount>
				<convertedamount>3.6549999714</convertedamount>
				<link>http://finance.yahoo.com/m3?a=1&amp;s=usd&amp;t=aed</link>
			</conversion>
		</list>
	</result>
</response>
Comment Count
]]> http://robert.accettura.com/blog/2007/11/17/calculator-phoning-home-not-really/feed/ 3