VOGONS


Reply 13460 of 14691, by Horun

User metadata
Rank Oldbie
Rank
Oldbie

Tested a bunch or 3.5" floppy drives, two were toast but the other dozen work well. Odd part is that the two dead ones are exact same make and model 🙁

First computer was an IBM 3270 workstation with CGA monitor. 🤣

Reply 13461 of 14691, by bakemono

User metadata
Rank Member
Rank
Member

Tried to install ReactOS on a Toshiba Portege M200. It didn't go really well.

My biggest beef with ROS has always been that it isn't setup to install FROM harddisk (which is how I always install Windows). You can't start the installer from DOS. I was entertaining the idea of trying to write my own util to start it, but it seems pointless at the moment. The situation has somewhat improved because they now have the INSTALLFREELDR program to create a boot sector that can start their installer. Except this program doesn't run from DOS, and it only creates the boot sector IN the actual boot sector, which means I had to immediately use a sector editor to capture the ROS boot sector and restore the NT one. Because according to their wiki, their installer will save the old boot sector but it won't add it to their boot menu, so when you get a non-working ROS install (like I ultimately did) then you can't boot NT/DOS anymore and you have an unbootable system which is dumb.

With that out of the way, I went through the text mode installer. The files in their boot ISO are in a directory called ReactOS and the default install directory is also ReactOS. So when I hit enter a cryptic error message came up saying I can't install to the same directory and that I had to reboot. But it didn't actually reboot. So I entered a different name and moved on. Later I get a prompt about installing a boot loader, which I don't want for reasons already mentioned, so I chose to skip it. As a result the FREELDR.INI didn't get updated so I couldn't move ahead to the second phase of the install until I edited it manually to boot ROS instead of the text mode setup program.

Trying to boot the second phase froze at SWENUM. Apparently they have big problems with their USB drivers right now that cause this. A suggested fix is to remove/rename the USB?HCI files in the SYSTEM32\DRIVERS dir. On this laptop, going into the BIOS and disabling legacy USB kb/mouse/floppy emulation also seemed to work. The rest of the install was able to complete then. But the OS doesn't actually work, as it reaches a screen that says "press ctrl-alt-delete to begin" where pressing ctrl-alt-del (or any other keys) does nothing.

Aaaand the ReactOS forum is now unusable as it has captchas on it, so I post my story here instead 😀

Reply 13462 of 14691, by lolo799

User metadata
Rank Oldbie
Rank
Oldbie

Played around with my XT for a while:

xt1.jpg
Filename
xt1.jpg
File size
234.82 KiB
Views
559 views
File license
Fair use/fair dealing exception
xtboot.jpg
Filename
xtboot.jpg
File size
39.91 KiB
Views
559 views
File license
Fair use/fair dealing exception
scan1.jpg
Filename
scan1.jpg
File size
47.83 KiB
Views
559 views
File license
Fair use/fair dealing exception

Then removed the scanner interface to put in a network card, which is way more useful!

hp27245.jpg
Filename
hp27245.jpg
File size
176.1 KiB
Views
559 views
File license
Fair use/fair dealing exception
landhcp.jpg
Filename
landhcp.jpg
File size
89.2 KiB
Views
559 views
File license
Fair use/fair dealing exception

Working fine with the mTCP utilities, but had some problems with bobcat, some misconfiguration somewhere...

PCMCIA Sound, Storage & Graphics

Reply 13464 of 14691, by Bruninho

User metadata
Rank Oldbie
Rank
Oldbie

Created a Win98SE and a Win 2k VM (with all the updates and blackwingcat's kernel extension). Tried numerous browsers. Eventually gave up on Win98. Focused on Win 2k, finally got the KEx to work and installed Firefox 52.x ESR, Pale Moon 28.x, then changed desktop color and icons to look like Win 98. Youtube works now. I feel at home now. I wasted a whole weekend for that... the only thing that annoys me is the font quality in my browsers, they are not smooth.

But I feel at home. Dunno why.

I was bfcastello, now I am Bruninho! =]
"Design isn't just what it looks like and feels like. Design is how it works."
JOBS, Steve.

