![]() |
![]() |
#1 |
Registered User
Join Date: Nov 2010
Location: .
Posts: 388
|
REQ:ASM getting elapsed time on A1200
Hello,
I've finally faced the problems of fiddling with ASM on an emulated A1200 instead of the A500. I was reading on my idiot-proof tutorial about a method for getting real elapsed time between two tasks. Apparently the best way is to use the CIA timers of the 8520 chip onboard of the A500, which can be queried using these addresses: $BFE801,$BFE901,$BFEA01 (see this thread). Well, to my dismal (but not surprise) I've realized these addresses are "mute" and do not return anything on an A1200. Running the very same code on an emulated A500 with ks 1.3 works. Now, which A1200 component's address should I query for such a task? Maybe "Paula" chip is responsible for that? Anyway, this leads to the second question: how many if these inconsistences will I find from now on? Since I'm just playing with ASM for the sake of it (no real purpose actually), is it worth continuing with the A1200 way or should I backstep to the earlier classic Amiga and OCS chipset? Thanks for clearing up this mist ![]() EDIT: on this file I see that the A1200, too, has an 8520 and the memory range is (roughly) the same as per the A500. I'm more and more confused... Last edited by jman; 15 August 2011 at 01:51. |
![]() |
![]() |
#2 |
gone
Join Date: Apr 2007
Location: completely gone
Posts: 1,596
|
As you say, you can use the CIA timers for getting accurate elapsed times.
I don't think there's any difference between how you would do this on an A500 or an A1200. |
![]() |
![]() |
#3 |
move.w #$4489,$dff07e
Join Date: Sep 2005
Location: Norfolk, UK
Age: 43
Posts: 2,351
|
IIRC later versions of the OS used the CIAs differently to 1.3 on your A500. So it's very likely you would get different results with the same code. Where are you getting your code from? Is it the blue Abacus books?
|
![]() |
![]() |
#4 | |
Registered User
Join Date: Nov 2010
Location: .
Posts: 388
|
Quote:
Yes, I'm following that book. The code snippet that should do the job is: Code:
gettime: move.b $bfea01,d7 lsl.l #4,d7 lsl.l #4,d7 move.b $bfe901,d7 lsl.l #4,d7 lsl.l #4,d7 move.b $bfe801,d7 rts So, what are my options? 1) Run the emulator with an older KS ROM 2) Find documentation about the new addresses (would check the fine material downloaded if I have something more recent) 3) else? Thanks for your insight. Last edited by jman; 15 August 2011 at 01:51. |
|
![]() |
![]() |
#5 |
WinUAE developer
Join Date: Aug 2001
Location: Hämeenlinna/Finland
Age: 49
Posts: 26,611
|
KS uses CIA TOD counter for some timing tasks and resets it regularly.
Use timer.device GetSysTime() if your program does not take over the system. (It uses CIA counters internally) |
![]() |
![]() |
#6 | ||
gone
Join Date: Apr 2007
Location: completely gone
Posts: 1,596
|
Quote:
Quote:
|
||
![]() |
![]() |
#7 |
move.w #$4489,$dff07e
Join Date: Sep 2005
Location: Norfolk, UK
Age: 43
Posts: 2,351
|
|
![]() |
![]() |
#8 |
WinUAE developer
Join Date: Aug 2001
Location: Hämeenlinna/Finland
Age: 49
Posts: 26,611
|
If you do it properly. It must take over all interrupts and/or disable them. (including level 2 and 6), not just vblank like in early days..
|
![]() |
![]() |
#9 | |
Registered User
Join Date: Nov 2010
Location: .
Posts: 388
|
Quote:
Unfortunately this topic (opening an external library) will be treated later in the tutorial ![]() I don't have clear your observation about the interrupts, though. But I guess that's asking too much to my poor knowledge, for the moment. Thanks. Antonio |
|
![]() |
![]() |
#10 | |
Registered User
Join Date: Nov 2010
Location: .
Posts: 388
|
Quote:
The syntax of the call to the OpenDevice is clear: Code:
OpenDevice(DEVICENAME,unit,ioRequest,flags) I'm not pasting here any code I tried because it's just a bunch of rubbish, I just need a simple, clean example on how to invoke _LVOOpenDevice and _LVOGetSysTime. Thanks for your help. |
|
![]() |
![]() |
#11 |
move.l #$c0ff33,throat
Join Date: Dec 2005
Location: Berlin/Joymoney
Posts: 6,865
|
If you get an illegal exception when you try to open the timer.device something is really wrong, check that you have a pointer to exec library in a6 as otherwise all things go wrong and might cause the exception, if a6 is not exec base but any other library (or, even worse, contains "random" data) OpenDevice can't work for obvious reasons.
To open the timer.device you need to do these 3 things: 1. Create a message port [Exec->CreateMsgPort()] 2. Create an IO request [Exec->CreateIORequest] 3. Open the device and use the IO request structure created in 2. as parameter Code for this could look like this (no error checks etc, you'll have to add these yourself): Code:
; Create message Port move.l $4.w,a6 jsr _LVOCreateMsgPort(a6) ; Create IORequest move.l d0,a0 moveq #IOTV_SIZE,d0 jsr _LVOCreateIORequest(a6) move.l d0,a4 ; Open timer.device move.l d0,a1 lea tdname(pc),a0 moveq #0,d0 moveq #0,d1 jsr _LVOOpenDevice(a6) Code:
move.l IO_DEVICE(a4),a6 lea time(pc),a0 jsr _LVOGetSysTime(a6) |
![]() |
![]() |
#12 |
Registered User
Join Date: Nov 2010
Location: .
Posts: 388
|
Hey, just a quick note to express my appreciation for your clear explaination.
Unfortunately now I can't open the Amiga emulator due to a close deadline at work (oh the joys of software developers) but in the following days I want to have a thorough look at all that useful info. As a funny side note, I have always been 'allergic' to C and derivatives because I've never learnt how to manage memory and memory pointers. Thansk to asm, I'm realizing that eventually I will also learn all that :-) |
![]() |
![]() |
#13 | |
Registered User
Join Date: Nov 2010
Location: .
Posts: 388
|
Quote:
It was no easy task (for a beginner) but I found the right way to use that device and have the seconds elapsed. Now I'd like to do some calculations on this number, for example transform it in years,months,days,etc. However, while doing calculations I've stomped over two strange things (not striclty related) that I don't understand: 1) The behaviour of the status register after following instructions: Code:
move.w #$7fff,d0 ; the SR is OK, nothing is set move.w #$8000,d0 ; after this the 'N' bit is set 2) Why this division overflows: Code:
move.w #$ffff,d0 move.w #$ffff,d1 divs d1,d0 Thanks ![]() Last edited by jman; 09 January 2011 at 20:45. Reason: corrected typo :) |
|
![]() |
![]() |
#14 | ||
move.l #$c0ff33,throat
Join Date: Dec 2005
Location: Berlin/Joymoney
Posts: 6,865
|
Quote:
Quote:
![]() ![]() You're welcome. ![]() |
||
![]() |
![]() |
#15 | ||
Registered User
Join Date: Nov 2010
Location: .
Posts: 388
|
Quote:
Quote:
However even I copy a full longword to d0 the division still overflows. I've even tried to do some 'padding' like: Code:
move.l #$0000ffff, d0 thanks, a. |
||
![]() |
![]() |
#16 |
Join Date: Jul 2008
Location: Sweden
Posts: 2,269
|
The DIVS.W instruction gives only a 16-bit quotient, and so you get an overflow because you're calculating 65535/-1 = -65535 which is too large to be represented as a 16-bit two's complement number. If you have a 68020 or better you can use longer forms of DIVS that give 32-bit results.
|
![]() |
![]() |
#17 | |
Registered User
Join Date: Nov 2010
Location: .
Posts: 388
|
Quote:
can you please further explain? 1) Why am I calculating 65535/-1? Shoulnd't be 65535/65535 thus = 1? 2) I'm already running an emulated (on WinUAE) 68020, so I don't understand. Sorry for this kind of trivial questions but it's important to me to understand these basics. Thanks, Antonio |
|
![]() |
![]() |
#18 |
gone
Join Date: Apr 2007
Location: completely gone
Posts: 1,596
|
Good morning jman
![]() Recall what StingRay said about the N flag of the status register and the sign bit and remember that $ffff doesn't equal 65535 when dealing with signed numbers. This might give you a clue when you also see that you're using the signed version (divs) of the divide mnemonic. ![]() Also, 68020 allows divs.l whereas 68000 only allows divs.w - again thinking about the N flag and the sign bit, you can see that doing a division with $ffff.w is different to doing a division with $0000ffff.l ![]() |
![]() |
![]() |
#19 | |
Registered User
Join Date: Nov 2010
Location: .
Posts: 388
|
Quote:
And the sad fact is that I've also checked this post and the following ones without realizing it was the answer I was looking for. Thank you all for your help, now things are clear. Man, sometimes I'm so thick ![]() |
|
![]() |
Currently Active Users Viewing This Thread: 1 (0 members and 1 guests) | |
Thread Tools | |
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
[REQ:ASM] Reading a keystroke | jman | Coders. Tutorials | 34 | 17 August 2023 12:36 |
[REQ:ASM] Sprite collisions basics | jman | Coders. Tutorials | 5 | 03 September 2011 00:07 |
[REQ:ASM] Loading a static image and its palette | jman | Coders. Tutorials | 3 | 04 June 2011 14:08 |
[REQ:ASM] Assembling and running | jman | Coders. Tutorials | 9 | 07 May 2011 18:39 |
REQ:ASM How to use buffers | jman | Coders. Tutorials | 7 | 01 December 2010 01:41 |
|
|