2
« on: December 16, 2008 »
Interesting what one can find while browsing forums at work...
Let's compare it with the routine I've coded for my demo-system:
*******************************************
*** Get Configuration _GC ***
*******************************************
; determines output in
; - ChipSet OCS/ECS/AGA d0
; - Kickstart version/VideoFreq d1
; - CPU version (e.g. "$68000") d2
; - FPU version (e.g. "$68882") d3
; - Free ram (Chip) d4
; - Free ram (Fast) d5
; - Max ram (Chip) d6
; - Max ram (Fast) d7
; - Amiga type (real/emulator) a0 -1=emulator, 0=real
; kills: d0-d7/a6
GetConfiguration_GC
move.l a6,-(a7)
move.l $4.w,a6 ; get execbase
move.l #$20002,d1 ; largest Chip
jsr -216(a6) ; AvailMem()
lsr.l #8,d0 ; /1024
lsr.l #2,d0
move.l d0,d4
move.l #$20004,d1 ; largest Fast
jsr -216(a6) ; AvailMem()
lsr.l #8,d0 ; /1024
lsr.l #2,d0
move.l d0,d5
move.l 62(a6),d0 ; Max Chip
lsr.l #8,d0 ; / 1024
lsr.l #2,d0
move.l d0,d6
moveq #4,d1 ; Max Fast
bset #19,d1
jsr -216(a6) ; AvailMem()
lsr.l #8,d0 ; / 1024
lsr.l #2,d0
move.l d0,d7
bsr GetGFX ; get native chipset
bsr GetRTG ; get gfx-card system
move.l $4.w,a6 ; get execbase
moveq #0,d1
move.w $14(a6),d1 ; KS version (1.3 = version 34)
swap d1
move.b 530(a6),d1 ; VBlank Frequency
; check if running on a real Amiga or emulator
...
Déjà vu or what? So dear va!n, even if it's "old stuff from your group" (which I once was member of) I can't remember that I ever allowed you to publish my code... Specially in the way you did it here without mentioning who actually coded it. Apparently some things never change...