Code viewer for World: Cloned CA318 2018 World

// Cloned by Ronan Williams on 12 Nov 2018 from World "CA318 2018 World" by Mark Humphrys 
// Please leave this clone trail here.
 

 
// - Internal maze (randomly drawn each time)
// - Enemy actively chases agent


// ======================================================================================================
// Scoring:
// Bad steps = steps where enemy is within one step of agent.
// Good steps = steps where enemy is further away. 
// Score = good steps as percentage of all steps.
//
// There are situations where agent is trapped and cannot move.
// If this happens, you get BLOCKPUNISH bad steps and the problem is reset - enemy is moved to a random square
// ======================================================================================================

const BLOCKPUNISH = 50;


 // user_span1 - Status    
 // user_span2 - Status  
 // user_span3 - End message 
 

//--- Mind can pick one of these actions -----------------

const ACTION_LEFT 			= 0;		   
const ACTION_RIGHT 			= 1;
const ACTION_UP 			= 2;		 
const ACTION_DOWN 			= 3;
const ACTION_STAYSTILL 		= 4;

// in initial view, (smaller-larger) on i axis is aligned with (left-right)
// in initial view, (smaller-larger) on j axis is aligned with (away from you - towards you)







// ===================================================================================================================
// === Start of tweaker's box ======================================================================================== 
// ===================================================================================================================

// The easiest things to modify are in this box.


AB.clockTick       = 30;    
	// Speed of run: Step every n milliseconds. Default 100.
	
AB.maxSteps        = 1000;    

	// Length of run: Maximum length of run in steps. Default 1000.

AB.screenshotStep  = 50;   
  
	// Take screenshot on this step. (All resources should have finished loading.) Default 50.



