Listing of file='1B' on disk='vmedia/glbr_22.wvd.zip'
# Sector 792, program filename = '1B' 0010 PRINT "FIRST DATE?" 0020 INPUT M,D,Y 0030 PRINT "SECOND DATE?" 0040 INPUT M1,D1,Y1 0050 PRINT 0060 M=(30*(M1-M)+D1-D+360*(Y1-Y))/180 0070 PRINT "SEMI-ANNUAL PERIODS=";M 0080 PRINT 0090 PRINT "MORE INPUT? (1=YES,0=NO)" 0100 INPUT D 0110 PRINT 0120 IF D=1 THEN 10 0130 END