Geht nicht anders, du mußt 2 Includes machen:
einen mit "declare sub"
und einen mit dem Sub selbst, das aber dann NACH der "End" Anweisung
Beispiel:
Code:
$regfile = "m32def.dat" 
$crystal = 8000000 
$lib "glcdKS108.lbx" 
$include "font8x8.font" 

$include "testdefinition.bas"   ' da steht nur "Declare... " drinnen

Config Graphlcd = 128 * 64sed , Dataport = Porta , Controlport = Portc , Ce = 2 , Ce2 = 3 , Cd = 4 , Rd = 5 , Enable = 6 , Reset = 7 


Setfont Font8x8 
Cls 


Portd.7 = 1 
Do 


Lcdat 1 , 1 , "Hallo" 
Wait 1 
Test 
wait 1 
Loop 
End
$include "testcode.bas"   ' da steht die eigentliche "Sub " drinnen
"$nocompile" brauchst du nicht, bzw. geht auch nicht

Liegt daran, dass Bascom die "include" Daten genau dort reinnagelt, wo "include" steht. Und Subroutinen können eben nicht vorne stehen.