//---- global constants: -------------------------------------------------------

 const TEXTURE_WALL 	= '/uploads/starter/door.jpg' ;
 const TEXTURE_MAZE 	= '/uploads/starter/latin.jpg' ;
 const TEXTURE_AGENT 	= 'https://encrypted-tbn0.gstatic.com/images?q=tbn:ANd9GcSRDyIf9DM3sUlEobSWQhe0SOEbtAc-esVj0UjOjz_6-8wf_Vj2NQ' ;
 const TEXTURE_ENEMY 	= 'data:image/jpeg;base64,/9j/4AAQSkZJRgABAQAAAQABAAD/2wCEAAkGBxMTEhUTExMVFhUXGB0aGRYYGB8aGxgdHRcXFxcYGB8aHiggHRolHRcXITEhJSkrLi4uHR8zODMtNygtLisBCgoKDg0OGhAQGy0lHyUtLS0tLS8tLS0vLS0tLS0tLS0tLS0tLS0tLS0tLSstLS0tLS0tLS0tLS0tLS0tLS0tLf/AABEIAMIBAwMBIgACEQEDEQH/xAAcAAABBAMBAAAAAAAAAAAAAAAFAAMEBgECBwj/xABMEAABAgQDBQUEBwUGAwcFAAABAhEAAwQhEjFBBQZRYXETIoGRoTJCscEHFFJictHwIzOCkuEVFpOissJDg/FERVRjc9LTFyQ0U1X/xAAZAQADAQEBAAAAAAAAAAAAAAAAAQIDBAX/xAAzEQACAgEDAgQEBQIHAAAAAAAAAQIRAxIhMQRBBRMyYSJRkaFScYGx0RTwFjNCgqLB4f/aAAwDAQACEQMRAD8A5LNWAwxODdwMuXhG0+eFAAucNgcvlEdJYFLt4fPMQiCL8eGrRFCHZK2c/NiekSZM1r5jibkcjEBCSTD8pQD931YwNCHqtYcEF304frnD1HPwkO7deWcMzlFYAIHVnPV+EYp6VRcgFg5yeE0qoYblTnOIgEAhuelhkMtARAmokkKBbPh8m8I3plkcSGy05EuLw4kjGCNCwty/rGNaXsIm7NPZm44Bxx5wRqDhmglQdQY8Bm3hlnAgzS7FsP64XeCkqlSkl+/iHtN6AcRHPNb7mkfYeppyRoq7i9xxFwL5WMbAntCrGpjYJfjkNLCHaachkpDpF9Hy4v5xv2MsEFSh5XJe3TOOeTSZSTexGVILOGL82y/WURVU6ALk942w5Dhc5l3h6vSyiUnEPNnyHy8IirxKCilNwAWAZhx6tGkU2uSJLc0m07LSGcOzh2Uc2HmI3lSVJmYUmyiwB56eHOG5U0GUWfuF+bjT1MLtO0w3OIGzHiAGPGNt+CSYJeBJuCzgpOfBwPskRmUgHCFhJscLjTPTm2f9IYnTWUCrPI/xcc42dwQP1wESwJMpCUC2WTPcDIZdTEbakshIIIKC7HUNkDcvnDkub3ss9Gu5t4XhwzE4VEJ0PdJdrOObZwkmnYWAu1wizu4c9CTfjp5RCq5obUMYl1Ck4QwPXnq8QcLlrR1wrkZvKNsocE84cN8+JjWV7L/rlGEPiLNnBIGSpzhNx0I1A/QjaVKUACQz/oNCKCwzL56NzHJoeROAcZjQX8PWMW9thDwWbBiQWsLnnbNmh2clQJSFJA6OfF4iVUwJUCM3OFWh/q7xmVVYkEKsQP07ljrE6O4OQwzzHKnu5Uet4j1Ut1FgM7DiOMYlqdyMz5RMRKOEDAQSLEuBZzYmNN0CBcxAt+f5xEI8IfqAXsbw2ZRZ3tG64AjrzhRsuWXyjMXYBGVs0knEQDwFzEebSkGxfp8G4xZBQrWFPiCkMW4OAc+ds4iJpXJViL8Gbjbi9oxWRipghMlRNgQekTJdGQCog4ctWJ5FvTlBGbQzcKsOEkNkQCBpd2FiDfjGyMUuQ5KyuwA9xICiCCGuMuTsz5wax0RiEEhKVkEAWezgX8fGJtKybgpOr6jiw4wMm05SQQFcXYjq33RxhmbUqB0HLVvhCePVtYqph9akrU5SlOIMXN+XSIEyjGaFXAAyZ21PCICag8cuHx/XKHVKWRkovckeOohaKDcmS0dmXDKtqWBfpwv6Q8Zqy5fPIDjYeL2bwgYKnS4zd7+kFN09rIlz1zVO6JSsGvfKkICuTJUroWiseB5JqPzBvSrJcqhngF5M1iMjKXZri2GJEygKWVgUkizXA0yxRFqNtKUrEFqB6mNZu1puAkTZlrjvGxGUd+XwZJup8e3/AKYR6v2Hpk5LmyTm9+UafXQQksm4bgfSN5+3pwzmKP4u98RBTd7aKFST2kmnUe1V3lSUKUwlJXgS+G7ubnJ45s3hrx97NIZVPgCLTZha2lvw9WcwxIpwkuCSwGJ0sxdmsS+YD+gi61FdRlUwCmkdwow4UrdiQlbpQoFwpQZucarl0hBUumAHuBM5fthCVhKi5AScYD5W5iMP6aaRoVSosskgFKk6jQv/ANIjdsHHP9ekHtrrpkLwplrKFS0KH7S4Bxd02LsoKiAtdL3R2c0AlmEwHR9Uco1j0GZx1JfczlkinRHCjZT3465m9vhCxvfUi5fp+cSTJkYClK5gJyxgHzIIt4GB6yUhiGbThp8owzdNkw+tVZUJxlwNVtISxJewFi+eWYF8/KIa5bJKQkOTrn5xLqFEg3YDPPLlzbjDNSnCcV8B9lTacD8ImNlIalyWsoEcn4QqqmD9wN/1y8oS66w7oHh8Sc8oYmVS3xaxdSbsGx1KSnMuW45foRr9aDkFL8C7NpEb6yHvbm364esZlqAW+N2+6WOjxegkfVWpGhIvZ+nJ4clICnbIjLPLn/SI6zoGUdO44HDKJNFTknvqYHVOhzFhfS0JpUMhSkqxNLdzz8PDOCEmrCmEwmw1Lvre8RqwAYg7qNybOBnc5E8hEOeogvfqYbWoqMnFjoR38TAgXvlyEb1c8KHsgEDMfk3ziL2pGX64RqpXG0PT8w1OqNSoxiMsOJhRZJf6KtKZcxLXKnd+CWDeJ9Ii01NJWSTNKCXZhnxF41lElBCftZ5DiMjrCoqRftAhgD3X/r0Lc4447cm1BSRs6Ux7OpSORSz3Yg9756RpP2ehTd4EILt7QWHcy+90N3tEAUTDEpru7Zg6C4Lta+mcPUqO8ClROHvOFEvcWVxBI5ZQ297HRKNHLnqJKQGDYU2SMy40LMAOTxX1bEUok9mMLkBQULhy1rt1i47OoZs1RTJQVFdycgnO6iWCRmH6ZwSptjU9POwrVOq6hgr6vKWUykaEkgYiHfvFk6RtjuXApUc0O79QlRAQ40USL8rXgnTbn1hZYpqhQbJKVavl3Wa+UdVG16xH7mnp5A4WxeJTjBMR17ybQf20eaf/AIY20MztHKKnc6vSxFJVC7F5Si3DIZc4S91topmdylqQWupMpYB6EDW1o6kN96tK0oeWsqJAGBycIdRspACRk/HwgvTb+qFp1OQOKFfJXd/zxWgLRxlGxqpBeqlzZSARnJUVK1IAwm33oFqpZkycpMtKrk4ZaEkluQZzHpel2iiqQTImgkZoWl24Y0q7w5EesRqaZLxlK8Mmam5SVAWOSkKs6TxtwIEUl7i2OBo2DVAYlS5lvdUlV7coe+srkJCVywiUSSsLQSMTAAkqdsm8o9DIqE5Cen+cfnGVhKmeYlTZOQWhSUm95AqXY8+DeRL+6oIfCpKT3XOI6MHIBzzh2ir5anIQDkAC5dmYZsHwp8hHeZuypawXTLU/3U/lA1O5FGFBQppQIyZAHwDRLg62kOzz3tPaSgtyjAPZYuwYlTOOJJP/AEjWVUFZAJCQ+YvHb94twqZUqYrsQ4BUwcBTd4g4cnZnAcQFoPoxoJ8pM2QqaELDhlvyIOJ7guCOIjeOXKo6bM3jg3bRzRbjJYJ4Mf6wpylBJObG+vRrcY6bUfRQl/2VQtP4kBXqCmI9R9GM5N0zEKN2JdLuXuzxhmyZsiSnvRcYQXBQEUxUQlTuzizWJLpMRqmSsSWCSWOXBwT6NFwr906yWnvS3Ye0g4n4izHN9OECPZOFRKW0Uk25FmL3e8cfxRe6K0gSfRLmSJZcukEN4kjKwGQ43gcqQt8jZg7Wtzi5qBQAAUvhtkwyfEUk2vrxhpdUopAK04vs4QQW4EKtZsxq0aKRehFaTs5alISlu+oJCiDkrM9Bl5wWq92RJQFAqXiJSAEh8sThje7DPWJeza6cVynwEKPDNgT1ezQQ2rUr7RGEP3SS/u2e2ukNy2BRRVl0ASApAViBviB7zlikpIDAO92hU1IcRUEkJJYsBZgXAHIHLpzg5NqVzQXSApPJxmwuervDE+nV2alANcu5ycgkeQBfkYjUDxgSbJYdxIcuHzZ7MNHvEOopVAthJ6JLecW+RVzRL9lDJNyQ5IzJN87gw1O2ytIBwoNyp2cAC4w31hqbTolxRUl0MxJ9lQ8HHmLGMKkTGYoXnYFJ+EW2VvBNVLcy0BsgEuCH4YnzbLnwu8jbc9aXV2SC2RBezsc8rH04xo5UrYaUV2Ts0lIPYDLVS3+MKLFK21NAAMuWTCiNfuHw/wB0FqajCLAWIuDxsx/OHkSGBsL528MuNocXNYsXfNjaNPrIzjmbOjY0+rsls+vpBrd7dtUzvq7komxA7y+SB/uNusEti7vDuzKhOd0yjmfvTOCeWZgvtfayZSCXu3Rhy4DlHVhwt7yMZz+QD29tVNNLEmRLGJasMuSnOYs6rOZbMqNgBpBXdjYopkKUpWOfM706b9o6JTwQnIDx1iqbogz5q66aHKnRISfclgspf4lkZ8Bzi8Sp4a0dVUYtjFbLHCK5tqdhASmylenP4nwi2LWDnHPNvVJmLVgspahLl8ishIPglj5wwSG9jSsRXOax7kv8CTc/xKfwCYOy5Qa8E6fZ6EIShIZKEgDoAwgbWrS7QEsjqSqUtM6QrDMRccCNUqGqTqPEMQCLJt9KK2kTVS09+WCSnUAfvEH8LP0Fs4qcwgGDO5W0uzqDJPsThZ8hMSP9yQR/CmAcWRqUyilJ7JB5sH8bGNV0SCSQhAHBsvSM1dF9XqJkj3T3pf4TkPC4/hMb4iIVsOBn+z0fYT5RkU4HsunpDpngQkqeKBMaxzU5LmfwrUPgYeTW1Cf+JP8A8Rf5wsUJSoKHY5L2zPzE6Z6K/wBQMSqba1Qr/jn+JEv5IiNTGNVBi0ILCo2pUj3pahzQf9qhEKuSKjuzJMgnQkqR6sW8G6ximnsWMS1JCoH7hZVqzdlSPaQQdHUFJPILDD+FQTyJgTU0AfCUYCMwR3vM3DfOL8cYDYiU5MTYjhEKsoQRliA095P4Ccx9w24ERzzwLmJrDJ2kUunpEggvhIBIbqx9fiI0nUqipKgbEM2XLMaGCNXTFC8WaVZKGTjyKVcUm/hDktI4c30ya35RxttOmbJJg4UjBSWwu7DiHcgHTi0YVQqUnCUkAhiRqblzxOX6eCjg+GkOy12zyv0hai38gZI2ehhwwBBs+WT9LiIyt3woFILOAxFxxIcjI6dYOiz25xgouGs2nLS3mIeoWgBU2ysIDe6WtYs4HUG3Busbrp8gbt93Qj4O8FFIv1hdkC3EZPnm7QnINICmU6klgCoaHAP1yhQdwAW+cYidheWdHo9hvSpkVE3twE4cZHe1w3uXAYYrZRjZO61LJWFy5TqHvLUpRHMYrPzZ4kT9my/dCkn7iiG9WjUUs1PsVCuiwFeucb/1/SNpydfmv4s5fiAu8FeZc6YlQN2IPENbw0igb2bQWtJSD3lkIH4lEJHk7x1yZNmkMuVLmjXJvJUDZ9DSK/eUqpergEAHiGJS/hHbDJDJ6JJ/k1+3IrS5Kvs5pSEoSWCUhIHIBh8IIyqn70ElbBkL/dVDclgH4YTEOp3Xnj2Clf4VMfJYHxjRprlE0Rtq1wEpTG5t55+jxV9ly8dSj/y0mYeSlOlPkO08oJbZ2fUIHflTG44bc75Zc4gbvkhU5SnBUsAP9lKQ3g5VCHwi0SZxF3iHWFCr6w8hONgMzYfCLDI2bIQG7NKjqVOX55sIZKRQZ6YjKmFIxpspBCkngpJBT6iOlL2ZTKDGRLvwBB8GjktTXP20sqvLmKQQTolRAV6QmOjo286RU0kqsli6AFtwQpsaT+FTP0VAUTwUAiJX0V7VTNkzadTEJJISdULfEOmJ/wCYQGqqU08+ZIU/dPdP2km6T4hn5hQ0gG0OaxJlKZLxGBeNhDoQ8lcOgxCeH5UwawwJMuMzFRoJsYUqJoBwnWJUuZEEKtDspcNgEET4eCgYHhUOpVEgZq6MKchnOYOShwUPgRcaRVtpUhlglLsB3gTdHByM08FDxYxbUTI1qaZMwcFaH49QdRkYzyYo5F7lRk0c7l7R9oKLcW/X6tEuTVg3BZx+tevpDG8e78xMwzJaCo5mUkEk/eltdSeIzT0uBdCtSHxhSVDNKgxA0sbxwZMTibwlYeqKksGLXvd9DD8ipfws7vFbmVfecL8/gOFniZQ1YAIyAtq18uQjKmilLcNGpFny/TQu1ED0zUl+nH1jKppHRr8H6xOotzRPEw8RCgcmf1hQtRPmo67LrZqU/tZbqLP2ZcBgHF7nXhnDa9vyRZSigmwCwQ5OQfJ+TxJkzHZRDWv8B5xmeUqDKAI5h/KO/L4d0+XlNfk/5s5raB9XtuUlIwTBcWUnvD0s8TNl7QExAUCTo5s5GZHjFaqNgSUTStCBLWQRiRax4guk+I0iJL2dVSv3NYoge7OSJg/mDKjl6nwhTw6MLipXdtNX9LEsjXKLvMky1e0hJ5tfzzhg7NQPYWuX0U48jFZRt2tl/vaZMwaqkrv/ACLv6w4nfKSsFCiuTMKSyZstSDkXb3bZ5x50cHi/StKKk4+z1L6Jv7oerFLn+CxJFSlihaFBhZQKTlytEOsmJP8A+RRP99KQr1DEecRqreGWR3SVIVkqWoKHTuuRBLZVfiQzKATYFTudddLs8d0vEs+Dp1mzKLTfG6f27ruqDRb+FgVVDQzQUy50yUSGbEbPwxB36GAn9yq5KcVLtSapOgmG/Tvg+pEFNo7XSucnipgLZByx5nOJ9LsNCkBaZkyWsu5QptTpHfm63DhxxnnuKf8Aup/pQtMu2/2KNXL27TAlS0rA1VKBfxljD6iObVdStcxa12WpRUoCwckksODkx6BmUVYj2Z6Zg4TE4T5jPxMA6+glnGqs2aF94ALlJC1EEF1HCxSAwDvrGmDqemz/AOTljL2un9JUyXNr1Jr+/Yo/0cbTMmslEmy/2Z/isn/NhPhHWt49301QSoKwTkBkrOShnhU2QdyCMnPGK7svdfZSpiFy5syWUqCuyUpg4LgHtAVZ6BUdBTJGhjpcJR2kqBSUt0zm39g1ySR2ONveSUkHxB+UZ/syrGdLN8A/wjpFMmzPdy4yOZOUPOYRRy2dT1CQ5pZ/hLUr4JgfVVc1KSRS1GLQKkzfVkEx2PtI2C4QqRw07SrBf6kv+RY/1AQ2reKrTnQzPI/Mx3V4wR+ngHRwX++iw70axdixyPOHJe/EsEBUsI/FOSCPAA+pjtlVS4gGUUlwSQElxqk4gbHkx5wlUcv7I8oAo46N+JAz/wAsyWfisRKkb6UqveI8MX+gqjqRoJX2EH+F4hVGwaZXt0shXWUk/FMFCopsreCnKQrtUscncHyIeN/7zUoF5w8lH4CLKvdWgUwVR07JyHZJYalrWiJXbk0GE4KOmJP2kYbasUXBbUQUFAKp3kolgBU8A5pUAp0nQ2FjDs7eCTX002mWtCp6UKVKW3tFIKgQ4sbXGoJ5sQO4uzgGFJKbxJ8yXjWn3FpEqxSpAQr7SCQRrYg2Ns4TjY06OPgghLM7AmxzYuBzuLxmWo+05GQ6553jpO9H0eiaVTJJ7NZuUl8Cj9r7qjytyjne0dnTKc4J6ShdwOYtdJyIzyjjnjaK1DqdoBILMDz1fSNV7XUlLEX59YiJmvLxgDVg32fafieHGBypjgPewvyDh+eQER5KHInja/FweAH5l4UQn5geP5xmDy4fIjY6b9IX0jdhPVIp0JWpDBSlPgSWfCACCT4hsukncHfsVZMqYkImgOwLpWNSh7gjUeN9OLzlmYtS1FyolSjzUXPqYmbJrexmomobFLViDeoPIhx4x3IbPR9aHYxEeFTVYmykTEl0rSFJ6EOPjFYTvpJScM6XNkq+8m3qx9IqxFoBjWakEMQ4cZ9YHUm3qaZ7M5HQnCfVoIpUCHBccoYgYvd6nxY0I7JbNjlEyzfMd23pDcvZ1XK/cVhUB7k9IWP5h3oMvCTDyVlWnIlJfKST/eydC7bfkU6okrTMxqQe1DuEXsbukCzd6z6mLJQb40gwy1KXJUA2GckpPicvF4mhAfEwxEMS1yA7B+FzGJ8lKxhWlKhwUAR6xw9X4d03VwUM2rbjS6r9GmmXqkvSFKWuRMDoWlY4pUFD0jadV4UlTPfKKjUbq0xOJCVSlaKlKKW6DL0hxCK+UoCRMROTYBE32yQACcQzJIJcnWPI/wAMxxy1Ypqa/DP4f+StfsPz5f6o/QtU6ilzh35aVW1Fx45iIqdgBN5M6ZJ5AlSf5VfnE/tMCRiICmDtk7XbVnjT68k6x0eF+G5+njc8sk/wp/CvanaYT0y7fyR1LrJYumVUpH2TgX1Y28o2kbyyHCZhVIX9mcMIPRRt6xKTN1BjSoQlYIUkKBzBDjyMdnX9bk6SHmyhrh3raS9/wtfoiYxvZMIiYC3A5HMHoYy0BqGjTJ/dOlJzlu6PAH2fBhGdozVpSZiJigBmlgoDncO0LofFem6y1ibtdns/+ynFrkMOYQXAuRVTCgL7RBB+4c+FlfKMTNrlH7yWw+0C48XZvGPQ2FQXBhQLk7YkqyW3XLzFvWJkueCHBBHEFx6QUA+UCNey5mIe2BNVJX2CmmN3TxuHA5kOIDbO2gRKC0GZNmpB7WXMnYSkgX7qne4LNf1jSMG1aJcqZZOxjBkwF2vU9vR9tJUoFPesog2stKm4B/IQzRbaWEvNRNVTqAacoMUvbvFJ7wf3gxhrFKrDUg+qTyhdk0Vqq7aUtKZc1xMLypqphI/9NWaS+hYZ58CE6auckqlKWmdL/eSXwvxDXAfRQsYHj9w1BQkgMx8bwO2vsqRUoMudKCknQi4PFJzB5iGkbbCEomGZjlqLKCmE2WeYDYgG4P1iTtHaEyVNS4QqUsWvhLjMAk4bi4dnyeF5b4C0cm2/9Hc+UtpP7WSbJDALTyIsMWdxne0VSZs4S1FEwKGFmSoFJHHm39Y9I0syXMSFoUW8iDwOoMCq7Y8ufilzpaVgGzjJ8ik5pLagxyZMDfpdFXZwo1KU2AQAOQ+YhReqvcykxqwzpuF7NKXMHgpIZUKMPJyGnmM5juzs4TVlSkhSEMpSTq6glIPEakas2sXLeDZSpqjT4CrDJxy5hAxBaXJAU10GySnIOkgBo0+j+hSKeZMV7xLD7qcKS3N0nzgztKZOEntpUsCa6WGZUgrAOG1yz8mBMdhJr9H220DZoMxRaUtSCWe3tpy5KAHhFiRtCRMDY0KfRXlkqKD9H6kdrWUygCnEFpScnlzCBlo/Z+UXNW70ggYXT7LXf2E4U56M0aR01uQ7NazdejWCVSUp1KkEy/F0kQOVuUEnFIqZ8o6XcDyY+sb/AN3qhlsWFwEg4MQxZnCSDiBUbnXIRMoF1PaIExDBiFqLaKmFDEPoU5t5xTxrsxKTAU2bXyJyJAq5Mxag6ULDKIvqU2yOatDE0bzVcr9/RqLay3I62xCJNRP7OrX3EKK1SASrNKFBaAU8WWG/igUqek/2iEruQpRCT3kmUpUs9LBDRXlXwLUFKXf2kUWUVyzwUl/9L/CDVJtunmexOlk8MQB8jeKbOlrnU0jApK+9PwmcgLM1CCoy0rxBwSlLPnGa7Y1GubSJRJKU1CFKKkLUMAwpKGDlNypsoTxSXHv9h6kX94k7PmhDrOYHd6nWKNRbnKkzZa5VXNCErSpSFB8SQoEp7pSLi1wYsm29oCnppk43wIKm4kDujxLCMiin/SHv+qQsyKcgzffWbiW+SUg2Ktb2Ec+p99toIXjFVMJ4KZSemEhm6QFnrUtZUolS1Ekk5kkuT5vD8qWlOYcxIzuO4G+ya1GFQCJ6Q60DJQyxoe7PmNLcQYuZqBpfpl5x5m2dWqkTUT5RZSC7ZOPeSeRDjxj0TsmsTOlImI9haQpPQhwPDKFOEckHCatNUxcbkz66Bmk+n5xn60lVmN7G2fKA23tqy6YBUx+8WADOWDnMgWHONdj7YlT8XZqLpZwQxDu3Iixy4R5fT+C9L0+ZZcVpr3LeSTVMK7pqQhapTu2IpB0KSzt0YxOq5aMaCtQYu9nHQjxgOrZ57Uzpc0oURcFIUk2wu1iCwGrWjJp6t7T6duH1ZQJPEntj8I9J42NTRFptkU/bTAgYsKgcQxOxtmnRwRYaaw3OXhKsCihaFMSO69nGIENd+FyDEoyKsZJp1d4qB7RcsglgWPZrbKG1y6osVU8skHECJ+K9y/elofMxaTRLaY7sreN+7MBC2xDClShMTZyAkEghwCOY4wP3l3h2YhY+tpIWQCCZS0ki4F2D5HWJkxc1SUIFGqWpK0qE3HLItZWJl4mKSoM2sRN+N3BWU5Qw7VDqlnnqh+Cm82OkXGUluiZJMHSfpL2VKQUS0rwnNIQO84YviVe1rxhP0u7PSnAmVOw5YQhAHMNjaOKTNmzQSMBsWNrhtCMweXpDKpChmlQ8ITk2FI7f/wDV6gYJ7CbhGQwIYdBihxH0wbPxYjLnBTNiwy3bg+N2jhcogKBUnEkEOl8OIPcPo4s8W2VvBTYVAJCQSWQJUsYEnIeycRHEu5d82BYUdIH0kbIWcSpbElyVS0v1LKLwTmfSBsqoCUqn5KCg6FhiMskkNyjgO1J8pagZaAm3eYMklyxSnSzOzB3sIhYRBrYUj05TbxUBmBcqrkIJspGJKQsaWUR3hxEFqmeiaEhKkqQpQCikggpAKilxoWAPImPKlHIJUGBbVnyjvOwDKp6WmUoolL7IMpTAnF32OpbHlClJtDS3LwmWni3J2bwhRUF7woJJ7ZPgD+UZjPWzXSiq7hyR9WkqKnQcZKWy/bLSonjkIK7QqpEpQlzZiQFqIR3SpJOYS4BbkcoqW481KpRQyu3krJBBP7pX7wEZMFi/4hE7eraCRRpWtGGYv2E3dK0lctRAN2wufFMWZFJ3f2r2dYmYThExSkqPATHD+Cik+EdhkYykd0m3uurqLX8xHAJsXDZW/tQkJRhClMBfUtn4s8AHTvrSkFnIPDL0MSJW3FCykoV1F/SKHS7/AE1v2skgalN0+SsvWC1JvJTzbFKX5On0SRBYFhqhR1C5a5spQXKLpUlRtcFixDhwLRod2KZWIyZyUrWmeFFYDq7YlXeNnCVENnYQNaUod2YpPVlfDD84c7JY9laT6H1DesWskltZLih7aWwqqUgKky0TimctSUpWE9yZKIUTiYP2ilFho0BdqbPqJHYskBNNIkmaog5JmAqEsgMT+yuOB5wWROnouAsfhL+eFxDkveWYHCiFNmFD4tGkczXYThYZEVX6UKjDQED3loHri/2wdlbwoPtI8i8Vj6UVhdE6chMSfiPnGLLOUUssk2DqJwpHOLbu/sWRMmiQpAmrOEmYpa0IAUgrGAIYswzL55aQM3TpZalvNLICQCeHaKwv/LjjqH9nSxPVM7oWpISGsThBALvoC1h1e0SByvbOzkylvKVjlKKglRzBQrCtCuYLXYOFAx076ItoY6RUom8mYQPwr76fUrHhFQ2pu4qTRTSS+GYlYeyiScC1G5ASUkW+673YSPohrMNXNl6LlP4oUG9FqikDOn7b2WioSAvEGLgpLEWY8mPAxD2LsNFOVqSpa1LYEqawDkAYQNSS5vBlUNtDpCBW396ZNGUCaFkrBICQMgzkuRxiBK+kejOYnJ/hSfguKp9MgaZTl27i/wDUnj1jnqFn7Xw/OFYHeZe/1Cf+KodZavkDEuXvjRKyqUeIUn/UkRwAFXH0hdqvj8fyg1BR6Kk7fplezUST/wAxP5xP7R+F486bGop1TNTJlgFSszolIbEpXIP42Gsd22VSCRJlyUklMtISCcywzPWGmFEiv2fIWCqbJlLLZqQknzIip0idnVExctFFMKkO5QQgWVhJDTU68os1esiWo/rMRUNxDL7WcpMwElIxAhsKiski+eWcbQjFwk32RnKTUopdwhM3Volf9lqR/wA1J+M0xGVuXQ//AKqkf4avkYt6b5XjOE8DHPZrRTv7oUXCqH/KT8pUbI3Zoh/4r/Db4Sot0IiHYFfot3qFRICZhIAJC1TE2Ls4dIIsdItUiclIYDL06QCkq/8AuVgaSkeq5v5QzvSuaKScZKiJiU4gRn3SFKA5lII8YLEWn6/1jEeezvbVG/aKhQWAxOqlyZ3ay1FJNwRoWY+BiFtfasyerHNmKWriT8NBFmn0KVZgHqIHzt35Z0I6E/nElFUUYkUE/ArGwJYgPzsfSDMzd5I1MML2LweAKJVPvK1ii33FYTfPw5RmZtamWXUhQP4QH5uk/lA1eyiIjroTAAY+uI9ycQPsk5aal4lydvT5eUwKHw6vkYqyqcw3gIgoRfJO/ChmA8FJG/AXaYkEaOyh5HKOXEmEFniYBnYEbXpVh8CXH2XSfAAgekDt5dpomUs1AviS6R0IUPhHNEVax7xiRK2qsc4W4bFr3M2f2suYO62NILgn2UulmUNeMXRdAy0zVBw2FPEHQ9HCss/CKZuNNV2c8omYFS8E0OAQoXSpJxAsPZDi8dGFUlUpiiz4kv7r3APR/WKEUzevaE0zFycpRp1qsPaUHzPJk2HGKpuptkUlXLnqSVJGJKglnIUkizkDNj4Rdt7p6Pqfay1pWmaQhKkmxIUMaSPtABWfzjls0wAd0ofpN2cfbMxB+9LJ/wBLwZpt7NmzPZq5L8CrCf8AM0edc7xhodio9A7x7u0e0EoeeApD4Vy1pJuzg8RYeUVqZ9EAzRVn+KW/wXHIQgcBEqTXTUexNmp/CtSfgYBnSJ/0SVHuz5KvxBQ/2mIY+iqtdsUhuOM/+x4qMjeetR7NZUD/AJqz6EmJsrf3aScquZ4pQr/UkwtgOwbsbpJo5WBPemKYzJmqiMgOCRoPmYpm+++MozFUyKqbIMtRC1S5QmYiM0vjSwBcG2YziuI+k/aac56V/ilI/wBqRGi/pKqlOVyKNZOZVIcnn7UOxE2RtYCQtZ2pO7yghC1SFDCR3lBkqLkhr6Pzgb/aRChMTtRBWk2KqZWoKT/wyDYmHT9Ik0hlUdCocOwtf+LlDX985XvbMoD0lN8IQySneKef+8KM/ipiPjIibT7an9mpZqdnHvBKSZLJyJU/7F3bCw5nxFjfCm12TR+Dj5Q4rfOlKQk7JpsIJIGNQAJYE5ZnCnyEIAgN5agf9p2V/IsfCWIbnb0VKgU/Wtnpf3kmak+DCBx3poT/AN0U/hNX+UY/vRQf/wAiR/irMMAsNtVMvDhr6MLKRjK1TCTmpDOgnDhUDfiYvG5u1VVEk9pNlTlpLKVKfAQcvaAOWdo5tN3uoVF1bJkk8e1XoGGnAQS2P9JMqnBTTbOlywc2mq+aTAAP23udVS58xEmmmLlBRKFJAbCe8BnoC3hCg6fpZnf+Flf4iv8A2woQDBMa4b5xaUGkm+0lCDxBKPj3YU7dQKGKVNcaOxH8yT8oy86K2lsa6H2KuJVnjRUocP14Qan7v1CMkYuaS58s/SBsxKk91SSk8FW+UWpJ8MlprkgKpQYZm0XOCCgTYg+QhK8jlzihAVdBy8oizdnDhFiKD/SG1SukAirTdmxGmUJ4Rb10sMKojwgApy6Y8IbVJi2TKLiIhzqAcIAoi7vVQlrAW+BQwrbgSC/gQPB46hQCoBmrVeSUylygCCAQSleWROJJ6NHK6ikKbiN5e1FpRgExYT9kKIHPpDEEt650oTZiJBeX2i1k6FaixYcEgBPUqitLh+bPFmDAC3X8ojPABq5GRjAWYyqE0AC7Qxt2kYHOMCEA4Fjn5w6laCzAg63z5i1tYYaMkcoAJ6pckuQVDqxYeVz5RNlbMp1CyyS/2kpbzSXPlnAJo2c+MKh2WNOw6f7czNgQAfEtcfrKHlbqyy2CYVZva46Xvw0gBI2gtORIglSbwLQSWA1tm7Znj4xLUuxSce5PmbmpSxVOsdBLUTlbVuF4rG0qYyZhQQ7MQbhwdWPj5Rape9pwspycvdsH0YC3KB+8tfKqEIYHtEuxszcDfXMHS/GCOq9xyUa2K52o+z6mF2g+z6mGyIUaGY6Cnh6mHJRGgHnDSRBzdzZJmHtV2lpvzWeCeQ1MJukNK9jaXs8EAmYAdQ2XLOFFk/syRq3i3yhRz+YdHlhApfX5xmUCkuglJ4pJSfMfCHClhkT4dYS8tI6WrOclSdsT0+/ivcKAdtQ4Y+ZifK26khpqVNwACx4hTEesBFIJsbc4xgOn64xk8MH2LU2WVNHRTsihJPA9mfI2hqq3SI/drfksfNP5RXSm4cNp8oepKuYi0takjgDZ+mR8ojypx9MvqPXF8ocqdg1CH/Zv+HvegvA5aCmxDHgcx1GYixUm880WWEr/AMp8029ImL21KmgJWluS0hSR4/0ha8kfVH6D0xfDKgkgDKE4Nos52VJm/uwh/wDy13z4HppEOduzN93L7wY+Yf1aLWaLE4MCqlh407AHMDwifO2ROR7UtXUXHW1h5xHCCOcaJp8EVRCmbPB4GIFTu9LOWo0cNyLhudoPgfGNwgHh8IYFMnbttfEodWMMHd9X2ovAQOEZ7AcAIAooZ2MqNDspQi/GjT4/rOGlbOHL4wBRQzs5UaGhMX0bOyI014f1hs7M1t+uMAUUY0JGhjT6uYvKtmj7P68YwdkjhAFFITK4gxkShr/0i5nY6eEaq2OOHWAKKmqnTm7jMs0JEgM5bK2d+sWlWw0nMfrWNRsIDIQCoq3ZMLsXsf1xjeXSvkkqs5bRtYsadhYcjrkY3kbNWlQIIFmJFizvYhuXlAFFXRQOHDKflkfmekOo2Yhgpw+qb8cw1otdPQoRcK75JZLG92SAoZHzEKo2OAgE4bnMHERx0cFgbZmEBWZNKhC8JCSQs95QfLRjmLZcosVNWTGIUqwOiQQOVmYDSNkSWDWYh2Z88wzPnwgpJ2WEy1YcTqLKwlnSQxBBHee+ovEtWUpUQ01KdVJ8U38WU0KMKp0OXlznf7H5v8YxE+WV5jDgQGJYZDTnEYnLw+EKFGxmbyA7vw+cZmBmblChQwIs1RYXzh2ckWsMoUKABtI73h841RChQgGyo+sWvdSoWpBxKUpsnJPxjMKObqvQa4vUWNI/XhA7b1Mjs8WBOJs8IfzjMKOLFyjefBSlDvNpeMK08PhChR6qOQzOyPhGEZjr8oUKABxrnqflG6cj1jEKADZZ+A+MYl5Hp8zChQAZKQ5tqPhGjB/L4woUIY0Tl1h6YIUKADUZDw+UL3j+tYUKARmULjp8o0mC/wCuMZhQAaKSHFtfmYcyk4hZWPMZ+cZhQDG5t1B9Tfn1iPLmHAm5zIz0BDDpChQnySh9KA2QhQoUAz//2Q==' ;

