'I', 'You', 'He/she/it', 'We', 'You', 'They'); $be = array(1 => 'was', 'were', 'was', 'were', 'were', 'were'); $words = explode(' ', $verb); // if there is a preposition after the verb $question = $persons[$person].' '; if ($negative) { if ($words[0]=='be') { $question .= $be[$person] . " not"; } else { $question .= "did not $words[0]"; } } else { if ($words[0]=='be') { $question .= $be[$person]; } else { $question .= verbPast($words[0]); } } for ($i=1; $i Simple Past Test \n

Tenses

\n"; print "

You have answered all questions correctly. Try to conjugate another verb.\n"; exit("

Back to the Persian Tests"); } print "\n"; } else { print "\n"; } ?>

Tenses

Please translate to Persian:

"> ".GetQuestion($persons[$i-1], $neg[$i-1], $verbs[$i-1][3]); print ""; print ""; print "
".Answer($i, 0)."
".Answer($i, 1)."
".Answer($i, 2)."
"; } print "

"; function Answer($q, $a) { global $pastStem, $presStem, $presStemTrans, $qtypes, $questions, $persons, $neg, $isPersScript, $noBeInSubjunctive; switch ($qtypes[$q-1][$a]) { case 0: $t = ($neg[$q-1]) ? 12 : 1; return Conjugate($pastStem, $presStem, $presStemTrans, $t, $questions[$q-1][$a]); break; case 1: $t = $questions[$q-1][$a]; if ($neg[$q-1]==0) { $t = ($t==13) ? 2 : 9; } return Conjugate($pastStem, $presStem, $presStemTrans, $t, $persons[$q-1], false, $noBeInSubjunctive); break; case 2: $t = ($neg[$q-1]) ? 12 : 1; return Conjugate($pastStem, $presStem, $presStemTrans, $t, $questions[$q-1][$a]); break; case 3: $s = Conjugate($pastStem, $presStem, $presStemTrans, 12, $persons[$q-1]); if (strpos($s, ' ')) { $s = explode(' ', $s); $s = $s[0].' '.substr($s[1], 0, 2).($isPersScript?'ه ':' ').substr($s[1], 2); } else { $s = substr($s, 0, 2).($isPersScript?'ه ':' ').substr($s, 2); } return $s; break; case 4: $t = ($neg[$q-1]==1) ? 12 : 1; $s = explode('|', $questions[$q-1][$a]); return Conjugate(substr($s[0], 0, strlen($s[0])-2), $s[1], $s[2], $t, $persons[$q-1]); break; default: break; } } ?>


Persian Verb Conjugator

Back to the Persian Tests