-+-+-+-+-+-+-+-+ START OF PART 5 -+-+-+-+-+-+-+-+
X#define SCOREFILE "$1$dua12:`5Btemp.masmummy`5Dsok.score"
X
X/**/
X/* MAXUSERNAME: defines the maximum length of a system's user name */
X/**/
X#define MAXUSERNAME`0910
X
X/**/
X/* MAXSCOREENTRIES: defines the maximum numner of entries in the scoretable
V */
X/**/
X#define MAXSCOREENTRIES     21
X
X/**/
X/* SUPERUSER: defines the name of the game superuser */
X/*            Note:  only allows superuser to create a score file.
X/**/
X#define SUPERUSER "MASANDY"
X
X/**/
X/* PASSWORD: defines the password necessary for creating a new score file */
X/**/
X#define PASSWORD "nabokos"
X
X/**/
X/* OBJECT: this typedef is used for internal and external representation */
X/*         of objects                                                    */
X/**/
Xtypedef struct `7B
X   char obj_intern;`09/* internal representation of the object */
X   char obj_display;`09/* display char for the object`09`09 */
X   short invers;`09/* if set to 1 the object will be shown invers */
X`7D OBJECT;
X
X/**/
X/* You can now alter the definitions below.
X/* Attention: Do not alter `60obj_intern'. This would cause an error */
X/*            when reading the screenfiles                         */
X/**/
Xstatic OBJECT`20
X   player = `09 `7B '@', '@', 0 `7D,
X   playerstore = `7B '+', '@', 1 `7D,
X   store = `09 `7B '.', '.', 0 `7D,
X   packet = `09 `7B '$', '$', 0 `7D,
X   save = `09 `7B '*', '$', 1 `7D,
X   ground = `09 `7B ' ', ' ', 0 `7D,
X   wall = `09 `7B '#', '#', 1 `7D;
X
X/*************************************************************************
X********************** DO NOT CHANGE BELOW THIS LINE *********************
X*************************************************************************/
X#define MAXROW`09`0920
X#define MAXCOL`09`0940
X
Xtypedef struct `7B
X   short x, y;
X`7D POS;
X
X#define E_FOPENSCREEN`091
X#define E_PLAYPOS1`092
X#define E_ILLCHAR`093
X#define E_PLAYPOS2`094
X#define E_TOMUCHROWS`095
X#define E_TOMUCHCOLS`096
X#define E_ENDGAME`097
X#define E_NOUSER`099
X#define E_FOPENSAVE`0910
X#define E_WRITESAVE`0911
X#define E_STATSAVE`0912
X#define E_READSAVE`0913
X#define E_ALTERSAVE`0914
X#define E_SAVED`09`0915
X#define E_TOMUCHSE`0916
X#define E_FOPENSCORE`0917
X#define E_READSCORE`0918
X#define E_WRITESCORE`0919
X#define E_USAGE`09`0920
X#define E_LEVHIGHMAX`0921
X#define E_LEVELTOOHIGH`0922
X#define E_NOSUPER`0923
X#define E_NOSAVEFILE`0924
X
Xchar username`5B10`5D;
$ CALL UNPACK SOKOBAN.H;1 270424529
$ v=f$verify(v)
$ EXIT