on mouseUp
  global bSceny     
  set rzad=70
  repeat with x=1 to 10
    setAt bSceny,x,0
  end repeat
  repeat with x=1 to 57
    setAt bFajki,x,0
  end repeat  
  repeat with b=1 to 10
    repeat with a=1 to 5
      set the blend of sprite rzad+a to 10
    end repeat
    set rzad=rzad+5
  end repeat
  --  set the locH of sprite (8) to (the locH of sprite (8))-8
  --  set the locV of sprite (8) to (the locH of sprite (8))-8    
  
  -- set the locV of sprite (15) to the mouseV
  set the locH of sprite (8) to 500
  set the locV of sprite (8) to 385
  puppetSprite 8, FALSE
end

on mouseDown
  --  set the locH of sprite (8) to (the locH of sprite (8))+8
  --  set the locV of sprite (8) to (the locH of sprite (8))+8 
  puppetSprite 8, true
  set the locH of sprite (8) to 503
  set the locV of sprite (8) to 388
end 

on mouseUpOutside
  go to "start1_"  
  set the locH of sprite (8) to 500
  set the locV of sprite (8) to 385
end mouseUpOutside

on mouseLEave  
  set the locH of sprite (8) to 500
  set the locV of sprite (8) to 385
  
  go to "start1_"
end