hex 4666 dup negate do i 4000 dup 2* negate do 2a 0 dup 2dup 1e 0 do 2swap * d >>a 4 pick + -rot - j + dup dup * e >>a rot dup dup * e >>a rot swap 2dup + 10000 > if 3drop 2drop 20 0 dup 2dup leave then loop 2drop 2drop type 268 +loop cr drop 5de +loop
I think APL always makes for an amusing reading ![]()
⍝ APL (A Programming Language)
⍝ Program written by JT. Taylor, www.jttaylor.net
T1←98↑[1]ØΦ1 99ρι99
T4←ØΦ1 98ρι98
T1,(98 30ρ’ BOTTLES OF BEER ON THE WALL, ‘),T1,(98 47ρ’BOTTLES OF BEER, TAKE ONE DOWN, PASS
IT AROUND,’),T4,(98 28ρ’BOTTLES OF BEER ON THE WALL ,’)
‘1 BOTTLE OF BEER ON THE WALL, 1 BOTTLE OF BEER, TAKE IT DOWN, PASS IT AROUND, NO BOTTLES OF BEER
ON THE WALL.’I just hope the UTF8 characters show up correctly ![]()
(favourite paradox) This page intentionally left blank.
The holidays are over?! Speak for yourself!!!
Here, the party is just starting...the 6th of January there's the 3 Kings Day which is like Christmas all over again, then we have the "octavitas" that we keep celebrating for 8 days after the 3 Kings Day and during the 15th to 18th of January we have the San Sebastian Street Celebrations which is the biggest party of the year. You all go back to work, I'll keep drinking ![]()
Referrals:
Free*My*Apps: Discover great iOS apps. Get rewarded!
FreeAppSlots: Play Slots & WIN!
Bing Rewards: Search Bing, earn credits towards rewards!
Finally got my iConquer serial number yesterday. It was, however, in response to an email I sent to info@kavasoft.com, letting them know that I hadn't received it. They looked after me very courteously, I have to say, given that this was a freebie, and I'm very happy to get it even if it did take rather a long time.
Cheers!
Born to the Purple
Hopefully you've all found the thread that Phill has put together explaining how to get it instantly...