Your loop is under control!
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.
Your loop is under control!
DOS disk interface is quite mundante. It was dependant on BIOS recognition, and its not compatible with 32 GB disk at all. An 120MB or 250MB HDD was the usual MS-DOS disk sold during the 6.22 era. The firsts GB disk ware common by 1996. By the way, 2GB is the max recognizable partition size. Use fdisk to create a Master Boot Record, and a 2GB partition, and try it. I tried it with ease with old 1 GB and 512MB Compact Flash cards, but I must say CF has almost direct compatibility with IDE. SD cards require an adapter controller (you seems to have one of those, tho).
Star Wars March for the Atari!
1 GRAPHICS 2+16
2 ? #6;"STAR WARS THEME"
3 ? #6;"BY JOHN WILLIAMS"
4 REM ARR. BY AARON NESS
5 REM FROM ACE NEWSLETTER, VOL.2,NO.3, MARCH 1981
8 FOR W=1 TO 500:NEXT W
9 GRAPHICS 0
10 READ S,N0,N1,N2,N3
20 IF N0=-1 THEN END
25 ? S;"|";N0;"|";N1;"|";N2;"|";N3
30 SOUND 0,N0,10,4:SOUND 1,N1,10,4
35 SOUND 2,N2,10,4:SOUND 3,N3,10,4
40 FOR X=1 TO S*150:NEXT X:GOTO 10
100 DATA .3,108,0,0,0
101 DATA 0,0,0,0,0
102 DATA .3,108,0,0,0
104 DATA 0,0,0,0,0
105 DATA .2,108,0,0,0
110 DATA 1,81,108,128,162
111 DATA 1,81,108,128,173
114 DATA 1,53,64,81,193
116 DATA 1,53,64,81,217
120 DATA .3,60,81,96,243
122 DATA .3,64,81,96,243
124 DATA .2,72,81,96,243
125 DATA 1,40,53,64,128
128 DATA 1,40,53,64,144
129 DATA 1,53,64,81,162
140 DATA .3,60,81,96,243
141 DATA .3,64,81,96,243
144 DATA .2,72,81,96,243
145 DATA 1,40,53,64,128
148 DATA 1,40,53,64,144
149 DATA 1,53,64,81,162
160 DATA .3,60,72,91,182
161 DATA .3,64,72,91,182
164 DATA .3,60,72,91,182
165 DATA 2,72,85,108,217
168 DATA .6,108,0,0,0
169 DATA 0,0,0,0,0
172 DATA .3,108,0,0,0
173 DATA 0,0,0,0,0
180 DATA 1,81,103,128,162
181 DATA 1,81,108,128,173
184 DATA 1,53,64,81,193
185 DATA 1,53,64,81,217
190 DATA .3,60,81,96,243
191 DATA .3,64,81,96,243
194 DATA .2,72,81,96,243
196 DATA 1,40,53,64,128
198 DATA 1,40,53,64,144
199 DATA 1,53,64,81,162
210 DATA .3,60,81,96,243
211 DATA .3,64,81,96,243
214 DATA .2,72,81,96,243
215 DATA 1,40,53,64,128
218 DATA 1,40,53,64,144
219 DATA 1,53,64,81,162
230 DATA .3,60,72,91,182
231 DATA .3,64,72,91,182
234 DATA .3,60,72,91,182
235 DATA 1,72,85,108,217
236 DATA .6,108,0,0,0
237 DATA 0,0,0,0,0
238 DATA .3,108,0,0,0
250 DATA 1.5,96,121,162,0
251 DATA 0,0,0,0,0
252 DATA .5,96,0,0,217
254 DATA .5,60,81,96,217
255 DATA .5,64,81,96,217
256 DATA .5,72,81,96,217
258 DATA .5,81,81,96,217
270 DATA .3,81,96,0,217
271 DATA .3,72,96,0,217
274 DATA .3,64,96,0,217
275 DATA 1,72,0,0,217
278 DATA .25,96,0,0,217
279 DATA 1,85,108,144,217
282 DATA .6,108,0,0,0
283 DATA 0,0,0,0,0
284 DATA .3,108,0,0,0
290 DATA 1.5,96,121,162,217
291 DATA 0,0,0,0,0
292 DATA .5,96,121,162,217
294 DATA .5,60,81,121,217
295 DATA .5,64,81,121,217
298 DATA .5,72,81,121,217
299 DATA .5,0,81,121,217
310 DATA .75,53,68,91,136
311 DATA .25,72,0,0,0
314 DATA 2,72,85,108,217
315 DATA .6,108,0,0,0
318 DATA 0,0,0,0,0
319 DATA .3,108,0,0,0
320 DATA 1.5,96,121,162,0
321 DATA 0,0,0,0,0
322 DATA .5,96,0,0,217
324 DATA .5,60,81,96,0
325 DATA .5,64,81,96,0
328 DATA .5,72,81,96,217
329 DATA .5,0,81,96,0
340 DATA .3,81,96,121,217
341 DATA .3,72,96,121,0
344 DATA .3,64,96,121,0
345 DATA .6,72,96,121,217
348 DATA .3,0,96,0,0
349 DATA 1,85,0,0,0
352 DATA .6,53,0,0,217
353 DATA 0,0,0,0,0
354 DATA .3,53,0,0,0
360 DATA .6,40,50,60,81
361 DATA .3,45,60,81,128
364 DATA .6,50,60,81,243
365 DATA .3,53,0,81,217
368 DATA .6,60,0,81,204
369 DATA .3,68,0,0,182
372 DATA .6,72,0,0,162
373 DATA .3,81,0,0,144
380 DATA 1,53,0,0,0
381 DATA .1,72,85,121,217
384 DATA 0,0,0,0,0
385 DATA .1,72,85,121,217
386 DATA 0,0,0,0,0
387 DATA .1,72,85,121,217
388 DATA 0,0,0,0,0
389 DATA .5,72,85,121,217
390 DATA .3,0,0,108,0
391 DATA 0,0,0,0,0
392 DATA .3,0,0,108,0
393 DATA 0,0,0,0,0
394 DATA .3,0,0,108,0
395 DATA 0,0,0,0,0
400 DATA 1,81,108,128,162
401 DATA 1,81,108,128,173
404 DATA 1,53,64,81,193
405 DATA 1,53,64,81,217
410 DATA .3,60,81,96,243
411 DATA .3,64,81,96,243
414 DATA .2,72,81,96,243
415 DATA 1,40,53,64,128
418 DATA 1,40,53,64,144
419 DATA 1,53,64,81,162
430 DATA .3,60,81,96,243
431 DATA .3,64,81,96,243
434 DATA .2,72,81,96,243
435 DATA 1,40,53,64,128
438 DATA 1,40,53,64,144
439 DATA 1,53,64,81,162
450 DATA .3,60,72,91,182
451 DATA .3,64,72,91,182
454 DATA .3,60,72,91,182
455 DATA 2,72,85,108,217
456 DATA .6,108,0,0,0
457 DATA 0,0,0,0,0
458 DATA .3,108,0,0,0
462 DATA 0,0,0,0,0
470 DATA 1,81,108,128,162
471 DATA 1,81,108,128,173
474 DATA 1,53,64,81,193
475 DATA 1,53,64,81,217
480 DATA .3,60,81,96,243
481 DATA .3,64,81,96,243
484 DATA .2,72,81,96,243
485 DATA 1,40,53,64,128
488 DATA 1,40,53,64,144
489 DATA 1,53,64,81,162
500 DATA .3,60,81,96,243
501 DATA .3,64,81,96,243
504 DATA .2,72,81,96,243
505 DATA 1,40,53,64,128
508 DATA 1,40,53,64,144
509 DATA 1,53,64,81,162
520 DATA .3,60,72,91,182
521 DATA .3,64,72,91,182
524 DATA .3,60,72,91,182
525 DATA 2,72,85,108,217
528 DATA 1,53,108,217,0
530 DATA .5,0,0,0,217
540 DATA 1,40,53,64,162
542 DATA 1,40,53,64,173
544 DATA 1,40,53,64,193
546 DATA 1,40,53,64,217
550 DATA 1,40,53,64,243
552 DATA 1,40,53,64,217
554 DATA 1,40,53,64,193
556 DATA 1,40,53,64,173
558 DATA 2,40,53,64,162
559 DATA 0,0,0,0,0
560 DATA .1,40,53,64,162
561 DATA 0,0,0,0,0
562 DATA .1,40,53,64,162
563 DATA 0,0,0,0,0
564 DATA .1,40,53,64,162
565 DATA 0,0,0,0,0
566 DATA 1.7,40,53,64,162
600 DATA 0,-1,0,0,0
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!
I made some .cow files anyone may like.
gaucho_hacker.cow:
$the_cow = <<"EOC";
$thoughts
$thoughts _________
| | ________
____|________|____ ~ | \\
//// _____) ~ || \\_____
_| (o)(o) ~ ~ || \\
(o \\| ~ || \\
| (..) ~ ~ || \\
| /||||\\ ~ || |
| \\ \\\\ ~ ~ | |
/| -----_\\\\__ ~ |___________----|--+
/ \\__/_ ) ( ______ ~____ ====== wwwww8
/ +___ (/| )______||_--\\\\--+ - 8
/ +--- +- \\/ /________|wwwwwwwwwwwwwwwwww8
|________---____/
EOC
peron.cow
$the_cow = <<"EOC";
$thoughts
$thoughts ,_____._____
,_. /-_---------_\\
/ | || || /\\
/ < \\|.__. .__.|/ | l
| / |E==< E==<| n J |
| / G| | | |D \\ |
| | \\| , q_p , |J _|__/_
==== | /._____.\\ | |\\__/|
| | ( \\___J ) | |
| | ( =.___- = ) / /
| | (.__-___,) / /
\\ |____----+ |________/ /
\\ \\ \\/ _/ /
\\_____ \\ / / ______/
EOC
17oct.cow
$the_cow = <<"EOC";
$thoughts
$thoughts _______
\\o/ \\ peron \\ ---------
------+ \\------- | C G T |
:::::::::::::::\\::::::::::|---------|:::::::::::
%%%%%%%%%%%%%%%%\\%%%%%%%%%|%%%%%%%%%|%%%%%%%%%%%
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&
oooooooooooooooooooooooooooooooooooooooooooooooo
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
Today Euclid would be programming in BASIC.
My BMI has been nicely calculated in your BASIC dialect!
1 REM TEST YOUR INPUT AND THEN
10 PRINT "DO YOU EAT YOUR BOUGHS??"
20 INPUT X
30 IF X="YES" THEN PRINT "YOU PIG!.": END
40 IF X="NO" THEN PRINT "WHAT ARE YOU WAITING FOR TO TRY?"
50 END
KL Toad-2
Lovely boards carry 36 bits!
Some views on the CCK show: https://toobnix.org/w/1uxufYdM1oHvF1y96wnU5n
Indeed. Today a new event is held in one of the main venues in Buenos Aires, the CCK: https://fediverse.tv/w/o2UJYefRythdscFy9YS8bj
~crazyjane colgó otro del nuevo realizado en el CCK https://fediverse.tv/w/o2UJYefRythdscFy9YS8bj
You may follow the live twich https://twitch.tv/cybercirujas
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.
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.