Messages

Since this thread was brought to my attention today I just want to make clear that I had my reasons to react like I did and va!n surely knows them! However, if I wanted the code to be deleted I would have said so. So feel free to use the code in whichever way you like, I do not mind, after all it might be useful for someone. No hard feelings or anything.

Cheers, Sting

Interesting what one can find while browsing forums at work...
Let's compare it with the routine I've coded for my demo-system:

Code Select Expand


*******************************************
*** 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...