//////Move player///
block_up=ds_grid_get(gd,x,y-16)
block_left=ds_grid_get(gd,x-16,y)
block_right=ds_grid_get(gd,x+16,y)
block_down=ds_grid_get(gd,x,y+16)

if keyboard_check(ord("A")){
     if block_left==-1{
         hsp=-16
     }else{
         hsp=0
     }
     pxs=-1
}
if keyboard_check(ord("D")){
     if block_right==-1{
         hsp=16
     }else{
         hsp=0
     }
     pxs=1
}
if keyboard_check(vk_space){
     if jump==true{
         vsp=16
     }
}

if block_down==-1{
     vsp=-16
     jump=false
}else{
     if block_down>-1{
         vsp=0
         jump=true
     }
}

if keyboard_check_released(vk_space){
     vsp=0
}
if keyboard_check_released(ord("A")){
     hsp=0
}
if keyboard_check_released(ord("D")){
     hsp=0
}

y-=vsp
x+=hsp
view_xview[0]=x-(view_wview[0]/2)
view_yview[0]=y-(view_hview[0]/2)
view_xview = max(0, min(view_xview, room_width - view_wview))
view_yview = max(0, min(view_yview, room_height - view_hview))

///world_gen(biom(lands,sands,do not use!!!(boss),shadow,steel,snow))
randomize()
var sh
sh=choose(672,704,736,544,864)

var ah
ah=sh
var dirt_level
var stone_level
var water_level
var adl
var c
var v
var tree1
var th
//biom=argument0
globalvar gd,gd2;
gd=ds_grid_create(7521,6000)
ds_grid_set_region(gd,0,0,7521,6000,-1)
/*gd2=ds_grid_create(7521,6000)
ds_grid_set_region(gd2,7521,6000,7521*2,6000,-1)*/

//if biom='lands'{
     c=0
     v=7521
     for(xx=c;xx<v;xx+=16){
         tree1=choose(9,9,10,2,2,3,43,3,4,21,4,5,23)
         global.th=choose(5,6,6,6,6,7,7,7)
         dirt_level=ah+16*choose(2,3,3,3,4,4)
         stone_level=room_height
         water_level=711
          
         if tree1<5 and ah<=water_level*4{
             g=choose(2,2,1,1,1,2)
             if g=1
                 //instance_create(xx,ah-16,tree_generator)
             tree1=choose(9,9,10,2,2,3,43,3,4,21,4,5,23)
         }
          
         //gd[xx,ah-32]=2
         ds_grid_set(gd,xx,ah-16,0)
         //with instance_create(xx,ah-16,solidblock) {image_index=0}
         show_debug_message("GridDebug: created:grass")
          
         if irandom(5)>1 and irandom(5)<4{
             //ds_grid_set(gd,x,y,object_index)
             //show_debug_message("GridDebug: created:tallgrass")
         }
          
         for(yy=ah;yy<dirt_level;yy+=16){
             //gd[xx,yy]=1
             ds_grid_set(gd,xx,yy,1)
             //with instance_create(xx,yy,solidblock) {image_index=1}
             show_debug_message("GridDebug: created:dirt")
             adl=yy
         }
          
         for(yy=adl;yy<stone_level;yy+=16){
             //gd[xx,yy]=3
             ds_grid_set(gd,xx,yy,2)
             //with instance_create(xx,yy,solidblock) {image_index=2}
             show_debug_message("GridDebug: created:stone")
         }
         ah+=16*round(random(choose(0,0,0,0,1,1,2)))*choose(1,-1)
         for(yy=ah-640;yy<ah;yy+=16){
             //with instance_create(xx,yy,empty)
             //show_debug_message("GridDebug: created:empty")
         }
         global.ah[xx/32]=ah
     }