Petit programme TI 82 complexe

Bonjour,

J'ai du temps à perdre alors j'ai essayé un petit programme :

:Lbl 1
:Float
:Menu("COMPLEX NUMBERS","+",Á,"-",Z,"*",Y,"/",X,"POWERS",O,"EXIT",E)
:Lbl O:Disp "(A+BI)^N"
:Prompt A,B,N
:(A*C-B*D)üN
:(A*D+B*C)üO
:
:
:Lbl Á
:ClrHome
:Disp "(A+BI)+(C+DI)"
:Prompt A,B,C,D
:(A+C)üN
:(B+D)üO
:Goto W
:Lbl Z
:ClrHome
:Disp "(A+BI)-(C+DI)
:Prompt A,B,C,D
:(A-C)üN
:(B-D)üO
:Goto W
:Lbl Y
:Fix 2
:ClrHome
:Disp "(A+BI)(C+DI)
:Prompt A,B,C,D
:(A*C-B*D)üN
:(A*D+B*C)üO:Goto W
:Lbl X
:ClrHome
:Disp "(A+BI)/(C+DI)"
:Prompt A,B,C,D
:(Cò+Dò)üJ
:If J=0:Then:Goto 2:Else:Goto 3
:End
:Lbl 3
:Fix 3
:(A*C+B*D)/(J)üN
:(B*C-A*D)/(J)üO
:Goto W
:
:Lbl S:ClrHome
:Disp "(R CIS Á)^N"
:Prompt R,Á,N
:R^NüR:N*ÁüÁ
:Disp ""," CIS"
:Output(6,3,R):Output(6,11,Á)
:Pause :Goto 1:End
:Lbl 2
:ClrHome
:Disp "CANT BE DONE","DENOMINATOR = 0":Pause :Goto 1:End
:Lbl W
:Fix 3
:Output(6,1,N)
:Output(6,8,"+"
:Output(6,10,O
:Output(6,16,"I"):Pause :Goto 1
:Lbl E:ClrHome:Stop

Je peux pas afficher tout ici vous l'imaginez , mais mon souci principal se trouve :

:Output(6,1,N)

SI vous connaissez un moyen de tout afficher sur ce forum, je vous écoute !