social.solarpunk.au

social.solarpunk.au

vidak | @vidak@social.solarpunk.au

# LOCATION

The unceded, stolen land of the Whadjuk people of the Noongar nation. Always was, always will be, Aboriginal land!!

# QUOTATIONS

You are braver than you believe, stronger than you seem, and smarter than you think. ~winnie-the-pooh

I put together a guide for c64 assembly coding to help others know where to start..

Hopefully useful to someone out there..

https://github.com/spiroharvey/c64/blob/main/asm/C64%20Assembly%20Coding%20Guide.md

Wow, HowToGeek have published an article about my Wordle game. 😲

https://www.howtogeek.com/803710/you-can-play-wordle-on-your-commodore-64/

For an Anarchist Radio Relay League

A free zine about ham radio for anarchists.

https://anarchistrrl.noblogs.org/

@zine

The cover of "For an Anarchist Radio Relay League". A noisy black and white image of a left hand holding a Baofeng UV-5RA radio with a circle-A faceplate. The LCD screen reads "FUCK THE POLICE"

Can't believe this video only got 9 views, this is a life changing revelation.

https://video.thepolarbear.co.uk/w/qYaRUjzaCgu2yvh67XKVVV

lil commodore 64 BASIC doo-dad i cooked up
10  rem star inspector
20  rem 
30  rem ~vidak.
40  rem 
50  rem licence: public domain.
60  rem 
70  rem generates 64 star locations within a 2d grid.
80  rem 
90  rem at the end is a simple routine for revealing the location of
100 rem user-supplied stars.
110 rem
120 rem recommended: copy and paste this file into your emulator.
130 rem 
140 dim g(63,1)
150 print "clearing star positions>>>"
160 for i = 0 to 63
170     for j = 0 to 1
180         let g(i,j) = 0
190     next j
200     print ".";
210 next i
220 print:print
230 print "generating star positions>>>"
240 for s = 0 to 63
250     let g(s,0) = int(rnd(1)*2000)
260     let g(s,1) = int(rnd(1)*2000)
270     print ".";
280 next s    
290 print:print
300 input "input star number (0-63)";s
310 print:print "star ";s;" is at:"
320 print:print "x coordinates: ";g(s,0)
330 print "y coordinates: ";g(s,1)
340 input "again";q$
350 if q$ <> "n" then goto 290
360 end

So who was it that said they needed a Mobility Radeon 9800 for their Inspiron 9100/XPS gen1 laptop? :^)

Managed to fit in some coding this evening, and got a little bit further with the space simulator

for the potato fears not death

Cooking instruction item reads “potato may whistle in microwave”

New power supply idea.

Using SMD regulators, specifically a pair of 1.5A regulators for the +5V and +3.3V rails, and a smaller 800mA 1.2V regulator (fed from the +5V line), all fed from a standard DC barrel plug, through a switch, then through a 2A resettable fuse. Vin would be a 9V DC centre-positive barrel jack switching supply, of the usual sort.

How's it look to you?

In Deep Space Nine, it was established that Morn once had a luxurious, full head of hair. We learn that he lost most of it from ingesting liquid latinum. In subsequent Trek series, every Lurian we see is bald. THEREFORE, it's only logical to assume that after 2375, all Lurians shave their heads in honor of Morn's heroics during the Dominion War.

Left photo: Morn from DS9
Top right: Lurian from Discovery season 3
Bottom right: Lurian from Prodigy

@mdhughes thinking of just doing text-mode, yeah--that way the game can almost be portable on anything

@mdhughes

this 'works', although i am not happy with the way that the star printing section tabulates the information...

10  dim g(63,1)
20  print "clearing star positions..."
30  for i = 0 to 63
40      for j = 0 to 1
50          let g(i,j) = 0
60      next j
70  next i
80  print "generating star positions..."
90  for s = 0 to 63
100     x = int(rnd(1)*255)
110     y = int(rnd(1)*255)
120     let g(s,0) = x
130     let g(s,1) = y
140 next s
150 print "printing star positions..."
160 for s = 0 to 63
170     print "x = ";g(s,0);". y = ";g(s,1)
180 next s
10 DIM G(63,1)
20 PRINT "CLEARING STAR POSITIONS..."
30 FOR I = 0 TO 63
40 FOR J = 0 TO 1
50 LET G(I,J) = 0
60 NEXT J
70 NEXT I
80 PRINT "GENERATING STAR POSITIONS..."
90 FOR S = 0 TO 63
100 X = INT(RND(1)*255)
110 Y = INT(RND(1)*255)
120 LET G(S,0) = X
130 LET G(S,1) = Y
140 NEXT S
150 PRINT "PRINTING STAR POSITIONS..."
160 FOR S = 0 TO 63
170 PRINT "X = ";G(S,0);". Y = ";G(S,1)
180 NEXT S

Emacs is really cool.

You don't need a big init file, mine is currently just enough to do slime, the little lisp client thingy that plugs into SBCL for me, plus a dark theme mode.

Lisp is a big rabbit hole to go down, and if you go, you will find out lots of things which makes C and JavaScript look bad.

@alex it's for a big call centre in my city! It requires six weeks training. Has been quite gruelling but I have been giving it my all.

games been playing on the wii:

  • crash bandicoot: mind over mutant
  • force unleashed
  • cooking mama
  • harry potter: deathly hallows, part 1

Oh look, they were out of 40 pin "holding-on-for-dear-life" sockets.
Great. Less pain, finally.

Photo of two 40 pins sockets desoldered from a C64 motherboard. These have normal pins, without funny bends or the "eye" that other sockets on this machine had.

been doing this training for the job still

i'm getting through it!

after this week, only another two weeks!

»