Problema con DWORD

[ulisse21]

ciao a tutti
qualcuno potrebbe dirmi come mai non si riesce a compilare questa operazione:

Code: Select all

$regfile = "m328pdef.dat"
$Crystal=18432000
$hwstack=40
$swstack=16
$framesize=32

Dim Source as Dword
Dim Vr As Word
Source = &H_FFFFFFFF_11111111
Vr = Sqr(source)
Print hex(Vr)


se eseguo la radice quadrata di una Dword ottendo un errore, mentre con la word normale no.
non riesco ad uscirne fuori, forse c'è qualcosa che mi sfugge.
vi ringrazio

[Fagos]

@ulisse,
ho provato a compilare, proprio così, ho anche io l'errore. non è che dipende dalla versione?
o è un bugs?
saluti

[deluca]

ciao ulisse,

dimensiona VR come Dword e vedrai che tutto funzionerà.
le variabili devono essere dello stesso tipo.

ciao

[ulisse21]

che vergogna !
grazie e scusate tanto per il banale topic, avrei dovuto risolverlo da me.
cmq, grazie ancora e gentilissimi come sempre.
buon lavoro