

deleted by creator
As an active member of an Organized Community on the global data networks, I assist the Working Masses with the high goal of achieving Social Justice 2.0: Fair, Free and Sovereign software.
deleted by creator
Most of the time, I would use a Huayra GNU/Linux (a Debian distro for educational purposes), as it was tailored for low spec Atom netbooks in Argentina. There is a specialized AntiX for these machines too, with many games/emulators. A ThinkPad T42 with 2 Gigs should run Huayra 3.2 without any issues.
The argentine super-classic: Super Menem! On the Amber CRT monitor.
10 : CLEAR : PAUSE “Mini Moon Age Calculator “
20 : W=694098 : X=29.53 : Z=365.25 : JN=2460202.6 : REM Julian date for last moon on 25/9/2023 at 2:39am
30 : INPUT “DAY:” ; D , “MONTH:” ; M , “YEAR:” ; Y
40 : IF M<=2 LET Y=Y-1 : M=M+12
50 : A=INT(Y/100) : B=INT(A/4) : C=2-A+B : E=INT(Z * (Y+4716))
60 : F=INT(30.6001 * (M+1)) : JD=C+D+E+F-1524.5 : DS=JD-JN
70 : S=(DS/X-INT(DS/X)) * X : S=INT(S+.5)
80 : PRINT “Age of Moon “ ; USING “###.# “ ; S ; “_days” : END
Stay SHARP!
Darthmouth GRAFIX.BAS!
100 DEF FNF(X)=SIN(X)
105 DEF FNG(X)=LOG(X)/LOG(10)
110 DEF FNR(X)=INT(X+.5)
120 DEF FNX(X)=INT(100*X+.5)/100
130 READ A,B,S
140 READ C,D,N
150 IF N<=50 THEN 180
160 PRINT "ONLY 50 SUBDIVISIONS"
170 STOP
175 :
180 H=(D-C)/N
190 PRINT ""Y-AXIS FROM ";C;" TO ";D;
195 PRINT " IN INCREMENTS OF ";H
200 PRINT
210 PRINT TAB(8);"'";
220 FOR I=1 TO N-1
230 PRINT "-";
240 NEXT I
250 PRINT "'"
255 :
260 FOR X=A TO B STEP S
270 Y=FNF(X)
272 Y1=8+FNR((Y-C)/H)
274 Y=FNG(X)
276 Y2=8+FNR((Y-C)/H)
278 PRINT FNX(X);
280 IF Y2
This a Sharp BASIC suffler for the 40 spanish card deck, for truco and other games.
10:REM BARAJADOR MAZO DE 40 CARTAS ESPANOLAS,SHARP PC-1360
20:WAIT 0: CLS : CLEAR
30:DIM A$(41)*20,S$(0)*32,P$(0)*65
40:C=0:S$(0)="Basto Espada Oro Copas"
50:P$(0)="As Dos Tres CuatroCincoSeis SieteSota CaballoRey"
60:FOR S=1 TO 4
70:FOR N=1 TO 10
80:C=C+1
90:A$(C)= MID$ (P$(0),(N*5)-4,5)+" de "+ MID$ (S$(0),(S*8)-5,0)
100:NEXT N: NEXT S
110:FOR C=41 TO 2 STEP - 1:A= RND (40)+1:A$(C)=A$(A):A$(A)=A$(C-1): NEXT C: BEEP 1: WAIT
120:FOR C=1 TO 40: PRINT SRT$ (C);":";A$(C): NEXT C
My BMI has been nicely calculated in your BASIC dialect!
Today is the new event, at one of the main cultural venues of Argentina, the Néstor Kirchner Cultural Center at Buenos Aires.
New encounter!
Tecnology +Art + Games
Cybercirujas invites you to experiment and play with retrocomputers and consoles. Videogames of all the areas, argentine arcades, alternative control games. Live chiptune music. Text-art. An oportunity to thing about recycling computers and technology.
New event on Techeles. The Ciber-Surgeons disembowel arcades again!
Video: https://toobnix.org/w/i9sGF6Sp53ev2MJSTpcr7X