It's Simple... but it's pretty cool if I do say so myself...
change the inricatevalue# to 40 for a cool effect
sync on
sync rate 0
ink rgb(255,255,255),0
hide mouse
`-----------CHANGE THIS VALUE TO CHANGE THE RADAR SPEED AND HAVE COOL EFFECTS------
inricatevalue#=4
`-----| |-------------------------------------------------------
do
cls
ink rgb(255,255,255),0
if mouseclick()=1 then trigger9=1
if trigger9#=1 then interval=interval+1
if mouseclick()=1 then ink rgb(255,0,0),0 : trigger9=1
if trigger9=1 then bb=bb+1
if bb>=30 then ink rgb(255,255,255),0
if bb>=30 then bb=0
if bb>=30 then trigger9=0
circle mousex(),mousey(),rnd(5)+1
if trigger<>1 then x=x+inricatevalue#
if x>=658 and trigger2=0 then y=y+inricatevalue#
if x>=658 then trigger=1
line mousex(),mousey(),x,y
if y>=500 then trigger2=1
if trigger2=1 then x=x-inricatevalue#
if x=0 and y>=500 and trigger2=1 then trigger3=1
if trigger3=1 then y=y-inricatevalue#
if trigger3=1 then trigger2=0
if y=0 and x=0
trigger=0
trigger2=0
trigger3=0
endif
sync
loop
All comments are appreciated.
PLEASE RESPOND.
Nerds curse in Binary.