#include <stdio.h>
#include <unistd.h>
#include <time.h> 
#include <pthread.h> // necessary
#include <stdlib.h>
 
// Session limit in seconds
#define SESSION_TIME 60
 
// Global last interaction variable
time_t lastInteraction;
 
// Thread function that will control session time
void * session(void * arg)
{
	// Session will constantly check if the session is expired or not
	while(1)
	{
		// In each loop, get current time
		time_t c;
		time(&c);
		// Then compare it with the lastInteraction time
		if(c - lastInteraction >= SESSION_TIME)
		{
			printf("Session expired\n");
			exit(0);
		}
	}
}
 
int main(int argc, char const *argv[])
{
	// Set the initial interaction time
	time(&lastInteraction);
 
	// Create session
	/*
	* Note: if pthread_create executes successfuly, tid gets the return id of session. 
	* First NULL indicates we will use default attributes for our thread
	* session is the name of the method which will handle thread's execution
	* last NULL is the argument will be used inside session but I preferred using it globally
	*/
	pthread_t tid;
	pthread_create(&tid, NULL, session, NULL);
 
	// Create input string
	char input[30];
 
	// Program starts
	while(1)
	{
		// Ask user for inputs with scanf (or fgets depending on your program)
		// Assume that user waits and does not enter any thing for 60 seconds,
		// during this time thread gets executed and checks whether the limit is reached or not
		printf("Enter something: ");
		input[0] = '\0'; // optional: empty the string
		scanf("%s", input);
 
		// Update the last activation time after user gives an input
		time(&lastInteraction);
	}
 
	return 0;
}

public boolean isPrime(int n){
	for(int i = 2; i <= input/2; i++){
		if(input % i == 0){
			return false;
		}
	}
	return true;
}

public int gcd(int num1, int num2){
	int x;
	int y;
	while(num1 % num2 != 0){
		x = num2;
		y = num1%num2;
		num1 = x;
		num2 = y;
	}
	return num2;
}

public ArrayList findFactors(int n){
	ArrayList factors = new ArrayList();
	int temp = input;
	for(int i = 2 ; i < input; i++){
		// try prime numbers to divide input, if it divides add it to factors
		if(isPrime(i)){
			while(temp % i == 0){
				factors.add(i);
				temp = temp / i;
			}
		}
	}
	return factors;
}

public int[] getFactorizationPair(int n){
	int [] pair = new int[2];
	ArrayList f = findFactors(n);
	if(f != null){
		pair[0] = 1;
		for(int i = 0; i < f.size() ; i++){
			if(f.get(i) == f.get(0)){
				pair[0] = pair[0] * f.get(i);
			}
		}
		pair[1] = n / pair[0];
	}
	// p = pair[0], q = pair[1]
	return pair;
}

public static int modularExpo(int b, int e, int m){
	String eBinary = Integer.toBinaryString(e);
	int x = 1;
	int power = b % m;
 
	// because of binary representation, loop goes in opposite direction
	for(int i = eBinary.length() -1 ; i >= 0 ; i--){
		if(Character.digit(eBinary.charAt(i), 10) == 1 ){
			x = (x * power) % m;
		}
		power = (power*power) % m;
	}
	return x;
}

public static int[] extendedEuclidian(int f, int a){
	int s0 = 1;
	int s1 = 0;
	int t0 = 0;
	int t1 = 1;
 
	int dividend = f;
	int divisor = a;
 
	int r = dividend % divisor; // remainder
	int q = dividend / divisor; // quotient
	dividend = divisor;
	divisor = r;
 
	while(r != 0){
		int stemp = s0 - (q * s1);
		s0 = s1;
		s1 = stemp;
 
		int ttemp = t0 - (q * t1);
		t0 = t1;
		t1 = ttemp;
 
		r = dividend % divisor;
		q = dividend / divisor;
		dividend = divisor;
		divisor = r;
	}
 
	int array[] = {s1,t1};
	return array;
}

public static int modularInverse(int n, int m){
	// in the equation of f*s + a*t of ExtendedEuclidian, t represents the inverse of a in modulo f
	int pair[] = extendedEuclidian(m, n);
	return pair[1];
}

