I PAYROLL TIME CALCULATOR BY JAMES C. NOVEMBER 2002™ CBM264 SOFTWARE WWW.CBM264.COM RELEASED AS COPYRIGHTED FREEWARE.å FREE TO DISTRIBUTE AND USE. NO MODIFICATIONS MAY BE RELEASED( WITHOUT PERMISSION OF CBM264 SOFTWARE.N2è:™"PAYROLL CALC 1.0 (C)2002 WWW.CBM264.COM"š<™:™"ENTER ALL TIMES AS MILITARY TIME (0845, 1330). USE NO PUNCTUATION."¢Fœ:™ÈP…"ENTER NUMBER OF DAYS WORKED";DY×Z‹DY²«1§560äd‹DY²0§80ùn† DH(DY), DM(DY)x DA ² 1 ¤ DYV‚BA$²"":LA$²"":BP$²"":LP$²"":BB$²"":LB$²"":BT$²"":LU$²"":AM²0:PM²0:BH²0jŒ™:™"DAY"DA"’:"ˆ–: …"START TIME, A.M.";BA$¦ : …"LEAVE TIME, A.M.";LA$Æª 590 : CHECK VALID TIMESä´: …"START TIME, P.M.";BP$¾: …"LEAVE TIME, P.M.";LP$"È 680 : CHECK VALID TIMESiÒ: ™"BONUS TIME (Y/N)?";:¡ù BT$:‹BT$²"N"§BB$²"0000":LB$²"0000":‰250‰Ü: ™:…"START TIME BONUS";BB$§æ: …"LEAVE TIME BONUS";LB$Çð 770 : CHECK VALID TIMES÷ú: ™:™"FORCE 30 MINUTE LUNCH (Y/N)?";:¡ù LU$: ™:‹LU$²"N"§LU²0:ÕLU²300 ** CALCULATE TIMES **NHA²µ(AM60):MA²AM«(HA¬60)"™:™"MORNING TIME IS"HA"HOURS AND"MA"MINUTES",HP²µ(PM60):MP²PM«(HP¬60)Í6™:™"AFTERNOON TIME"HP"HOURS AND"MP"MINUTES"è@HB²0:MB²0:‹BT$²"N"§350JHB²µ(BH60):MB²BH«(HB¬60)5T™:™"BONUS TIME IS"HB"HOURS AND"MB"MINUTES"]^™:™"FOR LUNCH SUBTRACT"LU"MINUTES."h™:™"TODAY'S TOTAL HOURS ARE:"³rTH²HAªHPªHB:TM²MAªMPªMB:‹LU²30§TH²TH«1:TM²TMª30Ô|‹TM±59§TM²TM«60:TH²THª1:‰380ì†‹TH³0§TH²0:TM²TM«60‹TH²0¯TM³0§TM²0š™TH"HOURS AND"TM"MINUTES."E¤™:™"RECALCULATE THIS DAY (Y/N)?";a®A$²"N":¡ùA$:‹A$²"Y"§140g¸™ÂDH(DA)²TH:DM(DA)²TM:‚‡Ì:¬Ö ** CALCULATE TOTAL TIMECARD **ºàXH²0:XM²0ÆêX²1¤DYäô: XH²XHªDH(X):XM²XMªDM(X)êþ‚‹XM±59§XM²XM«60:XH²XHª1:‰520;™:™"TOTAL CARD IS"XH"HOURS AND"XM"MINUTES."f™:™"PRESS SPACEBAR TO CONTINUE’":¡ùA$&™:™"DO YOU WISH TO CALCULATE ANOTHER CARD (Y/N)?";:¡ùA$:‹A$²"Y"§70Þ0™"“ PAYROLL CALCULATOR 1.0"¸(0)"BYTES FREE"ý:™" TYPE 'RUN' TO RESTART."D€GN‹BA$²""§BA$²"0000":‹LA$²""§LA$²"0000": ** VALIDATE AM TIMES **uX‹Ã(BA$)³±4¯BA$³±"0"§™"INVALID START TIME"£b‹Ã(LA$)³±4¯LA$³±"0"§™"INVALID LEAVE TIME"ÁlB1$²È(BA$,2):B2$²É(BA$,2)ÙvBA²Å(B1$)¬60ªÅ(B2$)÷€L1$²È(LA$,2):L2$²É(LA$,2)ŠLA²Å(L1$)¬60ªÅ(L2$),”AM²LA«BA:‹AM³0§AM²AMª7202žŽv¨‹BP$²""§BP$²"0000":‹LP$²""§LP$²"0000": ** VALIDATE PM TIMES **¤²‹Ã(BP$)³±4¯BP$³±"0"§™"INVALID START TIME"Ò¼‹Ã(LP$)³±4¯LP$³±"0"§™"INVALID LEAVE TIME"ðÆB1$²È(BP$,2):B2$²É(BP$,2)ÐBP²Å(B1$)¬60ªÅ(B2$)&ÚL1$²È(LP$,2):L2$²É(LP$,2)>äLP²Å(L1$)¬60ªÅ(L2$)[îPM²LP«BP:‹PM³0§PM²PMª720aøŽ§‹BB$²""§BB$²"0000":‹LB$²""§LB$²"0000": ** VALIDATE BONUS TIME **Õ‹Ã(BB$)³±4¯BB$³±"0"§™"INVALID START TIME"‹Ã(LB$)³±4¯LB$³±"0"§™"INVALID LEAVE TIME"! B1$²È(BB$,2):B2$²É(BB$,2)9*BB²Å(B1$)¬60ªÅ(B2$)W4L1$²È(LB$,2):L2$²É(LB$,2)o>LB²Å(L1$)¬60ªÅ(L2$)ŒHBH²LB«BB:‹BH³0§BH²BHª720’RŽ