const C : array['1'..'9'] of integer = (25,29,33,38,42,46,51,55,59);
const L : array['A'..'I'] of integer = (23,25,27,30,32,34,37,39,41);
{...}
{ v := C[Col]; // Col doit etre un char entre '1' et '9' }
{ h := L[Lig]; // Lig doit etre un char entre 'A' et 'I' }
function c(col: char): integer;
var n: integer;
begin
n := ord(col)-ord('1');
c := 25+(n div 3)*13+4*(n mod 3);
end;
function l(lig:char): integer;
var n: integer;
begin
n := ord(lig)-ord('A');
l := 23+(n div 3)*7+2*(n mod 3);
end;
Utilisateurs parcourant ce forum : Aucun utilisateur enregistré et 36 invités
Tu pars déja ?
Identification
Pas encore inscrit ?
Ou identifiez-vous :