You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
87 lines
1.8 KiB
87 lines
1.8 KiB
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include "turing.h"
|
|
#include "const.h"
|
|
|
|
// Turing print defines functions that take a list, take a position in that list and print the list with a pointer to that position.
|
|
// It prints this vertically
|
|
|
|
int length(int *List){
|
|
int i =0;
|
|
|
|
while (List[i]<9){ // Por cómo construimos nuestras listas.
|
|
i=i+1;
|
|
}
|
|
|
|
/*Anecdóticamente, el siguiente código da error.
|
|
i=0;
|
|
while (List[i]<=9){
|
|
i=i+1;
|
|
}
|
|
Y lo hace porque al asignar un trozo de memoria,
|
|
si la lista tiene, p.ej., longitud 6,
|
|
List[0] hasta Lista[5] son la lista de verdad,
|
|
pero Lista[6] <9, y la sigue contando.
|
|
*/
|
|
|
|
fprintf(stdout, "%d",i+1);
|
|
return i+1;
|
|
}
|
|
|
|
void print_lista(int*L, int length, int position){
|
|
if(L==NULL || length <= position){
|
|
fprintf(stdout, "\nError en prettyprint");
|
|
}
|
|
else{
|
|
int i=0;
|
|
char tabs[]="\t\t\t\t\t\t\t\0";
|
|
for(i=0; i<length; i++){
|
|
if(i==position){
|
|
fprintf(stdout, "\n%s{",tabs);
|
|
}
|
|
else{
|
|
fprintf(stdout, "\n%s",tabs);
|
|
}
|
|
|
|
if( L[i]==0){
|
|
fprintf(stdout, "T");
|
|
|
|
}
|
|
|
|
else if(L[i]==8){
|
|
fprintf(stdout, "X");
|
|
}
|
|
|
|
else if(L[i]==9){
|
|
fprintf(stdout, "W");
|
|
}
|
|
|
|
else{
|
|
fprintf(stdout, "%d",L[i]);
|
|
}
|
|
|
|
if(i==position){
|
|
fprintf(stdout, "}\n");
|
|
}
|
|
else{
|
|
fprintf(stdout, "\n");
|
|
}
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
void print_variables(int state, int position, int symbol, int movement){
|
|
char tabs[]="\t\t\t\t\t\t\t\0";
|
|
fprintf(stdout,"\n%sState =%d\n",tabs,state);
|
|
fprintf(stdout,"\n%sPosition =%d\n",tabs,position);
|
|
fprintf(stdout,"\n%sSymbol =%d\n",tabs,symbol);
|
|
fprintf(stdout,"\n%sMovement =%d\n\n",tabs,movement);
|
|
}
|
|
|
|
void print_linea(){
|
|
char tabs[]="\t\t\0";
|
|
fprintf(stdout,"\n%s__________________________________________________________________________________________\n",tabs);
|
|
}
|