andrewb icon

TRAILS.BAS

andrewb | PRO | 10/31/20 11:13:34 AM UTC | 0 ⭐ | 15012 👁️ | Never ⏰ | []
GwBasic |

210 B

|

None

|

0 👍

/

0 👎

Raw Download Clone Embed Print View 
0 REM TARILS
10 HGR2:SX=0:SY=0:EX=279:EY=191
20 DIM P(4):P(2)=SX:P(3)=SY
30 P(0)=P(2):P(1)=P(3):P(2)=INT(RND(EX)*EX):P(3)=INT(RND(EY)*EY)
40 HPLOT P(0),P(1) TO P(2),P(3)
50 FOR I = 1 TO 20:NEXT I
60 GOTO 30

Comments

  • icon
    01/01/70 12:00:00 AM UTC
    Plain Text |

    0 B

    |

    👍

    /

    👎

    
    
    

    

            
    • 
            
            
  • 
                
    
                    
    
                         icon
                    
    
                    
    
                        
                        
                        
                    
    
                    
    
                        
                        01/01/70 12:00:00 AM UTC
                        
                    
    
                
    
                

    
    
    
        
    
            Plain Text
            |
            
    0 B
    
            
            |
            
     👍
    
            /
            
     👎
    
        
    
        
    
    
    
    
        
    
    
    

    

            
    •