public static int findExponent(int p, int q){
	// if p is smaller than q, swap them
	if(p < q){
		int t = p;
		p = q;
		q = t;
	}
 
	for(int i = (q - 1) ; i>=2; i--){
		if(gcd(i, (p-1) * (q-1) ) == 1){
			return i;
		}
	}
 
	// in case of the condition does not hold
	return -1;
}

public static ArrayList<Integer> decrypt(ArrayList<Integer> block, int d, int m){
	ArrayList<Integer> newBlock = new ArrayList();
	for(Integer i : block){
		i = modularExpo(i, d, m);
		newBlock.add(i); // i refers to each decrypted message: c^d = i (mod m)
	}
	return newBlock;
}

<?php
/*
* Author: Emin Bugra Saral
* Website: http://www.rahmetli.info
* Purpose: How to make a to-do list with php
* 
*/
 
// SESSION
session_start();
 
// DATABASE
mysql_connect('localhost', 'user', 'password');
mysql_select_db('database');
 
// TASK FORM
$form  = '<form id="taskform" method="post">';
$form .= '<label for="task">Task</label>';
$form .= '<input id="task" type="text" name="task" />';
$form .= '<input name="add" type="submit" value="add" />';
$form .= '</form>';
 
// CREATE ID VARIABLE IF IT IS VALID
if(isset($_GET['action']) && isset($_GET['id']))
{
	$q = mysql_query('SELECT * FROM todo WHERE id = "'.$_GET['id'].'"');
	if(mysql_num_rows($q) != 0)
		$id = $_GET['id'];
	else
		$msg = "ERROR: id is not valid.";
}
 
// USE ID VARIABLE IF IT EXISTS
if(isset($id))
{
	// ADMIN CHECK
	if(isset($_SESSION["user"]))
	{
		// MOVE IN THE LIST (YOU MAY PREFER USING SWITCH)
		if($_GET['action'] == 'down' || $_GET['action'] == 'up')
		{
			// QUERY TO CHANGE IDs OF TASKS
			if($_GET['action'] == 'down')
				$q = mysql_query('SELECT id FROM todo WHERE id >= "'.$id.'" LIMIT 2');
			if($_GET['action'] == 'up')
				// CHANGE DIRECTION
				$q = mysql_query('SELECT id FROM todo WHERE id <= "'.$id.'" ORDER BY id DESC LIMIT 2');
 
			// IF THERE ARE TWO ROWS, GO FOR IT
			if(mysql_num_rows($q) == 2)
			{
				$c = 1;
				while($row = mysql_fetch_assoc($q))
				{
					// GET POSITIONS
					if($c++ == 1)
						$first = $row['id'];
					else
						$second = $row['id'];
				}
				// CHANGE POSITIONS (IDs)
				mysql_query('UPDATE todo SET id = "0" WHERE id ="'.$first.'"');
				mysql_query('UPDATE todo SET id = "'.$first.'" WHERE id ="'.$second.'"');
				mysql_query('UPDATE todo SET id = "'.$second.'" WHERE id ="0"');
				header('Location: ./index.php');
			}
		}
		// DONE - UNDONE
		elseif($_GET['action'] == 'mark')
		{
			$row = mysql_fetch_assoc($q);
			$mark = ($row['status'] + 1) % 2;
			$q = mysql_query('UPDATE todo SET status = "'.$mark.'" WHERE id = "'.$row['id'].'"');
			if($q)
				header('Location: ./index.php');
			else
				$msg = 'ERROR: database issue';
		}
		// DELETE
		elseif($_GET['action'] == 'delete')
		{
			$row = mysql_fetch_assoc($q);
			mysql_query('DELETE FROM todo WHERE id = "'.$id.'"');
			header('Location: ./index.php');
		}
		// EDIT ALSO CHANGES FORM
		elseif($_GET['action'] == 'edit')
		{
			$row = mysql_fetch_assoc($q);
			$form = '';
			$form .= '<form id="taskform" method="post">';
			$form .= '<label for="task">Task</label>';
			$form .= '<input id="task" type="text" name="task" value="'.htmlspecialchars(stripslashes($row['task'])).'" />';
			$form .= '<input type="hidden" name="id" value="'.$row['id'].'" />';
			$form .= '<input name="edit" type="submit" value="edit" />';
			$form .= '</form>';
		}
	}
	// ADMIN CHECK FAILS
	else
	{
		$msg = "ERROR: You don't have permission"; 
	}
}
 