Reply 13465 of 14691, by ragefury32

User metadata
Rank Member
Rank
Member

Went back to the year 2000...

24wffk.jpg
Filename
24wffk.jpg
File size
44.83 KiB
Views
490 views
File license
Fair use/fair dealing exception

To do a set of comparisons between my Pismo G4 Powerbook and my Thinkpad T21...

UT1999 CTF-Face3.png
Filename
UT1999 CTF-Face3.png
File size
745.67 KiB
Views
490 views
File license
Fair use/fair dealing exception
Quake 3 Arena.png
Filename
Quake 3 Arena.png
File size
679.28 KiB
Views
490 views
File license
Fair use/fair dealing exception
WOXL versus WO2097.png
Filename
WOXL versus WO2097.png
File size
666.75 KiB
Views
490 views
File license
Fair use/fair dealing exception
Pismo Monkey Island.png
Filename
Pismo Monkey Island.png
File size
923.72 KiB
Views
490 views
File license
Fair use/fair dealing exception

Details to come, but they are fairly evenly matched.

Reply 13466 of 14691, by Bruninho

User metadata
Rank Oldbie
Rank
Oldbie
ragefury32 wrote:
Went back to the year 2000... […]
Show full quote

Went back to the year 2000...

24wffk.jpg

To do a set of comparisons between my Pismo G4 Powerbook and my Thinkpad T21...

UT1999 CTF-Face3.png
Quake 3 Arena.png
WOXL versus WO2097.png
Pismo Monkey Island.png

Details to come, but they are fairly evenly matched.

Happy New Year 2000!!!

I was bfcastello, now I am Bruninho! =]
"Design isn't just what it looks like and feels like. Design is how it works."
JOBS, Steve.

Reply 13467 of 14691, by TheAbandonwareGuy

User metadata
Rank Oldbie
Rank
Oldbie
ragefury32 wrote:
Went back to the year 2000... […]
Show full quote

Went back to the year 2000...

24wffk.jpg

To do a set of comparisons between my Pismo G4 Powerbook and my Thinkpad T21...

UT1999 CTF-Face3.png
Quake 3 Arena.png
WOXL versus WO2097.png
Pismo Monkey Island.png

Details to come, but they are fairly evenly matched.

Isnt the Pismo a G3 PowerBook not a G4?

On my own activities, I diassembled (and ultimatily reduced to parts) BOTH of my 2nd gen I3 powered Toshiba Laptops. One had an unobtainium keyoard that was totally fucked and a non-functional trackpad and numerous other chassis issues, and the other just didn't boot. I pulled the CPUs (both i3 2330's), RAM (all 2GB modules, 4 total 2 per laptop), Optical Drives, Hard Drives, Mounting Hardware, and the keyboard that was good and burned the chassis parts and screens (both of which had scratches). I also kept the batteries one of which is an extended 8800MaH battery. I plan to order a Toshiba of similar age since I have 2 extra batteries, and the experience with the one that worked showed it to perform half-way decently aside from the user interface devices all being FUBAR'd.

Right now I'm using the X200 Tablet as my main laptop and I LOVE this thing. It is everything a laptop should be and more. I think I might also need to pickup a Thinkpad X220 (i3 version of the X200). I love this full size 12.1 laptop/Tablet form factor. Why did this laptop form factor disappear for the stupid ultrabook 2-in-1 form factor anyways?

https://www.youtube.com/channel/UCuFY6ZVlYOXA12tV8b00x_A
1996|P200MMX|64MB EDO|Virge DX 4MB|SB16 OPL3
1999|P3 933|384MB SDR|GF2 Ultra 64MB|CT4620
#Bernie2020 #FeelTheBern

Reply 13469 of 14691, by Peter Swinkels

User metadata
Rank Member
Rank
Member
pan069 wrote:
Was playing around with my 286 today. Not having touched QuickBasic for close to 30 years, I wondered how long it would take me […]
Show full quote

