Теми рефератів
> Реферати > Курсові роботи > Звіти з практики > Курсові проекти > Питання та відповіді > Ессе > Доклади > Учбові матеріали > Контрольні роботи > Методички > Лекції > Твори > Підручники > Статті Контакти
Реферати, твори, дипломи, практика » Курсовые обзорные » Імітаційна модель на мові GPSS / H системи поповнення цехового складу деталей

Реферат Імітаційна модель на мові GPSS / H системи поповнення цехового складу деталей





стка вліво. "); (300,440," -> - Пастка вправо. "); p> outtextxy (300,460, "Esc - Пауза, вихід в меню.");

setcolor (5);

outtextxy (150,440, ns.name);

// В принципі, гра починається з цього моменту, отрисовка об'єктів у початкових положеннях

for

{for (i = 0; i <= n-1; i + +)// Ховаємо всі об'єкти> hide (sg.x [i], sg.y [i]);> hide (sg.x [ 5], sg.y [5]); (st)// "тимчасова" перевірка

{

case 45: {step = 2 ;//швидкість

n = N-1;// кількість куль

break;

} 30: {step = 4 ;//--/-- = N-2;// --/--;

} 15: {step = 6 ;//--/-- = N-3;// --/--;

}

case 0: {flag = 1;// Кінець гри

}

}

// Запис значень в структуру для здійснення збережень

sg.n = n;. time = st;. score = sn;. step = step; = getch (); (key)

{37: {if (sg.x [N]! = 20)// Пастка вліво

{c-> hide (sg.x [N], sg.y [N]);. x [N] - = 20;> show (sg.x [N], sg.y [N ]);

};

} 39: {if (sg.x [N]! = 620)// Пастка вправо

{c-> hide (sg.x [N], sg.y [N]);. x [N] + = 20;> show (sg.x [N], sg.y [N ]);

};

} 27: {save = fopen (savepath, "wb") ;//Пауза (& sg, sizeof (sg), 1, save) ;//Запис збереження

fclose (save);

Pause ();

break;

}

}

for (i = 0; i <= n-1; i + +)// Провека на зіткнення куль з пасткою

if ((sg.y [i]> = 390) && (sg.x [i]> = sg.x [4] -20) && (sg.x [i ] <= sg.x [4] +20)) sn + +;// Звичайний куля (sn> 0 && (sg.y [5]> = 390) && (sg.x [5 ]> = sg.x [4] -20) && (sg.x [5] <= sg.x [4] +20)) sn -;// Шкідливий куля

// перевірка на дотяженіе куль "мертвої зони"

for (i = 0; i <= n-1; i + +)

{if (sg.y [i] <390) sg.y [i] + = (1 + i) * step; {. x [i] = 20 + rand ()% 620;. y [ i] = 0;

}

} (sg.y [5] <390) sg.y [5] + = (1 + i) * step; {. x [5] = 20 + rand ()% 620;. y [5 ] = 0;}

// Отрісовка об'єктів

for (i = 0; i <= n-1; i + +)

{nb-> show (sg.x [i], sg.y [i]);

}> show (sg.x [5], sg.y [5]);

// час = clock () ;//Поточний час = stt-(t2-t1)/CLOCKS_PER_SEC;// Обчислення залишився

bar (60,424,78,436) ;//Зафарбовування старої інформації

bar (60,444,78,456); (150,424,160,436); (DEFAULT_FONT, HORIZ_DIR, 16); (5);

setfillstyle (1, BLUE);// Запис нової інформації

outtextxy (60,420, time) ;//Інформаційна зона, Час

outtextxy (60,440, score) ;//Інформаційна зона, Окуляри

outtextxy (150,420, level) ;//Інформаційна зона, Рівень

setfillstyle (1, GREEN);

bar (0,401,640,420);

sleep (10);

}

ns.score = sn;// Запис кол-ва набраних очок

cleardevice (); nb; bb;// Шкідливий шарc; (DEFAULT_FONT, HORIZ_DIR, 20); (YELLOW) ;//Висновок вікна "завершення гри"

outtextxy (60,60, "Гра закінчена!");

outtextxy (60,120, "Ви набрали:");

outtextxy (300,230, "очок");

outtextxy (60,400, ...


Назад | сторінка 8 з 10 | Наступна сторінка





Схожі реферати:

  • Реферат на тему: STEP і GAP аналіз
  • Реферат на тему: Гра "Пастка"
  • Реферат на тему: Ukrainian break-through in the European and World strategy of individual pr ...
  • Реферат на тему: CASE-технології в моделюванні даних інформаційної системи Call-центру
  • Реферат на тему: Проектування інформаційної системи &Лізингова компанія& з використанням cas ...