$firstname=split(@fullname)[0]
$lastname=split(@fullname)[1] 
$fi=LEFT(split(@fullname)[0],1)
$li=LEFT(split(@fullname)[1],1)

 ;This code assumes that you have your users listed as: JOHN DOE
 ?'Whole Name: '+@fullname
 ; -- DETERMINE WHERE THE SPACE IS LOCATED
 $sp=InStr(@fullname,' ')
 ;                   STR,START,SPACE LOCATION-1
 $fname=LTrim(Substr(@fullname,1,$sp-1))
 ;                   STR,START+1,FULLLENGTH-SPACE LOCATION
 $lname=LTrim(Substr(@fullname,$sp+1,Len(@fullname)-$sp))
 ; -- LET'S DISPLAY FIRST AND LAST NAMES
 ?'First Name: '+$fname
 ?'Last Name: '+$lname

 ; -- PARSE THE FIRST INITIAL
 $fi=LEFT(@fullname,1)
 ?'First Initial: '+$fi

 ; -- PARSE THE LAST INITIAL
 $last=SUBSTR(@fullname,2,$sp+1)
 $li=SUBSTR($last,LEN($last)-1,1)
 ?'Last Initial: '+$li
 ?'The user Initials are: '+$fi+$li