peron

@peron@lemmy.sdf.org

This is a remote user, information on this page may be incomplete. View at Source ↗

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.

⁨Comment⁩ on ⁨Trying to get DOS 6.22 on an SD Card, to then run via an ISA IDE to SD Adapter on my Commodore PC-10 III, but It doesn't wanna boot. What am I doing wrong?⁩ ⁨⁨6⁩ ⁨months⁩ ago⁩:
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.
⁨Comment⁩ on ⁨BASIC for the Masses⁩ ⁨⁨6⁩ ⁨months⁩ ago⁩:
<code basic> 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 </code>

⁨Comment⁩ on ⁨BASIC for the Masses⁩ ⁨⁨1⁩ ⁨year⁩ ago⁩:

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&lt;=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!

⁨Comment⁩ on ⁨BASIC for the Masses⁩ ⁨⁨1⁩ ⁨year⁩ ago⁩:

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&lt;=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

⁨Comment⁩ on ⁨BASIC for the Masses⁩ ⁨⁨1⁩ ⁨year⁩ ago⁩:

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

BASIC for the Masseslemmy.sdf.org ↗
Submitted ⁨⁨1⁩ ⁨year⁩ ago⁩ to ⁨retrocomputing@lemmy.sdf.org⁩ | ⁨6⁩ ⁨comments⁩