Was playing around with my 286 today. Not having touched QuickBasic for close to 30 years, I wondered how long it would take me to make analogue clock. Turns out, about an hour or so, had to look up a bunch of stuff I'd forgotten about. Still heaps of room for improvement. 😀

DECLARE SUB drawClock ()
DECLARE SUB drawHour (t$, c%)
DECLARE SUB drawSecond (t$, c%)

CONST PI = 3.141592654#

CONST ORG.X = 640 / 2
CONST ORG.Y = 480 / 2

LET prevTime$ = TIME$

SCREEN 12
CLS

drawClock

ON TIMER(1) GOSUB displayTime

TIMER ON
DO
LOOP UNTIL INKEY$ = CHR$(27)
TIMER OFF
END

displayTime:
LET currTime$ = TIME$

drawHour prevTime$, 0
drawSecond prevTime$, 0

drawHour currTime$, 7
drawSecond currTime$, 15

prevTime$ = currTime$

RETURN

SUB drawClock
LET a = 200

' Draw seconds dots
FOR i = 0 TO PI * 2 - (PI * 2 / 60) STEP (PI * 2 / 60)
LET s = SIN(i)
LET c = COS(i)
LET x = ORG.X + (s * a)
LET y = ORG.Y + (c * a)

LET sd% = s * (180 / PI)
LET cd% = c * (180 / PI)

IF sd% <> 0 AND cd% <> 0 THEN
PSET (x, y), 15
END IF
NEXT i

' Draw hourly dots
FOR i = 0 TO PI * 2 - (PI * 2 / 12) STEP (PI * 2 / 12)
LET s = SIN(i)
LET c = COS(i)
LET x = ORG.X + (s * a)
Show last 43 lines
    LET y = ORG.Y + (c * a)

LET r = 1.5
LET k = 7

LET sd% = s * (180 / PI)
LET cd% = c * (180 / PI)

IF sd% = 0 OR cd% = 0 THEN
r = 3
k = 15
END IF

CIRCLE (x, y), r, k
PAINT (x, y), k
NEXT i
END SUB

SUB drawHour (t$, c%)
LET hh% = VAL(MID$(t$, 1, 2))
LET mm% = VAL(MID$(t$, 4, 2))

LET a = 120
LET f = PI * 2
LET x = ORG.X + SIN(-(f / (12 * 60)) * (hh% * 60 + mm%) + PI) * a
LET y = ORG.Y + COS(-(f / (12 * 60)) * (hh% * 60 + mm%) + PI) * a

LINE (ORG.X, ORG.Y)-(x, y), c%
END SUB

SUB drawSecond (t$, c%)
LET ss% = VAL(MID$(t$, 7, 2))

LET a = 190
LET f = PI * 2
LET x = ORG.X + SIN(-(f / 60) * ss% + PI) * a
LET y = ORG.Y + COS(-(f / 60) * ss% + PI) * a

LINE (ORG.X, ORG.Y)-(x, y), c%
END SUB


Impressive, however you forgot the minute hand! 🤣 Add this to your drawHour procedure:


LET a = 180
LET x = ORG.X + SIN(-(f / 60) * mm% + PI) * a
LET y = ORG.Y + COS(-(f / 60) * mm% + PI) * a

LINE (ORG.X, ORG.Y)-(x, y), c%

Here's a digital clock I wrote:

