From af908f2253372dfbff5667264cdc3e8657c7007e Mon Sep 17 00:00:00 2001
From: Yulian <yuvlian@naver.com>
Date: Thu, 12 Mar 2026 04:15:07 +0000
Subject: [PATCH] Upload files to "/"

---
 MG5_n1.fprg |  90 +++++++++++++++++++++++++++++++++++++++++
 MG5_n2.fprg |   2 +
 MG5_n3.fprg | 113 ++++++++++++++++++++++++++++++++++++++++++++++++++++
 3 files changed, 205 insertions(+)
 create mode 100644 MG5_n1.fprg
 create mode 100644 MG5_n2.fprg
 create mode 100644 MG5_n3.fprg
diff --git a/MG5_n1.fprg b/MG5_n1.fprg
new file mode 100644
index 0000000..8282a50
--- /dev/null
+++ b/MG5_n1.fprg
@@ -0,0 +1,90 @@
+<?xml version="1.0"?>
+<flowgorithm fileversion="4.2">
+    <attributes>
+        <attribute name="name" value="GuessThePrice"/>
+        <attribute name="authors" value="yvl"/>
+        <attribute name="about" value=""/>
+        <attribute name="saved" value="2026-03-12 10:14:20 AM"/>
+        <attribute name="created" value="eXZsO1lVVkxJQU5fV0FTX0hFUkU7MjAyNi0wMy0xMjswODozMjoyMyBBTTsxMTEx"/>
+        <attribute name="edited" value="eXZsO1lVVkxJQU5fV0FTX0hFUkU7MjAyNi0wMy0xMjswODozMjoyMyBBTTsxOzExMTE="/>
+        <attribute name="edited" value="eXV2bGlhbjtDT1NNT1M7MjAyNi0wMy0xMjsxMDoxNDoyMCBBTTsxOzI2MDU="/>
+    </attributes>
+    <function name="Main" type="None" variable="">
+        <parameters/>
+        <body>
+            <declare name="targetHarga, angkaTebakan, percobaan, diff" type="Integer" array="False" size=""/>
+            <declare name="diffPersen" type="Real" array="False" size=""/>
+            <declare name="inputTebakan, ket" type="String" array="False" size=""/>
+            <declare name="jawabanBenar" type="Boolean" array="False" size=""/>
+            <assign variable="targetHarga" expression="0"/>
+            <while expression="targetHarga &lt; 10000">
+                <assign variable="targetHarga" expression="Random(200001)"/>
+            </while>
+            <output expression="&quot;DEBUG: targetHarga = &quot; &amp; targetHarga" newline="True"/>
+            <assign variable="percobaan" expression="0"/>
+            <assign variable="jawabanBenar" expression="false"/>
+            <output expression="&quot;Tebak harga barang (Rp 10.000 - Rp 200.000).&quot;" newline="True"/>
+            <output expression="&quot;Ketik nyerah untuk berhenti.&quot;" newline="True"/>
+            <while expression="not jawabanBenar and percobaan &lt; 12">
+                <output expression="&quot;Tebakan &quot; &amp; (percobaan + 1) &amp; &quot;/12&quot;" newline="True"/>
+                <output expression="&quot;Masukkan tebakan anda:&quot;" newline="True"/>
+                <input variable="inputTebakan"/>
+                <if expression="inputTebakan = &quot;nyerah&quot;">
+                    <then>
+                        <output expression="&quot;Jawaban yang benar: Rp &quot; &amp; targetHarga" newline="True"/>
+                        <assign variable="percobaan" expression="12"/>
+                    </then>
+                    <else>
+                        <assign variable="angkaTebakan" expression="ToInteger(inputTebakan)"/>
+                        <if expression="angkaTebakan &lt; 10000 or angkaTebakan &gt; 200000">
+                            <then>
+                                <output expression="&quot;Input tidak valid! Masukkan angka antara 10000 sampai 200000.&quot;" newline="True"/>
+                            </then>
+                            <else>
+                                <assign variable="percobaan" expression="percobaan + 1"/>
+                                <if expression="angkaTebakan = targetHarga">
+                                    <then>
+                                        <output expression="&quot;Selamat! Tebakan Anda benar!&quot;" newline="True"/>
+                                        <assign variable="jawabanBenar" expression="true"/>
+                                    </then>
+                                    <else>
+                                        <assign variable="diffPersen" expression="((angkaTebakan - targetHarga) * 100.0) / targetHarga"/>
+                                        <if expression="diffPersen &gt; 0">
+                                            <then>
+                                                <assign variable="ket" expression="&quot;kelebihan &quot; &amp; diffPersen"/>
+                                            </then>
+                                            <else>
+                                                <assign variable="ket" expression="&quot;kekurangan &quot; &amp; Abs(diffPersen)"/>
+                                            </else>
+                                        </if>
+                                        <if expression="Abs(diffPersen) &lt;= 5">
+                                            <then>
+                                                <output expression="&quot;PANAS! (Jawabanmu &quot; &amp; ket &amp; &quot;%)&quot;" newline="True"/>
+                                            </then>
+                                            <else>
+                                                <if expression="Abs(diffPersen) &lt;= 15">
+                                                    <then>
+                                                        <output expression="&quot;HANGAT! (Jawabanmu &quot; &amp; ket &amp; &quot;%)&quot;" newline="True"/>
+                                                    </then>
+                                                    <else>
+                                                        <output expression="&quot;DINGIN! (Jawabanmu &quot; &amp; ket &amp; &quot;%)&quot;" newline="True"/>
+                                                    </else>
+                                                </if>
+                                            </else>
+                                        </if>
+                                    </else>
+                                </if>
+                            </else>
+                        </if>
+                    </else>
+                </if>
+            </while>
+            <if expression="not jawabanBenar and percobaan = 12 and inputTebakan != &quot;nyerah&quot;">
+                <then>
+                    <output expression="&quot;Kesempatan habis! Jawaban yang benar: &quot; &amp; targetHarga" newline="True"/>
+                </then>
+                <else/>
+            </if>
+        </body>
+    </function>
+</flowgorithm>
diff --git a/MG5_n2.fprg b/MG5_n2.fprg
new file mode 100644
index 0000000..66ea73c
--- /dev/null
+++ b/MG5_n2.fprg
@@ -0,0 +1,2 @@
+<?xml version="1.0"?>
+<flowgorithm fileversion="4.2"><attributes><attribute name="name" value="EmailValidator"/><attribute name="authors" value="yvl"/><attribute name="saved" value="2026-03-12 08:47:09 AM"/><attribute name="created" value="eXZsO1lVVkxJQU5fV0FTX0hFUkU7MjAyNi0wMy0xMjswODo0NzowOSBBTTsxMTEx"/><attribute name="edited" value="eXZsO1lVVkxJQU5fV0FTX0hFUkU7MjAyNi0wMy0xMjswODo0NzowOSBBTTsxOzExMTE="/></attributes><function name="Substring" type="String" variable="hasil"><parameters><parameter name="teks" type="String" array="False"/><parameter name="mulai" type="Integer" array="False"/><parameter name="panjang" type="Integer" array="False"/></parameters><body><declare name="hasil" type="String" array="False" size=""/><declare name="u" type="Integer" array="False" size=""/><assign variable="hasil" expression="&quot;&quot;"/><for variable="u" start="mulai" end="mulai + panjang - 1" direction="inc" step="1"><assign variable="hasil" expression="hasil &amp; Char(teks, u)"/></for></body></function><function name="CekEkstensi" type="Boolean" variable="apakahValid"><parameters><parameter name="surel" type="String" array="False"/></parameters><body><declare name="apakahValid" type="Boolean" array="False" size=""/><declare name="daftarTLD" type="String" array="True" size="7"/><declare name="u, panjangSurel, panjangTLD" type="Integer" array="False" size=""/><assign variable="daftarTLD[0]" expression="&quot;.com&quot;"/><assign variable="daftarTLD[1]" expression="&quot;.org&quot;"/><assign variable="daftarTLD[2]" expression="&quot;.net&quot;"/><assign variable="daftarTLD[3]" expression="&quot;.edu&quot;"/><assign variable="daftarTLD[4]" expression="&quot;.gov&quot;"/><assign variable="daftarTLD[5]" expression="&quot;.co.id&quot;"/><assign variable="daftarTLD[6]" expression="&quot;.ac.id&quot;"/><assign variable="apakahValid" expression="false"/><assign variable="panjangSurel" expression="Len(surel)"/><for variable="u" start="0" end="6" direction="inc" step="1"><assign variable="panjangTLD" expression="Len(daftarTLD[u])"/><if expression="panjangSurel &gt;= panjangTLD"><then><if expression="Substring(surel, panjangSurel - panjangTLD, panjangTLD) = daftarTLD[u]"><then><assign variable="apakahValid" expression="true"/></then><else></else></if></then><else></else></if></for></body></function><function name="Main" type="None" variable=""><parameters></parameters><body><declare name="email, karakter, ekstensiSekarang" type="String" array="False" size=""/><declare name="apakahValid, adaSpasi, titikSetelahAt, apakahEkstensiValid" type="Boolean" array="False" size=""/><declare name="jumlahAt, posisiAt, i, panjangEmail" type="Integer" array="False" size=""/><assign variable="apakahValid" expression="false"/><while expression="not apakahValid"><output expression="&quot;Masukkan email:&quot;" newline="True"/><input variable="email"/><assign variable="jumlahAt" expression="0"/><assign variable="posisiAt" expression="-1"/><assign variable="adaSpasi" expression="false"/><assign variable="titikSetelahAt" expression="false"/><assign variable="panjangEmail" expression="Len(email)"/><for variable="i" start="0" end="panjangEmail - 1" direction="inc" step="1"><assign variable="karakter" expression="Char(email, i)"/><if expression="karakter = &quot;@&quot;"><then><assign variable="jumlahAt" expression="jumlahAt + 1"/><assign variable="posisiAt" expression="i"/></then><else></else></if><if expression="karakter = &quot; &quot;"><then><assign variable="adaSpasi" expression="true"/></then><else></else></if><if expression="posisiAt != -1 and karakter = &quot;.&quot; and i &gt; posisiAt"><then><assign variable="titikSetelahAt" expression="true"/></then><else></else></if></for><if expression="jumlahAt != 1"><then><output expression="&quot;Error: Email harus mengandung karakter &apos;@&apos; (tepat satu)&quot;" newline="True"/></then><else><if expression="not titikSetelahAt"><then><output expression="&quot;Error: Domain harus mengandung titik setelah &apos;@&apos;&quot;" newline="True"/></then><else><if expression="adaSpasi"><then><output expression="&quot;Error: Email tidak boleh mengandung spasi&quot;" newline="True"/></then><else><if expression="posisiAt &lt; 3"><then><output expression="&quot;Error: Panjang lokal (sebelum &apos;@&apos;) minimal 3 karakter&quot;" newline="True"/></then><else><assign variable="apakahEkstensiValid" expression="CekEkstensi(email)"/><if expression="apakahEkstensiValid"><then><output expression="&quot;Valid! Email &quot; &amp; email &amp; &quot; memenuhi semua syarat.&quot;" newline="True"/><assign variable="apakahValid" expression="true"/></then><else><assign variable="ekstensiSekarang" expression="&quot;&quot;"/><for variable="i" start="panjangEmail - 1" end="posisiAt" direction="dec" step="1"><if expression="Char(email, i) = &quot;.&quot;"><then><assign variable="ekstensiSekarang" expression="Substring(email, i, panjangEmail - i)"/></then><else></else></if></for><output expression="&quot;Error: Ekstensi domain &quot; &amp; ekstensiSekarang &amp; &quot; tidak valid (gunakan .com, .org, dll)&quot;" newline="True"/></else></if></else></if></else></if></else></if></else></if></while></body></function></flowgorithm>
\ No newline at end of file
diff --git a/MG5_n3.fprg b/MG5_n3.fprg
new file mode 100644
index 0000000..499d810
--- /dev/null
+++ b/MG5_n3.fprg
@@ -0,0 +1,113 @@
+<?xml version="1.0"?>
+<flowgorithm fileversion="4.2">
+    <attributes>
+        <attribute name="name" value="KuisInteraktif"/>
+        <attribute name="authors" value="yvl"/>
+        <attribute name="about" value=""/>
+        <attribute name="saved" value="2026-03-12 10:06:21 AM"/>
+        <attribute name="created" value="eXZsO1lVVkxJQU5fV0FTX0hFUkU7MjAyNi0wMy0xMjsxMDowMTowNCBBTTsxMTEx"/>
+        <attribute name="edited" value="eXZsO1lVVkxJQU5fV0FTX0hFUkU7MjAyNi0wMy0xMjsxMDowMTowNCBBTTsxOzExMTE="/>
+        <attribute name="edited" value="eXV2bGlhbjtDT1NNT1M7MjAyNi0wMy0xMjsxMDowNjoyMSBBTTsyOzI2MDg="/>
+    </attributes>
+    <function name="Main" type="None" variable="">
+        <parameters/>
+        <body>
+            <declare name="score, salahBeruntun, soalDijawab, pilihan, inputCode" type="Integer" array="False" size=""/>
+            <declare name="jawaban" type="String" array="False" size=""/>
+            <declare name="inputValid" type="Boolean" array="False" size=""/>
+            <declare name="daftarSoal" type="String" array="True" size="5"/>
+            <declare name="daftarPilihan" type="String" array="True" size="5"/>
+            <declare name="kodeJawaban" type="Integer" array="True" size="5"/>
+            <call expression="setSoal(daftarSoal, daftarPilihan, kodeJawaban, 0, &quot;Soal 1: Ibukota Indonesia adalah?&quot;, &quot;a. Jakarta b. Surabaya c. Bandung d. Medan&quot;, ToCode(&quot;a&quot;))"/>
+            <call expression="setSoal(daftarSoal, daftarPilihan, kodeJawaban, 1, &quot;Soal 2: 2 + 2 = ?&quot;, &quot;a. 3 b. 4 c. 5 d. 6&quot;, ToCode(&quot;b&quot;))"/>
+            <call expression="setSoal(daftarSoal, daftarPilihan, kodeJawaban, 2, &quot;Soal 3: Warna langit?&quot;, &quot;a. Hijau b. Biru c. Merah d. Kuning&quot;, ToCode(&quot;b&quot;))"/>
+            <call expression="setSoal(daftarSoal, daftarPilihan, kodeJawaban, 3, &quot;Soal 4: Hewan berkaki empat?&quot;, &quot;a. Ayam b. Ikan c. Kucing d. Burung&quot;, ToCode(&quot;c&quot;))"/>
+            <call expression="setSoal(daftarSoal, daftarPilihan, kodeJawaban, 4, &quot;Soal 5: 5 x 5 = ?&quot;, &quot;a. 20 b. 25 c. 30 d. 35&quot;, ToCode(&quot;b&quot;))"/>
+            <assign variable="score" expression="0"/>
+            <assign variable="salahBeruntun" expression="0"/>
+            <assign variable="soalDijawab" expression="0"/>
+            <assign variable="pilihan" expression="0"/>
+            <output expression="&quot;Selamat datang di Kuis Interaktif!&quot;" newline="True"/>
+            <while expression="pilihan != 3">
+                <output expression="&quot;Menu:&quot;" newline="True"/>
+                <output expression="&quot;1. Jawab Soal Berikutnya&quot;" newline="True"/>
+                <output expression="&quot;2. Lihat Skor&quot;" newline="True"/>
+                <output expression="&quot;3. Keluar&quot;" newline="True"/>
+                <output expression="&quot;Pilihan: &quot;" newline="False"/>
+                <input variable="pilihan"/>
+                <if expression="pilihan == 1">
+                    <then>
+                        <output expression="daftarSoal[soalDijawab]" newline="True"/>
+                        <output expression="daftarPilihan[soalDijawab]" newline="True"/>
+                        <assign variable="inputValid" expression="false"/>
+                        <while expression="not inputValid">
+                            <output expression="&quot;Jawaban (a/b/c/d): &quot;" newline="False"/>
+                            <input variable="jawaban"/>
+                            <if expression="Len(jawaban) &gt; 0">
+                                <then>
+                                    <assign variable="inputValid" expression="jawaban == &quot;a&quot; or jawaban == &quot;b&quot; or jawaban == &quot;c&quot; or jawaban == &quot;d&quot;"/>
+                                </then>
+                                <else>
+                                    <output expression="&quot;Input tidak boleh kosong!&quot;" newline="True"/>
+                                </else>
+                            </if>
+                        </while>
+                        <assign variable="inputCode" expression="ToCode(Char(jawaban, 0))"/>
+                        <if expression="inputCode == kodeJawaban[soalDijawab]">
+                            <then>
+                                <assign variable="score" expression="score + 20"/>
+                                <assign variable="salahBeruntun" expression="0"/>
+                                <output expression="&quot;Benar! Skor Anda: &quot; &amp; score" newline="True"/>
+                            </then>
+                            <else>
+                                <assign variable="salahBeruntun" expression="salahBeruntun + 1"/>
+                                <output expression="&quot;Salah! (Salah beruntun: &quot; &amp; salahBeruntun &amp; &quot;)&quot;" newline="True"/>
+                            </else>
+                        </if>
+                        <assign variable="soalDijawab" expression="soalDijawab + 1"/>
+                        <if expression="salahBeruntun == 3">
+                            <then>
+                                <output expression="&quot;Anda telah salah 3 kali berturut-turut. Kuis berhenti.&quot;" newline="True"/>
+                                <assign variable="pilihan" expression="3"/>
+                            </then>
+                            <else>
+                                <if expression="soalDijawab == 5">
+                                    <then>
+                                        <output expression="&quot;Semua soal telah dijawab.&quot;" newline="True"/>
+                                        <assign variable="pilihan" expression="3"/>
+                                    </then>
+                                    <else/>
+                                </if>
+                            </else>
+                        </if>
+                    </then>
+                    <else>
+                        <if expression="pilihan == 2">
+                            <then>
+                                <output expression="&quot;Skor saat ini: &quot; &amp; score" newline="True"/>
+                            </then>
+                            <else/>
+                        </if>
+                    </else>
+                </if>
+            </while>
+            <output expression="&quot;Skor akhir Anda: &quot; &amp; score" newline="True"/>
+        </body>
+    </function>
+    <function name="setSoal" type="None" variable="">
+        <parameters>
+            <parameter name="sArr" type="String" array="True"/>
+            <parameter name="pArr" type="String" array="True"/>
+            <parameter name="jArr" type="Integer" array="True"/>
+            <parameter name="idx" type="Integer" array="False"/>
+            <parameter name="tSoal" type="String" array="False"/>
+            <parameter name="tPilihan" type="String" array="False"/>
+            <parameter name="nJawaban" type="Integer" array="False"/>
+        </parameters>
+        <body>
+            <assign variable="sArr[idx]" expression="tSoal"/>
+            <assign variable="pArr[idx]" expression="tPilihan"/>
+            <assign variable="jArr[idx]" expression="nJawaban"/>
+        </body>
+    </function>
+</flowgorithm>
