Code:

$regfile="xm64a3def.dat"
$crystal= 32000000
$hwstack= 40
$swstack= 16
$framesize= 32

Config Osc = Enabled , 32mhzosc = Enabled
Config Sysclock = 32mhz , Prescalea = 1 , Prescalebc = 1_1
ConfigPortb=Output

Do
togglePortb.0
Waitms 1000
loop

end'end  program