;int Konvert(int wert, char Option, int *flag)
;{
	xdef	_Konvert
_Konvert:
;    *flag = FALSE;
;   wert 8 "l"
;   Option 12 "c"
;   flag 14 "*l"
	link	a5,#0
	move.l	14(a5),a0
	moveq	#0,d0
	move.l	d0,(a0)
;
;    switch(Option)
	move.b	12(a5),d0

	sub.w	#67,d0
	beq	Cc
	sub.w	#11,d0
	beq	Nn
;	bra	def
;    {
;        default :

def:
;                   if (wert > 127)
;                   {
	cmp.l	#128,8(a5)
;	ble	Nn
	bge	konv

;        case 'N':

;        case 'n':

Nn:
;                   if (wert == 10)
;                   {
	cmp.l	#10,8(a5)
	bne	ex
;                      wert  = 13;
	move.l	#13,8(a5)
;                      *flag = TRUE;
	move.l	14(a5),a0
	move.l	#1,(a0)
;                   }
;                   break;
	bra	ex
;        case 'C':

;        case 'c':

Cc:
;                   if (wert > 127)
;                   {
	cmp.l	#127,8(a5)
	ble	ex
konv:
;                      wert = tabelle[wert - 128];
	move.l	8(a5),d0
;	lea	_tabelle+-128,a2
	move.b	(a2,d0.l),d0
	move.l	d0,8(a5)
;                   }
;                   break;
;	bra	ex
ex:
;    return(wert);
	move.l	8(a5),d0
	unlk	a5
	rts
;}
;