// credits:
// http://commons.wikimedia.org/wiki/File:Old_door_handles.jpg
// https://commons.wikimedia.org/wiki/Category:Pac-Man_icons
// https://commons.wikimedia.org/wiki/Category:Skull_and_crossbone_icons
// http://en.wikipedia.org/wiki/File:Inscription_displaying_apices_(from_the_shrine_of_the_Augustales_at_Herculaneum).jpg

      const SOUND_ALARM = '/uploads/starter/air.horn.mp3' ;

// http://soundbible.com/1542-Air-Horn.html 

	
const gridsize = 20;						// number of squares along side of world	   

const BOXDENSITY = 0.1;
const NOBOXES =  Math.trunc ( (gridsize * gridsize) * BOXDENSITY );
		// density of maze - number of internal boxes
		// (bug) use trunc or can get a non-integer 

const squaresize = 100;					// size of square in pixels

const MAXPOS = gridsize * squaresize;		// length of one side in pixels 
	
const SKYCOLOR 	= 0xddffdd;				// a number, not a string 

 
const startRadiusConst	 	= MAXPOS * 0.8 ;		// distance from centre to start the camera at
const skyboxConst			= MAXPOS * 2 ;		// where to put skybox 
const maxRadiusConst 		= MAXPOS * 10  ;		// maximum distance from camera we will render things  



