ÿWPCOûÿ(8endnotes and footnotes üendnotes to footnotes~ ü ücol~~ ü ü~ ü)ü&128~ ü if the block is on~ üblock~ ü sub that searchs in the block~ ü ü the block is not on~ üwhole~ ü sub that searchs the whole doc~ ü F€ € ü rewrite the screen~ üfinished~ ü ü end of the macro~ ünd~ ü change one endnote to footnote~ ü5ü3~!=0~ üif were in columns~ ü!5ü4~&512~ üif were not in columns~ "ü ü ü J€22 € ündft~ ü copy content of endnote and put in a footnote~ €;€€€€G€12&€ J€11 €&€ €P€ ü remove the endnote~ ü)ü&1024~ ü reveal codes confirm delete~ y ü "ü üwhole~ ü change all endnotes to footnotes~ €€€€ ü go to the top~ ühole~ üüdone1~~ !€J€21!€ €ünd~€ ühole~ ü search for endnotes if none found return to main routine~ üdone1~ "ü üblock~ üfix block~ ü block should be down ward~ J€21&€ ü mark (alt 18) at the end of the block~ X€;€ ü goto top of the block~ üdoit~ üüdone~~ !€J€21!€ ü5ü3~!=0~ ü!5ü4~&512~ ücol~1~ ü ü üüblock1~~ €J€22 €!€!€ ü found end of block delete marker~ &€P€ ü)ü&1024~ y ü reveal codes confirm delete~ ü üdone~ "ü üblock1~ ü a endnote found that needs changed~ ü4ücol~=1~ &€ ücol~~ ü ündft~ ü üdoit~ üfix block~ ü change block top down~ ;€ ü turn the block off~ ü1~5üpage~~ ü2~5üline~~ ü3~5üpos~~ X€X€ ü block on and switch the block around~ ü turn block off again~ üÿ>5üpage~|ÿ>5üline~~ ügo on~ ü any of these three tests will tell if~ ü ü the block was created downward~ üÿ>5üpos~~ üÿ-5üpos~<120~ ü blocked one char is it a endnote?~ ü5üright~=54785~ ünd~ ü üfinished~ ü ügo on~ ü üÿ<5üpage~|ÿ<5üline~|ÿ<5üpos~~ üon~ ü any of these three test will tell if~ ü ü the block was created upward~ ü if I got here blocked something that takes no space is it a endnote~ ü5üright~=54785~ ünd~ ü üfinished~ ügo on~ X€X€ ü block on and switch the block around~ ü turn block off again~ üon~ "ü