VOGONS


What retro activity did you get up to today?

Topic actions

Reply 31500 of 31501, by VanillaFairy

User metadata
Rank Newbie
Rank
Newbie

Well, I got new cables, had to set the ULTRA DMA mode to 3 because 4 or 5 wouldn't let me boot with the shielded 80-wire cables, got modern Linux working... aaand then broke it trying to install a desktop environment.
now Alpine Linux can't even see the motherboard's builtin ethernet controller, let alone the wifi card, the gpu isn't being properly detected and is still in 1024x768 mode (I mean that's kinda for the better), etc.

I think I'm gonna give up on Linux for this system for the time being, and just put Vista on it instead.

Just a silly lil person in a very big world.
huggies_small.png

Reply 31501 of 31501, by Peter Swinkels

User metadata
Rank Oldbie
Rank
Oldbie

Some more retro BASIC stuff by me:

10 KEY 1, "SEND"
20 KEY 2, "QUIT"
30 ON KEY(1) GOSUB 190
40 ON KEY(2) GOSUB 230
50 KEY(1) ON
60 KEY(2) ON
70 KEY ON
80 CLS
90 OPEN "COM1:9600,N,8,1,BIN,CS0,DS0" AS #1
100 ON COM(1) GOSUB 140
110 COM(1) ON
120 PRINT "Wait for data from Telnet (Port 2323)..."
130 GOTO 130
140 IF LOC(1) = 0 THEN RETURN
150 B$ = INPUT$(1, #1)
160 PRINT B$;
170 RETURN
180 COM(1) OFF: CLOSE #1: END
190 LINE INPUT "Enter data to send: "; I$
200 IF LEN(I$) > 0 THEN PRINT #1, I$;
210 RETURN
220 END
230 RETURN 220

I figured out how to use the ON COM statement. I don't have any old hardware to try this on but it does connect to telnet client in Windows.

https://github.com/PeterSwinkels/COM-port-cli … asic-/tree/main

My GitHub:
https://github.com/peterswinkels