20. juli 2001 - 18:56Der er
7 kommentarer og 1 løsning
Kullotion
Hey... Hvis laser rammer rumdyr så skal rumdyr placeres lang væk. (f.eks. rumdyr.top + 10000)langt væk.... Er denne kode som jeg selc har skrevet helt ude på marken, eller er det bare mig?
If laser(antal) = rumdyr.CurrentX And rumdyr.CurrentY Then rumdyr.Top = rumdyr.Top + 100000 End If
Øhm, for det første checker du på E.T.\'s placering og ikke på hele dens \"arial\". Hvis eks CurrentX/Y markerer E.T.\'s øverste venstre hjørne kan du gøre følgende:
\' et = rumdyr - for sjov skyld en_zillion = 100000000 If laser.x => et.x and laser.y => et.y and laser.x < et.x + et.bredde and laser.y < et.y + et.højde Then rumdyr.Top = en_zillion End If
Okay ehm... så har laser altså også et arial som der skal tages højde for... Ehm...
\' Check først Laser Top/Left If Laser(antal).Top => ET.Top And Laser(antal).Top < ET.Top + ET.Height And Laser(antal).Left => ET.Left And Laser(antal).Left < ET.Left + ET.Width Then \' Check derefter på Laser Bottom/Right If Laser(antal).Top + Laser(antal).Width => ET.Top And Laser(antal).Top + Laser(antal).Width < ET.Top + ET.Height And Laser(antal).Left + Laser(antal).Width => ET.Left And Laser(antal).Left + Laser(antal).Width < ET.Left + ET.Width Then ET.Top = en_zillion End If End If
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.