//--- change ABWorld defaults: -------------------------------

ABHandler.MAXCAMERAPOS 	= skyboxConst * 0.6 ;			// keep camera inside skybox 

ABHandler.GROUNDZERO		= true;						// "ground" exists at altitude zero



//--- skybox: -------------------------------
// skybox is a collection of 6 files 
// x,y,z positive and negative faces have to be in certain order in the array 
 
// mountain skybox, credit:
// http://stemkoski.github.io/Three.js/Skybox.html

 const SKYBOX_ARRAY = [										 
                "/uploads/starter/dawnmountain-xpos.png",
                "/uploads/starter/dawnmountain-xneg.png",
                "/uploads/starter/dawnmountain-ypos.png",
                "/uploads/starter/dawnmountain-yneg.png",
                "/uploads/starter/dawnmountain-zpos.png",
                "/uploads/starter/dawnmountain-zneg.png"
                ];


/* const SKYBOX_ARRAY = [										 
                "/uploads/starter/st.posx.jpg",
                "/uploads/starter/st.negx.jpg",
                "/uploads/starter/st.posy.jpg",
                "/uploads/starter/st.negy.jpg",
                "/uploads/starter/st.posz.jpg",
                "/uploads/starter/st.negz.jpg"
                ];

*/
// ===================================================================================================================
// === End of tweaker's box ==========================================================================================
// ===================================================================================================================






// contents of a grid square

const GRID_BLANK 	= 0;
const GRID_WALL 	= 1;
const GRID_MAZE 	= 2;
 
 


//---- start of World class -------------------------------------------------------
 
function World() 
{ 

var BOXHEIGHT  = squaresize;

var GRID 	= new Array(gridsize);			// can query GRID about whether squares are occupied, will in fact be initialised as a 2D array   

var theagent, theenemy;
  
var wall_texture, agent_texture, enemy_texture, maze_texture; 
var skybox_texture_array = new Array ( 6 );		// a cube 


// enemy and agent position on squares
var ei, ej, ai, aj;

var badsteps;
var goodsteps;

var stuckfor = 0;       // how long the enemy has been stuck - if stuck for a while start making random moves 

 	var self = this;						// needed for private fn to call public fn  

 

	
function loadResources()		// asynchronous file loads - call initScene() when all finished 
{
	var loader1 = new THREE.TextureLoader();
	var loader2 = new THREE.TextureLoader();
	var loader3 = new THREE.TextureLoader();
	var loader4 = new THREE.TextureLoader();
	
	loader1.load ( TEXTURE_WALL, function ( thetexture )  		
	{
		thetexture.minFilter  = THREE.LinearFilter;
		wall_texture = thetexture;
		if ( asynchFinished() )	initScene();		// if all file loads have returned 
	});
		
	loader2.load ( TEXTURE_AGENT, function ( thetexture )  	 
	{
		thetexture.minFilter  = THREE.LinearFilter;
		agent_texture = thetexture;
		if ( asynchFinished() )	initScene();		 
	});	
	
	loader3.load ( TEXTURE_ENEMY, function ( thetexture )  
	{
		thetexture.minFilter  = THREE.LinearFilter;
		enemy_texture = thetexture;
		if ( asynchFinished() )	initScene();		 
	});
	
	loader4.load ( TEXTURE_MAZE, function ( thetexture )  
	{
		thetexture.minFilter  = THREE.LinearFilter;
		maze_texture = thetexture;
		if ( asynchFinished() )	initScene();		 
	});
	
	for ( var i = 0; i < 6; i++ ) 
	  skyboxFileLoad ( i );						// launch 6 more asynchronous file loads for skybox 
}


function skyboxFileLoad ( n )				// asynchronous file load of skybox texture n 
{
	var loader = new THREE.TextureLoader();

	loader.load ( SKYBOX_ARRAY[n], function ( thetexture )  	 
	{
		thetexture.minFilter  = THREE.LinearFilter;
		skybox_texture_array[n] = thetexture;
		if ( asynchFinished() ) initScene();
	});	
}


function asynchFinished()		 // all file loads returned 
{
	for ( var i = 0; i < 6; i++ ) 
		if ( ! skybox_texture_array[i] ) 
			return false;
		
	// else 
	if ( wall_texture && agent_texture && enemy_texture && maze_texture )   return true; 
	else return false;
}	
	
	
 

//--- grid system -------------------------------------------------------------------------------
// my numbering is 0 to gridsize-1

	
function occupied ( i, j )		// is this square occupied
{
 if ( ( ei == i ) && ( ej == j ) ) return true;		// variable objects 
 if ( ( ai == i ) && ( aj == j ) ) return true;

 if ( GRID[i][j] == GRID_WALL ) return true;		// fixed objects	 
 if ( GRID[i][j] == GRID_MAZE ) return true;		 
	 
 return false;
}

 
// translate my (i,j) grid coordinates to three.js (x,y,z) coordinates
// logically, coordinates are: y=0, x and z all positive (no negative)    
// logically my dimensions are all positive 0 to MAXPOS
// to centre everything on origin, subtract (MAXPOS/2) from all dimensions 

function translate ( i, j )			
{
	var v = new THREE.Vector3();
	
	v.y =   0 ;    

	v.x = ( i * squaresize ) - ( MAXPOS/2 );   		 
	v.z = ( j * squaresize ) - ( MAXPOS/2 );   	
	
	return v;
}



	
function initScene()		// all file loads have returned 
{
	 var i,j, shape, thecube;
	 
	// set up GRID as 2D array
	 
	 for ( i = 0; i < gridsize ; i++ ) 
		GRID[i] = new Array(gridsize);		 


	// set up walls
	 
	 for ( i = 0; i < gridsize ; i++ ) 
	  for ( j = 0; j < gridsize ; j++ ) 
		if ( ( i===0 ) || ( i==gridsize-1 ) || ( j===0 ) || ( j===gridsize-1 ) )
		{
			GRID[i][j] = GRID_WALL;		 
			shape    = new THREE.BoxGeometry ( squaresize, BOXHEIGHT, squaresize );			 
			thecube  = new THREE.Mesh( shape );
			thecube.material = new THREE.MeshBasicMaterial( { map: wall_texture } );
			
			thecube.position.copy ( translate(i,j) ); 		  	// translate my (i,j) grid coordinates to three.js (x,y,z) coordinates 
			ABWorld.scene.add(thecube);
		}
		else 
   			GRID[i][j] = GRID_BLANK;

		
   // set up maze 
   
    for ( var c=1 ; c <= NOBOXES ; c++ )
	{
		i = AB.randomIntAtoB(1,gridsize-2);		// inner squares are 1 to gridsize-2
		j = AB.randomIntAtoB(1,gridsize-2);
			
		GRID[i][j] = GRID_MAZE ;
		
		shape    = new THREE.BoxGeometry ( squaresize, BOXHEIGHT, squaresize );			 
		thecube  = new THREE.Mesh( shape );
		thecube.material = new THREE.MeshBasicMaterial( { map: maze_texture } );		  

		thecube.position.copy ( translate(i,j) ); 		  	// translate my (i,j) grid coordinates to three.js (x,y,z) coordinates 
		ABWorld.scene.add(thecube);		
	}
	 	 
   
	// set up enemy 
	// start in random location
	 resetEnemyPos();
	 
	 shape    = new THREE.BoxGeometry ( squaresize, BOXHEIGHT, squaresize );			 
	 theenemy = new THREE.Mesh( shape );
 	 theenemy.material =  new THREE.MeshBasicMaterial( { map: enemy_texture } );
	 ABWorld.scene.add(theenemy);
	 drawEnemy();		  

	 
	
	// set up agent 
	// start in random location
	
	 do
	 {
	  i = AB.randomIntAtoB(1,gridsize-2);
	  j = AB.randomIntAtoB(1,gridsize-2);
	 }
	 while ( occupied(i,j) );  	  // search for empty square 

	 ai = i;
	 aj = j;
 
	 shape    = new THREE.BoxGeometry ( squaresize, BOXHEIGHT, squaresize );			 
	 theagent = new THREE.Mesh( shape );
	 theagent.material =  new THREE.MeshBasicMaterial( { map: agent_texture } );
	 ABWorld.scene.add(theagent);
	 drawAgent(); 

	 
	 
  // set up skybox 
  var skybox_material_array = [
 	( new THREE.MeshBasicMaterial ( { map: skybox_texture_array[0], side: THREE.BackSide } ) ),
 	( new THREE.MeshBasicMaterial ( { map: skybox_texture_array[1], side: THREE.BackSide } ) ),
 	( new THREE.MeshBasicMaterial ( { map: skybox_texture_array[2], side: THREE.BackSide } ) ),
 	( new THREE.MeshBasicMaterial ( { map: skybox_texture_array[3], side: THREE.BackSide } ) ),
 	( new THREE.MeshBasicMaterial ( { map: skybox_texture_array[4], side: THREE.BackSide } ) ),
 	( new THREE.MeshBasicMaterial ( { map: skybox_texture_array[5], side: THREE.BackSide } ) )
 	];
	
  var skyGeometry = new THREE.CubeGeometry ( skyboxConst, skyboxConst, skyboxConst );	
  var skyMaterial = new THREE.MeshFaceMaterial ( skybox_material_array );
  var theskybox = new THREE.Mesh ( skyGeometry, skyMaterial );
//  theskybox.position.y = skyboxConst * 0.4  ;
  
  ABWorld.scene.add( theskybox );						// We are inside a giant cube

 
  // can start the run loop
  
	ABWorld.render();		
  
	AB.removeLoading();
	
  	ABRun.runReady = true; 			
}
 
 
 
function resetEnemyPos()
{
     var i,j;	 
     do
	 {
	  i = AB.randomIntAtoB(1,gridsize-2);
	  j = AB.randomIntAtoB(1,gridsize-2);
	 }
	 while ( occupied(i,j) );  	  // search for empty square 

	 ei = i;
	 ej = j;
}





// --- draw moving objects -----------------------------------


function drawEnemy()		// given ei, ej, draw it 
{
	theenemy.position.copy ( translate(ei,ej) ); 		  	// translate my (i,j) grid coordinates to three.js (x,y,z) coordinates 

	ABWorld.lookat.copy ( theenemy.position );	 		// if camera moving, look back at where the enemy is  
}


function drawAgent()		// given ai, aj, draw it 
{
	theagent.position.copy ( translate(ai,aj) ); 		  	// translate my (i,j) grid coordinates to three.js (x,y,z) coordinates 

	ABWorld.follow.copy ( theagent.position );			// follow vector = agent position (for camera following agent)
}




// --- take actions -----------------------------------

function getEnemyAction()
{ 
// move towards agent 
 
  // after n failed moves, start making random moves 
  if ( stuckfor > 2 ) return  ( AB.randomIntAtoB (0,3) );

if ( AB.randomBoolean() )
{
     if ( ej < aj ) 	return (   ACTION_UP ); 
	 if ( ej > aj ) 	return (   ACTION_DOWN ); 
}
else
{
	 if ( ei < ai ) 	return (   ACTION_RIGHT ); 
	 if ( ei > ai ) 	return (   ACTION_LEFT ); 
}

 	return  ( AB.randomIntAtoB (0,3) );
}



function moveLogicalEnemy( a )			 
{ 
 var i = ei;
 var j = ej;		 

      if ( a == ACTION_LEFT ) 	i--;
 else if ( a == ACTION_RIGHT ) 	i++;
 else if ( a == ACTION_UP ) 	j++;
 else if ( a == ACTION_DOWN ) 	j--;

 if ( occupied(i,j) ) 
  stuckfor++;
 else
 {
  stuckfor = 0;
  ei = i;
  ej = j;
 }
   
}


function moveLogicalAgent( a )			// this is called by the infrastructure that gets action a from the Mind 
{ 
 var i = ai;
 var j = aj;		 

      if ( a == ACTION_LEFT ) 	i--;
 else if ( a == ACTION_RIGHT ) 	i++;
 else if ( a == ACTION_UP ) 	j++;
 else if ( a == ACTION_DOWN ) 	j--;

 if ( ! occupied(i,j) ) 
 {
  ai = i;
  aj = j;
 }
}




// --- score: -----------------------------------


function badstep()			// is the enemy within one square of the agent
{
 if ( ( Math.abs(ei - ai) < 2 ) && ( Math.abs(ej - aj) < 2 ) ) return true;
 else return false;
}


function agentBlocked()			// agent is blocked on all sides 
{
 return ( 	occupied (ai-1,aj) 		&& 
		occupied (ai+1,aj)		&&
		occupied (  ai,aj+1)		&&
		occupied (  ai,aj-1) 	);		
} 


function updateStatusBefore(a)
// this is called before anyone has moved on this step, agent has just proposed an action
// update status to show old state and proposed move 
{
 var x 		= self.getState();
 
 var status = " Step: " + ABRun.step + 
			" &nbsp; x = (" + x.toString() + ") " +
			" &nbsp; a = (" + a + ") "; 

 $("#user_span1").html( status );
}


function   updateStatusAfter()		// agent and enemy have moved, can calculate score
{
 // new state after both have moved
 
 var y 		= self.getState();

 var score = ( goodsteps / ABRun.step ) * 100; 

 var status = " &nbsp; y = (" + y.toString() + ") " +
		" <BR> Bad steps: " + badsteps + 
		" &nbsp; Good steps: " + goodsteps + 
		" &nbsp; Score: " + score.toFixed(2) + "% "; 

 $("#user_span2").html( status );
}




//--- public functions / interface / API ----------------------------------------------------------


this.newRun = function() 
{
	AB.loadingScreen();

	ABRun.runReady = false;  

	badsteps = 0;	
	goodsteps = 0;

	 ABWorld.init3d ( startRadiusConst, maxRadiusConst, SKYCOLOR  ); 	
	
	loadResources();		// aynch file loads		
							// calls initScene() when it returns 

};



this.getState = function()
{
 var x = [ ai, aj, ei, ej ];
  return ( x );  
};



this.takeAction = function ( a )
{
  updateStatusBefore(a);			// show status line before moves 

  moveLogicalAgent(a);

  if ( ( ABRun.step % 2 ) === 0 )		// slow the enemy down to every nth step
  {
      var e = getEnemyAction();
      moveLogicalEnemy(e);
  }


  if ( badstep() )  badsteps++;
  else   			goodsteps++;

   drawAgent();
   drawEnemy();
   updateStatusAfter();			// show status line after moves  


  if ( agentBlocked() )			// if agent blocked in, you get BLOCKPUNISH bad steps and the problem is reset  
  {
    badsteps = badsteps + BLOCKPUNISH;
    ABRun.step = ABRun.step + BLOCKPUNISH;
    $("#user_span3").html( " <br> <font color=red> <B> Agent blocked. " + BLOCKPUNISH + " extra bad steps and reset enemy. </B> </font>   "  );
     soundAlarm();
    // enemy is moved to a random square
     resetEnemyPos();
  }

};



this.endRun = function()
{
  $("#user_span3").html( " <br> <font color=green> <B> Run over. </B> </font>   "  );
};


this.getScore = function()
{
    // only called at end - do not use ABRun.step because it may have just incremented past AB.maxSteps
    
    var s = ( goodsteps / AB.maxSteps ) * 100;   // float like 93.4372778 
    var x = Math.round (s * 100);                // 9344
    return ( x / 100 );                          // 93.44
};


}

//---- end of World class -------------------------------------------------------


                                                                                         
function soundAlarm()
{
        var alarm = new Audio ( SOUND_ALARM );
        alarm.play();                                                   // play once, no loop 
}