TOS Version Detection in STOS

STOS-related stuff in here please

Moderators: simonsunnyboy, Mug UK, Zorro 2, Moderator Team

Post Reply
Atari Super Hero
Atari Super Hero
Posts: 610
Joined: Mon Mar 03, 2008 10:33 pm

TOS Version Detection in STOS

Post by mlynn1974 »

I have written a small routine to detect the version of TOS. This was for a MegaST without a keyboard so I could run it from the Auto Folder.
Sysinfo would not run from the Auto folder. The attached PRG has been patched by the STOS 2.06 fixer.

Hopefully someone might find this useful. For TOS 1.62 the minor number is stored in hexadecimal not binary coded decimal.
Does this look OK?

Code: Select all

10 hide : key off : mode 0 : curs off : flash off : click off : mouseoff 
20 X=leek(4) : rem ** major, minor, ram size, hw
30 BA=X and $FFFFFF00
40 T1=peek(BA+2)
50 T2=peek(BA+3)
60 T1M$=str$(T1)
70 if T2<10 then T2M$="0"+right$(str$(T2),1) else T2M$=right$(hex$(T2),2)
80 TV$=T1M$+"."+T2M$
90 print "TOS VERSION:"+TV$
100 wait key 
110 default : mouseon : stop
You do not have the required permissions to view the files attached to this post.
Still got, still working: Atari 4Mb STe, 520STFM (x2), 2.5Mb STF, Atari 2600JR, Flashback 8 Gold.
Hardware: Cumana CSA 354, Ultimate Ripper, Blitz Turbo, Synchro Express II (US and UK Versions).
Post Reply

Return to “STOS”