createCanvas(windowWidth,windowHeight);
let boxWidth=(width-140)/6;boxHeight=(height-160)/8;
a1=[null];a2=[null];a3=[null];a4=[null];a5=[null];a6=[null];a7=[null];b1=[null];b2=[null];b3=[null];b4=[null];b5=[null];b6=[null];b7=[null];c1=[null];c2=[null];c3=[null];c4=[null];c5=[null];c6=[null];c7=[null];d1=[null];d2=[null];d3=[null];d4=[null];d5=[null];d6=[null];d7=[null];e1=[null];e2=[null];e3=[null];e4=[null];e5=[null];e6=[null];e7=[null];
a1c=0;a2c=0;a3c=0;a4c=0;a5c=0;a6c=0;a7c=0;b1c=0;b2c=0;b3c=0;b4c=0;b5c=0;b6c=0;b7c=0;c1c=0;c2c=0;c3c=0;c4c=0;c5c=0;c6c=0;c7c=0;d1c=0;d2c=0;d3c=0;d4c=0;d5c=0;d6c=0;d7c=0;e1c=0;e2c=0;e3c=0;e4c=0;e5c=0;e6c=0;e7c=0;
clearbotton=createButton('Clear');
clearbotton.size(boxWidth,boxHeight);
clearbotton.position(115+boxWidth*5,65+boxHeight*4);
clearbotton.mousePressed(restart);
NameInput=createInput('授業名をここに入力(収まらない場合は半角スペースで改行)');
NameInput.size(boxWidth*2,boxHeight-6);
NameInput.position(25,135+boxHeight*7);
CreditInput=createInput('単位数をここに入力');
CreditInput.size(boxWidth-10,boxHeight-6);
CreditInput.position(45+boxWidth*2,135+boxHeight*7)
c=a1c+a2c+a3c+a4c+a5c+a6c+a7c+b1c+b2c+b3c+b4c+b5c+b6c+b7c+c1c+c2c+c3c+c4c+c5c+c6c+c7c+d1c+d2c+d3c+d4c+d5c+d6c+d7c+e1c+e2c+e3c+e4c+e5c+e6c+e7c;
DaySelect=createSelect();
DaySelect.size(boxWidth,boxHeight);
DaySelect.position(55+boxWidth*3,135+boxHeight*7);
DaySelect.option('曜日を選択',0);
DaySelect.option('月曜日',1);
DaySelect.option('火曜日',2);
DaySelect.option('水曜日',3);
DaySelect.option('木曜日',4);
DaySelect.option('金曜日',5);
PeriodSelect=createSelect();
PeriodSelect.size(boxWidth,boxHeight);
PeriodSelect.position(65+boxWidth*4,135+boxHeight*7);
PeriodSelect.option('時間を選択',0);
PeriodSelect.option('1',1);
PeriodSelect.option('2',2);
PeriodSelect.option('3',3);
PeriodSelect.option('4',4);
PeriodSelect.option('5',5);
PeriodSelect.option('6',6);
PeriodSelect.option('7',7);
inputbotton=createButton('Input');
inputbotton.size(boxWidth,boxHeight);
inputbotton.position(115+boxWidth*5,135+boxHeight*7);
inputbotton.mousePressed(input);
a1=[null];a2=[null];a3=[null];a4=[null];a5=[null];a6=[null];a7=[null];b1=[null];b2=[null];b3=[null];b4=[null];b5=[null];b6=[null];b7=[null];c1=[null];c2=[null];c3=[null];c4=[null];c5=[null];c6=[null];c7=[null];d1=[null];d2=[null];d3=[null];d4=[null];d5=[null];d6=[null];d7=[null];e1=[null];e2=[null];e3=[null];e4=[null];e5=[null];e6=[null];e7=[null];
a1c=0;a2c=0;a3c=0;a4c=0;a5c=0;a6c=0;a7c=0;b1c=0;b2c=0;b3c=0;b4c=0;b5c=0;b6c=0;b7c=0;c1c=0;c2c=0;c3c=0;c4c=0;c5c=0;c6c=0;c7c=0;d1c=0;d2c=0;d3c=0;d4c=0;d5c=0;d6c=0;d7c=0;e1c=0;e2c=0;e3c=0;e4c=0;e5c=0;e6c=0;e7c=0;
loaddata = loadTable('C:/assets/mammals.csv', 'csv', 'header')
let savedata = new p5.Table();
let newRow = savedata.addRow();
saveTable(savedata, 'test.csv')
let boxWidth=(width-140)/6,boxHeight=(height-160)/8;
p=PeriodSelect.selected();
a1c=int(CreditInput.value());
a2c=int(CreditInput.value());
a3c=int(CreditInput.value());
a4c=int(CreditInput.value());
a5c=int(CreditInput.value());
a6c=int(CreditInput.value());
a7c=int(CreditInput.value());
b1c=int(CreditInput.value());
b2c=int(CreditInput.value());
b3c=int(CreditInput.value());
b4c=int(CreditInput.value());
b5c=int(CreditInput.value());
b6c=int(CreditInput.value());
b7c=int(CreditInput.value());
c1c=int(CreditInput.value());
c2c=int(CreditInput.value());
c3c=int(CreditInput.value());
c4c=int(CreditInput.value());
c5c=int(CreditInput.value());
c6c=int(CreditInput.value());
c7c=int(CreditInput.value());
d1c=int(CreditInput.value());
d2c=int(CreditInput.value());
d3c=int(CreditInput.value());
d4c=int(CreditInput.value());
d5c=int(CreditInput.value());
d6c=int(CreditInput.value());
d7c=int(CreditInput.value());
e1c=int(CreditInput.value());
e2c=int(CreditInput.value());
e3c=int(CreditInput.value());
e4c=int(CreditInput.value());
e5c=int(CreditInput.value());
e6c=int(CreditInput.value());
e7c=int(CreditInput.value());
c=a1c+a2c+a3c+a4c+a5c+a6c+a7c+b1c+b2c+b3c+b4c+b5c+b6c+b7c+c1c+c2c+c3c+c4c+c5c+c6c+c7c+d1c+d2c+d3c+d4c+d5c+d6c+d7c+e1c+e2c+e3c+e4c+e5c+e6c+e7c;
let boxWidth=(width-140)/6,boxHeight=(height-160)/8;
textLeading(boxHeight/3);
text(a1,25,25,boxWidth,boxHeight);
text(a2,25,35+boxHeight,boxWidth,boxHeight);
text(a3,25,45+boxHeight*2,boxWidth,boxHeight);
text(a4,25,55+boxHeight*3,boxWidth,boxHeight);
text(a5,25,65+boxHeight*4,boxWidth,boxHeight);
text(a6,25,75+boxHeight*5,boxWidth,boxHeight);
text(a7,25,85+boxHeight*6,boxWidth,boxHeight);
text(b1,35+boxWidth,25,boxWidth,boxHeight);
text(b2,35+boxWidth,35+boxHeight,boxWidth,boxHeight);
text(b3,35+boxWidth,45+boxHeight*2,boxWidth,boxHeight);
text(b4,35+boxWidth,55+boxHeight*3,boxWidth,boxHeight);
text(b5,35+boxWidth,65+boxHeight*4,boxWidth,boxHeight);
text(b6,35+boxWidth,75+boxHeight*5,boxWidth,boxHeight);
text(b7,35+boxWidth,85+boxHeight*6,boxWidth,boxHeight);
text(c1,45+boxWidth*2,25,boxWidth,boxHeight);
text(c2,45+boxWidth*2,35+boxHeight,boxWidth,boxHeight);
text(c3,45+boxWidth*2,45+boxHeight*2,boxWidth,boxHeight);
text(c4,45+boxWidth*2,55+boxHeight*3,boxWidth,boxHeight);
text(c5,45+boxWidth*2,65+boxHeight*4,boxWidth,boxHeight);
text(c6,45+boxWidth*2,75+boxHeight*5,boxWidth,boxHeight);
text(c7,45+boxWidth*2,85+boxHeight*6,boxWidth,boxHeight);
text(d1,55+boxWidth*3,25,boxWidth,boxHeight);
text(d2,55+boxWidth*3,35+boxHeight,boxWidth,boxHeight);
text(d3,55+boxWidth*3,45+boxHeight*2,boxWidth,boxHeight);
text(d4,55+boxWidth*3,55+boxHeight*3,boxWidth,boxHeight);
text(d5,55+boxWidth*3,65+boxHeight*4,boxWidth,boxHeight);
text(d6,55+boxWidth*3,75+boxHeight*5,boxWidth,boxHeight);
text(d7,55+boxWidth*3,85+boxHeight*6,boxWidth,boxHeight);
text(e1,65+boxWidth*4,25,boxWidth,boxHeight);
text(e2,65+boxWidth*4,35+boxHeight,boxWidth,boxHeight);
text(e3,65+boxWidth*4,45+boxHeight*2,boxWidth,boxHeight);
text(e4,65+boxWidth*4,55+boxHeight*3,boxWidth,boxHeight);
text(e5,65+boxWidth*4,65+boxHeight*4,boxWidth,boxHeight);
text(e6,65+boxWidth*4,75+boxHeight*5,boxWidth,boxHeight);
text(e7,65+boxWidth*4,85+boxHeight*6,boxWidth,boxHeight);
strokeWeight(boxHeight/30)
if(25<mouseX&&mouseX<25+boxWidth&&25<mouseY&&mouseY<25+boxHeight){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(a1c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(25<mouseX&&mouseX<25+boxWidth&&35+boxHeight<mouseY&&mouseY<35+boxHeight*2){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(a2c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(25<mouseX&&mouseX<25+boxWidth&&45+boxHeight*2<mouseY&&mouseY<45+boxHeight*3){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(a3c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(25<mouseX&&mouseX<25+boxWidth&&55+boxHeight*3<mouseY&&mouseY<55+boxHeight*4){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(a4c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(25<mouseX&&mouseX<25+boxWidth&&65+boxHeight*4<mouseY&&mouseY<65+boxHeight*5){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(a5c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(25<mouseX&&mouseX<25+boxWidth&&75+boxHeight*5<mouseY&&mouseY<75+boxHeight*6){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(a6c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(25<mouseX&&mouseX<25+boxWidth&&85+boxHeight*6<mouseY&&mouseY<85+boxHeight*7){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(a7c,mouseX,mouseY,boxWidth/4,boxHeight/2)
} if(35+boxWidth<mouseX&&mouseX<35+boxWidth*2&&25<mouseY&&mouseY<25+boxHeight){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(b1c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(35+boxWidth<mouseX&&mouseX<35+boxWidth*2&&35+boxHeight<mouseY&&mouseY<35+boxHeight*2){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(b2c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(35+boxWidth<mouseX&&mouseX<35+boxWidth*2&&45+boxHeight*2<mouseY&&mouseY<45+boxHeight*3){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(b3c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(35+boxWidth<mouseX&&mouseX<35+boxWidth*2&&55+boxHeight*3<mouseY&&mouseY<55+boxHeight*4){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(b4c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(35+boxWidth<mouseX&&mouseX<35+boxWidth*2&&65+boxHeight*4<mouseY&&mouseY<65+boxHeight*5){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(b5c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(35+boxWidth<mouseX&&mouseX<35+boxWidth*2&&75+boxHeight*5<mouseY&&mouseY<75+boxHeight*6){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(b6c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(35+boxWidth<mouseX&&mouseX<35+boxWidth*2&&85+boxHeight*6<mouseY&&mouseY<85+boxHeight*7){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(b7c,mouseX,mouseY,boxWidth/4,boxHeight/2)
} if(45+boxWidth*2<mouseX&&mouseX<45+boxWidth*3&&25<mouseY&&mouseY<25+boxHeight){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(c1c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(45+boxWidth*2<mouseX&&mouseX<45+boxWidth*3&&35+boxHeight<mouseY&&mouseY<35+boxHeight*2){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(c2c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(45+boxWidth*2<mouseX&&mouseX<45+boxWidth*3&&45+boxHeight*2<mouseY&&mouseY<45+boxHeight*3){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(c3c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(45+boxWidth*2<mouseX&&mouseX<45+boxWidth*3&&55+boxHeight*3<mouseY&&mouseY<55+boxHeight*4){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(c4c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(45+boxWidth*2<mouseX&&mouseX<45+boxWidth*3&&65+boxHeight*4<mouseY&&mouseY<65+boxHeight*5){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(c5c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(45+boxWidth*2<mouseX&&mouseX<45+boxWidth*3&&75+boxHeight*5<mouseY&&mouseY<75+boxHeight*6){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(c6c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(45+boxWidth*2<mouseX&&mouseX<45+boxWidth*3&&85+boxHeight*6<mouseY&&mouseY<85+boxHeight*7){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(c7c,mouseX,mouseY,boxWidth/4,boxHeight/2)
} if(55+boxWidth*3<mouseX&&mouseX<55+boxWidth*4&&25<mouseY&&mouseY<25+boxHeight){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(d1c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(55+boxWidth*3<mouseX&&mouseX<55+boxWidth*4&&35+boxHeight<mouseY&&mouseY<35+boxHeight*2){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(d2c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(55+boxWidth*3<mouseX&&mouseX<55+boxWidth*4&&45+boxHeight*2<mouseY&&mouseY<45+boxHeight*3){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(d3c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(55+boxWidth*3<mouseX&&mouseX<55+boxWidth*4&&55+boxHeight*3<mouseY&&mouseY<55+boxHeight*4){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(d4c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(55+boxWidth*3<mouseX&&mouseX<55+boxWidth*4&&65+boxHeight*4<mouseY&&mouseY<65+boxHeight*5){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(d5c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(55+boxWidth*3<mouseX&&mouseX<55+boxWidth*4&&75+boxHeight*5<mouseY&&mouseY<75+boxHeight*6){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(d6c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(55+boxWidth*3<mouseX&&mouseX<55+boxWidth*4&&85+boxHeight*6<mouseY&&mouseY<85+boxHeight*7){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(d7c,mouseX,mouseY,boxWidth/4,boxHeight/2)
} if(65+boxWidth*4<mouseX&&mouseX<65+boxWidth*5&&25<mouseY&&mouseY<25+boxHeight){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(e1c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(65+boxWidth*4<mouseX&&mouseX<65+boxWidth*5&&35+boxHeight<mouseY&&mouseY<35+boxHeight*2){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(e2c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(65+boxWidth*4<mouseX&&mouseX<65+boxWidth*5&&45+boxHeight*2<mouseY&&mouseY<45+boxHeight*3){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(e3c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(65+boxWidth*4<mouseX&&mouseX<65+boxWidth*5&&55+boxHeight*3<mouseY&&mouseY<55+boxHeight*4){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(e4c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(65+boxWidth*4<mouseX&&mouseX<65+boxWidth*5&&65+boxHeight*4<mouseY&&mouseY<65+boxHeight*5){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(e5c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(65+boxWidth*4<mouseX&&mouseX<65+boxWidth*5&&75+boxHeight*5<mouseY&&mouseY<75+boxHeight*6){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(e6c,mouseX,mouseY,boxWidth/4,boxHeight/2)
}if(65+boxWidth*4<mouseX&&mouseX<65+boxWidth*5&&85+boxHeight*6<mouseY&&mouseY<85+boxHeight*7){
rect(mouseX,mouseY,boxWidth/4,boxHeight/2,5)
text(e7c,mouseX,mouseY,boxWidth/4,boxHeight/2)
rect(90+boxWidth*5,0,50+boxWidth,110+boxHeight*7,10);
rect(115+boxWidth*5,25,boxWidth,10+boxHeight*2,5);
line(115+boxWidth*5,25+boxHeight,115+boxWidth*6,25+boxHeight)
textLeading(boxHeight/3);
text('単位数',115+boxWidth*5,25,boxWidth,boxHeight)
text(c,115+boxWidth*5,35+boxHeight,boxWidth,boxHeight)
rect(0,110+boxHeight*7,width,50+boxHeight,10)