Hello Raymond!
06 Oct 96 18:48, Raymond Pesek wrote to Radek Kafka:
 RK ->> You are right but where to find something like PIPELOOP.EXE for
 ->> AMD K5 ???
 RP> I askes someone having the problem to try the __WAIT.OBJ file, and he
 RP> reported it fixed the problem when running in real mode, but not
 RP> protected mode. I then asked Terry Carmen to look it over, as he had
 RP> previously disassembled it to see what he could find. I'll let you
 RP> know.
  This I have found on I~net.. :
From: rGLAB@waw.pdi.net (Ryszard Glab)
Newsgroups: comp.lang.clipper
Subject: Re: AMD K5 problems - __wait.obj (0/1)
Date: Wed, 09 Oct 1996 00:14:57 GMT
Message-ID: 
References:   
 
Reply-To: rglab@waw.pdi.net
In article ,
 taavi@ratioma.ee (Taavi Remmelg) wrote:
>Thanks, but this patch seems not to be compatible with prot. mode.
>I've got GPF from ctp.lib tempfile() function after linking it in.
This is deasembled code for __wait.obj posted here. I have changed
it to make it compatible with protected mode.
                NAME    __wait_a
_NTOOL          SEGMENT BYTE PUBLIC  'CODE'
                ASSUME  CS:_NTOOL ,DS:DGROUP,SS:DGROUP
                PUBLIC  TIME_CX_DX
                PUBLIC  WAIT_AX
                PUBLIC  WAIT_AX_FAR
                PUBLIC  WAIT_TICK
TIME_CX_DX:     push    ds
                push    ax
                push    bx
                mov     ax,040h 
                mov     ds,ax
                mov     bx, 06Ch
                mov     cx,[ bx+2 ]
                mov     dx,[ bx ]
                pop     bx
                pop     ax
                pop     ds
                ret
WAIT_AX:        or      ah,ah
                je      short L1
                push    dx
                xor     dx,dx
                mov     cx,0037H
                div     cx
                push    dx
                call    near ptr WAIT_TICK
                pop     ax
                pop     dx
L1:             mov     cx,ax
                mov     ah,al
                xor     al,al
                shr     ax,1
                je      short L3
                sub     ax,cx
                sub     ax,cx
                mov     cx,ax
                mov     ax,0004H
                out     43H,al
L2:             in      al,40H
                cmp     al,ah
                mov     ah,al
                in      al,40H
                je      short L2
                loop    L2
L3:             ret
WAIT_AX_FAR:    call    near ptr WAIT_AX
                retf
WAIT_TICK:      or      ax,ax
                je      short L6
                pushf
                sti
                push    bx
L4:             call    near ptr TIME_CX_DX
                mov     bx,dx
L5:             call    near ptr TIME_CX_DX
                cmp     bx,dx
                je      short L5
                dec     ax
                jne     short L4
                pop     bx
                popf
L6:             ret
_NTOOL          ENDS
                END
__wait.obj     section  1/1
BEGIN----------------------CUT HERE--------------------------
begin 644 __wait.obj
M@`H`"%]?=V%I=%]A.Y8.```$0T]$109?3E1/3TQ,F`<`*&4``P(!SI`X```!
M"E1)345?0UA?1%@````'5T%)5%]!6!0```M704E47T%87T9!4D@```E704E4
M7U1)0TM,``#UB`0``*(!T:!I``$``!Y04[A``([8NVP`BT\"BQ=;6!_#".1T
M#E(QTKDW`/?Q4N@H`%A:BAT%RG(* Raymond Pesek
 RP>  * 1st 2.00 #2448 * Moderator - Clipper Echo
 RP> -+- InterEcho 1.18
 RP>  + Origin: PC-Ohio PCBoard * Cleveland, OH * 216-381-3320 (1:157/200)
Radek  [Team OS/2]
      E-Mail    Radek Kafka 
      Fido      2:423/34.7@fidonet.org
--- FMail/2 1.02
---------------