WORD appl_init()

int ff;
for(ff=0,pts=&aes_control[0];ff<AES_CTRLMAX;ff++) *(pts++)=0;
for(ff=0,pts=&aes_intin[0];ff<AES_INTINMAX;ff++) *(pts++)=0;
for(ff=0,pts=&aes_intout[0];ff<AES_INTOUTMAX;ff++) *(pts++)=0;
for(ff=0,ptl=&aes_addrin[0];ff<AES_ADDRINMAX;ff++) *(ptl++)=0L;
for(ff=0,ptl=&aes_addrout[0];ff<AES_ADDROUTMAX;ff++) *(ptl++)=0L;
for(ff=0,pts=&global_aes[0];ff<AES_GLOBMAX;ff++) *(pts++)=0;

aes_control[0] = 10;
aes_control[1] = 0;
aes_control[2] = 1;
aes_control[3] = 0;
aes_control[4] = 0;
aes(&aes_params);
return aes_intout[0];

Si le GEM a put s'initialiser, certaines valeurs sont retournée dans le tableau global du programme:
aes_global[0] : Version de l'AES (_AESversion)
aes_global[1] : Nombre d'applications possible en même temps (1 sur monotos, -1 sur multitos) (_AESnumapps)
aes_global[2] : Numéro d'identification du programme (identique a ce que retourne appl_init) (_AESapid)
aes_global[3-4] : ?
aes_global[5-6] : Pointeur sur un éventuel ressource chargé par l'AES ultérieurement
aes_global[7-12]: réservé
aes_global[13] : ?
global[14] : ?