'**************************************
'                                     *
'     IntuiExtend.Lib 2.0/@1995-98    *
'                                     *
'          by CIERP Philippe.         *
'                                     *
'          from AMIGAzette 83         *
'                                     *
'**************************************
'
Screen Open 0,640,256,16,$8000
Curs Off : Flash Off : Cls 0
'
E=Execall(-132)
'
'Amos
Timer=0
For T=0 To 20000
   A=Point(100,100)
Next T
A=Timer
'
'IntuiExtend 
Timer=0
For T=0 To 20000
   B=Wb Point(100,100)
Next T
B=Timer
Print "Amos : ";A
Print "IExt : ";B
'
E=Execall(-138)
'AMOS=150-120
'IExt=101-52