Ich denke, Rolf hat Recht. Zuerst werden die Variablen in den Typ der Zielvariable umgewandelt und bei LONG --> WORD, die LONG links beschnitten und damit bei Werten über 65535 verändert.

Bei Deiner Variante mit der Voraussetzung, dass der aufsummierte Wert nicht größer als 16777215 (2^24 - 1) wird, kann die OVERLAY - Variante noch etwas vereinfacht werden:

Code:
Dim lSumme as Long
Dim wDurchschnitt as Word at lSumme + 1 overlay
Dim lEinzel as Long

lSumme = 0
for lEinzel = 3000 to 3255
   lSumme = lSumme + lEinzel
next

print wDurchschnitt
Hier wird der Durchschnittswert gleich als WORD definiert und ist damit innerhalb des SRAM-Bereiches der LONG-Variable, welche die aufsummierten Werte aufnimmt.