// ADD NEW TASK
if(isset($_POST['add']))
{
	// REMOVE SPACES
	$task = trim($_POST['task']);
	// IF IT IS EMPTY
	if($task == '')
	{
		$msg = 'ERROR: fill in the blank';
	}
	else
	{
		$q = mysql_query('INSERT INTO todo(task) VALUES ("'.mysql_real_escape_string($task).'")');
		if($q)
			header('Location: ./index.php');
		else
			$msg = 'ERROR: database issue';
	}
}
 
// EDIT TASK
if(isset($_POST['edit']))
{
	$task = trim($_POST['task']);
	$id = $_POST['id'];
	if($task == '')
	{
		$msg = 'ERROR: fill in the blank';
	}
	else
	{
		$q = mysql_query('UPDATE todo SET task = "'.mysql_real_escape_string($task).'" WHERE id = "'.$id.'"');
		header('Location: ./index.php');
	}
}
 
// LOGIN USER
if(isset($_POST['login']))
{
	$user = trim($_POST['username']);
	$pw = trim($_POST['password']);
	if($user == '' || $pw == '')
	{
		$msg = 'ERROR: fill in all blanks';
	}
	else
	{
		$q = mysql_query('SELECT user FROM todo_admin WHERE user = "'.$user.'" AND password = "'.md5($pw).'"');
		// IF USER EXISTS
		if(mysql_num_rows($q) != 0)
		{
			$row = mysql_fetch_assoc($q);	
			$_SESSION["user"] = $row['user'];
			header('Location: ./index.php');
		}
		else
		{
			$msg = 'ERROR: wrong information, try again.';
		}
	}
}
 
