Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- // http://processing.org/reference/
- int X[], Y[], Dydis[]; // masyvai: greičiai, koordinatės, ir pataikymų skaitliukas
- int N=10; // masyvų dydis
- int n=5; // pradinis matomų "žvaigždžių" kiekis
- int pitagoras(int a, int b){ return int(sqrt(a*a+b*b)); }
- void setup() {
- size(300, 400);
- X = new int[N];
- Y = new int[N];
- Dydis = new int[N];
- for(int i=0; i<N; i++){
- X[i] = (int) random(width);
- Y[i] = (int) random(height);
- Dydis[i] = (int) random(10, 40);
- }
- }
- void draw(){
- background(50);
- fill(70); ellipse(mouseX, mouseY, 100, 100); // "teleskopas"
- // zvaigzdziu_keliai(); // atkomentuot F daliai
- for(int i=0; i<n; i++){ // piešiam žvaigždes
- if( pitagoras(X[i]-mouseX, Y[i]-mouseY) < 50 ){
- fill(0, 200, 0);
- }else fill(0, 0, 200);
- ellipse(X[i], Y[i], Dydis[i], Dydis[i]);
- fill(200, 200, 0); text(i+": "+Dydis[i], X[i], Y[i]); // extra info
- }
- int didziausios_nr=0; // galite įsivesti ir didziausias_dydis kintamąjį
- // E) Padaryti, kad didžiausią žvaigždę pieštų baltai -- 2tšk
- // galaktika(didziausios_nr); // atkomentuot G H dalims
- }
- void mousePressed(){
- // kad paspaudus su pele,
- // A1) toj vietoj atsirastų nauja žvaigždė -- 0.5 tšk
- // A2) kad ribotų max žvaigždžių kiekį pagal masyvų dydį -- 0.5 tšk
- }
- void keyPressed() {
- println("key", key, "code", keyCode);
- // B1) kad paspaudus 'a', į teleskopo vaizdą patenkančios žvaigždės, padidėtų 2kart // 1 tšk
- // B2) o paspaudus 'z', į teleskopo vaizdą patenkančios žvaigždės, sumažėtų x2 // 0.5 tšk
- if(key=='a'){
- }
- // C) kad, paspaudus tarpą, visos žalios žvaigždės "sprogtų" -- pataptų juodos ir nebežaliuotų// 1tšk
- // D-Ckams nereikia) kad paspaudus 'q', įvyktų visų matomų žvaigždžių rotacija:
- // d1) kiekviena peršoktų į sekančios (pagal numerį) vietą -- 1 tšk
- // d2) o paskutinė matoma -- į 0 vietą // 0.5 tšk
- }
- void zvaigzdziu_keliai(){
- // F) nupiešti "kelius" (linijas) tarp žvaigždžių,
- // tarp kurių kraštų atstumai mažesni už 100 // 1tšk
- }
- void galaktika(int znr){
- // G) pagal žvaigždės numerį surasti, visas su ja žvaigždžių "keliais" susietąsias
- // ir jas nuspalvinti geltonai // 1tšk
- // H) Surasti galaktikoks centrą ir jame nupiešti UFO :) // 1tšk
- // Visų galaktikos žvaigždžių X ir Y vidurkis. Reiks globalių kintamųjų, ir juos nunulint prieš startuojant rekursiją.
- }
- // Kaip manai, kiek taškų surinksi? -- pataikius 1tšk tikslumu -- +10%
- // bet 10-tuko gavimui negalioja -- jam reik viską padaryt :)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement