PROC myicon: print "make an icon for ex_app3" print "press a key" :get :cls gCREATE(0,0,24,24,1) gBORDER $200 gAT 3,14 gPRINT "me!" gSAVEBIT "me" ENDP