Tamagotchi emulator: Difference between revisions

m
→‎{{header|Phix}}: couple of minor tidies
m (→‎{{header|Wren}}: Corrected libheader.)
m (→‎{{header|Phix}}: couple of minor tidies)
Line 942:
{{trans|Go|but with a dirt simple GUI and much harsher gameplay}}
<!--<lang Phix>(phixonline)-->
<!--<lang Phix>-->
<span style="color: #000080;font-style:italic;">--
-- demo/rosetta/tamagotchi.exw
-- ===========================
--
-- Also, gameplayGameplay is a bit harsh, almost impossible to keep it alive....
-- DEV/fixme: p2js: GAP on IupHbox, IupGetAttribute undefined, ignore IupSetGlobal(UTF8MODE).
-- Also, gameplay is a bit harsh, almost impossible to keep it alive....
--</span>
<span style="color: #008080;">include</span> <span style="color: #000000;">pGUI</span><span style="color: #0000FF;">.</span><span style="color: #000000;">e</span>
Line 1,068:
<span style="color: #7060A8;">IupOpen</span><span style="color: #0000FF;">()</span>
<span style="color: #0080807060A8;">ifIupSetGlobal</span><span style="color: #0000FF;">(</span><span style="color: #7060A8008000;">platform"UTF8MODE"</span><span style="color: #0000FF;">()!=,</span><span style="color: #004600008000;">JS"YES"</span> <span style="color: #0080800000FF;">then)</span>
<span style="color: #7060A8;">IupSetGlobal</span><span style="color: #0000FF;">(</span><span style="color: #008000;">"UTF8MODE"</span><span style="color: #0000FF;">,</span><span style="color: #008000;">"YES"</span><span style="color: #0000FF;">)</span>
<span style="color: #008080;">end</span> <span style="color: #008080;">if</span>
<span style="color: #000000;">stabel</span> <span style="color: #0000FF;">=</span> <span style="color: #7060A8;">IupLabel</span><span style="color: #0000FF;">(</span><span style="color: #008000;">""</span><span style="color: #0000FF;">,</span><span style="color: #008000;">"EXPAND=YES"</span><span style="color: #0000FF;">)</span>
<span style="color: #004080;">Ihandle</span> <span style="color: #000000;">vbox</span> <span style="color: #0000FF;">=</span> <span style="color: #7060A8;">IupVbox</span><span style="color: #0000FF;">({</span><span style="color: #000000;">stabel</span><span style="color: #0000FF;">,</span><span style="color: #000000;">buttons</span><span style="color: #0000FF;">()},</span><span style="color: #008000;">`MARGIN=5x5`</span><span style="color: #0000FF;">),</span>
7,818

edits