$crystal = 16000000
$regfile = "M128def.dat"

Config Graphlcd = 240 * 128 , Dataport = Porta , Controlport = Portb , Ce = 3 , Cd = 0 , Wr = 2 , Rd = 1 , Reset = 4 , Fs = 5 , Mode = 6

dim x as byte
dim y as byte

Cls
Locate 10 , 2

ldi r24,&H81
rcall _GWrite_Cmd

Lcd "Diese Zeile sollte Invers dargestellt sein"
for x = 1 to 240
for y = 1 to 128
pset x, y, 255
next y
next x
Wait 3

ldi r24,&H80
rcall _GWrite_Cmd

Locate 15 , 2
Lcd "und diese wieder normal"

Wait 10
End

das wäre jetz fürs ganze display, und du wirst das zweite nun nich sehen, weil das ja wieder geodert iss, du müsstest dir jetz mal ne funktion schreiben sub writeinvers(text as String *20, xloc as byte, yloc as byte) oder so, die an der stelle x,y (mit locate dann intern) was hinschreibt, den modus wechselt und nur da drübermalt, und dann den modus wieder ändert

Martin