0){$lc--;}elseif($sk){$sk=false;}else{$i=array_pop($ls);$tc=$c{$i};}}elseif($sk){$i++;continue;}elseif($tc=='>'){$p++;}elseif($tc=='<'){$p--;}elseif($tc=='+'){if(!isset($b[$p])){$b[$p]=0;}$b[$p]++;}elseif($tc=='-'){$b[$p]--;}elseif($tc=='.'){print(chr($b[$p]));}elseif($tc==','){$b[$p]=ord(fgetc($si));}elseif($tc=='['){if($b[$p]<=0){$sk=true;}else{$ls[]=$i-1;}}$i++;}fclose($si);?>