Forum de Programmation en langage PANORAMIC


Rejoignez le forum, c’est rapide et facile

Forum de Programmation en langage PANORAMIC
Forum de Programmation en langage PANORAMIC
Vous souhaitez réagir à ce message ? Créez un compte en quelques clics ou connectez-vous pour continuer.
Forum de Programmation en langage PANORAMIC

Je vous présente ici mes programmes (code en .BAS et en .EXE) réalisés en langage PANORAMIC, un langage puissant utilisant la syntaxe du BASIC.

Rechercher
 
 

Résultats par :
 

Rechercher Recherche avancée

Mots-clés

panoramic  transformation  fichiers  

Derniers sujets
» Bonne année 2024
La beauté des fractales EmptyLun 1 Jan - 0:25 par Papydall-Admin

» A ceux qui célèbre Noël, bonnes fêtes
La beauté des fractales EmptyDim 24 Déc - 10:49 par Papydall-Admin

» Joyeux Noël et Bonne Année
La beauté des fractales EmptyVen 8 Déc - 1:34 par Papydall-Admin

» Planets of the Solar System : Tilts and Spins
La beauté des fractales EmptyLun 20 Mar - 15:43 par Papydall-Admin

» Bonne Année 2023
La beauté des fractales EmptySam 31 Déc - 1:39 par Papydall-Admin

» Fractals - Mandelbrot
La beauté des fractales EmptyVen 21 Aoû - 22:51 par Papydall-Admin

» Convertisseur Décimal ---> Binaire, Octal, Hexadécimal, ...
La beauté des fractales EmptyMer 21 Nov - 1:08 par Papydall-Admin

» Balises {USER...}
La beauté des fractales EmptyLun 19 Nov - 22:12 par Papydall-Admin

» Useful Dog
La beauté des fractales EmptyVen 6 Avr - 14:25 par Papydall-Admin

Avril 2024
LunMarMerJeuVenSamDim
1234567
891011121314
15161718192021
22232425262728
2930     

Calendrier Calendrier

-21%
Le deal à ne pas rater :
LEGO® Icons 10329 Les Plantes Miniatures, Collection Botanique
39.59 € 49.99 €
Voir le deal

La beauté des fractales

Forum de Programmation en langage PANORAMIC :: Sources Panoramic

Aller en bas

La beauté des fractales Empty La beauté des fractales

Message par Papydall-Admin Dim 11 Juin - 2:52

Code:

rem ============================================================================
rem                   La beauté des fractales
rem ============================================================================
rem  Je tiens à remercier Gerard35 pour son beau travail
rem ============================================================================
label terminer
dim f$
full_space 0 : color 0,0,0,255 : caption 0,"LA BEAUTE DES FRACTALES"
Alpha 10 : top 10,10 : left 10,20 : font_bold 10 : font_size 10,24 : font_color 10,0,255,255
caption 10,"Veuillez patienter, chargement en cours ... Pour sortir cliquez sur ce cadre bleu"
Alpha 20 : top 20,height(0)-100 : left 20,20 : font_bold 20 : font_size 20,24 : font_color 20,0,255,255
caption 20,"Si vous ne pouvez pas changer de fractale, cliquez sur le cadre bleu et ré-exécuter le programme"
on_click 0,terminer
dll_on "kgf.dll" : ' Adapter le chemin de la DLL
f$ = "http://serveur1.archive-host.com/membres/up/1773583014/mes_animations/diapo_jwf.swf"
HTML_In_PANORAMIC(F$,70,50,width(0)-200,height(0)-200)
end
rem ============================================================================
SUB HTML_In_PANORAMIC(Flash$,xo,yo,larg,haut)
    dim_local hnd%, res%, url$, q$, WB1%
    q$ = chr$(34)
    file_open_write 9999,"flash.html"
    file_writeln 9999,"<embed src='"+Flash$+"'"+q$+" width="+q$+str$(larg)+q$+" height="+q$+str$(haut)+q$+">"
    file_close 9999
    hnd% = handle(0)
    url$ = "file://"+dir_current$+"/flash.html"
    WB1% = dll_call1("WB_Create",hnd%)
    res% = dll_call5("WB_Locate",WB1%,xo,yo,larg+50,haut+50)
    res% = dll_call2("WB_Url",WB1%,adr(url$))
    file_delete "flash.html"
END_SUB
rem ============================================================================
Terminer:
    terminate
rem ============================================================================
Papydall-Admin
Papydall-Admin
Admin

Messages : 93
Réputation : 0
Date d'inscription : 08/09/2015
Age : 73
Localisation : MOKNINE (Tunisie)

https://papydall-panoramic.forumarabia.com

Revenir en haut Aller en bas

Revenir en haut

- Sujets similaires

Forum de Programmation en langage PANORAMIC :: Sources Panoramic

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum