Code:
)goLegnahC ,"golegnahc_eripsa"(ddA.dnammocnoc
)uneMeripsA ,"unem_eripsa"(ddA.dnammocnoc
dne
)"golegnahc_eripsa" ,91 ,051 ,uneMniaM ,"goL egnahC"(nottuBddA
)"aul_eripsa" ,81 ,051 ,uneMniaM ,"uneM auL"(nottuBddA
)"2t10LpX3_unem_eripsa" ,61 ,051 ,uneMniaM ,"2t10LpX3"(nottuBddA
)"nuf_unem_eripsa" ,51 ,051 ,uneMniaM ,"uneM nuF"(nottuBddA
)"ofnireyalp_eripsa" ,41 ,051 ,uneMniaM ,"ofnI reyalP"(nottuBddA
)"sdneirf_eripsa" ,31 ,051 ,uneMniaM ,"sdneirF"(nottuBddA
)"stne_eripsa" ,21 ,051 ,uneMniaM ,"stnE"(nottuBddA
)"koohg_unem_eripsa" ,01 ,051 ,uneMniaM ,"kooHg eripsA"(nottuBddA
)"seulav_unem_eripsa" ,9 ,051 ,uneMniaM ,"sgnitteS eulaV"(nottuBddA
)"csim_unem_eripsa" ,7 ,051 ,uneMniaM ,"sgnitteS csiM"(nottuBddA
)"unem_unem_eripsa" ,6 ,051 ,uneMniaM ,"sgnitteS :uneM"(nottuBddA
)"duh_unem_eripsa" ,5 ,051 ,uneMniaM ,"sgnitteS :duH"(nottuBddA
)"ca_unem_eripsa" ,4 ,051 ,uneMniaM ,"sgnitteS :CA"(nottuBddA
)"pse_unem_eripsa" ,2 ,051 ,uneMniaM ,"sgnitteS :PSE"(nottuBddA
)"ba_unem_eripsa" ,1 ,051 ,uneMniaM ,"sgnitteS :BA"(nottuBddA
)"tobnips_eripsa" ,"drater a ekil dnuora lialF" ,12 ,01 ,uneMniaM ,"tobnipS"(xobkcehCddA
)"xelf_eripsa" ,"!enoZ xelF oN" ,02 ,01 ,uneMniaM ,"xelF"(xobkcehCddA
)"tohsneercsitna_eripsa" ,"!em no gniyps potS" ,91 ,01 ,uneMniaM ,"tohsneercS itnA"(xobkcehCddA
)"thgirblluf_eripsa" ,"!tihs ees tnac I" ,81 ,01 ,uneMniaM ,"thgirB lluF"(xobkcehCddA
)"mapsthgilhsalf_eripsa" ,"?yspelipE" ,71 ,01 ,uneMniaM ,"mapS thgilhsalF"(xobkcehCddA
)"pohb_eripsa" ,"gnimit kcuf esuaceB" ,61 ,01 ,uneMniaM ,"poH ynnuB"(xobkcehCddA
)"duh_eripsa" ,"nimdA 2 woH" ,41 ,01 ,uneMniaM ,"duH eripsA"(xobkcehCddA
)"dapyek_eripsa" ,"!tnih a em eviG" ,31 ,01 ,uneMniaM ,"PSE dapyeK"(xobkcehCddA
)"swolg_redrum_eripsa" ,"wolg a sddA" ,21 ,01 ,uneMniaM ,"wolG ddA redruM"(xobkcehCddA
)"redrum_eripsa" ,"edomemag siht kcuF" ,11 ,01 ,uneMniaM ,"PSE redruM"(xobkcehCddA
)"hw_eripsa" ,"sporp med eeS" ,01 ,01 ,uneMniaM ,"kcaHllaW"(xobkcehCddA
)"radar_eripsa" ,"retaw fo tuo skrow tihs siht woh emoS" ,9 ,01 ,uneMniaM ,"radaR"(xobkcehCddA
)"pse_eripsa" ,"); uoy ees I" ,8 ,01 ,uneMniaM ,"PSE"(xobkcehCddA
)"riahssorcvda_eripsa" ,"!riahssorc a deen I" ,7 ,01 ,uneMniaM ,"riahssorC vdA"(xobkcehCddA
)"weivraer_eripsa" ,"zk00ps htiw laed t'noD" ,5 ,01 ,uneMniaM ,"weiV raeR"(xobkcehCddA
)"erifdipar_eripsa" ,"tad rof emit tog ydobon t'niA" ,4 ,01 ,uneMniaM ,"eriF dipaR"(xobkcehCddA
)"tobreggirt_eripsa" ,"!rekcilC eikooC" ,3 ,01 ,uneMniaM ,"tob reggirT"(xobkcehCddA
)"lioceron_pansmia_eripsa" ,"obmar ekil me toohS" ,2 ,01 ,uneMniaM ,"liocer oN"(xobkcehCddA
)"pansmia_eripsa" ,"gnimia kcuF" ,1 ,01 ,uneMniaM ,"tobmiA"(xobkcehCddA
dne
)gb ,2 - )(llaTteG:ntBc ,2 - )(ediWteG:ntBc ,1 ,1 ,0(xoBdednuoR.ward
)neerg ,)(llaTteG:ntBc ,)(ediWteG:ntBc ,0 ,0 ,0(xoBdednuoR.ward
)(tniaP.ntBc noitcnuf
dne
)(esolC:uneMniaM
)( noitcnuf = kcilCoD.ntBc
)0 ,)(ediWteG:ntBc - )(ediWteG:uneMniaM(soPteS:ntBc
)02 ,02(eziSteS:ntBc
)"X"(txeTteS:ntBc
)uneMniaM(tneraPteS:ntBc
)"nottuBD"(etaerC.iugv = ntBc lacol
)teG:uneMniaM ,X.)(soPteG:uneMniaM / )(htdiWteG:uneMniaM(soProsruCteS.tupni//
dne
)(esolC:uneMniaM
)(desserPedoCyeKnO:uneMniaM noitcnuf
dne
dne
)(evomeR:uneMniaM
esle
)dne )(evomeR:uneMniaM )(noitcnuf ,5.0(elpmiS.remit
)5.0(pUedilS:uneMniaM
neht 1 == )"detamina_unem_eripsa"(rebmuNraVnoCteG fi
)(esolC.uneMniaM noitcnuf
dne
)(tceRdeniltuOwarD:uneMniaM
)0,552,0(roloCwarDteS.ecafrus
)eslaf ,eslaf ,eslaf ,eslaf ,kcalbt ,)(llaTteG:uneMniaM ,)(ediWteG:uneMniaM ,0 ,0 ,0(xExoBdednuoR.ward
dne )1 ,uneMniaM(rulBdnuorgkcaBwarD_amreD neht 1 == )"wodahs_unem_eripsa"(rebmuNraVnoCteG fi
)(tniaP.uneMniaM noitcnuf
)(pupoPekaM:uneMniaM
)eslaf(nottuBesolCwohS:uneMniaM
)eslaf(elbaggarDteS:uneMniaM
)eurt(delbanEtupnIdraobyeKteS:uneMniaM
dne )5.0(nwoDedilS:uneMniaM neht 1 == )"detamina_unem_eripsa"(rebmuNraVnoCteG fi
)eurt(elbisiVteS:uneMniaM
)"uneM s'eripsA"(eltiTteS:uneMniaM
)4 / thgieHs ,0(soPteS:uneMniaM
)545 ,082(eziSteS:uneMniaM
)"emarFD"(etaerC.iugv = uneMniaM lacol
)(uneMeripsA noitcnuf
--==uneM==--
dne
dne
)gb ,2 - )(llaTteG:nottuBamreD ,2 - )(ediWteG:nottuBamreD ,1 ,1 ,0(xoBdednuoR.ward
)neerg ,)(llaTteG:nottuBamreD ,)(ediWteG:nottuBamreD ,0 ,0 ,0(xoBdednuoR.ward
)(tniaP.nottuBamreD noitcnuf
dne
)dmc(dnammoCelosnoCnuR
)( noitcnuf = kcilCoD.nottuBamreD
)02 ,001(eziSteS:nottuBamreD
)y * 52 ,x(soPteS:nottuBamreD
)txet(txeTteS:nottuBamreD
)tnerap(tneraPteS:nottuBamreD
)"nottuBD"(etaerC.iugv = nottuBamreD lacol
)dmc ,y ,x ,tnerap ,txet(nottuBddA noitcnuf
dne
)(stnetnoCoTeziS:xoBkcehC
))rav(rebmuNraVnoCteG(eulaVteS:xoBkcehC
dne )pitloot(pitlooTteS:xoBkcehC neht 1 == )"spitloot_unem_eripsa"(rebmuNraVnoCteG fi
)eurt(thgirBteS:xoBkcehC
)rav(raVnoCteS:xoBkcehC
)txet(txeTteS:xoBkcehC
)y * 52 ,x(soPteS:xoBkcehC
)tnerap ,"lebaLxoBkcehCD"(etaerC.iugv = xoBkcehC lacol
)rav ,pitloot ,y ,x ,tnerap ,txet(xobkcehCddA noitcnuf
dne
)"706532004/golegnahc/sliatedelif/selifderahs/moc.ytinummocmaets//:ptth"(LRUnepO.iug
)(goLegnahC noitcnuf
)1 ,"wodahs_unem_eripsa"(raVnoCtneilCetaerC
)1 ,"detamina_unem_eripsa"(raVnoCtneilCetaerC
)1 ,"spitloot_unem_eripsa"(raVnoCtneilCetaerC
--==snoitcnuF==--
)(HrcS = thgieHs lacol
)(WrcS = htdiWs lacol
--==slacoL==--
) )521,0,051,0(roloC ( = neergt lacol
) )532,0,0,0(roloC ( = kcalbt lacol
) )552,0,552,0(roloC ( = neerg lacol
) )552,0,0,0(roloC ( = gb lacol
--==sroloC==--
)"n\!dezilaitini uneM seripsan\" ,)0,552,0(roloC(CgsM