REM GENMOUSE.CUR is the default Genevaż cursor shape. If you're running
'   Genevaż you won't notice any difference. Simply substitute another
'   .DAT file from the UM archive.
'
julie$=CHR$(GEMDOS(25)+65)+":\"      !root DIR of current drive
a$=julie$+"GENMOUSE.DAT"+CHR$(0)     !plus filename.
IF EXIST(a$)                         !If it's there
  OPEN "I",#1,a$                     !open it
  ' -----------------------------------------------------------------------|
  ' ml%=LOF(#1)                      !optional alternate, get Length Of File
  ' m$=INPUT$(ml%,#1)                !input using ml% for length.
  ' -----------------------------------------------------------------------|
  m$=INPUT$(74,#1)                   !input it
  ' -----------------------------------------------------------------------|
  CLOSE #1                           !close file
  DEFMOUSE m$                        !display mouse
  DO
  LOOP UNTIL MOUSEK                  !until mouse click
  DEFMOUSE 0                         !back to arrow
  EDIT                               !editor
ELSE
  ALERT 2,"Where's that confounded |mouse cursor..? ",1," oops ",lk%
  EDIT
ENDIF