icallresearch

This is a piece of software I implemented when I was student at the University of Franche-Comté, Besançon, France.
After entering a determinant, adjective and noun, the program computes the adjective endings for cases in German depending on the adjective itself and the type of determinant.

COMBINAI.PRO
/*Sylvie THOUESNY - 01/05/2000 */
code=8000
project “accord”
include “globdef.pro”
goal
go.
clauses
/*
*******************
détail des fenêtres
*******************
window(1) : bandeau supérieur
window(2) : demande cas genre nombre
window(3) : bandeau inférieur noir
window(4) : bandeau inférieur erreur saisie
window(5) : accueil
window(6) : bandeau recommencer recherche
window(7) : final
~~~~~~~~~~~~~~~~~~~~
*/
go:-
   clearwindow,
   makewindow(1,113,14,"",0,0,5,80),
   makewindow(2,14,0,"",5,0,17,80),
   makewindow(4,4,0,"",22,0,3,80),
   write(“ Erreur dans la saisie, “),
   write(“recommencez s’il vous plait !”),
   makewindow(3,14,0,””,22,0,3,80),
   makewindow(5,14,0,””,5,0,17,80),
   départ.

Départ:-
   repete,
  shiftwindow(3),

[more... pdf]



Last revised on April 2019 - Copyright © 2007 onwards, Sylvie THOUËSNY, all rights reserved All the content of this website is licensed under a Creative Commons Attribution-Noncommercial-No Derivative License