1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76
| REM/ EterniaOS / BAR2REM/ Créer par Yazid Richi
REM/ Barre menu d'applications
rem/ Repris de la barre CraftyOS
:_CREER:
txt/ BAR2 :: Création de la barre des taches
fix/ IUG_REDUCTION = CFT_BAR2
fix/ IUG_REDUCTION_ESPACE = 120
FIX/ IUG_REDUCTION_POS = 1
FIX/ IUG_REDUCTION_POSX = 32
FIX/ IUG_REDUCTION_POSY = 1
fix/ BARRE_TRANSPARENT = 0
rem/ La fenetre qui va contenir les objets
rem/ PY2 = A la taille y de l'ecran -40 (/c permet de calculer)
fix/ PY2 = /c %ECRY% - 20
ini/ fenetre(
ini;nom = "CFT_BAR2"
ini;texte = "BARRE DES TACHES"
ini;type = "3;M0A1R0F0T0HS0O0B0C1"
ini;couleur = "075,075,075"
ini;px = "0"
ini;py = "%PY2%"
ini;tx = "EX"
ini;ty = "20"
creer/
ini/ fenetre)
rem/ ====== Image de la barre ======
ini/ imagebox(
ini;fenetre = "CFT_BAR2"
ini;nom = "IMG_BAR2"
rem/ Transparence de la barre
si/ %BARRE_TRANSPARENT% = 0 (:
ini;couleur = "000,006,200"
ini;type = "2"
ini;couleurf = "001,001,001"
SINON/
ini;couleur = "000,000,000"
ini;type = "0"
ini;couleurf = "001,001,001"
FIN/ SI
ini;image = "%MEDIA%\IUG\BUREAU\BAR1.BMP"
ini;px = "0"
ini;py = "0"
ini;tx = "EX"
ini;ty = "34"
creer/
ini/ imagebox)
rem/ ====== Bouton explorateur de fichiers ======
ini/ imagebox(
ini;fenetre = "CFT_BAR2"
ini;nom = "IMG_EXPLOREUR"
ini;couleur = "000,006,200"
ini;type = "2"
ini;couleurf = "001,001,001"
ini;image = "%MEDIA%\ICONES\EXPLORE.BMP"
ini;px = "5"
ini;py = "1"
ini;tx = "22"
ini;ty = "22"
creer/
rem/ EV/ %SYSTEME%\BUREAU\Ev\TaskBar.CPC
ini/ imagebox)
stop/ |
Partager