// LOGOUT USER
if(isset($_POST['logout']))
{
	// EMPTY SESSION
	$_SESSION = array();
	header('Location: ./index.php');
}
?>
 
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"> 
 
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
	<meta http-equiv="Content-type" content="text/html; charset=utf-8">
	<title>To-Do List</title>
	<style>
	body {font:14px Arial,Verdana,sans-serif; text-align:center;}
	a {color:#000;}
	a:hover{color:#666;}
	label {padding:5px;}
	#message {text-align:center;border:solid 5px #666;margin-top:10px;margin-bottom:10px; padding:10px;}
	#container {width:800px;margin:0 auto; text-align:left;}
	#taskform input[type=text] {width:400px;height:20px;font-size:14px;}
	#taskform input[type=submit] {margin-left:5px;width:50px;font-size:14px;}
	#list {border:none;padding:0;margin:0;}
	#list tbody tr:hover {background:#b2b2b2;}
	#list tr td {padding:5px;}
	#list tr td img {margin-right:10px;}
	.check {background: #F5A9A9;}
 
	</style>
</head>
 
<body>
 
<div id="container">
 
<?php if(isset($msg)): ?>
<div id="message">
<?php echo $msg; ?>
</div>
<?php endif; ?>
 
<?php if(isset($_SESSION["user"])): ?>
<form method="post">
	<a href="./index.php" title="refresh">home</a>
	<input id="logout" name="logout" type="submit" value="logout" />
</form>
<hr/>
<?php echo $form; ?>
<hr/>
<?php else: ?>
<form method="post">
	<label for="username">username</label>
	<input id="username" type="text" name="username" value="admin" />
	<label for="password">password</label>
	<input id="password" type="password" name="password" value="1234" />
	<input name="login" type="submit" value="login" /> &raquo; admin 1234
</form>
<hr/>
<?php endif;
$q = mysql_query('SELECT * FROM todo ORDER BY id ASC');
if(mysql_num_rows($q) != 0):
?>
<table id="list">
	<thead>
		<tr>
		<th valign = "top" width="20">#</th>
		<th valign = "top" width="400">Task</th>
		<th valign = "top" width="150">Date</th>
		<?php if(isset($_SESSION["user"])): ?>
		<th valign = "top" width="200">Action</th>
		<?php endif; ?>
		</tr>
	</thead>
	<tbody>
		<?php
		$out = '';
		$i = 1;
		while($row = mysql_fetch_assoc($q))
		{
			$status = $row['status'];
			$id = $row['id'];
 
			$out .= '<tr'.(($status==1)?' class="check"':'').'>';
			$out .= '<td valign = "top">'.$i++.'</td>';
			$out .= '<td valign = "top">'.htmlspecialchars(stripslashes($row['task'])).'</td>';
			$out .= '<td valign = "top">'.$row['date'].'</td>';
			if(isset($_SESSION["user"]))
			{
			$out .= '<td valign = "top">';
			// done - undone
			$out .= '<a '.(($status==1)?'title="undone"':'title="done"').'href="./index.php?action=mark&id='.$id.'">'.(($status==1)?'<img src="./buttons/done.gif" alt="done" />':'<img src="./buttons/undone.gif" alt="undone" />').'</a>';
			// edit
			$out .= '<a title="edit" href="./index.php?action=edit&id='.$id.'"><img src="./buttons/edit.gif" alt="edit" /></a>';
			// delete
			$out .= '<a OnClick="return confirm(\'Are you sure?\');" title="delete" href="./index.php?action=delete&id='.$id.'"><img src="./buttons/delete.gif" alt="delete" /></a>';
			// up- down
			$out .= '<a title="move up" href="./index.php?action=up&id='.$id.'"><img src="./buttons/up.gif" alt="move up" /></a><a title="move down" href="./index.php?action=down&id='.$id.'"><img src="./buttons/down.gif" alt="move down" /></a>';
			$out .= '</td>';
			}
			$out .= '</tr>';
		}
		echo $out;
		?>
	</tbody>
</table>
<?php else: ?>
<p>There is nothing to do :(</p>
<?php endif; ?>
</div>
</body>
</html>

SET SQL_MODE="NO_AUTO_VALUE_ON_ZERO";
 
CREATE TABLE `todo` (
  `id` INT(11) NOT NULL AUTO_INCREMENT,
  `task` longtext NOT NULL,
  `status` enum('0','1') NOT NULL DEFAULT '0',
  `date` TIMESTAMP NOT NULL DEFAULT CURRENT_TIMESTAMP,
  PRIMARY KEY  (`id`)
) ENGINE=MyISAM  DEFAULT CHARSET=utf8 AUTO_INCREMENT=1 ;
 
CREATE TABLE `todo_admin` (
  `id` INT(11) NOT NULL AUTO_INCREMENT,
  `user` VARCHAR(40) CHARACTER SET utf8 NOT NULL,
  `password` VARCHAR(40) CHARACTER SET utf8 NOT NULL,
  PRIMARY KEY  (`id`)
) ENGINE=MyISAM  DEFAULT CHARSET=latin1 AUTO_INCREMENT=1 ;

<?php
// Get language array
$list = icl_get_languages('skip_missing=1&orderby=id&order=asc');
 
// Getting default language to first position
// Create a temporary array and hold its first position
$temp[0] = '';
foreach($list as $l)
{
	if($l['language_code'] == 'tr') // Turkish is default
		$temp[0] = $l; // assign default language to first position of temp array
	else
		array_push($temp, $l); // push other languages to temp
}
 
// change original with temp, then remove temp
$list = $temp;
unset($temp);
 
// print links (you can use your own style)
$print = '<ul class="myLanguageSwitcher">'."\n";
$c = count($list); // count languages
for($i=0;$i<count($list);$i++){
	// if the language is active, insert the class "active"
	$print .= '<li class="'.(($list[$i]['active']=='1')?'active':'');
	// if it's the last language in array, insert the class 'noBackground'
	if($i == $c - 1)
		$print .= ' noBackground';
	// create link of language with native name
	$print .= '"><a title="'.$list[$i]['native_name'].'" href="'.$list[$i]['url'].'">';
	$print .= $list[$i]['native_name'];
	$print .= '</a></li>'."\n";
}
$print .= '</ul>'
echo $print;
?>

<?php
class copyTable extends MG_Controller
{
function index()
{
// this is main method, you don't need to use it
}
}
?>

<?php
class copyTable extends MG_Controller
{
 
function index()
{
 
}
 
function moviesToFilms()
{
	$url = 'http://www.rahmetli.info/codeigniter/copyTable/moviesToFilms';
	$offset = $this->uri->segment(3);
	$limit = $this->uri->segment(4);
	$stop = $this->uri->segment(5);
 
	if($offset<$stop)
	{
		$q = $this->db->query('SELECT * FROM movies LIMIT '.$offset.','.$limit);
		foreach($q->result() as $row)
		{
			$data = array(
			'films_id' => $row->id,
			'films_name' => $row->name,
			'films_duration' => $row->duration
			);
 
			$this->db->insert('films', $data);
		}
	}
		// two optional lines:
		$q->free_result();
		unset($q);
 
		$offset = $offset+$limit;
		header("Location: $url/$off/$limit/$stop");
}
}
?>

Public Class Form1
    ' author: emin buğra saral
    ' version: 1.0 date: May 3, 2011
    ' .NET version: 4.0
    Dim wrongLetter As Integer = 0 'the number of how many times the man was hanged
    Dim word As String ' the word taken from wordlist (listbox)
    Dim screen() As String ' the screen array (kind of list) 
    Dim output As String  ' output which will be printed as _ _ _ A _ but it will get its value from screen array
    Dim known = 0 ' how many letters known
    Dim length = 0 ' how many letters there are in total
    Dim score = 0 ' score
    
    ' when the program run, this Load method will be called initially (main method)
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        ' call initial methods and hide the list (methods are below, check them for descriptions)
        createList()
        resetMan()
 
        ' at first, hide list, the alert text (WIN, LOSE ETC) and the panel covering the buttons
        wordList.Visible = False
        result.Visible = False
        errorPanel.Visible = False
 
        Randomize() ' needed to get different random numbers at each new run (closing and openings, not new games)
        word = generateRandomWord() ' get first word and delete it from list, attach it to word
        length = Len(word) ' Len() method gets the length of arrays or strings
        ReDim screen(length) ' each time when ReDim is being used, it changes them in length with given value which is Length 

        resetScreen() ' reset the output according to screen array
        puan.Text = score ' puan is the label on the left bottom corner which shows score
    End Sub
 
    ' we will handle all of the buttons as you see here after Handles. when one of them gets used, sender Object will refer to that clicked one
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click, Button2.Click, Button3.Click, Button4.Click, Button5.Click, Button6.Click, Button7.Click, Button8.Click, Button9.Click, Button10.Click, Button11.Click, Button12.Click, Button13.Click, Button14.Click, Button15.Click, Button16.Click, Button17.Click, Button18.Click, Button19.Click, Button20.Click, Button21.Click, Button22.Click, Button23.Click, Button24.Click, Button25.Click, Button26.Click, Button27.Click, Button28.Click, Button29.Click
        sender.Enabled = False
        Dim found = False ' that one will show if the word includes that button (letter)

        For i As Integer = 0 To Len(word) - 1 ' look over all of the letters in word
            If word(i) = sender.Text Then ' when ith letter of word equals to the clicked one (sender.text)
                found = True ' change found to true
                known = known + 1 ' increse the number of known letters
                screen(i) = word(i) + " " ' change ith _ (line) with that letter in screen array
            End If
        Next
 
        If (found = True) Then
            If (known = length) Then ' if all the letters are known
                winInfo() ' show win
            Else
                ' other wise create output again by using screen which is changed above, same procedure like in load method
                resetScreen()
            End If
        Else
            'if the user couldnt find the letter, increase the number of wrongLetter and use hangMan method. check this method for detail because it uses wrongLetter
            wrongLetter = wrongLetter + 1
            hangMan()
        End If
    End Sub
 
    ' make all buttons enabled : you can create an array too
    Private Sub refreshButtons()
        Button1.Enabled = True
        Button2.Enabled = True
        Button3.Enabled = True
        Button4.Enabled = True
        Button5.Enabled = True
        Button6.Enabled = True
        Button7.Enabled = True
        Button8.Enabled = True
        Button9.Enabled = True
        Button10.Enabled = True
        Button11.Enabled = True
        Button12.Enabled = True
        Button13.Enabled = True
        Button14.Enabled = True
        Button15.Enabled = True
        Button16.Enabled = True
        Button17.Enabled = True
        Button18.Enabled = True
        Button19.Enabled = True
        Button20.Enabled = True
        Button21.Enabled = True
        Button22.Enabled = True
        Button23.Enabled = True
        Button24.Enabled = True
        Button25.Enabled = True
        Button26.Enabled = True
        Button27.Enabled = True
        Button28.Enabled = True
        Button29.Enabled = True
    End Sub
 
    ' generate new word from list randomly and delete it from list
    Function generateRandomWord() As String
        ' if there is enough word left
        If (wordList.Items.Count > 0) Then
            Dim r = Int(Rnd() * (wordList.Items.Count - 1)) ' generate random number between 0 and total number of list minus 1
            Dim word = wordList.Items.Item(r) ' set the word at "random" position
            wordList.Items.RemoveAt(r) ' delete it from list
            Return word ' send the word outside
        Else
            ' CStr changes any value from double , int, or char to String.
            ' vbCrLf : new line 
            MsgBox(CStr("No More Words. Goodbye") + vbCrLf + CStr("Score: ") + CStr(score))
            End
        End If
    End Function
 
    ' hide the man
    Private Sub resetMan()
        LineShape1.Visible = False
        LineShape2.Visible = False
        LineShape3.Visible = False
        LineShape4.Visible = False
        LineShape5.Visible = False
        LineShape6.Visible = False
        LineShape7.Visible = False
        LineShape8.Visible = False
        LineShape9.Visible = False
    End Sub
 
    ' if the man is hanged 9th time, it means loseInfo needs to be called
    Private Sub hangMan()
        Select Case wrongLetter
            Case 1
                LineShape1.Visible = True
            Case 2
                LineShape2.Visible = True
            Case 3
                LineShape3.Visible = True
            Case 4
                LineShape4.Visible = True
            Case 5
                LineShape5.Visible = True
            Case 6
                LineShape6.Visible = True
            Case 7
                LineShape7.Visible = True
            Case 8
                LineShape8.Visible = True
            Case 9
                LineShape9.Visible = True
                loseInfo()
        End Select
    End Sub
 
    ' adds each word to wordList (listbox) by using its own methods, you can also get words from a text file
    Private Sub createList()
        wordList.Items.Add("WORDONE")
        wordList.Items.Add("WORDTWO")
        wordList.Items.Add("WORDTHREE")
        wordList.Items.Add("...")
    End Sub
 
    Private Sub winInfo()
        errorPanel.Visible = True
        result.Visible = True
        result.ForeColor = Color.Green
        result.Text = "WIN! :)"
        resetScreen()
        score = score + 10
        puan.Text = score
    End Sub
 
    Private Sub loseInfo()
        errorPanel.Visible = True
        result.Visible = True
        result.Visible = True
        result.ForeColor = Color.Red
        result.Text = "LOSE! :("
        resetScreen()
        score = score - 10
        puan.Text = score
    End Sub
 
    Private Sub ExitGame_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ExitGame.Click
        End
    End Sub
 
    Private Sub NewGame_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NewGame.Click
       ' reset everything
        wrongLetter = 0
        known = 0
        length = 0
        word = generateRandomWord()
        length = Len(word)
        errorPanel.Visible = False
        result.Visible = False
        resetMan()
        refreshButtons()
        resetScreen()
    End Sub
 
    Private Sub resetScreen()
         output = ""
         For i As Integer = 0 To length - 1
              screen(i) = "_ " ' screen(i) means i'th element of screen array
              output = output + screen(i) ' attach that element to output with output's current value. initial value of output is "" which means empty
          Next
          Label1.Text = output ' send it to form    
     End Sub
End Class

-- Author : Emin Bugra Saral
-- Author Website : http://www.rahmetli.info
-- Sources : http://www.adobe.com/products/indesign/scripting/pdfs/InDesignCS4_ScriptingGuide_AS.pdf
-- Purpose : Changing brightness and contrast of an image in InDesign CS4 by using Photoshop CS4
-- Warning: Please be sure you read "readme.txt"
 
tell application "Adobe InDesign CS4"
	activate
	-- default values :
	set defaultBValue to 80
	set defaultCValue to 0
	set defaultSaveValue to false
 
	-- create dialog
	set adjuster to make dialog
	tell adjuster
 
		-- title
		set name to "Brightness and Contrast settings for Photoshop CS4"
 
		set myColumn to make dialog column
		tell myColumn
 
			-- bordered area, asking for values
			set myBorder to make border panel
			tell myBorder
				make static text with properties {static label:"Brightness Level % "}
				set brightnessLevel to make integer editbox with properties {edit value:defaultBValue}
				make static text with properties {static label:"Contrast Level % "}
				set contrastLevel to make integer editbox with properties {edit value:defaultCValue}
			end tell
 
			-- unbordered area, asking before saving
			set saving to make checkbox control with properties {static label:"Ask me before saving", checked state:defaultSaveValue}
 
			-- showing limits
			make static text with properties {static label:""}
			make static text with properties {static label:"Brightness must be between -150 and 150"}
			make static text with properties {static label:"Contrast must be between -50 and 100"}
 
		end tell
	end tell
 
	-- InDesign - Photoshop controlling
	if selection = {} then
		-- if nothing is selected
		display dialog "You did NOT select anything!" with icon 0
	else if class of item 1 of selection is in {rectangle, oval, polygon} or class of item 1 of selection is in {image, PDF, EPS} then
 
		-- checking if the image is directly selected or not
		if class of item 1 of selection is in {rectangle, oval, polygon} then -- frame
			set imageLink to item link of graphic 1 of selection
			set imagePath to file path of item link of graphic 1 of selection
		else if class of item 1 of selection is in {image, PDF, EPS} then -- directly
			set imageLink to item link of item 1 of selection
			set imagePath to file path of item link of item 1 of selection
		end if
 
		-- myStatus holds for controlling input errors, to continue the while loop
		set myStatus to true
		repeat while myStatus is true
			set showAdjuster to show adjuster
 
			-- if user pressed OK
			if showAdjuster is true then
 
				-- saving result check to define parameter will be used in PS CS4
				if checked state of saving is true then
					set savingParam to ask
				else
					set savingParam to yes
				end if
 
				-- initialize error message
				set errorMsg to null
 
				-- define variables from inputs which will be used in PS CS4
				set theBrightness to edit value of brightnessLevel
				set theContrast to edit value of contrastLevel
 
				-- some logic statements
				if theBrightness is 0 and theContrast is 0 then
					set myStatus to false
					destroy adjuster
				else if theBrightness > 150 then
					set errorMsg to "Brightness Level cannot be greater than 150"
					set edit value of brightnessLevel to 150
				else if theBrightness < -150 then 					set errorMsg to "Brightness Level cannot be less than -150" 					set edit value of brightnessLevel to -150 				else if theContrast > 100 then
					set errorMsg to "Contrast Level cannot be greater than 100"
					set edit value of contrastLevel to 100
				else if theContrast < -50 then
					set errorMsg to "Contrast Level cannot be less than -50"
					set edit value of contrastLevel to -50
				else
					-- stop while loop and open PS CS4
					set myStatus to false
					destroy adjuster
 
					tell application "Adobe Photoshop CS4"
						activate
						open file imagePath
						-- adjustment function with parameters taken above
						adjust current layer of the current document using brightness and contrast with options {class:brightness and contrast, brightness level:theBrightness, contrast level:theContrast}
						-- saving with the parameter taken above
						close document 1 saving savingParam
					end tell
 
					-- time to pass on InDesign CS4
					tell application "Adobe InDesign CS4"
						activate
						-- refresh the image
						relink imageLink to file imagePath
					end tell
				end if
 
				-- if there was any error in logic, show it to the user
				if errorMsg is not null then
					display dialog errorMsg with icon 0
				end if
			else
				-- if the user pressed CANCEL, destroy everything and stop while loop
				destroy adjuster
				set myStatus to false
			end if
		end repeat
	else
		-- if the selected thing is neither an image's frame nor image
		display dialog "Please select an image frame!" with icon 0
	end if
end tell

-- Author : Emin Bugra Saral
-- Author Website : http://www.rahmetli.info
-- Sources : http://macscripter.net/viewtopic.php?id=31867
-- Purpose : Automatically open with Photoshop CS4 in InDesign CS4 script
-- Warning: Please be sure you read "readme.txt"
 
tell application "Adobe InDesign CS4"
	activate
	if selection = {} then
		-- if nothing is selected
		display dialog "You did NOT select anything!" with icon 0
	else if class of item 1 of selection is in {rectangle, oval, polygon} then
		-- if the image's frame is selected
		set imagePath to file path of item link of graphic 1 of selection
		tell application "Adobe Photoshop CS4"
			activate
			open file imagePath
		end tell
	else if class of item 1 of selection is in {image, PDF, EPS} then
		-- if the image is selected
		set imagePath to file path of item link of item 1 of selection
		tell application "Adobe Photoshop CS4"
			activate
			open file imagePath
		end tell
	else
		-- if the selected thing is neither an image's frame nor image
		display dialog "Please select an image frame!" with icon 0
	end if
end tell