var x = 1;
while (x < 2000)
{
run();
}

function run() {
  var exists = gateway();
  if (exists) {
    unfollow();
    iimPlay('CODE:SET !EXTRACT NULL');
    }
   else {
   iimPlay('CODE:REFRESH');
   iimPlay('CODE: SET !EXTRACT NULL');
   }
}

// check for red names
function doesElementExist() {
  iimDisplay('looking for small element with rel "contact" amd style "color:" on page');
  var code = iimPlay('CODE: SET !TIMEOUT_TAG 1\n'
                     + 'TAG POS=1 TYPE=A ATTR=REL:*contact*&&STYLE:color:* EXTRACT=HREF');
  if (code !==1) {
    return false;
  }
  var extract = iimGetLastExtract();
  if (extract === '#EANF#') {
    return false;
  }
  return true;
}

// check for 502 bad gateway
function gateway() {
  iimDisplay('check for flickr link on page');
  var code = iimPlay('CODE: SET !TIMEOUT_TAG 1\n'
                     + 'TAG POS=1 TYPE=TD ATTR=CLASS:contact-list-name');
  if (code !==1) {
    return false;
  }
  var extract = iimGetLastExtract();
  if (extract === '#EANF#') {
    return false;
  }
  return true;
}

//unfollow

function unfollow() {
    var exists = doesElementExist();
  	if (exists) {
   	 iimPlay("unfollow.iim");
 	 }
 	 else {
	   	var exists = nextlink();
  		if (exists) {
   		iimPlay('CODE: TAG POS=1 TYPE=A ATTR=CLASS:Next*');
 		}
 		else {
   		iimPlay('CODE: URL GOTO=http://www.flickr.com/people/YOURNAMEHERE/contacts/?page=1');
 		}
 	 }
}

// restart from last page
function nextlink() {
  iimDisplay('check for next link on page');
  var code = iimPlay('CODE: SET !TIMEOUT_TAG 1\n'
                     + 'TAG POS=1 TYPE=A ATTR=CLASS:Next* EXTRACT=TXT');
  if (code !==1) {
    return false;
  }
  var extract = iimGetLastExtract();
  if (extract === '#EANF#') {
    return false;
  }
  return true;
}

//wait
function sleep(milliseconds) {
  var start = new Date().getTime();
  for (var i = 0; i < 1e7; i++) {
    if ((new Date().getTime() - start) > milliseconds){
      break;
    }
  }
}