home.social

#cbmpet — Public Fediverse posts

Live and recent posts from across the Fediverse tagged #cbmpet, aggregated by home.social.

  1. Tested various micros running this FLOATING POINT program. It derives Pi to 20 decimal places. Interesting stats.

    1 N=20: L=INT(10*N/3): DIM A(255): Z$="000000":T$="999999"
    2 FOR I=1 TO L: A(I)=2: NEXT I: M=0: P=0: FOR J=1 TO N: Q=0: K=2*L+1
    3 FOR I=L TO 1 STEP -1: K=K-2: X=10*A(I)+Q*I: Q=INT(X/K): A(I)=X-Q*K: NEXT I
    4 Y =INT(Q/10): A(1)=Q-10*Y: Q=Y: IF Q=9 THEN LET M=M+1: GOTO 7
    5 IF Q=10 THEN PRINT STR$(P+1);LEFT$(Z$,M);: P=0: M=0: GOTO 7
    6 PRINT STR$(P);LEFT$(T$,M);: P=Q: M=0
    7 NEXT J:PRINT STR$(P)

    #RC2014 : 14 (thank you JonV)
    #BBCMicro : 19
    #AmstradCPC : 22 (thank you Devlin)
    #AmstradPCW : 23 (thank you Pete)
    #AcornElectron : 25
    #C128 : 27 (fast mode - thank you Jonas H)
    #LuxorABC80 : 29 (thank you Erik)
    #SharpMZ700 : 32 (thank you Tim Holyoake)
    #VIC20 : 36
    #AcornAtom : 37
    #AppleII : 38 (thank you Jeroen)
    #TRS80CoCo : 42 (thank you Chip)
    #Atari800 : 42 (thank you Mark Elliott)
    #CBMPET : 43
    #C64 : 43
    #Dragon32 : 44
    #SharpMZ80K : 45 (thank you Tim Holyoake)
    #C16 : 46
    #Altair8800 : 52
    #MSX : 53 (thank you Pixel Purrito)
    #C128 : 56 (default "mode")
    #ZX80 : 57
    #ZXSpectrum : 68 (thank you Adam)
    #SharpPC1500A : 167 (thank you Karttu)
    #ZX81 : 213 (native slow mode)
    #SharpPC1245 : 405 (thank you Karttu)

    Edit: now ordered (seconds)

  2. Tested various micros running this FLOATING POINT program. It derives Pi to 20 decimal places. Interesting stats.

    1 N=20: L=INT(10*N/3): DIM A(255): Z$="000000":T$="999999"
    2 FOR I=1 TO L: A(I)=2: NEXT I: M=0: P=0: FOR J=1 TO N: Q=0: K=2*L+1
    3 FOR I=L TO 1 STEP -1: K=K-2: X=10*A(I)+Q*I: Q=INT(X/K): A(I)=X-Q*K: NEXT I
    4 Y =INT(Q/10): A(1)=Q-10*Y: Q=Y: IF Q=9 THEN LET M=M+1: GOTO 7
    5 IF Q=10 THEN PRINT STR$(P+1);LEFT$(Z$,M);: P=0: M=0: GOTO 7
    6 PRINT STR$(P);LEFT$(T$,M);: P=Q: M=0
    7 NEXT J:PRINT STR$(P)

    #RC2014 : 14 (thank you JonV)
    #BBCMicro : 19
    #AmstradCPC : 22 (thank you Devlin)
    #AmstradPCW : 23 (thank you Pete)
    #AcornElectron : 25
    #C128 : 27 (fast mode - thank you Jonas H)
    #LuxorABC80 : 29 (thank you Erik)
    #SharpMZ700 : 32 (thank you Tim Holyoake)
    #VIC20 : 36
    #AcornAtom : 37
    #AppleII : 38 (thank you Jeroen)
    #TRS80CoCo : 42 (thank you Chip)
    #Atari800 : 42 (thank you Mark Elliott)
    #CBMPET : 43
    #C64 : 43
    #Dragon32 : 44
    #SharpMZ80K : 45 (thank you Tim Holyoake)
    #C16 : 46
    #Altair8800 : 52
    #MSX : 53 (thank you Pixel Purrito)
    #C128 : 56 (default "mode")
    #ZX80 : 57
    #ZXSpectrum : 68 (thank you Adam)
    #SharpPC1500A : 167 (thank you Karttu)
    #ZX81 : 213 (native slow mode)
    #SharpPC1245 : 405 (thank you Karttu)

    Edit: now ordered (seconds)

  3. Tested various micros running this FLOATING POINT program. It derives Pi to 20 decimal places. Interesting stats.

    1 N=20: L=INT(10*N/3): DIM A(255): Z$="000000":T$="999999"
    2 FOR I=1 TO L: A(I)=2: NEXT I: M=0: P=0: FOR J=1 TO N: Q=0: K=2*L+1
    3 FOR I=L TO 1 STEP -1: K=K-2: X=10*A(I)+Q*I: Q=INT(X/K): A(I)=X-Q*K: NEXT I
    4 Y =INT(Q/10): A(1)=Q-10*Y: Q=Y: IF Q=9 THEN LET M=M+1: GOTO 7
    5 IF Q=10 THEN PRINT STR$(P+1);LEFT$(Z$,M);: P=0: M=0: GOTO 7
    6 PRINT STR$(P);LEFT$(T$,M);: P=Q: M=0
    7 NEXT J:PRINT STR$(P)

    #RC2014 : 14 (thank you JonV)
    #BBCMicro : 19
    #AmstradCPC : 22 (thank you Devlin)
    #AmstradPCW : 23 (thank you Pete)
    #AcornElectron : 25
    #C128 : 27 (fast mode - thank you Jonas H)
    #LuxorABC80 : 29 (thank you Erik)
    #SharpMZ700 : 32 (thank you Tim Holyoake)
    #VIC20 : 36
    #AcornAtom : 37
    #AppleII : 38 (thank you Jeroen)
    #TRS80CoCo : 42 (thank you Chip)
    #Atari800 : 42 (thank you Mark Elliott)
    #CBMPET : 43
    #C64 : 43
    #Dragon32 : 44
    #SharpMZ80K : 45 (thank you Tim Holyoake)
    #C16 : 46
    #Altair8800 : 52
    #MSX : 53 (thank you Pixel Purrito)
    #C128 : 56 (default "mode")
    #ZX80 : 57
    #ZXSpectrum : 68 (thank you Adam)
    #SharpPC1500A : 167 (thank you Karttu)
    #ZX81 : 213 (native slow mode)
    #SharpPC1245 : 405 (thank you Karttu)

    Edit: now ordered (seconds)

  4. Tested various micros running this FLOATING POINT program. It derives Pi to 20 decimal places. Interesting stats.

    1 N=20: L=INT(10*N/3): DIM A(255): Z$="000000":T$="999999"
    2 FOR I=1 TO L: A(I)=2: NEXT I: M=0: P=0: FOR J=1 TO N: Q=0: K=2*L+1
    3 FOR I=L TO 1 STEP -1: K=K-2: X=10*A(I)+Q*I: Q=INT(X/K): A(I)=X-Q*K: NEXT I
    4 Y =INT(Q/10): A(1)=Q-10*Y: Q=Y: IF Q=9 THEN LET M=M+1: GOTO 7
    5 IF Q=10 THEN PRINT STR$(P+1);LEFT$(Z$,M);: P=0: M=0: GOTO 7
    6 PRINT STR$(P);LEFT$(T$,M);: P=Q: M=0
    7 NEXT J:PRINT STR$(P)

    #RC2014 : 14 (thank you JonV)
    #BBCMicro : 19
    #AmstradCPC : 22 (thank you Devlin)
    #AmstradPCW : 23 (thank you Pete)
    #AcornElectron : 25
    #C128 : 27 (fast mode - thank you Jonas H)
    #LuxorABC80 : 29 (thank you Erik)
    #SharpMZ700 : 32 (thank you Tim Holyoake)
    #VIC20 : 36
    #AcornAtom : 37
    #AppleII : 38 (thank you Jeroen)
    #TRS80CoCo : 42 (thank you Chip)
    #Atari800 : 42 (thank you Mark Elliott)
    #CBMPET : 43
    #C64 : 43
    #Dragon32 : 44
    #SharpMZ80K : 45 (thank you Tim Holyoake)
    #C16 : 46
    #Altair8800 : 52
    #MSX : 53 (thank you Pixel Purrito)
    #C128 : 56 (default "mode")
    #ZX80 : 57
    #ZXSpectrum : 68 (thank you Adam)
    #SharpPC1500A : 167 (thank you Karttu)
    #ZX81 : 213 (native slow mode)
    #SharpPC1245 : 405 (thank you Karttu)

    Edit: now ordered (seconds)

  5. Tested various micros running this FLOATING POINT program. It derives Pi to 20 decimal places. Interesting stats.

    1 N=20: L=INT(10*N/3): DIM A(255): Z$="000000":T$="999999"
    2 FOR I=1 TO L: A(I)=2: NEXT I: M=0: P=0: FOR J=1 TO N: Q=0: K=2*L+1
    3 FOR I=L TO 1 STEP -1: K=K-2: X=10*A(I)+Q*I: Q=INT(X/K): A(I)=X-Q*K: NEXT I
    4 Y =INT(Q/10): A(1)=Q-10*Y: Q=Y: IF Q=9 THEN LET M=M+1: GOTO 7
    5 IF Q=10 THEN PRINT STR$(P+1);LEFT$(Z$,M);: P=0: M=0: GOTO 7
    6 PRINT STR$(P);LEFT$(T$,M);: P=Q: M=0
    7 NEXT J:PRINT STR$(P)

    #RC2014 : 14 (thank you JonV)
    #BBCMicro : 19
    #AmstradCPC : 22 (thank you Devlin)
    #AmstradPCW : 23 (thank you Pete)
    #AcornElectron : 25
    #C128 : 27 (fast mode - thank you Jonas H)
    #LuxorABC80 : 29 (thank you Erik)
    #SharpMZ700 : 32 (thank you Tim Holyoake)
    #VIC20 : 36
    #AcornAtom : 37
    #AppleII : 38 (thank you Jeroen)
    #TRS80CoCo : 42 (thank you Chip)
    #Atari800 : 42 (thank you Mark Elliott)
    #CBMPET : 43
    #C64 : 43
    #Dragon32 : 44
    #SharpMZ80K : 45 (thank you Tim Holyoake)
    #C16 : 46
    #Altair8800 : 52
    #MSX : 53 (thank you Pixel Purrito)
    #C128 : 56 (default "mode")
    #ZX80 : 57
    #ZXSpectrum : 68 (thank you Adam)
    #SharpPC1500A : 167 (thank you Karttu)
    #ZX81 : 213 (native slow mode)
    #SharpPC1245 : 405 (thank you Karttu)

    Edit: now ordered (seconds)

  6. A few updates to the hardware project thingy.

    Renamed as "Optical Data Channel..." because although vaguely amusing, "JellyLoad" isn't a terribly helpful title.

    Also applied MIT open source license, free and easy do-what-you-like-pal whilst absolving me of any liability if you attempt to use the data and end up destroying the universe or something similarly daft.

    github.com/StefanoGaivota/Opti

    #JellyLoad
    #OpticalDataChannel
    #RetroComputing
    #Commodore
    #VIC20
    #C64
    #CBMPET
    #Youtube
    #GitHub
    #Electronics
    #Design

  7. A few updates to the hardware project thingy.

    Renamed as "Optical Data Channel..." because although vaguely amusing, "JellyLoad" isn't a terribly helpful title.

    Also applied MIT open source license, free and easy do-what-you-like-pal whilst absolving me of any liability if you attempt to use the data and end up destroying the universe or something similarly daft.

    github.com/StefanoGaivota/Opti

    #JellyLoad
    #OpticalDataChannel
    #RetroComputing
    #Commodore
    #VIC20
    #C64
    #CBMPET
    #Youtube
    #GitHub
    #Electronics
    #Design

  8. A few updates to the hardware project thingy.

    Renamed as "Optical Data Channel..." because although vaguely amusing, "JellyLoad" isn't a terribly helpful title.

    Also applied MIT open source license, free and easy do-what-you-like-pal whilst absolving me of any liability if you attempt to use the data and end up destroying the universe or something similarly daft.

    github.com/StefanoGaivota/Opti

    #JellyLoad
    #OpticalDataChannel
    #RetroComputing
    #Commodore
    #VIC20
    #C64
    #CBMPET
    #Youtube
    #GitHub
    #Electronics
    #Design

  9. A few updates to the hardware project thingy.

    Renamed as "Optical Data Channel..." because although vaguely amusing, "JellyLoad" isn't a terribly helpful title.

    Also applied MIT open source license, free and easy do-what-you-like-pal whilst absolving me of any liability if you attempt to use the data and end up destroying the universe or something similarly daft.

    github.com/StefanoGaivota/Opti

    #JellyLoad
    #OpticalDataChannel
    #RetroComputing
    #Commodore
    #VIC20
    #C64
    #CBMPET
    #Youtube
    #GitHub
    #Electronics
    #Design

  10. Simulation and prototypes successful, however I currently lack the resources for experimentation beyond this stage, so I'm casting the design out into the open for any and all enthusiasts to pick up and play with.

    github.com/StefanoGaivota/Jell

    Feel free to let me know how you get on with it.

    #JellyLoad #RetroComputing #VIC20 #C64 #CBMPET #Youtube #GitHub #OpticalDataChannel #Electronics #Design

  11. Simulation and prototypes successful, however I currently lack the resources for experimentation beyond this stage, so I'm casting the design out into the open for any and all enthusiasts to pick up and play with.

    github.com/StefanoGaivota/Jell

    Feel free to let me know how you get on with it.

    #JellyLoad #RetroComputing #VIC20 #C64 #CBMPET #Youtube #GitHub #OpticalDataChannel #Electronics #Design

  12. Simulation and prototypes successful, however I currently lack the resources for experimentation beyond this stage, so I'm casting the design out into the open for any and all enthusiasts to pick up and play with.

    github.com/StefanoGaivota/Jell

    Feel free to let me know how you get on with it.

    #JellyLoad #RetroComputing #VIC20 #C64 #CBMPET #Youtube #GitHub #OpticalDataChannel #Electronics #Design

  13. Simulation and prototypes successful, however I currently lack the resources for experimentation beyond this stage, so I'm casting the design out into the open for any and all enthusiasts to pick up and play with.

    github.com/StefanoGaivota/Jell

    Feel free to let me know how you get on with it.

    #JellyLoad #RetroComputing #VIC20 #C64 #CBMPET #Youtube #GitHub #OpticalDataChannel #Electronics #Design

  14. Simulation and prototypes successful, however I currently lack the resources for experimentation beyond this stage, so I'm casting the design out into the open for any and all enthusiasts to pick up and play with.

    github.com/StefanoGaivota/Jell

    Feel free to let me know how you get on with it.

    #JellyLoad #RetroComputing #VIC20 #C64 #CBMPET #Youtube #GitHub #OpticalDataChannel #Electronics #Design

  15. ...and the fully functional Mini PET40/80D motherboard!

    #commodore #cbmpet retrocomputing

  16. ...and the fully functional Mini PET40/80D motherboard!

    #commodore #cbmpet retrocomputing

  17. ...and the fully functional Mini PET40/80D motherboard!

    #commodore #cbmpet retrocomputing

  18. ...and the fully functional Mini PET40/80D motherboard!

    #commodore #cbmpet retrocomputing

  19. ...and the fully functional Mini PET40/80D motherboard!

    #commodore #cbmpet retrocomputing

  20. Attention #commodore #retrocomputing folks!

    I found a CBM-II keyboard and a CBM610 (w/o PCB) in my attic (yes, I should go up and dig more often, I suppose 😉 ).

    I wonder whether there's a turnkey solution out there to connect it to a PC (using USB). I am aware of Jens Schoenfeld's (iComp) "Keyrah v3". But have the strong feeling I am missing some essential point.

    #CBMpet #CBM
    #helpneeded #retrogaming

  21. Attention #commodore #retrocomputing folks!

    I found a CBM-II keyboard and a CBM610 (w/o PCB) in my attic (yes, I should go up and dig more often, I suppose 😉 ).

    I wonder whether there's a turnkey solution out there to connect it to a PC (using USB). I am aware of Jens Schoenfeld's (iComp) "Keyrah v3". But have the strong feeling I am missing some essential point.

    #CBMpet #CBM
    #helpneeded #retrogaming

  22. Attention #commodore #retrocomputing folks!

    I found a CBM-II keyboard and a CBM610 (w/o PCB) in my attic (yes, I should go up and dig more often, I suppose 😉 ).

    I wonder whether there's a turnkey solution out there to connect it to a PC (using USB). I am aware of Jens Schoenfeld's (iComp) "Keyrah v3". But have the strong feeling I am missing some essential point.

    #CBMpet #CBM
    #helpneeded #retrogaming

  23. Attention #commodore #retrocomputingh folks!

    I found a CBM-II keyboard and a CBM610 (w/o PCB) in my attic (yes, I should go up and dig more often, I suppose 😉 ).

    I wonder whether there's a turnkey solution out there to connect it to a PC (using USB). I am aware of Jens Schoenfeld's (iComp) "Keyrah v3". But have the strong feeling I am missing some essential point.

    #CBMpet #CBM
    #helpneeded #retrogaming

  24. Attention #commodore #retrocomputing folks!

    I found a CBM-II keyboard and a CBM610 (w/o PCB) in my attic (yes, I should go up and dig more often, I suppose 😉 ).

    I wonder whether there's a turnkey solution out there to connect it to a PC (using USB). I am aware of Jens Schoenfeld's (iComp) "Keyrah v3". But have the strong feeling I am missing some essential point.

    #CBMpet #CBM
    #helpneeded #retrogaming

  25. I won't be watching "The Continental" but those that do, look out for the CBM PET #retrocomputer porn that appears.

    Core. Sexy.

    #CBMPET #Commodore #RetroComputing #RetroComputingPorn

  26. I won't be watching "The Continental" but those that do, look out for the CBM PET #retrocomputer porn that appears.

    Core. Sexy.

    #CBMPET #Commodore #RetroComputing #RetroComputingPorn

  27. I won't be watching "The Continental" but those that do, look out for the CBM PET #retrocomputer porn that appears.

    Core. Sexy.

    #CBMPET #Commodore #RetroComputing #RetroComputingPorn

  28. I won't be watching "The Continental" but those that do, look out for the CBM PET #retrocomputer porn that appears.

    Core. Sexy.

    #CBMPET #Commodore #RetroComputing #RetroComputingPorn

  29. I won't be watching "The Continental" but those that do, look out for the CBM PET #retrocomputer porn that appears.

    Core. Sexy.

    #CBMPET #Commodore #RetroComputing #RetroComputingPorn

  30. That was a long stressful work day. Please post retro computing porn. Sci-fi / anime computing imagery also welcome.

    Here is the gorgeous Commodore Pet.

    #RetroComputing #retrocomputer #Commodore #CommodorePET #CBMPET #RetroComputingPorn

  31. That was a long stressful work day. Please post retro computing porn. Sci-fi / anime computing imagery also welcome.

    Here is the gorgeous Commodore Pet.

    #RetroComputing #retrocomputer #Commodore #CommodorePET #CBMPET #RetroComputingPorn

  32. That was a long stressful work day. Please post retro computing porn. Sci-fi / anime computing imagery also welcome.

    Here is the gorgeous Commodore Pet.

    #RetroComputing #retrocomputer #Commodore #CommodorePET #CBMPET #RetroComputingPorn

  33. That was a long stressful work day. Please post retro computing porn. Sci-fi / anime computing imagery also welcome.

    Here is the gorgeous Commodore Pet.

    #RetroComputing #retrocomputer #Commodore #CommodorePET #CBMPET #RetroComputingPorn

  34. That was a long stressful work day. Please post retro computing porn. Sci-fi / anime computing imagery also welcome.

    Here is the gorgeous Commodore Pet.

    #RetroComputing #retrocomputer #Commodore #CommodorePET #CBMPET #RetroComputingPorn

  35. Super Star Trek updated with a unified source code for #CBMPET, #C64 and #CommodorePlus4! Colour codes (where appropriate) have been reimplemented but embedded into actual text variables so speed is waaaaay better.
    electrongreg.itch.io/super-sta

  36. Super Star Trek updated with a unified source code for #CBMPET, #C64 and #CommodorePlus4! Colour codes (where appropriate) have been reimplemented but embedded into actual text variables so speed is waaaaay better.
    electrongreg.itch.io/super-sta

  37. Super Star Trek updated with a unified source code for #CBMPET, #C64 and #CommodorePlus4! Colour codes (where appropriate) have been reimplemented but embedded into actual text variables so speed is waaaaay better.
    electrongreg.itch.io/super-sta

  38. Super Star Trek updated with a unified source code for #CBMPET, #C64 and #CommodorePlus4! Colour codes (where appropriate) have been reimplemented but embedded into actual text variables so speed is waaaaay better.
    electrongreg.itch.io/super-sta

  39. Super Star Trek updated with a unified source code for #CBMPET, #C64 and #CommodorePlus4! Colour codes (where appropriate) have been reimplemented but embedded into actual text variables so speed is waaaaay better.
    electrongreg.itch.io/super-sta