DEFINT A-Z
DECLARE FUNCTION GetHours (Seconds#)
DECLARE FUNCTION GetMinutes (Seconds#)
DECLARE FUNCTION GetTime$ ()
DECLARE FUNCTION IIF (Condition, Result1, Result2)
DECLARE FUNCTION TranslateDigit (Digit$)
DECLARE FUNCTION Trim$ (Text$)
DECLARE SUB DisplayTime (x, y, Size, ColorV, Angled)
DECLARE SUB DrawColon (x, y, Size, ColorV, Angled)
DECLARE SUB DrawSegment (x, y, Size, Angle, ColorV)
DECLARE SUB DrawSegments (x, y, Segments, Size, ColorV, Angled)

CONST FALSE = 0
CONST NONE = 0
CONST TRUE = -1

CONST H1 = &H1
CONST H2 = &H2
CONST H3 = &H4
CONST L1 = &H8
CONST L2 = &H10
CONST R1 = &H20
CONST R2 = &H40

CONST C0 = H1 OR H3 OR L1 OR L2 OR R1 OR R2
CONST C1 = R1 OR R2
CONST C2 = H1 OR H2 OR H3 OR L2 OR R1
CONST C3 = H1 OR H2 OR H3 OR R1 OR R2
CONST C4 = H2 OR L1 OR R1 OR R2
CONST C5 = H1 OR H2 OR H3 OR L1 OR R2
CONST C6 = H1 OR H2 OR H3 OR L1 OR L2 OR R2
CONST C7 = H1 OR R1 OR R2
CONST C8 = H1 OR H2 OR H3 OR L1 OR L2 OR R1 OR R2
CONST C9 = H1 OR H2 OR H3 OR L1 OR R1 OR R2

CONST SECONDSPERHOUR = 3600
CONST SECONDSPERMINUTE = 60

SCREEN 7: CLS
ON TIMER(1) GOSUB Tick
TIMER ON
DO UNTIL INKEY$ = CHR$(27)
LOOP
TIMER OFF
END

Tick:
CLS
SCREEN , , 1, 0
DisplayTime 50, 50, 15, 11, TRUE
PCOPY 1, 0
RETURN

SUB DisplayTime (x, y, Size, ColorV, Angled)
STATIC Blink

DisplayedTime$ = GetTime$

CurrentX = x
FOR Index = 1 TO LEN(DisplayedTime$)
Show last 88 lines
      Digit$ = MID$(DisplayedTime$, Index, 1)
IF Digit$ = ":" THEN
IF Blink THEN DrawColon CurrentX, y, Size, ColorV, Angled
CurrentX = CurrentX + (Size * 2)
ELSE
DrawSegments CurrentX, y, TranslateDigit(Digit$), Size, ColorV, Angled
CurrentX = CurrentX + (Size * 3)
END IF
NEXT Index

Blink = NOT Blink
END SUB

SUB DrawColon (x, y, Size, ColorV, Angled)
Angle = IIF(Angled, -5, 0)
DRAW "C" + STR$(ColorV)
DRAW "BM" + STR$(x) + "," + STR$(y + Size)
DRAW "S" + STR$(Size) + "TA" + STR$(Angle)
DRAW "BU1 F1 G1 H1 E1 BD1 P" + STR$(ColorV) + "," + STR$(ColorV)
DRAW "BD" + STR$(CINT(Size / 2))
DRAW "BU1 F1 G1 H1 E1 BD1 P" + STR$(ColorV) + "," + STR$(ColorV)
END SUB

SUB DrawSegment (x, y, Size, Angle, ColorV)
DRAW "C" + STR$(ColorV)
DRAW "BM" + STR$(x) + "," + STR$(y)
DRAW "S" + STR$(Size) + "TA" + STR$(Angle)
DRAW "BL1 BM-1,-1 R4 F1 G1 L4 H1 E1"
PAINT (x, y), ColorV
END SUB

SUB DrawSegments (x, y, Segments, Size, ColorV, Angled)
Angle = IIF(Angled, -5, 0)

DrawSegment x, y, Size, 0, IIF((Segments AND H1) = H1, ColorV, 0)
DrawSegment x, y + (Size * 2), Size, 0, IIF((Segments AND H2) = H2, ColorV, 0)
DrawSegment x, y + (Size * 4), Size, 0, IIF((Segments AND H3) = H3, ColorV, 0)
DrawSegment x - Size, y + Size, Size, Angle + 90, IIF((Segments AND L1) = L1, ColorV, 0)
DrawSegment x - Size, y + (Size * 3), Size, Angle + 90, IIF((Segments AND L2) = L2, ColorV, 0)
DrawSegment x + Size, y + Size, Size, Angle + 90, IIF((Segments AND R1) = R1, ColorV, 0)
DrawSegment x + Size, y + (Size * 3), Size, Angle + 90, IIF((Segments AND R2) = R2, ColorV, 0)
END SUB

FUNCTION GetHours (Seconds#)
GetHours = INT(Seconds# / SECONDSPERHOUR)
END FUNCTION

FUNCTION GetMinutes (Seconds#)
GetMinutes = INT((Seconds# - (GetHours(Seconds#) * CDBL(SECONDSPERHOUR))) / SECONDSPERMINUTE)
END FUNCTION

FUNCTION GetTime$
Hours$ = Trim$(STR$(GetHours(TIMER)))
Minutes$ = Trim$(STR$(GetMinutes(TIMER)))
IF LEN(Hours$) = 1 THEN Hours$ = " " + Hours$
IF LEN(Minutes$) = 1 THEN Minutes$ = "0" + Minutes$

GetTime$ = Hours$ + ":" + Minutes$
END FUNCTION

FUNCTION IIF (Condition, Result1, Result2)
IIF = Result2
IF Condition THEN IIF = Result1
END FUNCTION

FUNCTION TranslateDigit (Digit$)
Translation = NONE

SELECT CASE Digit$
CASE "0": Translation = C0
CASE "1": Translation = C1
CASE "2": Translation = C2
CASE "3": Translation = C3
CASE "4": Translation = C4
CASE "5": Translation = C5
CASE "6": Translation = C6
CASE "7": Translation = C7
CASE "8": Translation = C8
CASE "9": Translation = C9
END SELECT

TranslateDigit = Translation
END FUNCTION

FUNCTION Trim$ (Text$)
Trim$ = LTRIM$(RTRIM$(Text$))
END FUNCTION

And an analog clock:

DEFINT A-Z

DECLARE FUNCTION CurrentTime# (Advance, NewHour, NewMinute, NewSecond)
DECLARE FUNCTION GetHours (Seconds#)
DECLARE FUNCTION GetMinutes (Seconds#)
DECLARE FUNCTION GetSeconds (Seconds#)
DECLARE SUB DrawClock (DisplayedTime#)
DECLARE SUB Main ()

CONST FALSE = 0
CONST NONE = -1
CONST TRUE = -1

CONST BACKGROUND = 0
CONST CLOCKSIZE = 190
CONST HANDNUTSIZE = 3
CONST HOURSTODEGREES = 30
CONST LARGEMARKINTERVAL = 3
CONST MINUTESTODEGREES = 6
CONST MINUTESTOFRACTION# = 1 / 60
CONST PI# = 3.14159265358979#
CONST SECONDSPERHOUR = 3600
CONST SECONDSPERMINUTE = 60
CONST SECONDSTODEGREES = 6
CONST TWELVEHOURANGLE = -90

CONST CLOCKX = CLOCKSIZE * 1.5
CONST CLOCKY = CLOCKSIZE * 1.1
CONST HOURHANDLENGTH = CLOCKSIZE / 1.6
CONST LARGEMARKLENGTH = HOURHANDLENGTH / 2.5
CONST MINUTEHANDLENGTH = HOURHANDLENGTH * 1.5
CONST SECONDHANDLENGTH = HOURHANDLENGTH * 1.5
CONST SMALLMARKLENGTH = LARGEMARKLENGTH / 2
CONST TORADIANS# = 180 / PI#

ON TIMER(1) GOSUB ClockTick
CALL Main
END

ClockTick:
DrawClock CurrentTime(TRUE, NONE, NONE, NONE)
RETURN

FUNCTION CurrentTime# (Advance, NewHour, NewMinute, NewSecond)
STATIC Seconds#

IF Advance THEN
IF GetSeconds(Seconds#) = 59 THEN
Seconds# = (GetHours(Seconds#) * CLNG(SECONDSPERHOUR)) + (GetMinutes(Seconds#) * SECONDSPERMINUTE)
IF GetMinutes(Seconds#) = 59 THEN
Seconds# = GetHours(Seconds#) * SECONDSPERHOUR
IF GetHours(Seconds#) = 11 THEN
Seconds# = 0
ELSE
Seconds# = Seconds# + SECONDSPERHOUR
END IF
ELSE
Seconds# = Seconds# + SECONDSPERMINUTE
END IF
ELSE
Show last 105 lines
      Seconds# = Seconds# + 1
END IF
ELSE
IF NOT NewHour = NONE THEN Seconds# = GetSeconds(Seconds#) + (GetMinutes(Seconds#) * SECONDSPERMINUTE) + (NewHour * CLNG(SECONDSPERHOUR))
IF NOT NewMinute = NONE THEN Seconds# = GetSeconds(Seconds#) + (NewMinute * SECONDSPERMINUTE) + (GetHours(Seconds#) * CLNG(SECONDSPERHOUR))
IF NOT NewSecond = NONE THEN Seconds# = NewSecond + (GetMinutes(Seconds#) * SECONDSPERMINUTE) + (GetHours(Seconds#) * CLNG(SECONDSPERHOUR))
END IF

CurrentTime = Seconds#
END FUNCTION

SUB DrawClock (DisplayedTime#)
DIM HourAsRadians#
DIM HourOnFace
DIM MarkLength
DIM MinuteAsRadians#
DIM SecondAsRadians#

STATIC HourHandX
STATIC HourHandY
STATIC MinuteHandX
STATIC MinuteHandY
STATIC SecondHandX
STATIC SecondHandY

LINE (CLOCKX, CLOCKY)-(HourHandX, HourHandY), BACKGROUND
LINE (CLOCKX, CLOCKY)-(MinuteHandX, MinuteHandY), BACKGROUND
LINE (CLOCKX, CLOCKY)-(SecondHandX, SecondHandY), BACKGROUND

FOR HourOnFace = 0 TO 11
HourAsRadians# = ((HourOnFace * HOURSTODEGREES) + TWELVEHOURANGLE) / TORADIANS#
IF HourOnFace MOD LARGEMARKINTERVAL = 0 THEN MarkLength = LARGEMARKLENGTH ELSE MarkLength = SMALLMARKLENGTH
LINE ((COS(HourAsRadians#) * CLOCKSIZE) + CLOCKX, (SIN(HourAsRadians#) * CLOCKSIZE) + CLOCKY)-((COS(HourAsRadians#) * (CLOCKSIZE - MarkLength)) + CLOCKX, (SIN(HourAsRadians#) * (CLOCKSIZE - MarkLength)) + CLOCKY), 14
NEXT HourOnFace
CIRCLE (CLOCKX, CLOCKY), CLOCKSIZE, 1

HourAsRadians# = (((GetHours(DisplayedTime#) + GetMinutes(DisplayedTime#) * MINUTESTOFRACTION#) * HOURSTODEGREES) + TWELVEHOURANGLE) / TORADIANS#
SecondAsRadians# = ((GetSeconds(DisplayedTime#) * SECONDSTODEGREES) + TWELVEHOURANGLE) / TORADIANS#
MinuteAsRadians# = ((GetMinutes(DisplayedTime#) * MINUTESTODEGREES) + TWELVEHOURANGLE) / TORADIANS#

HourHandX = (COS(HourAsRadians#) * HOURHANDLENGTH) + CLOCKX
HourHandY = (SIN(HourAsRadians#) * HOURHANDLENGTH) + CLOCKY
MinuteHandX = (COS(MinuteAsRadians#) * MINUTEHANDLENGTH) + CLOCKX
MinuteHandY = (SIN(MinuteAsRadians#) * MINUTEHANDLENGTH) + CLOCKY
SecondHandX = (COS(SecondAsRadians#) * SECONDHANDLENGTH) + CLOCKX
SecondHandY = (SIN(SecondAsRadians#) * SECONDHANDLENGTH) + CLOCKY

LINE (CLOCKX, CLOCKY)-(HourHandX, HourHandY), 2
LINE (CLOCKX, CLOCKY)-(MinuteHandX, MinuteHandY), 2
LINE (CLOCKX, CLOCKY)-(SecondHandX, SecondHandY), 4
CIRCLE (CLOCKX, CLOCKY), HANDNUTSIZE, 15
END SUB

FUNCTION GetHours (Seconds#)
GetHours = INT(Seconds# / SECONDSPERHOUR)
END FUNCTION

FUNCTION GetMinutes (Seconds#)
GetMinutes = INT((Seconds# - (GetHours(Seconds#) * CDBL(SECONDSPERHOUR))) / SECONDSPERMINUTE)
END FUNCTION

FUNCTION GetSeconds (Seconds#)
GetSeconds = INT(Seconds# - (GetHours(Seconds#) * CDBL(SECONDSPERHOUR)) - (GetMinutes(Seconds#) * CDBL(SECONDSPERMINUTE)))
END FUNCTION

SUB Main
DIM KeyCode$
DIM Seconds#

SCREEN 12: CLS : COLOR 3

Seconds# = CurrentTime(FALSE, GetHours(TIMER), GetMinutes(TIMER), GetSeconds(TIMER))
DrawClock CurrentTime(FALSE, NONE, NONE, NONE)

LOCATE (CLOCKSIZE / 8) + 3, 1
PRINT " QBClock v1.00 - by: Peter Swinkels, ***2019***"
PRINT " Press the a or A keys to quickly advance the time. Escape = quit"

TIMER ON

DO
DO
KeyCode$ = INKEY$
LOOP WHILE KeyCode$ = ""
IF KeyCode$ = "a" OR KeyCode$ = "A" THEN
Seconds# = CurrentTime(FALSE, NONE, NONE, NONE)
IF KeyCode$ = "A" THEN
IF GetHours(Seconds#) = 11 THEN Seconds# = 0 ELSE Seconds# = Seconds# + SECONDSPERHOUR
ELSE
IF GetMinutes(Seconds#) = 59 THEN
Seconds# = GetHours(Seconds#) * CLNG(SECONDSPERHOUR)
IF GetHours(Seconds#) = 11 THEN Seconds# = 0 ELSE Seconds# = Seconds# + SECONDSPERHOUR
ELSE
Seconds# = Seconds# + SECONDSPERMINUTE
END IF
END IF
DrawClock CurrentTime#(FALSE, GetHours(Seconds#), GetMinutes(Seconds#), NONE)
ELSEIF KeyCode$ = CHR$(27) THEN
EXIT DO
END IF
LOOP

TIMER OFF
END SUB

Reply 13470 of 14691, by derSammler

User metadata
Rank l33t
Rank
l33t

Started backing up the hard disks of my Apple Powerbooks in case they fail or get damaged by a software crash. Did the 190cs yesterday, now the 540c is running its backup.

Attachments

http://retro-net.de/blog.html

Reply 13471 of 14691, by ragefury32

User metadata
Rank Member
Rank
Member
TheAbandonwareGuy wrote:

Isnt the Pismo a G3 PowerBook not a G4?

Right now I'm using the X200 Tablet as my main laptop and I LOVE this thing. It is everything a laptop should be and more. I think I might also need to pickup a Thinkpad X220 (i3 version of the X200). I love this full size 12.1 laptop/Tablet form factor. Why did this laptop form factor disappear for the stupid ultrabook 2-in-1 form factor anyways?

It's usually a G3, but I got the Wegener G4 upgrade card, so the machine ran like a Mercury (Titanium PowerBook Rev. A) but minus that liability-of-a-chassis (the TiBooks are notorious for being fragile as they age). I kinda wished that I kept the PowerPC 750e/400MHz Processor card so I can do a comparison between the G3 and the G4, and an out-of-box, as-is comparison between the Pismo and the ThinkPad.

Oh yeah, I had an X41 Tablet - I hear ya. The twist-and-flop form factor is more comfortable to work with. That being said, that hinge is expensive to manufacture and the machine doesn't fold as thinly as the 2-in-one.

Last edited by ragefury32 on 2019-11-19, 04:02. Edited 1 time in total.

Reply 13472 of 14691, by Bruninho

User metadata
Rank Oldbie
Rank
Oldbie
derSammler wrote:

Started backing up the hard disks of my Apple Powerbooks in case they fail or get damaged by a software crash. Did the 190cs yesterday, now the 540c is running its backup.

I'd love to get these wallpapers. I have been using some retro mac wallpapers with my macbooks recently.

I was bfcastello, now I am Bruninho! =]
"Design isn't just what it looks like and feels like. Design is how it works."
JOBS, Steve.

Reply 13473 of 14691, by Bondi

User metadata
Rank Member
Rank
Member

I ran Zandronum (Doom mod) on P233MMX, W98 with Yamaha pcc10xg (PCMCIA) as MIDI device. The card sounds awesome. It also makes a huge difference in terms of performance. If I switch to software Roland MIDI synth the game runs signufucantly slower, becomes unplayable. And with the Yamaha it runs smoothly, yet only in 320x200 mode.

Reply 13474 of 14691, by imi

User metadata
Rank Oldbie
Rank
Oldbie

So, delivery driver offloaded a whole pallet at my house today, the box was big enough to fit me... and inside of it were even more boxes, and inside the larger boxes were even more smaller boxes 🤣

anyways, started to get my stuff a bit organized before I drown in random hardware ^^

hardware34_01.jpg
Filename
hardware34_01.jpg
File size
247.69 KiB
Views
249 views
File license
Fair use/fair dealing exception

Reply 13475 of 14691, by pan069

User metadata
Rank Member
Rank
Member
Peter Swinkels wrote:

Impressive, however you forgot the minute hand! 🤣 Add this to your drawHour procedure:

Yeah, I caught that after posting the code here. But cool that someone actually took the time to run the code. 😊

I was going to have stab at adding a digital clock this weekend (if I could find the time), switching between analogue and digital with F1 or something. Your clock looks great! I wasn't yet sure on how I was going to formulate the digital number segments. Maybe your code might give me an idea or two... 😀

Reply 13476 of 14691, by Peter Swinkels

User metadata
Rank Member
Rank
Member
pan069 wrote:

Yeah, I caught that after posting the code here. But cool that someone actually took the time to run the code. 😊

I was going to have stab at adding a digital clock this weekend (if I could find the time), switching between analogue and digital with F1 or something. Your clock looks great! I wasn't yet sure on how I was going to formulate the digital number segments. Maybe your code might give me an idea or two... 😀

Glad you like my work. Love to see your digital clock.

Last edited by Peter Swinkels on 2019-11-19, 13:58. Edited 5 times in total.

Reply 13477 of 14691, by Bruninho

User metadata
Rank Oldbie
Rank
Oldbie

Last night I had a go at getting GP4 to run on Windows 2000 SP4. No luck... black screen with music. Got a headache from that so I am resting for some time now.

I was bfcastello, now I am Bruninho! =]
"Design isn't just what it looks like and feels like. Design is how it works."
JOBS, Steve.

Reply 13478 of 14691, by derSammler

User metadata
Rank l33t
Rank
l33t
ragefury32 wrote:

(the TiBooks are notorious for being fragile as they age)

The Pismo is even worse. I've got three and gave up trying to fix them. They have flimsy parts everywhere. The "thickness" of the plastic holding the hinges must be a bad joke by whoever designed that thing... Also what breaks easily is the part below the mouse button - and actually that whole case part, the bezel of the display, and so on.

http://retro-net.de/blog.html

Reply 13479 of 14691, by Xicor

User metadata
Rank Newbie
Rank
Newbie

During resurrecting a k6II-450 I suspected immediately that the PSU has not to be trusted. The voltage was ok @ empty or in mild loads, there was indeed a fault lurking. Used my "Chinezium" electronic load to test the 5V rail, and for my amusement @10A I was getting a severe undervoltage.

Psu_fail.jpg
Filename
Psu_fail.jpg
File size
629.26 KiB
Views
129 views
File license
Fair use/fair dealing exception

The psu was supposed to supply at least 20A. The undervoltage may not be a cause of catastrophic failure but in time it will degrade the dc-dc converters. So, as precaution we should always suspect this generic Chinese psu bricks, that is if we value the parts that they supply.