MrCBASIC/PAC-NW/PAC-NW.TXT

1 line
1.3 KiB
Plaintext

20 CLS
30 DIM A(3000):DIM B(2000):DIM X(50):DIM CN(200):DIM ANSY(100)
40 GPA=0:MISS=0
41 CALL TEXTFONT(3)
100 LINE(105,5)-(250,5):LINE-(250,12):LINE-(250,40):LINE-(258,41):LINE-(262,50):LINE-(260,54):LINE-(266,64):LINE-(274,64):LINE-(284,78):LINE-(295,85):LINE-(295,120):LINE-(300,122):LINE-(304,116)
101 LINE(305,116)-(310,116):LINE-(336,156):LINE-(344,150):LINE-(356,150):LINE-(362,148):LINE-(366,144):LINE-(372,138):LINE-(378,146):LINE-(380,149):LINE-(380,240):LINE-(54,240):LINE-(52,235):LINE-(54,230):LINE-(50,220):LINE-(55,195):LINE-(60,187)
102 LINE(60,187)-(59,178):LINE-(62,166):LINE-(61,160):LINE-(70,120):LINE-(70,100):LINE-(90,103):LINE-(89,100):LINE-(79,100):LINE-(75,97):LINE-(70,97):LINE-(70,84):LINE-(72,84):LINE-(72,93):LINE-(75,93):LINE-(75,86):LINE-(78,86):LINE-(78,84):LINE-(74,84)
103 LINE(74,84)-(74,82):LINE-(70,83):LINE-(70,72):LINE-(74,74):LINE-(74,71):LINE-(68,72):LINE-(60,40):LINE-(54,28):LINE-(58,20):LINE-(72,30):LINE-(84,32):LINE-(90,34):LINE-(95,34):LINE-(98,32):LINE-(101,32):LINE-(101,40):LINE-(94,52):LINE-(92,58)
104 LINE(92,58)-(96,60):LINE-(98,58):LINE-(94,56):LINE-(102,44):LINE-(104,44):LINE-(102,50):LINE-(104,56):LINE-(102,62):LINE-(98,62):LINE-(98,66):LINE-(105,66):LINE-(106,64):LINE-(106,59):LINE-(108,54):LINE-(106,44):LINE-(108,38):LINE-(105,38)